Combobox aus verschiedenen Quellen füllen?

[khh]

und mit obj als Tkunde hier:

Delphi-Quellcode:

   Obj := self.kdCombobox1.Items.Objects[self.kdCombobox1.ItemIndex] as TKunde;

nen 219 :wall:

[DeddyH]

Das versteh ich jetzt nicht :gruebel:. Ach ich sehe gerade, dass es um Lazarus geht. Funktioniert es da mit einem harten Cast?

Delphi-Quellcode:

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 :

Delphi-Quellcode:

    (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:

Zitat von DeddyH

Das versteh ich jetzt nicht :gruebel:. Ach ich sehe gerade, dass es um Lazarus geht. Funktioniert es da mit einem harten Cast?

Delphi-Quellcode:

Obj := TKunde(self.kdCombobox1.Items.Objects[self.kdCombobox1.ItemIndex]);

funktioniert !
:bounce1:

ich danke dir vielmals.

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

Gruss KH