|
Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
Re: TNotifyEvent = nil
27. Mär 2006, 12:14
Delphi-Quellcode:
type
TOnConnect = procedure(Sender: TObject);
... = class(TObject);
private
FOnConnect: TOnConnect;
public
property OnConenct: TOnConnect read FOnConnect write FOnConnect;
end;
procedure TClientSocket.SetOnConnect;
begin
if Assigned(OnConnect) then
FOnConnect(self);
muss es heißen.
Michael
Ein Teil meines Codes würde euch verunsichern.
|