ShopGegner := TImageSprite.Create(adSpriteengine); with ShopGegner do begin x:=100; z:=22; end;
ShopGegner := TImageSprite.Create(adSpriteengine); with ShopGegner do begin x:=200; z:=22; end;
ShopGegner := TImageSprite.Create(adSpriteengine); with ShopGegner do begin x:=300; z:=22; end;
Das ist
imho ganz schlechter Programmierstil. Wenn du auf das Objekt nacher noch zugreifen willst, dann behalte Dir auch eine Referenz. Verwalte die ShopGegner in einem Array und du kannst problemlos auf jeden einzelnen zugreifen.