Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

tinifile и windows 7 [Delphi, Windows]


tcler ©   (2009-07-22 15:38:00) 

здравствуйте. работаю сам под хр, был написан простой плагин к дм с использованием tinifile из KOL, но выяснился неприятный момент - у человека с windows 7 ни запись, ни чтение из ини файла не работают. код простейший, думаю, смысла приводить его нет. о проблеме известно, исправить можно?


tcler   (2009-07-22 20:16:00) [1]

да, точно, о правах забыл совсем :) спасибо за подсказку


Ruzzz   (2009-07-22 20:03:00) [2]

Такой код работает в Win7:
var
 var1: Boolean = True;
 var2: Boolean = True;

procedure TProgramm.IniFileSaveLoad(Save: Boolean);
var
 IniFile: PIniFile;
begin
 IniFile := OpenIniFile(GetStartDir + 'settings.ini');
 try
   if Save then IniFile.Mode := ifmWrite;
   IniFile.Section := 'Main';
   Var1 := IniFile.ValueBoolean('Name1', Var1);
   IniFile.Section := 'Add';
   Var2 := IniFile.ValueBoolean('Name2', Var2);
 finally
   IniFile.Free;
 end;
end;


Возможно вы запускаете программу из каталога, на запись в который у программы нет прав?


Dy1   (2009-07-22 16:29:00) [3]

попытаюсь угадать. Нет прав?


Наверх

Титульная страница Поиск, карта сайта Написать письмо