Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Im TStringGrid den letzten Datensatz markieren

  Alt 25. Jan 2007, 17:27
Hallo Lombi,

du musst unterschiedlich vorgehen, je nachdem ob dein Grid die Option goEditing hat oder nicht:

Delphi-Quellcode:
// ...
begin
  with StringGrid do
  begin
    if goRowSelect in Options
      then Row := Pred(RowCount)
      else Selection := TGridRect(Rect(FixedCols, Pred(RowCount), Pred(ColCount), Pred(RowCount)));
    if VisibleRowCount < (RowCount - FixedRows)
      then TopRow := Succ(RowCount - FixedRows - VisibleRowCount)
      else TopRow := FixedRows;
  end;
  // ...
end;
Freundliche Grüße
  Mit Zitat antworten Zitat