ICS et modification de propriété

**Tangui** · 01/04/2008, 22h51

Bonsoir tout le monde,

je veux créer un serveur TCP et j'ai pour cela commencé par installer ICS. L'objet qui m'intéresse est TWSocketServer et dans les exemples, il est utilisé comme objet dans une classe TForm.

Seulement je n'ai pas envie de copier bêtement le code et je souhaite moi étendre la classe TWSocketServer donc je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rfkServer = class(TWSocketServer)

Jusqu'ici, tout va bien. Seulement cet objet a des propriété comme onClientConnect et je ne sais pas comment l'utiliser. Dans l'exemple, c'est utilisé comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
procedure TTcpSrvForm.WSocketServer1ClientConnect(
    Sender : TObject;
    Client : TWSocketClient;
    Error  : Word);
begin
// code
end;