Delphi-PRAXiS - Delphi Assigned(ActiveControl) ?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Assigned(ActiveControl) ? (https://www.delphipraxis.net/127945-assigned-activecontrol.html)

Assigned(ActiveControl) ?

Hallo

was müsste man tun, damit ein Cotroll als aktives Objekt wird ?
Ich habe einige Objekte wie Panels, Labels, Images getestet, indem ich drauf klicke
die werden nie aktiv Controll !

Nur einige Controlls wie Edits, Buttons werden aktiv, wenn ich drauf klicke

Ich habe mit einem Timer getestet :

Delphi-Quellcode:

			procedure TForm1.Timer1Timer(Sender: TObject);

begin

  if Assigned(ActiveControl) then

    Edit1.Text := 'ActiveControl = ' + ActiveControl.Name

  else

    Edit1.Text  := 'ActiveControl = nil';

end;

Re: Assigned(ActiveControl) ?

Panels, Labels, Images können ja auch nicht fokussiert werden.

Re: Assigned(ActiveControl) ?

Hallo,

schau mal bei der gewünschten Komponente, ob sie ein SetFocus hat, dann geht's genau damit.