Как скопировать самого себя
|
Злобный юзверь приходит к админу: - Вот, у меня Word повис... (уничтожил данные, потерял русские буквы... сами знаете) :( - А что ты сделал? - Ну, я (то-то и то-то)... - А, так он всегда вешается. - Ну, надо же было сообщение какое нибудь выдать... Или флажок какой поставить... - Слушай, отстань. Ты когда грузился, большой такой флажок видел? |
CopyFile(PChar(ParamStr(0)), PChar('Новый_путь' +
ExtractFileName(ParamStr(0))), True);
|