[VisualCLX] Zugriff auf Objekt hinter ComboBox.Item

SteheAufDerLeitung · Beiträge: 104

Hallo!

Ich habe eine ComboBox, gefüllt mit Objekten einer Klasse "System". Ich möchte jedes einzelne auf die Eigenschaft .ID überprüfen.

Um an das eigentliche Objekt zu gelangen mach ich folgendes:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var hSystem : System;

for hCnt := 0 to ComboBox.Items.Count-1 do begin
  hSystem := ISystem(pointer(ComboBox.Items.Objects[hCnt]));
  if hSystem.ID = ...
  end;

Doch hSystem ist immer "nil". Wieso? Greif ich falsch auf die Systeme zu??

Grüße und Dank

Sebastian

jackle32 · Verfasst: Mo 03.09.07 12:31

Also ich muss sagen ich kenne den Variablentyp "System" nicht, aber warum liest du nicht gleich die ID aus?

Müsste doch genauso funktionieren wenn du machst

markieren

Delphi-Quelltext

1:
2:
3:

for hCnt := 0 to ComboBox.Items.Count-1 do begin
  if ComboBox.Items.Objects[hCnt].ID = ... 
end;

Oder hat es irgendeinen speziellen Grund warum du erst ein Pointer auf das Object. Und was macht dann ISystem?

Gruß Jack

noidic · Verfasst: Mo 03.09.07 12:38

Der Cast auf iSystem ist schon in Ordnung, ein TObject hat nunmal keine ID. Der Cast auf Pointer ist überflüssig und möglicherweise auch die Fehlerursache.

_________________
Bravery calls my name in the sound of the wind in the night...

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme