Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: break it problem

    Delphi
    by rollstuhlfahrer, 31. Jan 2010
  implementation
  {$R *.dfm}
  
  var
  x,y: integer;
  
  procedure TForm1.Timer1Timer(Sender: TObject);
  var x,y:integer;
  begin
  if (Shape1.Top <= 0) or (Shape1.Top >= image1.ClientHeight - Shape1.Height) then
• Forum: Multimedia

  Re: break it problem

    Delphi
    by rollstuhlfahrer, 31. Jan 2010
  nochmal: für deine Richtungsänderung kannst du keine Konstanten nehmen, da wie der Name schon sagt, Konstanten konstant sind und du denen somit keinen ANDEREN Wert als den einmal zugewiesenen geben kannst. Also brauchst du ne Variable (da die variabel ist), der du dann den Wert der Konstanten zuweist und dann die Richtungsänderung ausführst.
  
  Bernhard
• Forum: Multimedia

  Re: break it problem

    Delphi
    by rollstuhlfahrer, 31. Jan 2010
  HI,
  
  um die schönen Formatierungen wie in den obrigen Posts hinzubekommen, verwende NICHT Code sondern Delphi-Tags. Die gibts übrigens in der Menüleiste unter "Oft genutzt".
  
  so, zu deinem Problem:
  Warum verwendest du lokale Variablen, die genauso heißen, wie deine Konstanten?
  Wie willst du denn damit Werte ungleich 0 erreichen?
  Mal debuggen und gucken, was dx und dy so für werte haben....