Combobox aus verschiedenen Quellen füllen?

[khh]

und mit obj als Tkunde hier:
   Obj := self.kdCombobox1.Items.Objects[self.kdCombobox1.ItemIndex] as TKunde; nen 219

[DeddyH]

Das versteh ich jetzt nicht . Ach ich sehe gerade, dass es um Lazarus geht. Funktioniert es da mit einem harten Cast?Obj := TKunde(self.kdCombobox1.Items.Objects[self.kdCombobox1.ItemIndex]);

[Hansa]

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

[khh]

Zitat von DeddyH:

Das versteh ich jetzt nicht . Ach ich sehe gerade, dass es um Lazarus geht. Funktioniert es da mit einem harten Cast?Obj := TKunde(self.kdCombobox1.Items.Objects[self.kdCombobox1.ItemIndex]);

funktioniert !


ich danke dir vielmals.

EDIT: ich danke allen für eure Beiträge

Gruss KH