Hallo Leute,
ich habe in meinem Programm ein Page Control, auf dem ich zur Laufzeit ein neues Tab und darauf wiederum einige Labels und eine Listbox erzeuge. Bisher läuft alles wunderbar. Das Problem ist nur, es wird außer meiner gewollten Listbox noch eine Art Lisbox-Fragment erstellt. Man kann diese Komponente nicht anwählen, aber man sieht sie deutlich.
Hier der Code:
Delphi-Quellcode:
var
newPage:TTabSheet;
newlabel0:TLabel;
newlabel1:TLabel;
newlabel2:TLabel;
newlabel3:TLabel;
newlist:TStringList;
newlistcomp:TListBox;
Begin
newlist:=TStringList.Create;
//Newpage Konfiguration
newpage:=TTabSheet.Create(Form1.PageControl1); //<-- Neues Tab-Sheet
newpage.parent:=form1.PageControl1;
newpage.PageControl:=Form1.PageControl1;
newpage.Caption:=name;
{Die Erstellung der Labels habe ich entfernt. Die funktioniert!}
//Neue Listbox Konfiguration //<-- Die Lisbox
newlistcomp:=TListBox.Create(newpage);
newlistcomp.Parent:=newpage;
newlistcomp.Left:=10;
newlistcomp.top:=105;
newlistcomp.width:=222;
newlistcomp.height:=245;
newlistcomp.Items:=newlist;
end;
Einen Screenshot hänge ich mal dran.
Danke schonmal.
BlackFoXX