Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
Hab das Problem jetzt gefunden, ist allerdings nicht unbedingt nachvollziehbar für mich.
Einfach anstatt
procedure Tfrmmain.ServerClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
memmain.Lines.Insert(0,server.socket.ReceiveText);
end;
ohne "server"
Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
Der "Asynchrone Socket-Fehler" wird vom Client beim Senden ausgelöst. Kurz drauf schimpft auch der Server rum.
Die Verbindung wird eigentlich nur über den Connect-Button hergestellt oder getrennt.
Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
Das funktioniert. Ich hab das ganze zwar in zwei getrennten Programmen, sollte ja aber keinen großen Unterschied machen.
Sagt jemandem "Asynchroner Socket-Fehler 10057" irgendetwas? Das sagt er nämlich auch noch.
Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
Ja, ich hab auch versucht, das alles in einer Prozedur zu lösen aber mit dem gleichen Ergebnis.
Laut Tutorial sollte das ja auch laufen.
Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
ich bekomm dann immer diese Meldung:
Forum: Object-Pascal / Delphi-Language
Delphi
by buyden,
23. Okt 2006
Hi,
ich möchte mittels Client/Server-Socket Strings übers Netzwerk verschicken.
Dazu hab ich folgenden Code:
ServerSocket:
procedure Tfrmmain.FormCreate(Sender: TObject);
begin
list:=tstringlist.Create;
server.Port:=10024;
server.Open;
list.Append(formatdatetime('dd.mm.yyyy-hh:mm:ss',now)+' - Server gestartet');