das sollte funktionieren:
Delphi-Quellcode:
with grid do
begin
Rect:= Cellrect(ACol, ARow);
Canvas.Brush.color:=clred;
Canvas.FillRect(Rect);
DrawText(Canvas.Handle, PChar(sText),
length(sText), Rect, DT_Singleline or DT_Center or DT_VCenter);
end;
das ganze im drawcell des grid's
raik