Feld in Stringgrid färben

[mkinzler]

Die (Callback)-Methode wird für jede Zelle aufgerufen, es mach deshalb wenig Sinn, jedesmal das ganze Grid zu zeichnen.

Delphi-Quellcode:

procedure TKndT.StringGrid2DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var
    w: Extended;
begin
    if TryStrToFloat( ( sender as TStringGrid).Cells[ ACol, ARow]), w) then
    if w > 200 then
        begin
        ...
        end;