[Andorra] ImageSprite ID zuweisen

[Die Muhkuh]

Delphi-Quellcode:

...
var
  findsprite: TSprite;
begin
 for i:=0 to AdSpriteEngine.Items.Count - 1 do
  begin
    if AdSpriteEngine.Items[i] is TTexture then
    begin
       if TTexture.ID=2 then
       begin
         findsprite:=AdSpriteEngine.Items[i];
         Break;  // Das hier nicht vergessen
       end;
    end;
  end;
end;

Ich würde noch ein Break einfügen, damit die Schleife abbricht, nach dem das Sprite gefunden wurde.