![]() |
|
#1
|
|||
|
|||
![]() Помогите пожалуйста.
Нужно сделать простенькую программу при нажатии на кнопарь на экране должны выводится случайные числа, у меня выводится только последняя из цикла, что я делаю не так, спасибо. Код:
procedure TForm1.BitBtn1Click(Sender: TObject); var i:integer; begin for i:=1 to 10 do begin randomize; label1.caption:=inttostr(randomrange(1,100)); Windows.SleepEx(200,false); end; end; Admin: Пользуемся тегами! Последний раз редактировалось Admin, 03.06.2008 в 12:03. |