Einzelnen Beitrag anzeigen

Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Shift und Tab im DBGrid - Ich komm nicht raus

  Alt 23. Aug 2005, 08:00
Hai Grolle,

Du könntest im Delphi-Referenz durchsuchenOnKeyDown des Grids die Tastendrücke auswerten und dann entsprechend reagieren:
Delphi-Quellcode:
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
begin
  if (Key = VK_TAB) then
  begin
    Key := 0;
    if (ssShift in Shift) then
    begin
      Self.Perform(WM_NEXTDLGCTL, 1, 0); // Shift-Tab (zum vorigen Control)
    end
    else
    begin
      Self.Perform(WM_NEXTDLGCTL, 0, 0); // Tab (zum nächten Control)
    end;
  end;
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat