Registriert seit: 13. Dez 2006
10 Beiträge
|
Form in eine Timer Procedure integrieren
9. Nov 2008, 19:47
Hi,
ich brauche mal kurz Hilfe.
Und zwar programmier ich gerade Objektorientiert etwas und habe da jetzt eine Timer.Procedure in einer Etxtraunit erstellt.
Vorher habe ich die Form die aus dem Hauptprogramm übergeben wird als Form:TForm deklariert.
Nun muss ich die Form mit in den Timer bekommen und iwie so:
TElement.ttTimer(sender:TObject; Form:TForm);
Wenn ich zuvor die TimerProcedure aufgerufen habe, dann muss ich nur
tt.ontimer:=ttTimer
schreiben.
Jetzt will er jedoch 2 Sachen haben und zwar:
tt.ontimer:=ttTimer((sender:TObject; Form:TForm)
Was muss ich für Sender:TObject eintragen? Form geht nicht denn dann kommt folgende Fehlermeldung:
[Fehler] USnake.pas(31): Inkompatible Typen: 'TNotifyEvent' und 'procedure, untyped pointer or untyped parameter'
Kann mir da wer helfen? Oder ist der Ansatz schon falsch? Nur er nimmt eben die Form nicht im Timer. Da habe ich nämlich dann ein Probleme mit dem createn von Shapes.
Vielen Dank im Voraus
Thorsten
|