Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

Assigned(ActiveControl) ?

  Alt 21. Jan 2009, 21:04
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;
  Mit Zitat antworten Zitat