Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Matze,
21. Jun 2008
Hm, vielleicht war's auch Image.Picture.Graphic <> nil
Aber das Thema gab's sicher schonmal: TImage überprüfen
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Matze,
21. Jun 2008
Also an deiner Stelle würde ich's vorerst so in der Art machen:
for i := 1 to 5 do
begin
if (FindComponent('Image' + IntToStr(i)) as TImage).Picture <> nil then
begin
// Bild vorhanden (falls man es so überprüfen kann, da bin ich mir nicht ganz sicher)
end;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Matze,
21. Jun 2008
Das ist natürlich schöner, da hast du recht. Nur muss natürlich ein wenig am Code verändert und unter Umständen die TImages dynamisch erzeugt werden.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Matze,
21. Jun 2008
Hallo!
Da hilft dir FindComponent weiter, wenn du die TImage-Namen so vergibst, dass sie mit einer fortlaufenden Nummer versehen sind.
Grüße