Forum: Object-Pascal / Delphi-Language
Delphi
by Hawkeye219,
27. Jan 2007
Ok, nun wird es etwas klarer.
Das brauchst du auch nicht, das macht ja die Funktion GetVisibleImage bereits. Du mußt nur für jeden Würfel die Funktion erneut aufrufen, damit sie dir den nächsten freien Platz (das nächste sichtbare Bild) liefert. Aber hier hast du jetzt ein logisches Problem: wenn du das TImage nach dem Laden einer Bilddatei nicht versteckst (Visible := False), dann findet es...
Forum: Object-Pascal / Delphi-Language
Delphi
by Hawkeye219,
27. Jan 2007
Hallo Blackheart,
wenn du Referenzen auf die TImage-Komponenten in ein (statisches oder dynamisches) Array packst, kannst du mit einer einfachen Hilfsroutine den nächsten freien Platz ermitteln:
var
Images : array of TImage; // evtl. dynamisches Array
function GetVisibleImage (var aImage: TImage): Boolean;
var