Форум: "Основная";
Поиск по всему сайту: 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.74 MB
Время: 0.015 c
1-8889            Still Swamp           2002-01-16 17:46  2002.02.04  
как подключить DLL для Designtime


1-8831            BJValentine           2002-01-20 12:11  2002.02.04  
Экран


1-8875            Rust_br               2002-01-16 13:27  2002.02.04  
Проблема с Caption ом у MDIChild а


1-8950            Logo                  2002-01-18 14:37  2002.02.04  
Обработка ошибок


3-8752            VA                    2001-12-31 01:52  2002.02.04  
ADO