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

Вниз

Проблема с ini-файлом   Найти похожие ветки 

 
HepB   (2004-03-10 19:33) [0]

Почему не создаётся ini файл???

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var ini:Tinifile;
begin
ini:=Tinifile.Create("cd.ini");
try
 ini.WriteInteger("Form","Top",form1.Top);
 ini.WriteInteger("Form","Left",form1.Left);
 ini.WriteString("Form","Caption",form1.Caption);
finally
 ini.Free;
end;
end;


 
panov ©   (2004-03-10 20:13) [1]

Почему думаешь, что не создается?
Ищи этот файл в системном каталоге, ведь ты не указал путь, где этот файл должен быть создан.


 
Anatoly Podgoretsky ©   (2004-03-10 20:16) [2]

Какую ошибку выдает, наверно насчет прав, если так то не положено.


 
Sphinx ©   (2004-03-10 21:14) [3]

> ini:=Tinifile.Create("cd.ini");

исправьте на
ini:=TIniFile.Create(GetCurrentDir+"\cd.ini");


 
Германн ©   (2004-03-11 03:13) [4]

2 Sphinx ©   (10.03.04 21:14) [3]
Я бы не советовал для этих целей использовать "GetCurrentDir". Мало ли где "CurrentDir" может оказаться в процессе работы программы!
А ини-файл, имхо, следует хранить либо "по умолчанию" в WinDir, либо в каталоге программы.


 
Александр1 ©   (2004-03-11 05:55) [5]

HepB  - А где ты хотел его увидеть???
Ну вот например:
ini:=Tinifile.Create(ExtractFilePath(Application.ExeName)+"cd.ini"); - создаёт файл в каталоге, где сидит написанная программа!


 
Leshiy ©   (2004-03-11 09:39) [6]

ini.UpdateFile;


 
HepB   (2004-03-11 21:50) [7]

Всем огромное спасибо, я действительно его искал не там где он появлялся :-)



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

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

Наверх




Память: 0.45 MB
Время: 0.033 c
1-1081345743
Samael6
2004-04-07 17:49
2004.05.02
Проблема с ZLib


9-1068811512
MrAngel
2003-11-14 15:05
2004.05.02
glArrayElementEXT рисует, а вот glDrawArraysEXT не рисует :-)


14-1081477579
Думкин
2004-04-09 06:26
2004.05.02
С днем рождения! 9 апреля.


1-1081740969
AlexV
2004-04-12 07:36
2004.05.02
RichEdit1.FindText похоже, что не работает с русскими буквами :-(


6-1078908506
_netman_
2004-03-10 11:48
2004.05.02
TCP/IP





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский