Einzelnen Beitrag anzeigen

Benutzerbild von mischerr
mischerr

Registriert seit: 6. Feb 2004
Ort: Konz
243 Beiträge
 
Delphi 12 Athens
 
#4

Re: [TStringGrid] Zelle löschen/ausblenden

  Alt 27. Jul 2004, 18:20
Eine Möglichkeit wäre es, die Zelle einfach zu überschreiben...
Code:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  with StringGrid1.Canvas do begin
       if (ARow=1) and (ACol=1) then begin
          Brush.Color:= clWhite; // ggfls. der Hintergrundfarbe der Zelle anpassen
          Brush.Style:= bsSolid; // ist i.d.R. Default
          FillRect(Rect);
       end;
  end;
end;
Grüsse!
  Mit Zitat antworten Zitat