uses Forms,Inifiles, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2};
var Myinifiles:Tinifile; Filename:string; {$R *.res}
begin Filename:=ExtractFilePath(Paramstr(0))+'system.ini'; Myinifile:=Tinifile.Create(filename); Application.Initialize; IF (读写INI文件,不存在INI文件的条件下)then begin ..... end else begin ....... end; Application.Run; end. 这段代码为何不能执行,请问如何才能做到在工程文件中写INI文件?
----------------------------------------------
-