was wird gestoppt?
du prüfst auf row=0 und col=0 danach dein eigener zeichencode...also färbst du auch nur die eine zelle rot bzw. weiß, alles andere wird nicht gezeichnet...der Zelltext wird deshalb nicht angezeigt, weil du ihn nicht zeichnest
mit dem fillrect übermalst du alles in der Zelle und musst den Text neu zeichnen (TCanvas.Textout).
weiterhin ist dein colormod nur global gültig und nicht pro zelle, was evtl. gewünscht ist.
um zu speichern, welche zelle welche farbe haben soll, kannst du das Objects-property verwenden. dort kannst du pro zelle ein Objekt (oder einen auf TObject gecasteten Integer
) hinterlegen.je nachdem wieviele Infos du pro zelle benötigst, musst du deine Wahl diesbezüglich treffen...
HTH Frank