Скачать: CL | DM;

Мой exe шник на чужом винте   Найти похожие ветки 

← →
Шустрый ©   (2003-07-12 07:35) [0]

Такой пример: я написал прогу, она у меня на винте и она знает путь до себя самой (допустим c:\...MyProg.exe). И вот она оказывается на чужом винте, и не знает в каком локальном диске она, и в какой папке. Дак вот, может кто-нибудь подскажет или напишет обработчик события OnCreate формы, чтобы программа сама себя нашла, и поместила путь до себя в TEdit? Всем спасибо!

---

← →
Sliski Slimak   (2003-07-12 09:15) [1]

GetCurrentDir

---

← →
Pico   (2003-07-12 09:27) [2]

func Application.ExeName

---

← →
Шустрый ©   (2003-07-12 10:28) [3]

Спасибо, понял.

---

← →
Mear ©   (2003-07-12 10:46) [4]

А можно еще:

function ParamStr(Ind: Integer): string;

По индексу 0 возвращает путь и имя екзешника а по другим индексам переданные через пробел параметры...

Количество параметров можно узнать из ParamCount;

---

← →
Mear ©   (2003-07-12 10:46) [5]

А можно еще:

function ParamStr(Ind: Integer): string;

По индексу 0 возвращает путь и имя екзешника а по другим индексам переданные через пробел параметры...

Количество параметров можно узнать из ParamCount;

---

← →
Reals ©   (2003-07-12 12:39) [6]

function ExtractFilePath(Application.Exename): String;

---

← →
ldo ©   (2003-07-12 23:20) [7]

procedure getdir(0,строка);

0-это означает текущий диск

---

← →
Marser ©   (2003-07-13 11:01) [8]

path:string;
......
path:=extractfilepath(paramstr(0));//искомый путь
.....
end.

---

← →
BigDAN ©   (2003-07-14 09:30) [9]

!!!!!
GetCurrentDir и procedure getdir(0,строка); дают текущую директорию, которая может меняться!!!! Второе - можно запустить ехе через ярлык и указать в нем САВСЕМ другую директорию!!! Ну и что и этого получиться? Хе!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c