Hallo!
Ich möchte mir Klassen für ein chat-Programm schreiben.
Ein property soll eine Indycomponente oder TClientsocket sein.
Nun will ich ja Daten empfangen, etwa so:
Delphi-Quellcode:
type
Tchat = class
csocket: TClientsocket;
{...}
procedure cSocketRead(Sender: TObject;
Socket: TCustomWinSocket);
end;
{...}
procedure Tchat.cSocketRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
socket.
end;
nach dem "Vorbild":
Delphi-Quellcode:
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
begin
end;
Kann man das mit diesen Events so machen und wie lautet das entsprechende Event in der Indykomponente idTCPClient?