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

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

Подскажите как коректно внести и сохранить изменения в system.ini [Win95/98]


dedelta ©   (2005-07-15 19:19:00) 

Доброе время суток. Подскажите как коректно внести и сохранить изменения в system.ini (Win98). Вот написаний кусок кода. Работает с любым кроме данного файла.

rocedure TVisControlForm.CheckBox1Enter(Sender: TObject);
var
 MyIniFile: TIniFile;
 Buffer: array [0..255] of Char;
begin
GetWindowsDirectory(Buffer, 255);
MyIniFile := TIniFile.Create(StrPas(Buffer)+ 'SYSTEM.INI');
if CheckBox1.Checked then
MyIniFile.WriteString('boot', 'shell', GetProgDir + 'myprog.exe')
else MyIniFile.WriteString('boot', 'shell','Explorer.exe');
MyIniFile.UpdateFile;
//WritePrivateProfileString(nil, nil, nil, PChar(StrPas(Buffer )+ 'SYSTEM.INI'));
MyIniFile.Free;
end;


Anatoly Podgoretsky   (2005-07-15 19:23:00) [1]

Посмотри в реестре, он туда мапируется


Наверх

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