Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#13

Re: Combobox aus verschiedenen Quellen füllen?

  Alt 21. Apr 2009, 14:55
Definiere besser direkt eigenen Typ. Ich brauche in einem Stringgrid auch Objekte. Ein Teil davon dient zur Färbung diverser Zellen. Deshalb gibts folgenden Typ :

Delphi-Quellcode:
type

  TAusgObject = class(TObject)
...
    Color : TColor;
    constructor Create;
    destructor Destroy;
  end;
Und die variable ist hier (Form):
Delphi-Quellcode:
...
  protected
    AusgObject : TAusgObject;
Bestücken :

    (sgNr.Objects[ACol, ARow] as TAusgObject).Color := Color auslesen (hier im OnDrawCell) :

Delphi-Quellcode:
      AusgObject := TAusgObject (Objects [ACol,ARow]);
      if AusgObject <> nil then begin
        canvas.Font.Color:=AusgObject.Color;
// jetzt Zeichenoperationen
Gruß
Hansa
  Mit Zitat antworten Zitat