ListBox erzeugen

[HolgerCW]

Hallo zusammen,

ich möchte eine ListBox erzeugen. Wie mache ich das ?

So klappt das nicht wirklich:

Delphi-Quellcode:

var
 Liste: TListBox;
 Component: TComponent;
begin
 Liste := TListBox.Create(Component);
 Liste.Items.Add('Text');
end;

Wenn ich das Add mache kommt der Fehler: "hat kein übergeordnetes Fenster"

Gruss

Holger

[Apollonius]

Deine Owner-Angabe ist Quatsch. Du musst eine existierende Komponente angeben - oder einfach nil. Außerdem musst du das Property Parent setzen und Visible auf True, dann solltest du etwas sehen. Dann kannst du natürlich noch Top, Left, Width und Height setzen.

[1234588]

du musst noch property's wie Parent usw. setzen
schau mal was delphi dazu in der *.dfm datei macht (>erstelle ein projekt, zieh eine listbox drauf und speicher es)

//edit
warum kein roter kasten oO

[stahli]

Hallo Holger,

Deine "Component" ist nicht instanziert. Du kannst allerdings auch NIL übergeben, musst Dich aber dann um die Freigabe der ListBox später selbst kümmern.
(sonst wird die Listbox automatisch freigegeben, wenn der Owner freigegeben wird)

Dein Problem sollte aber daran liegen, dass Du kein Parent zugewiesen hast. Die Listbox will ihre Änderungen zeichnen, kann das aber nicht, da sie in keine Komponente gesetzt wurde.

stahli

[HolgerCW]

Ich möchte die ListBox auch nirgendwo erscheinen lassen.

Ich hatte mir nur mal eine Funktion erstellt, die Listboxen ausliest.

Diese wollte ich wieder nutzen.

Wollte also eine ListBox erzeugen, dann die Werte rein schreiben und danach diese Werte von meiner Funktion auslesen lassen.

Welche Sachen muss ich für dieses alles setzen ?

[DeddyH]

Wieso nimmst Du dann nicht lieber eine TStringList?

[HolgerCW]

Ich weiss, das wäre einfacher, wollte nur nciht meine Funktion umschreiben.

Habe aber jetzt eine ListBox unsichtbar auf die Form gelegt und nutze diese ....

Gruss

Holger

[Luckie]

Zeig mal die FGunktion. Da muss man eigentlich ichts umschreiben.

[DeddyH]

Zitat von Luckie:

Zeig mal die FGunktion. Da muss man eigentlich ichts umschreiben.

Nur, wenn er eine Instanz von TListBox als Parameter übergibt. Und auch dann ist das Umschreiben nicht so ein großer Akt.

[HolgerCW]

Ihr habt recht. Nur war die Zeit im Nacken.

Nun habe ich auch die Funktion umgeschrieben.

Gruss

Holger