FixedRow im Stringgrid auch unten ?

[Hansa]

Hi,

ich glaube zwar nicht, daß es geht, aber frage trotzdem. Vielleicht hat ja einer die Erleuchtung. :mrgreen: Genauso wie mit den fixed rows oben im Stringgrid bräuchte ich unten auch welche. Für Summen usw. Das Scroll-Verhalten soll allerdings nicht verändert werden. Geht das irgendwie ? Also egal wie, oben soll die Überschrift bleiben und unten die Summen. Egal wo man im Stringgrid gerade ist.

[Sidorion]

Tja da hilft nur Überschreiben oder OnOwnerDraw.
Im DrawCell musst Du überprüfen, ob die zu zeichnende Zelle in der letzten dargestellten Zeile liegt (TopRow+VisibleRowCount). Wenn ja, musst Du anstatt inherited zu rufen die Zelle selber zeichnen.
Am besten geht das mit API-Rufen

Delphi-Quellcode:

  DrawEdge(Canvas.Handle,oRect,BDR_RAISED,
           BF_RECT Or BF_SOFT Or BF_ADJUST Or BF_MIDDLE);
  DrawText(Canvas.Handle,@_sText[1],1,oRect,DT_CENTER Or DT_VCENTER);

Die Aufrufe sind in der Unit Windows.
oRect ist das übergebene CellRect in der DrawCell und Text ist der anzuzeigende Summierungstext.
Wenn das Ganze noch mit den Themes zusammenspielen soll, musst Du erst fragen, ob Themes enabled sind (Unit Themes). Wenn ja, musst du Dir vom ThemeManager die ElementDetails geben lassen und über DrawElement dann ausgeben.
Soweit erstmal, um Dich auf die Spur zu schicken.. Näheres kannst du in der MSDN nachlesen.

p.s.: die Codezeilen sind für den Fall, dass Du Dir einen Nachfolger von TStringGrid machen willst.