Einzelnen Beitrag anzeigen

bender

Registriert seit: 6. Dez 2003
9 Beiträge
 
Delphi 6 Enterprise
 
#1

Zur Laufzeit erstellter Timer

  Alt 9. Dez 2003, 17:14
Hi

wie kann ich einem zur Laufzeit erstellten Timer ein onTimer Ereignis zuweisen?
das Problem hierbei ist nicht der Aufruf (den weiss ich mittlerweile), sondern, dass ich das OnTimer Ereignis aus einer Prozedur zuweisen will...
Delphi-Quellcode:
unit Unit2;

interface

uses Forms, ExtCtrls,Unit1;

procedure moin();
procedure MyTimerEvent(Sender: TObject);

implementation

procedure moin();
var
  MyTimer: TTimer;
begin
  MyTimer := TTimer.Create(application);
  MyTimer.Enabled := True;
  MyTimer.Interval := 1000;
  MyTimer.OnTimer := MyTimerEvent;

end;
procedure MyTimerEvent(Sender: TObject);
begin
  form1.Caption := TimeToStr(Time);
end;
end.
  Mit Zitat antworten Zitat