Einzelnen Beitrag anzeigen

Benutzerbild von Forlan
Forlan

Registriert seit: 17. Feb 2008
Ort: Herford
265 Beiträge
 
Delphi 2007 Architect
 
#8

Re: Spezielle Frage zu TCanvas und TShape

  Alt 11. Jan 2009, 17:29
Ich hab versucht das mal so jetzt zu lösen, jedoch passiert etwas das nicht passieren soll....^^

Delphi-Quellcode:
  if oben then //oben ist true wenn vk_up gedrückt wird...
    begin
      if ((sPlayer.Top-5 <> iSpielfeld.Top) or (iSpielfeld.Canvas.Pixels[sPlayer.Left,sPlayer.Top-5]<>clBlue)) then
        sPlayer.Top := sPlayer.Top-1; //sPlayer :TShape
    end;
wenn ich den teil nach "or" weglasse, bleibt meine figur immerhin im feld... sobald ich den Teil nach "or" hinzufüge, kann meine figur aus dem Image hinausgehen O.o... Der Teil nach dem OR soll sein, das wenn ich in meinem hier noch am programmierenden editor hinderhisse hinzufügen will, dass die figur auch da stehen bleibt... jedoch funktioniert das leider so nicht..
jemand eine Idee?
Marcel
マルセル
www.youtube.com/beethoven1990
  Mit Zitat antworten Zitat