Zeile in DBGrid markieren

[Angel4585]

Hallo,

wie kann ich die aktuelle Zeile über welcher sich der Mauscursor befindet im DBGrid selebtieren?

Ich habs jetzt schon so probiert:

Delphi-Quellcode:

procedure TForm1.DBGridTestMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
begin
  with DBGridTest do
    DataSource.DataSet.RecNo:=MouseCoord(x,y).Y;
end;

Delphi-Quellcode:

procedure TForm1.DBGridTestMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
begin
  with DBGridTest do
    SelectedIndex:=MouseCoord(x,y).Y;
end;

aber beides bringt nicht den gewünschten Effekt,

ich möchte, dass die aktuelle Zeile über der sich der CUrsor befindet markiert wird und wenn ich an den unteren bzw. den oberen Rand des Grids gehe, das dann nach unten bzw. nach oben gescrollt wird.

Hat jemand schonmal sowas gemacht oder weis jemand wie das geht?

Danke schonmal