Wann wird das OnEnter Ereignis aufgerufen (bvr OnMouseDown)?

[Der_Ventilator]

Hi

Ich hab mir ne eigene Komponente programmiert, die beim Klick auf ihr canvas eine Aktion ausführt (es ist so eine Art ListBox, aber egal)

Jedenfalls wollte ich, dass beim OnEnter Ereignis erst die Liste aktualisiert wird, aber anscheinend wird erst das OnMouseDown Ereignis aufgerufen (wenn ich auf die Compo klicke), bevor das OnEnter Ereignis zuschlägt. Kann man das irgenwie umdrehen, weil sonst mein Programm nicht funktioniert wie es sollte.

Einfach das Listenaktualisierenereignis beim mousedown aufrufen ist auch keine lösung, weil das ja nur einmal geschehen soll. Außerdem muss vor dem keydown ja auch erst das OnEnter Ereignis zuschlagen.

[SirThornberry]

umkehren macht kein sinn da die messages in dieser reihenfolge ankommen. Die reihenfolge ist ja auch logich denn das onEnter wird ja ausgelöst weil du die Maustaste drückst. Das heißt das im Mousedown vermutlich der Focus erst auf deine Komponente gesetzt wird und somit auch vorher die Maus schon gedrückt wurde.

[Der_Ventilator]

Gibts nich OnFocus der so?

[Stevie]

Also, ich hab das mit zwei Kompos aus der VCL getestet (TButton und TListbox) und beide kommen der Reihenfolge nach in OnEnter , OnMouseDown, OnClick, OnMouseUp!

[Der_Ventilator]

merkwürdig, bei mir läuft das bei meiner Komponente andersherum ab als bei einem Button

Delphi-Quellcode:

type
  Tgliste2 = class(TCustomControl)
  private
   {...}    { Private-Deklarationen }
  protected
    { Protected-Deklarationen }
  public
    procedure mousedown( Button: TMouseButton;
                      Shift: TShiftState; X, Y: Integer); override;
     {...}
    { Public-Deklarationen }
  published
 
    { Published-Deklarationen }
{...}
      property OnEnter;
  end;

[Gruber_Hans_12345]

nur so, ohne das genauer angeschaut zu haben,
rufts du im OnMouseDown inherited auf ?
Wenn ja vor oder nach deinem Code ?

[Der_Ventilator]

hmmm..irgendwie überhaupt kein inherited...

das muss ich mal testen bzw, kann mir das jemand mal genau erklären

(bisher weiß ich, dass das nur irgendwie in der Basisklasse sucht und deren Ereignis ausführt oder so)

[Gruber_Hans_12345]

Zitat:

Zitat von Der_Ventilator

hmmm..irgendwie überhaupt kein inherited...

das muss ich mal testen bzw, kann mir das jemand mal genau erklären

(bisher weiß ich, dass das nur irgendwie in der Basisklasse sucht und deren Ereignis ausführt oder so)

probier mal einfach als erstes in deiner funktion ein

Delphi-Quellcode:

inherited;

Es könnte ja sein, das das OnEnter dann in dem inheried aufgerufen wird...

[Der_Ventilator]

danke