Mam problem z Delphi 2.0:
Potrzebuje instrukcji do losowania liczb z pośród przedziału: 0-49
Próbowałem
Random(49)
ale wychodzą cały czas te same liczby (0, 3, 86 itd)
Pomożcie {hello} --Pozdrawiam
Pik
Mam problem z Delphi 2.0:
Potrzebuje instrukcji do losowania liczb z pośród przedziału: 0-49
Próbowałem
Random(49)
ale wychodzą cały czas te same liczby (0, 3, 86 itd)
Pomożcie {hello} --Pozdrawiam
Pik
sproboj
Randomize;
a potem
Random(49) :)---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-
LKS ma racje - bez zainicjowania procesora w tryb losowania używanie random jest bez celowe.
var
i : Integer;
begin
Randomize;
i := Random(49);
{
cos tam np.:
if i = 10 then
ShowMessage('Wylosowalem 10');
}
end;---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-
WIELKIE DZIĘKI LKS--Pozdrawiam
Pik
wszytko powyzej jest ok tylko ze Random(49) wylosuje liczbe od 0 do 48 wiec jesli chcesz by wylosowana liczba byla z zakresu 1-49 musisz dodawac jedynke. Tak wiec
*cos tam
Randomize
wylosowana_liczba:=Random(49)+1;
*cos tam cos tam
Pozdrawiam--<.>DiCz<.>