Aktuelle Komponente die den Fokus hat herausbekommen?

[ibp]

Wie bekommen ich auf einer Form die Komponente heraus, die gerade den Fokus hat? Brauche das nur zu kontrollzwecke!

[Sprint]

Delphi-Quellcode:

var
  I: Integer;
begin

  for I := 0 to Self.ComponentCount - 1 do
    if Self.Components[I] is TWinControl then
      with (Self.Components[I] as TWinControl) do
        if Focused then
        begin
          ShowMessage(Name);
          Break;
        end;

end;

Oder OnEnter & OnExit der Komponenten auswerten. Oder die WinAPI Funktion GetFocus benutzen.

[Christian Seehase]

Moin Sprint,

man könnte auch gleich die Eigenschaft ActiveControl des Formulares benützen.

[ibp]

danke!

konnte das problem zwar lösen, aber nicht damit ^, auf unerklärlicher weise ist bei der cursorsteuerung durch ein treeview nach dem ersten klick der fokus nicht mehr auf dem baum gewesen! wo der war ???? hat sich nicht ermitteln lassen! habe ihn jetzt jeweils bei change und onexpand per zwang wieder zugewiesen! nun klappts!

[Sprint]

Zitat von Christian Seehase:

man könnte auch gleich die Eigenschaft ActiveControl des Formulares benützen.

Stimmt. Die VCL ist so umfangreich das man nicht alles kennen kann. Hoffe das reicht, als Entschuldigung.