Me da error al quitar el componente ClientSocket1

[Sirkius]

Si no lo pones como componente, que se crea automaticamente al crear el form, deberás crearlo antes de nada.

En el FormCreate antes de nada:

ClientSocket1 := TClientSocket.Create(Self);

Y para mayor seguridad en el FormClose:

ClientSocket1.Free;

[Antuan]

Perfecto me funciona bien.
Muchas gracias
Como estoy aprendiendo y buscando cosas, y experimentando.
¿Se podria pasar el codigo del boton a una funcion?

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
   with ClientSocket1.Socket do begin
      SendText('GET http://www.villademostoles.da.ru/index.html HTTP/1.1'+#13#10);
      SendText('Accept-Language: es'+#13#10);
      SendText('Accept-Encoding: gzip, deflate'+#13#10);
      SendText('User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)'+#13#10);
      SendText('Host:www.villademostoles.da.ru'+#13#10);
      SendText(''+#13#10);
   end;
end;

[dec]

Hola,

Empezado por Antuan

¿Se podria pasar el codigo del boton a una funcion?

Una función tiene que devolver algún resultado... ¿Qué resultado tendría que devolver el código anterior? Si fuera el "ReceiveText" del "Socket" podrías probar a crear el mismo dentro del cuerpo de una función, inicializarlo y luego que la función devolviera una cadena de caracteres ("string") con el "ReceiveText", propiamente. Tal vez la función podría contar con un parámetro, también de tipo "string", en el que pudiera enviarse la dirección URL que parece ser necesaria y de la que se quiere obtener el "ReceiveText".

[Antuan]

Como ves he caido de nuevo en delphi.
El el primer hilo tengo lo que devuelve
que es esto

Código Delphi [-]
memo1.Lines.Add(ClientSocket1.Socket.ReceiveText);

Pero lo logico es que lo devuelva como dices en el ReciveText en un EditText.
Intentare lo que dices pero al hacer la funcion me dice que el componente ClientSocket1 no esta definido y sin embargo en el apartado private lo tengo definido.
Volvere a dejarlo de nuevo y seguir con lo que estaba haciendo hasta que coja nivel.