Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.17;
Скачать: CL | DM;

Вниз

Не могу записать значение ключа для INI файла   Найти похожие ветки 

 
AlexA ©   (2003-07-03 10:29) [0]

Следущия процедура только создает файл без записи ключа.
Procedure ApplIni;
Var
Ini : TIniFile;
F : File;
SFile : string;
begin
SFile := "Disp.ini";
If (not FileExists(sFile)) then
begin
AssignFile(F, sFile);
Rewrite(f);
CloseFile(f);
Ini := TIniFile.Create(SFile);
Ini.WriteString("Base","Disp","dispetcher:c:\Base\Patp_pl.gdb"); //указаная строка не записывает ключ :-(
Ini.Free;
end;
end;
Уважеемые мастера, что я делаю не так? Спасибо


 
MBo ©   (2003-07-03 10:36) [1]

procedure TForm1.Button1Click(Sender: TObject);
var Ini : TIniFile;
begin
Ini := TIniFile.Create("e:\file.ini");
Ini.WriteString("Base","Disp","dispetcher:c:\Base\Patp_pl.gdb"); //указаная строка не записывает ключ :-(
Ini.Free;
end;

работает


 
Poirot ©   (2003-07-03 10:40) [2]


> AlexA ©

файл закписывается куда-то нетуда... пробейте по винту... работает как штык! Файл может попасть в системную папку!


 
Bel ©   (2003-07-03 11:41) [3]

И, кстати,

AssignFile(F, sFile);
Rewrite(f);
CloseFile(f);

здесь лишние. При отсутствии файла ТIniFile его сам создаст.



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

Текущий архив: 2003.07.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-55507
avkiev
2003-07-03 15:37
2003.07.17
Как инициализировать переменную типа IStream ?


14-55853
Alex-kosmonavt
2003-07-01 18:57
2003.07.17
Компонент для работы с LPT


3-55450
Valeriya
2003-06-24 08:37
2003.07.17
как сделать специфические столбцы в QReport е


3-55465
Alex_x
2003-06-25 11:25
2003.07.17
Немогу установить фильтр на датасет


14-55727
Fredericco
2003-07-02 14:08
2003.07.17
1 Gbit Ethernet.