Objekte zur Laufzeit erzeugen

[mkinzler]

Sind die Button wirklich nur 2*2 Pixel groß?

[Luki206]

Natürlich nicht :D habe jetzt das so gemacht:

Delphi-Quellcode:

LBut[i].Left := 20 + (2*LBut[i].Width*i);

Nur wie du das jetzt gemeint hattest bekomme ich jetzt immer noch nur ein Button oder hatte das einen anderen Sinn?

[mkinzler]

Vorher wurden die Buttons im Abstand von 2 Pixeln plaziert.
Das selbige gilt natürlich auch für Top (senkrecht)
Wieviele Einträge hat die Datenbank?

[Luki206]

Jetzt hat sie vier aber das soll ja natürlich variabel sein

[mkinzler]

Schau dir doch die Erzeugung Schritt für Schritt im Debugger an

[Luki206]

Hmm.. ich habe gerade ein Mysterium entdeckt das ich mir nicht erklären kann, wenn ich das Formular schließe und dann wieder öffne wird immer wieder ein Button erzeugt :shock:

Edit: Beim ausführen mit dem Debugger ist mir aufgefallen das er nur einmal die Schleife durchgeht und am Schluss dann zu end springt ohne weitere Knöpfe zu erstellen..

[Luki206]

Ich habe jetzt auch ein wenig herumgebastelt nur wird immer noch nur ein Button erzeugt. Wie müsste ich das machen das wirklich alle Buttons auf einmal erstellt werden?

[Dalai]

Die Anzahl deiner Buttons hängt ja offensichtlich von FrmOpen.CDS.RecNo ab. Es wäre also eine richtig gute Idee, einfach mal im Debugger zu schauen, welchen Wert diese Variable hat. Alles andere ist Rumraterei.

MfG Dalai

[Popov]

Sollte das mit Debuger zu kompliziert sein, einfach ein

Delphi-Quellcode:

ShowMessage(IntToStr(i));

nach

Delphi-Quellcode:

for i :=

setzten. Man wird dann zwar ständig unterbrochen, wenn es sonst nicht klappt...

[Luki206]

Ok hat geklappt, lag an dem

Delphi-Quellcode:

CDS.RecNo

es muss aber sein wie es DaddyH gesagt hatte mit

Delphi-Quellcode:

CDS.RecordCount

sein. Geht jetzt :thumb:

Bekomme ich aber eine kleine Erklärung zum Debugger weil ich lese da nur irgendwelche Dollarzeichen mit Zahlen

Edit: Weil ich habe auch noch nichts damit anfangen können