Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Вниз

Путь к INI- файлу.   Найти похожие ветки 

 
Patrick ©   (2004-03-31 14:14) [0]

Подскажите, пожалуйста. каким образом сделать так, чтобы INI-файл создавался и соответственно потом можно было прочесть из него данные, не по умолчанию в c:\WINDOWS , а в рабочем директории приложения, только не привязываться железно, к одному пути.


 
Юрий Зотов ©   (2004-03-31 14:19) [1]

ParamStr(0) + ChangeFileExt, например.


 
Ega23 ©   (2004-03-31 14:44) [2]

ExtractFilePath
ParamStr(0)
ExtractFileName
......


 
TUser ©   (2004-03-31 15:05) [3]

extractFilePath(application.exename);


 
Anatoly Podgoretsky ©   (2004-03-31 15:15) [4]

Ну так туда тоже как правило запрещена запись, а помещать надо в профиль пользователя Document and Settings, вот тогда будет работать практически везде.


 
panov ©   (2004-03-31 15:48) [5]

function IniName:String;
var
 Len: Integer;
begin
 Result := ParamStr(0);
 Len := Length(Result);
 Result[Len] := "i";
 Result[Len-1] := "n";
 Result[Len-2] := "i";
end;


 
Ega23 ©   (2004-03-31 16:19) [6]

panov ©   (31.03.04 15:48) [5]

Оригинально!


 
Юрий Зотов ©   (2004-03-31 16:21) [7]

> panov ©   (31.03.04 15:48) [5]

ChangeFileExt(ParamStr(0), ".ini");
:о)


 
Ega23 ©   (2004-03-31 16:24) [8]

Юрий Зотов ©   (31.03.04 16:21) [7]

Изящнее чем Оригинально!  :о)


 
panov ©   (2004-03-31 16:26) [9]

>Юрий Зотов ©   (31.03.04 16:21) [7]

Это если не надо экономить-)


 
Ega23 ©   (2004-03-31 16:34) [10]

Это если не надо экономить-)

Это-то как раз понятно.



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

Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.041 c
14-1079973074
mur
2004-03-22 19:31
2004.04.18
ООП


4-1076658166
Chery
2004-02-13 10:42
2004.04.18
Как переименовать папку?


7-1076391878
Alexandr3
2004-02-10 08:44
2004.04.18
Считыватели магнитных карт


1-1080889651
still_swamp
2004-04-02 11:07
2004.04.18
Что нужно для работы приложений D8?


14-1080234471
Mox Fulder
2004-03-25 20:07
2004.04.18
Куда пойти учиться???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский