Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Garfield,
27. Mai 2007
Beim Probelauf fallen die Schuppen von den Augen:
while j< tb.buttoncount-1 do
ist falsch. Entweder
while j<= tb.buttoncount-1 do
oder
while j< tb.buttoncount do
muss da stehen, weil der letzte Toolbutton sonst nicht einsortiert wird.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Garfield,
27. Mai 2007
Was hältst Du von:
for i := 0 to tb.ButtonCount - 1
do begin
j := 0;
while (tb.Buttons.Tag <> i) and (j < tb.ButtonCount - 1)
do inc (j);
if tb.Buttons.Tag = i
then begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Garfield,
27. Mai 2007
Moin, Moin, ich verstehe nicht so richtig, warum Du tbtn und tb verwendest. Aber egal. Die Positionsänderung funktioniert schon. Nachdem was ich eben gesehen habe, solltest Du die Positionierung in der Reihenfolge der Tags vornehmen, weil die Toolbutton ab der angegebenen Position nach rechts verschoben werden. Heißt setzt Du beispielsweise ein Toolbutton von Platz drei auf zwei und dann den von...