Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Enviar Texto usando FTP (https://www.clubdelphi.com/foros/showthread.php?t=97386)

delphi50jmb 05-04-2025 02:27:55

Enviar Texto usando FTP
 
Hola amigos.

Quisiera saber si es posible enviar texto directamente desde un cliente FTP a un servidor WEB.

Me Explico:
Tengo una aplicacion delphi que usa las librerias Indy, para enviar archivos mediante FTP desde un Pc a un sitio WEB. Esto funciona bien, pero lo que necesito, es enviar un texto extraido directamente de un componente TMemo en un Form al servidor web.

Osea: que el usuario escriba directamente en el formulario sus comentarios, extraer esa informacion que el usuario escribio, y enviarla al servidor Web como un archivo de texto.

Es posible?..

Saludos.
Jose Miguel B.

Casimiro Notevi 05-04-2025 12:18:22

Código Delphi [-]
memo.savetofile( 'nombredelfichero.txt' );
ftp...

delphi50jmb 05-04-2025 17:36:20

Hola Casimiro.
Agradesco tu respuesta. Pero no era lo que buscaba.

Lo resolvi de esta manera:

Código SQL [-]
var
I : Integer;
FileName : String;
tsMemo : TMemoryStream;

begin
   FileName := 'Comentario.Text';
   tsMemo:= TMemoryStream.Create;

   Memo1.Lines.SaveToStream(tsMemo);
   tsMemo.Position := 0;

   FTP.Put(tsMemo, FileName, False);
end;

Agradecido de todas formas.

Saludos.
Jose Miguel.

Casimiro Notevi 05-04-2025 20:28:22

¡Ah!, que no querías guardar el memo en un fichero, eso no lo había entendido.
Sí, esa es la solución.
^\||/


La franja horaria es GMT +2. Ahora son las 13:43:10.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi