Hallo zusammen,
ich weiß, diese Thema ist des öfteren hier breitgetreten worden, aber ich finde einfach den Fehler bei mir nicht:
Ich möchte zwei Timer dynamishc erzeugen. Ich besitze keine Formulare! diesen Timern sollen das das OnTimer-Event zugewiesen werden. Das habe ich folgendermaßen gemacht:
Delphi-Quellcode:
type
TmyTimer = class
procedure OnTimer(Sender: TObject);
end;
var
Timer1 : TTimer;
Timer2 : TTimer;
_myTimer : TmyTimer;
...
procedure MeineFunktion(Sender: TObject);
begin
...
Timer1.OnTimer := _myTimer.OnTimer(Sender);
Timer2.OnTimer := _myTimer.OnTimer(Sender);
...
end;
...
initialization
Timer1 := TTimer.Create(nil);
Timer2 := TTimer.Create(nil);
finalization
Timer1.Free;
Timer2.Free;
Beim Zuweisen sagt er mir Inkompatible Typen: TNotifyEvent und Procedure
Hoffe ihr könnt mir helfen.
Gruß, Moony