holas.. alguien me puede ayudar con eso.. ?
estoy intentando de hacer un proxy con esos componentes pero al parecer tengo problemas de sincronizacion, soy nuevo en delphi.. y pues no se como solucionarlo
Código:
procedure TForm1.client44405Read(Sender: TObject;
Socket: TCustomWinSocket);
var
data:string;
begin
if socket.ReceiveLength<1 then
Exit;
data:=socket.ReceiveText;
if server44405.Socket.Connected then
server44405.Socket.SendText(data) // <<<- aki error 10057
else
memo2.Lines.Add('Recv '+ asciitohex(data,true));
end;
nota.. si alguien tiene algun proxy/"man in the middle" de ejemplo plz