Probleme mit dynamisch erzeugter Combobox zur Laufzeit

[delphin]

Hallo,

möchte eine eigene Combobox zur Laufzeit des Programmes mit verschiedenen neuen Eigenschaften erzeugen:

Delphi-Quellcode:

Type TMyComboBox = class(TComboBox)
     private
     protected
        procedure Change; override;
        procedure Exit; override;
     public
     end;

var Form1: TForm1;
    ComboBox1 :TmyComboBox;

Bei der Procedure Change ==> Ereignis von OnChange klappt die Sache auch tadellos.
Bei der Definition von Exit ==> Ereignis von OnExit der Combobox erhalte ich die nachfolgende Meldung:

Zitat:

Compiler: "Methode 'Exit' nicht in Basisklasse gefunden

Was muss ich machen, um beim Verlassen der Combobox ein Nachricht zu bekommen ?

[SirThornberry]

das "OnExit" verwenden

[delphin]

Hallo,

danke für die schnelle Antwort. Mir ist nur nicht klar, wie ich diese Ereignis dann abfangen kann.

Mit

Delphi-Quellcode:

Type TMyComboBox = class(TComboBox)
     private
     protected
        procedure Change; override;
        // procedure Exit; override;
     public 
        { Public declarations }
     published
        property OnExit;
     end;
 
var Form1: TForm1; 
    ComboBox1 :TmyComboBox; 
.
.

procedure TmyComboBox.OnExit;
begin ShowMessage('Aufruf');
end;

erhalte ich die Fehlermeldung:

Zitat:

Compilerfehler: Deklaration 'OnExit' unterscheidet sich von vorheriger Deklaration

Keine Ahnung wie weiter !

[Keldorn]

Hallo

Du brauchst keine Ableitung der Combobox, wenn du auf die Ereignisse reagieren willst. Gugg mal im Forum unter laufzeit ereignis, da gibt es unmengen von threads, die zeigen wie das geht.
z.B. hier

Mfg Frank