| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Путь к файлу [D5, NT4]
Striker © (2002-05-29 09:37:00)Мастера подскажите как получить полный путь директории где запустилось моя прога.
Anatoly Podgoretsky (2002-05-29 11:27:00) [1]Кулюкин Олег © (29.05.02 10:54)
Так тогда придется все функции добавлять, а такой фак уже есть, называется Дельфи хелп, речь видимо идет о переводе справовочной системы на русский язык
yozhik (2002-05-29 11:26:00) [2]для более корректного получения дирректории, я использую такую ф-цию.
function GetPath(sFileName:string):string;
begin
Result := ExtractFileDir(sFileName);
if Length(Result)>3 then
Result := Result +"\";
end;
yozhik (2002-05-29 11:20:00) [3]используй ExtractFileDir(Application.ExeName)
antonyo (2002-05-29 11:08:00) [4]Помнится и мне такое!!!
var s:string;
s:=application.exename;
while s[length(s)]<>"\" do
begin
setlength(s,length(s)-1);
end;
После всего этого бреда s будет содержать директорию типа
s:="c:\programfiles\example\"
Кулюкин Олег (2002-05-29 10:54:00) [5]Пора в ФАК добавить
Anatoly Podgoretsky (2002-05-29 09:52:00) [6]Эпидемию FindFirst вроде как побороли, теперь идет эпидемия своего пути
Dimka Maslov (2002-05-29 09:47:00) [7]ExtractFilePath(Application.ExeName);
ExtractFilePath(ParamStr(0));
Lord Warlock (2002-05-29 09:44:00) [8]ParamStr(0)
Ally (2002-05-29 09:40:00) [9]GetCurrentDirectory()- The GetCurrentDirectory function retrieves the current directory for the current process.
| |
