Einzelnen Beitrag anzeigen

Jackie1983

Registriert seit: 12. Mär 2007
486 Beiträge
 
#1

TStringGrid, daten ändern ohne Grid neu zu laden

  Alt 12. Mai 2009, 19:35
Servus,

im Grid befinden sich Objekte.
Je nach Objekt Status möchte ich das Grid anpassen bzw aktualisieren.

Also in der paint des Grids
Delphi-Quellcode:
//...
    if Objects[1,Arow] <> nil then
      if Objects[1,Arow].ClassType = TMyClass then
      begin
        MyClass := TMyClass(Objects[1,Arow]);
        cells[acol,arow] := MyClass.daten;
        
        if MyClass.irgendwas = '0then
          Canvas.Font.Color := clgreen
        else if MyClass.irgendwas = '1then
          Canvas.Font.Color := clblack
      end;

      Canvas.TextOut(rect.left,rect.top+1,cells[acol,arow]);
//...
Also sobald ich was am Status änder soll sich das Grid anpassen, das funktioniert auch soweit, nur flackert das ganze Grid dann kurz.
Gibt es keine Möglichkeit ein Text/Farbe einer Zelle zu ändern ohne Flackern?

Mfg
  Mit Zitat antworten Zitat