Einzelnen Beitrag anzeigen

pp-deluxe

Registriert seit: 7. Apr 2006
10 Beiträge
 
#1

Stringgrid-Gitter färben, bei bestimmter Zeichenkette

  Alt 19. Apr 2006, 13:21
Hallo,
ich hab mal wieder eine Frage ^^

Ich möchte eine komplette Reihe eines StringGrid-Gitters färben, wenn die 4. Spalten den Text "PP:2" enthalten.

Code:
procedure TForm1.ffnen1Click(Sender: TObject);
var fg: integer;
begin
for fg := 1 to Stringgrid1.Rowcount do
              begin
                  with Stringgrid1 do
                  begin
                  if cells[fg,3] = 'PP:2' then // 4. Spalte
                    begin
                    Canvas.Brush.Color := clYellow;
                    end;
                  end;
              end;
end;
Hab auch schon gesucht, und folgendes gefunden: Zeilen färben

Kann mir das jemand erklären, ich hab das noch nicht in der Schule gehabt ...

ThX
  Mit Zitat antworten Zitat