Форум: "Основная";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
ВнизГенератор паролей! Найти похожие ветки
← →
MBo (2002-02-07 07:39) [1]randomize;
edit1.text:="";
for i:=1 to 10 do begin
c:=chr(ord("0")+random(ord("z")-ord("0")));
if not (c in [":".."@"]) then
edit1.text:=edit1.text+c;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c