Self, Sender etc.

[Minz]

Hallösche,

wenn ich z.B.

Timer1:=TTimer.create() mache gehört in die Klammern noch ein
Parameter wie Self

Dieser Parameter gibt doch die Abhängigkeit von einem übergeordneten
Objekt wieder. Wenn dieses Objekt zerstört wird, wird auch Timer1
gelöscht oder?

Bei Self hat Timer1 kein übergeordnetes Objekt, ist also nicht abhängig.

Wie kann ich das machen, dass das Objekt welches
Timer1:=TTimer.create aufruft das übergeordnete wird.

Kann ich z.B. schreiben Timer1:=TTimer.create(Sender) ?

Danke Minz

[Mat]

probier es doch einfach aus... sollte aber funktionieren



Mat

[Sanchez]

Self ist die Klasse bzw. Formular in dem du den Timer erzeugst.

In diesem Fall wird der Timer zerstört, wenn z.B. das Fenster wo er drinnsteckt zerstört wird.

[Mat]

und mit sender meinst du das Objekt, welche die funktion aufgerufen hat, also z.B. ein Button

[Christian Seehase]

Moin Minz,

Zitat:

Zitat von Minz

Bei Self hat Timer1 kein übergeordnetes Objekt, ist also nicht abhängig.

Nur um das was Sanchez geschrieben hat noch einmal zu verdeutlichen:

Self bezieht sich immer auf das Objekt, in dessen Methode Create aufgerufen wird.

Wenn Du z.B. ein Formular Form1 (Klasse TForm1) hast, auf dem sich ein Button1 befindet, und beim Anklicken des Buttons soll der Timer erzeugt werden, würdest das ja so aussehen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender : TObject);
begin
  Timer1 := TTimer.Create(self);
end;

self wäre hier Form1.

Um unabhängig zu sein, kannst Du einfach nil eintragen, bist dann aber auch selber dafür verantwortlich das Objekt wieder zu zerstören.

Sender direkt ginge nicht, da es nicht vom Typ TComponent ist. Du könntest es allerdings so machen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender : TObject);
begin
  Timer1 := TTimer.Create(Sender as TButton);
end;

Das jetzt mal ohne Sicherheitsüberprüfung, ob der Sender denn überhaupt ein TButton ist.

Sinn macht das aber eigentlich nur, wenn es sich hierbei um die Methode eines dynamisch erstellten Controls handelt, dass auch von Dir wieder gezielt gelöscht wird. Ansonsten spielt es keine Rolle, ob Du nun self oder Sender as TButton verwendest, da ein zur Entwurfszeit erstellter Button normalerweise das Formular (oder eine dem Formular untergeordnete Container Kompo) als Owner hat, und somit sowohl der Button als auch der Timer beim Zerstören des Formulares zerstört werden würden.

[Minz]

Ok vielen Dank für die Ausführungen :mrgreen:

Werde es dann also mit Self probieren und trotzdem selber
sichergehen, dass das Objekt auch wieder verschwindet.

Es handelt sich dabei um zur Laufzeit erstellte und
selbstdefinierte Objekte.

Gruß Minz