Zitat von
iKilledKenny:
Du solltest halt in den Zellen, die du mit dem Text übermalst, nichts anderes zeichnen (FillRect, etc.) Ansonsten mach ich das nämlich genau so.
Vielleicht mal die OnDrawCell Routine posten.
Delphi-Quellcode:
if (ARow = Index1) then
begin
if (ACol = 3) or (ACol = 8) then //Beschriftungsfelder
begin
with Sender as TTntStringGrid do
begin
s := Cells[ACol,ARow];
Rect.Right := Rect.Right + (Rect.Right - Rect.Left) * 3;
Canvas.FillRect(Rect);
DrawTextW(Canvas.Handle, PWideChar(s),Length(s),Rect,DT_CENTER or DT_VCenter);
end;
end
else
begin
exit;
end;
end
eine leere Zelle wird aber doch normalerweise gezeichnet. Kannst Du das irgendwie abschalten?
Grüße, Messie