Hola Crandel !!!
El texto html me lo bajo de una pag web (el codigo html es la pag).
Yo recibo ese codigo mediante la función
Código PHP:
procedure TForm1.ClientSocket1Read
Le digo que, lo que lea lo pase a una String determinada
Código PHP:
var
str:AnsiString;
begin
str:= Socket.ReceiveText;
Y luego le digo que lo escriba en un memo
Código PHP:
memo1.Lines.Add(str);
Yo recibo el codigo fuente de la pag por que previamente
le envié con el
Código PHP:
TForm1.ClientSocket1Connect
Este texto:
Código PHP:
procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
with ClientSocket1 do begin
Socket.SendText('POST /game/reg/login2.php HTTP/1.0'+#13#10);
Socket.SendText('Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*'+#13#10);
Socket.SendText('Referer: [url="http://ogame159.de/portal/?lang=es'+#1310"]http://ogame159.de/portal/?lang=es'+#13#10[/url]);
Socket.SendText('Accept-Language: es'+#13#10);
Socket.SendText('Content-Type: application/x-www-form-urlencoded'+#13#10);
Socket.SendText('Proxy-Connection: Keep-Alive'+#13#10);
Socket.SendText('User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)'+#13#10);
Socket.SendText('Host: ogame192.de'+#13#10);
Socket.SendText('Content-Length: 84'+#13#10);
Socket.SendText('Pragma: no-cache'+#13#10);
Socket.SendText(''+#13#10);
Socket.SendText('timestamp=1120575910&v=2&Uni=ogame192.de&login=XX&pass=XX&x=24&y=6'+#13#10);
Socket.SendText(''+#13#10);
Socket.SendText(''+#13#10);
end;
end;
Todo ello por el puerto 80 y al host ogame192.de
Me interesaria muchisímo saber como puedo recivir linea por linea
el texto recogido por el scoket, por que asi me ahorraria un
monton de trabajo a la hora de programar y aumentaria la velocidad de
mi programa, ya que todo el texto recogido por el socket es
solamente para recoger unas determinadas cadenas de numeros,
que se repiten una sola vez pero que cada 5 minutos cambian,
pero no cambian de linea!!!!
Asi podria yo decirle al programa la linea exacta que me interesa
pasarla a un edit y ya esta.
Muchas gracias por todo!!!!