Registriert seit: 24. Okt 2004
1.542 Beiträge
Delphi XE Architect
|
Re: Problem mit Verbindungsaufbau
1. Dez 2005, 18:06
Des ist auch unschön. Das ist viel besser:
Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ClientSocket1.Active := true;
end;
procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
Socket.SendText('test');
end;
Alex "Sage nicht alles, was du weißt, aber wisse alles, was du sagst!" Matthias Claudius
"Wer sich über Kritik ärgert, gibt zu, daß er sie verdient hat." Tacitus
|