Ereignis aktive Objekt change

[EarlyBird]

Hallo,
gibt es ein Ereignis das ausgelöst wird wenn sich das aktive Objekt ändert?
Ich würde damit gerne aufzeichnen in welcher Reihenfolge der User etwas aktiviert.

Danke für Eure Hilfe
Gruß EarlyBird

[rollstuhlfahrer]

Im OI auf Ereignisse klicken und schon hast du eine ganze Liste an Möglichkeiten, welche Änderungen du Aufzeichnen möchtest.

Bernhard

[EarlyBird]

Danke für deine Antwort.

Ich möchte es nicht pro Objekt festlegen.
Mir ist schon klar das ich onfocuschange oder onclick nehmen kann.
Aber das müßte ich für jedes Object eingeben.
Ich suche eher sowas wie "Form.onActiveObjectchange"
Aber das gibt es ja nicht.

[rollstuhlfahrer]

Du kannst aber für alle gewünschten Objekte das Ereignis OnEnter/OnFocus auf die selbe Prozedur legen und dann dort den Sender auswerten.

Bernhard

[EarlyBird]

Das wollte ich gern vermeiden.
Es sind halt sehr viele Objekte.

[Bummi]

Have fun ...

Delphi-Quellcode:

  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
        procedure ActiveChanged; Override;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.ActiveChanged;
begin
  inherited;
  Caption := ActiveControl.Name;
end;

[sx2008]

Event OnActiveControlChange des globalen Objekts Screen.