DBGrid und MultiSelect

[s-off]

Hi,

probier ess mal so:

Delphi-Quellcode:

Procedure TForm1.DBGrid1KeyDown(Sender: TObject; Var Key: Word; Shift: TShiftState);
Begin
   If Key = VK_RETURN Then
      DBGrid1.SelectedRows.CurrentRowSelected := True

   Else If Key = VK_DOWN Then Begin
      DBGrid1.DataSource.DataSet.MoveBy(1);
      Key := 0;
   End

   Else If Key = VK_UP Then Begin
      DBGrid1.DataSource.DataSet.MoveBy(-1);
      Key := 0;
   End;
End;

Edit: @Uwe - Der Ansatz ist schon ok, nur die Problematik sind wohl die Cursortasten ;o)