Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: 2-D Adventure programmieren

    Delphi
    by DeddyH, 29. Nov 2007
  procedure TForm1.Button1Click(Sender: TObject);
  var R: TRect; //das Hindernis
  Test: TRect; //die Spielfigur
  
  procedure ShowStatus;
  begin
  //ich vergleiche nur mal die linke obere Ecke
  if PtInRect(R,Test.TopLeft) then
  ShowMessage('Kollision')
  else
• Forum: Multimedia

  Re: 2-D Adventure programmieren

    Delphi
    by DeddyH, 29. Nov 2007
  Auf die Schnelle fällt mir ein, dass Du die Eckpunkte mit PtInRect daraufhin überprüfen könntest, ob sie im Rechteck des Hindernisses liegen.
• Forum: Multimedia

  Re: 2-D Adventure programmieren

    Delphi
    by DeddyH, 8. Sep 2007
  Das hatte ich mit dem Puffern gemeint ;)
  
  P.S.: Herzlichen Glückwunsch nachträglich :cheers: :party:
• Forum: Multimedia

  Re: 2-D Adventure programmieren

    Delphi
    by DeddyH, 7. Sep 2007
  Also, in meinen Augen ist das ohne Weiteres möglich. Allerdings wird die geplante Animation vermutlich flackern, so dass Du Dir Gedanken über das Puffern der Zeichenfläche machen solltest (das klingt schlimmer, als es ist). Weiterhin sollte eine Kollisionskontrolle implementiert werden, damit die Figur nicht durch die Tische hindurch laufen kann. Bei auftauchenden Fragen einfach fragen ;)
  ...