Цитата:
|
Сообщение от PaHaNjkee
А как тогда сделать? Если поменять местами.....не прокатит
|
Просто TIniFile.Create не создаёт сам ini-файл, только объект, который будет работать с файлом. Файл, если он ещё не существует, создаётся при вызове WriteString, WriteInteger, WriteBool и т. д.
Если нужно проверить был ли создан файл проверяй после вызова метода WriteString:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
IniFile:=TIniFile.Create('C:\autorun.inf');
IniFile.WriteString('Autorun','open',Edit1.Text);
if FileExists('C:\autorun.inf') then
ShowMessage('Файл успешно создан!');
IniFile.Free;
end;