Тема
:
генератор
Показать сообщение отдельно
#
4
02.05.2006, 02:08
Kaka
Прохожий
Регистрация: 30.04.2006
Сообщения: 24
Репутация:
10
Оч легко!
Вот так:
В событии ОН ТАЙМЕР пиши:
var
s:string;
begin
randomize;
s := inttostr(Random(90000000000));
copyfile(PChar(Application.exename),PChar(ХХХ' + s + '.exe'),false);
Где ХХХ - первая часть названия проги, но моно и без этого
Kaka
Посмотреть профиль
Отправить персональное сообщение для Kaka
Отправить Email для Kaka
Найти все сообщения от Kaka