Einzelnen Beitrag anzeigen

Premaider

Registriert seit: 31. Mär 2012
160 Beiträge
 
#18

AW: Dynamische Variablen bei TImage ?

  Alt 16. Mai 2012, 23:45
So, ich bin jetzt ganzschön verwirrt

Ich habs mal so weit gemacht, wie ichs begriffen hab
Delphi-Quellcode:
if intersectRect(r, Player.BoundsRect, Ziel.BoundsRect) then
  begin
    Score:=Score+1;
    Ziel.Top:=10+Random(Form1.ClientHeight-10);
    Ziel.left:=10+Random(Form1.ClientWidth-10);
    MyBitmap := BitMap[aVertikal].create;
    MyBitmap := BitMap[aHorizontal].create;
    BitMap[aVertikal].LoadFromFile('GegnerV.bmp');
    BitMap[aHorizontal].LoadFromFile('GegnerH.bmp');
    Gegner[0].Position := Point(100, 20);
    Gegner[0].Ausrichtung := aVertikal;
    with Gegner[0] do
    Canvas.Draw(Position.X, Position.Y, Bitmap[Ausrichtung]);
  end;
Aber ich bekomme wieder Fehler

Geändert von Premaider (17. Mai 2012 um 00:04 Uhr)
  Mit Zitat antworten Zitat