Thema: Delphi OnClick abfangen

Einzelnen Beitrag anzeigen

Benutzerbild von Light
Light

Registriert seit: 3. Feb 2006
Ort: Paderborn NRW
123 Beiträge
 
Turbo Delphi für Win32
 

Re: OnClick abfangen

  Alt 13. Apr 2007, 12:08
Hi Ihr,

dann Frag doch in deinem OnExit des anderen Steuerelements ab,
ob der Fokus jetzt auf die Listbox gesetzt wurde,
und falls ja setzt du ihn wieder zurück
und falls nein kannst du dein eigentliches OnExit auslösen:

Delphi-Quellcode:
procedure TForm1.OnExit(Sender: TObject);
begin
  if ( Form1.ActiveControl.Name = ListBox1 ) //oder so ähnlich *g*
  then
    begin
      Sender.SetFocus; //oder so ähnlich ^^
    end
  else
    begin
      //Mache was du sonst normalerweise in OnExit gemacht hättest!
    end;
end;
Stefan
  Mit Zitat antworten Zitat