Zitat von
DeddyH:
Kleiner Verbesserungsvorschlag:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
myServer := TServerSocket.Create(Form1);
myServer.Port := 6712;
myServer.OnClientRead := self.OnClientRead;
end;
Man sollte niemals benannte Instanzen nehmen.
Nicht ganz konsequent
Schau dir mal den Parameter von TServerSocket.Create an.