Eigenes Objekt welches TLabel, TImage nutzt

[hedie]

Zitat von Sir Rufo:

siehe TNotifyEvent

Danke, das habe ich bereits versucht:

Delphi-Quellcode:

type TmyObject = class(TPanel)
  private
    ...
    FOnButtonClick:TNotifyEvent;
  public
    property OnButtonClick: TNotifyEvent read FOnButtoClick write FOnButtoClick;
    ...
end;

...

procedure MeineFunktion;
begin
  ShowMessage(inttostr(Form1.test.ButtonActive));
end;

...

var
  test:TmyObject
...
  test.onButtonClick := MeineFunktion;

Dies gibt mir eine Fehlermeldung:

"Inkompatible Typen: Methodenzeiger und reguläre Prozedur"

[Dejan Vu]

Stimmt ja auch. TNotifyEvent ist ein Zeiger auf ein ein 'Procedure of Object', deine 'MeineFunktion' nur eine Prozedur.

Erstelle Dir eine Klasse mit einer Methode 'MeineFunktion'.

Ich würde aber eher ein TFrame verwenden: Ist einfacher, finde ich. Das muss man nicht erst als Komponente registrieren. Man hat aber trotzdem den Vorteil, sich das im Designer zurecht schubsen zu können.

[hedie]

Zitat von Dejan Vu:

Stimmt ja auch. TNotifyEvent ist ein Zeiger auf ein ein 'Procedure of Object', deine 'MeineFunktion' nur eine Prozedur.

Erstelle Dir eine Klasse mit einer Methode 'MeineFunktion'.

Ich würde aber eher ein TFrame verwenden: Ist einfacher, finde ich. Das muss man nicht erst als Komponente registrieren. Man hat aber trotzdem den Vorteil, sich das im Designer zurecht schubsen zu können.

"MeineFunktion" ist ausserhalb des Objekts bzw. der Klasse.

Wenn ich im Public Bereich der Klasse

procedure MeineFunktion; schreibe, dann meldet er "Ungenügende Forward-oder External-Deklaration"
Wie kann ich dem Compiler mitteilen, dass diese Prozedur erst später definiert wird und zwar von ausserhalb der Klasse?

Zum Thema TFrame.
Ich benötige ein TLabel als Grundlage, da es mir als Container für meine Objekte dient und ich zudem
damit die Hintergrundfarbe anpassen kann.

TFrame kenne ich noch nicht und weiss nicht ob es damit genau so einfach gewesen wäre.

[DeddyH]

MeineFunktion kann bzw. soll ja auch außerhalb der Klasse sein, aber dafür eine Methode einer anderen Klasse. Deine ist eine sog. "reguläre Prozedur", das ist etwas anderes.

[hedie]

Vielen Dank für deine Antwort.
Leider ist diese Thematik noch ein bisschen Neuland für mich.

Bei einem OnClick von einem Objekt wie z.B einem TLabel kann ich ja auch eine externe Prozedur zuweisen.
Wie wird dass dan da gelöst?

[himitsu]

Zitat von hedie:

Bei einem OnClick von einem Objekt wie z.B einem TLabel kann ich ja auch eine externe Prozedur zuweisen.

Nein, kann man nicht.

Es muß immer eine "Methode" (Prozedur in irgendeiner Klasse) sein, welche einen Parameter vom Typ TObjekt hat.

[hedie]

Danke

Jetzt habe ich es verstanden!
Einfach die Funktion noch innerhalb der Klasse z.B. im "private" Bereich bekannt machen.
Dann gehts