Текущий архив: 2004.08.29;
Скачать: CL | DM;

Вниз

Как скопировать свой собственный exe   Найти похожие ветки 

← →
banderas ©   (2004-07-18 17:19) [0]

Как скопировать "самого себя"

---

← →
Dolt ©   (2004-07-18 17:58) [1]

procedure TForm1.CopyMyExe(dir:String);
begin
 if dir[Length(dir)]<>"\" then dir:=dir+"\";
 CopyFile(PChar(Application.Exename),PChar(dir+ExtractFileName(Application.exe name)),False);
end;

---

← →
banderas ©   (2004-07-18 18:58) [2]

За Application.Exename большое спасибо!

---

← →
DeadMeat ©   (2004-07-18 21:12) [3]

А ещё здесь посмотри
http://delphimaster.net/view/15-1089766612/&web=1
;)

---
...Death Is Only The Begining...

---

Страницы: 1 вся ветка

Текущий архив: 2004.08.29;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.05 c