Einzelnen Beitrag anzeigen

bergamo34

Registriert seit: 23. Jan 2004
19 Beiträge
 
#1

focus ohne OnClick Ereignis auf ein Button

  Alt 17. Jun 2004, 01:43
Hallo,


habe folgendes Problem, verstehe aber nicht warum?
Nach einem Return auf ein ComboBox (genauer TJvDBLookupComboEdit (Jedi3.0))
soll der Focus auf ein Button gesetzt werden, ohne das OnClick-Ereignis des
Buttons aufgelöst wird.

Folgender Code-Segement ist das KeyDown-Ereignis des Combos, aber das funktioniert
so nicht. Nach dem RETURN auf das combo, wird der Focus gesetzt auf das Button gesetzt
aber das OnClick-Ereignis auch ausgelöst.

Das komische ist, dass es mit einem TDBEdit funktioniert!

Code:
procedure Tfrm_briefbearbeiten.cobxKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key = VK_RETURN then
  begin
    Key := 0;
    button1.SetFocus;
  end;
end;
Nun, kann mir jemand da weiterhelfen?
  Mit Zitat antworten Zitat