Hi Laura,
für das färben nimmst du das Ereignis OnDrawCell vom StringGrid, ich lasse in meinem StringGrid je nachdem was da drin steht ein icon reinladen.
Beispielcode hab es nicht mehr genau im kopf
Delphi-Quellcode:
var
zelle: string;
begin
zelle := (Sender as TStringGrid).Cells[ACol, ARow]; // hole mir das was in der Zelle drin ist
//Wenn die Col die erste Zeile ist und die Reihe größer 1 dann gehe weiter, da ich nur was in die 1. Spalte zeichnen will
if ((ACol = 1) and (ARow > 1)) then
with (Sender as TStringGrid) do
begin
//wenn in der Zelle ne 8 oder ne 9 vorkommt zeichne mir das Bild aus der ImageList rein mit dem Index 1
// bei dir wäre das jetzt male mir den Kasten grün und die 8 und 9 sind bei dir Variablen der Zahlen die gezogen wurden
//hab jetzt 8 und 9 nur so genommen
if(zelle = '8') or (zelle = '9') then
begin
ImageList1.Draw(Canvas, Rect.Left, Rect.Top, 1);
end
end;
end;
Hier noch ein
Link wo das färben erklärt wird
greetz Lun