Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
createitem scheint also eine globale Variable zu sein, die nur das letzte erzeugte TImage enthalten kann. Wie ich bereits sagte, musst Du die Prüfung mit in die Schleife verlagern, damit alle Objekte der Liste überprüft werden.
P.S.: Du solltest Dir mal eine sinnvolle Einrückung angewöhnen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Mir scheint, Du hast das Beispiel doch noch nicht so ganz begriffen. Sind in FShapes jetzt Deine TImages drin? Und was ist createitem?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Das musst Du dann in die Schleife innerhalb des Timers verlagern, siehe mein Beispiel.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Das heißt, dass der folgende Code nur bei jedem 10. Durchlauf abgearbeitet werden soll. MOD gibt den Rest bei ganzzahliger Division zurück, aber das kannst Du auch in der Hilfe bzw. der Delphi-Reference nachlesen ;)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Dann speichere die Objekte doch in einem Array/einer TObjectList ab, das/die kannst Du dann einfach durchlaufen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Damit setzt Du den Namen, Uwes Tipp ging in die Richtung "Image zur Freigabe wiederfinden" ;)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
29. Okt 2009
Und zum 2. Problem: Du könntest die Klasse TImage ja um ein Feld erweitern. Mal aus dem Kopf:type
TItemKind = (ikBanana, ikBomb, ikHeart);
TImage = class(ExtCtrls.TImage)
private
FItemKind: TItemKind;
public
property ItemKind: TItemKind read FItemKind write FItemKind;
end;