Главная страница
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-55556
MSAlex
2003-07-06 00:06
2003.07.17
TTreeView. Как графически выделить елемент под мышкой.?


1-55508
Flint
2003-07-04 12:28
2003.07.17
TDateTime conversion


1-55498
Alexey
2003-07-04 09:46
2003.07.17
Отключение звукового сигнала при Showmessage


14-55831
Prov
2003-07-01 16:41
2003.07.17
Что с рассылкой ?


3-55451
DDP1
2003-06-20 15:27
2003.07.17
замена запроса обновление для ADOQuery->DBGrid