Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Вниз

Генерация случайного числа в диапазоне 30......90 


DELPHIMUN   (2002-01-15 16:47) [6]

function randomNamber(namber: integer): integer;
begin
result := random(namber);
end;
procedure button1click(sender: tobject);
var
e: tedit;
begin
e := tedit.create(sender);
e.parent := form1;
e.top...
...
randomnamber(strtoint(e.text));
end;
end.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.024 c
3-8756            alive                 2002-01-04 17:26  2002.02.04  
Долго происходит вызов информации по lookup .


4-9033            Mr.Death              2001-11-22 08:59  2002.02.04  
Как перехватить вперед системы сочетание Сtrl+Alt+Del из под WIN2000/XP


3-8799            otari                 2002-01-06 23:15  2002.02.04  
никто не знает INTERBASE?


6-8962            lsd[52r]              2001-11-13 01:51  2002.02.04  
Как научить прогу по IP коннектится?


1-8870            NY152                 2002-01-15 09:59  2002.02.04  
Подскажите, где поставить проверку...