Formloses SocketProgramm

[napsterxx]

Also muss der Timer dann die Klasse sein?

Delphi-Quellcode:

  type
  Timer = class(TTimer)
    procedure ConnectTimerOnTimer(Sender: TObject);


  end;

var
  Connected : Boolean = False;
  ClientSocket : TClientSocket;
  ConnectTimer : Timer;

{$R *.res}


procedure Timer.ConnectTimerOnTimer(Sender: TObject);
begin

end;

begin

  ClientSocket := TClientSocket.Create(nil);
  ConnectTimer := Timer.Create(nil);
  ConnectTimer.Interval := 10000;

  ConnectTimer.OnTimer := ConnectTimerOnTimer;

[Fehler] Client.dpr(32): E2003 Undefinierter Bezeichner: 'ConnectTimerOnTimer'