hi
ich würde gerne wissen wie ich die eigenschaften von buttons, die ich zur laufzeit erstellt habe ändern kann?
so sieht mein code aus:
Delphi-Quellcode:
for i := 0 to nl.length - 1 do begin
node2 := xmlDoc.documentElement.selectSingleNode('/buttonset/Default');
x:=x+1;
n := nl[i];
node2 := xmlDoc.documentElement.selectSingleNode('/buttonset/'+n.nodename);
newpage:=TTabSheet.Create(Self);
newpage.PageControl := PageControl1;
newpage.name:='btab'+inttostr(x);
newpage.Caption:=n.nodeName;
x:=x+1;
button1 := Tspeedbutton.Create(self);
button1.Name:='speedbutton'+inttostr(x);
button1.parent := newpage;
button1.Width:=pagecontrol1.Width div 6;
button1.Align:=alleft;
button1.caption:=node2.selectSingleNode('button1').attributes.item[0].text;
button1.hint:=node2.selectSingleNode('button1').attributes.item[1].text;
button1.ShowHint:=true;
button2 := Tspeedbutton.Create(self);
button2.Name:='speedbutton'+inttostr(x);
button2.parent := newpage;
button2.Width:=pagecontrol1.Width div 6;
button2.Align:=alleft;
button2.caption:=node2.selectSingleNode('button2').attributes.item[0].text;
button2.hint:=node2.selectSingleNode('button2').attributes.item[1].text;
button2.ShowHint:=true;
x:=x+1;
//... usw
bei den buttons (das sind dann insgssamt 6 stück auf jedem tabsheet) würde ich gerne bei einem onresize ereignis der form haben, dass sie button1.Width:=pagecontrol1.Width div 6; einnehmen... aber ich weiss nicht wie ich an die buttons rankomme? :/