Einzelnen Beitrag anzeigen

Hans33

Registriert seit: 13. Nov 2008
56 Beiträge
 
Turbo Delphi für Win32
 
#1

Zufallsvariable muss durch x teilbar sein, möglich?

  Alt 5. Dez 2008, 23:09
Hallo

Ich lasse mit einem Timer ein Bild (Image1) nach oben bewegen auf ein anderes Bild (Image2) zu.
Image2.Left wird mit einer Zufallsvariable erstellt, Image2.Top mit einer anderen Zufallalsvariable.
Da sich aber das Image1.Top oder Image1.Left bei jedem Timerintervall um 28 vergrößert, und ich als Code
Delphi-Quellcode:
If (Image1.Top=Image2.Top+28)
or (Image1.Top=Image2.Top-28) Then
begin
randomize;
a:=Random(362)+1;
b:=Random(434)+1;
Image2.Top:=a;
Image2.Left:=b;
end;
habe, passiert es häufig das kein neues Image2.Left und Image2.Top erstellt wird.
Kann ich entweder a und b so generiren lassen dass sie immer in einem Fleck darstellen, an dem auch Image1 genau daranpasst,
oder muss ich es anders machen??

Ich hoffe ihr habt mein Problem verstanden?!?!
  Mit Zitat antworten Zitat