Forum: Netzwerke
by shmia,
6. Jul 2011
@Pet04: Bitte Delphi Tags setzen: 636
Forum: Netzwerke
by shmia,
5. Jul 2011
Das Event OnError ist so deklariert:
TSocketErrorEvent = procedure (Sender: TObject; Socket: TCustomWinSocket;
ErrorEvent: TErrorEvent; var ErrorCode: Integer) of object;
Also muss man die übergeben Parameter auch benützen und darf nicht selbst mit FindComponent() suchen.
Forum: Netzwerke
by shmia,
5. Jul 2011
Tja, die Reihenfolge der Befehle ist halt wichtig.
Zuerst alle Properties und Events des TClientSocket-Objekts bestücken und dann erst Active := True setzen.
// Zuerst Eventhandler zuweisen
OnError := Price_Info_ClientSocketA_Error;
// und dann erst
active :=true; //Aufbau der Verbindung