| agss
| Дата: Воскресенье, 27.09.2009, 16:15 | Сообщение # 1 |
|
Сообщений: 2
Статус: Offline
| Создаем новую форму, кидаем на неё TEdit, TMemo, TButton. Дальше кликаем на TButton два раза и пишем туда код:
Code j:='1234567890';
i:='abcdefghigklmnopqrstuvwxyz';
for a:=0 to strtoint(Edit1.Text) do
Memo1.Lines.Add(i[random(27)]+j[random(9)]+
+i[random(27)]+j[random(9)]+i[random(27)]+
+j[random(9)]+i[random(27)]);
после чего, обьявите следующие переменные:
Code var
i:String;
j:String;
a:Integer;
Пример того что можно на стряпать.
Автор: Agss.
Сайт: http://pro-php.info
Сообщение отредактировал agss - Воскресенье, 27.09.2009, 16:18 |
| |
| |
| JavaNet
| Дата: Суббота, 03.10.2009, 10:18 | Сообщение # 2 |
Сообщений: 3
Статус: Offline
| Извиняюсь за флуд.
agss, я никогда не поверю что это сделал ты. Покажи источники, пока я тут не умер от смеха...
|
| |
| |
| mxildar
| Дата: Понедельник, 05.10.2009, 19:54 | Сообщение # 3 |
Сообщений: 2
Статус: Offline
| Quote (JavaNet) я никогда не поверю
согласен с тобой 
|
| |
| |
