ini文件如下
[ADOConnectionString]
Provider=SQLOLEDB.1;
Persist Security Info=True;myfile:=TIniFile.Create(ExtractFilePath(paramstr(0))+'posconfig.ini');
Str:=myfile.ReadString('ADOConnectionString','Provider','WideString');读出内容为空,是怎么回事?
[ADOConnectionString]
Provider=SQLOLEDB.1;
Persist Security Info=True;myfile:=TIniFile.Create(ExtractFilePath(paramstr(0))+'posconfig.ini');
Str:=myfile.ReadString('ADOConnectionString','Provider','WideString');读出内容为空,是怎么回事?
Str:=myfile.ReadString('ADOConnectionString','Provider','WideString');
通过上面两句语句是不是就可以把Provider‘=’号后面的内容读到str中?给段例子最好了。
if FileExists(ExtractFilePath(paramstr(0))+'posconfig.ini') then
begin
myfile:=TIniFile.Create(ExtractFilePath(paramstr(0))+'posconfig.ini');
Str:=myfile.ReadString('ADOConnectionString','Provider','WideString');
end else
showmessage('文件不存在!');
肯定存在ExtractFilePath(paramstr(0))+'posconfig.ini'
if not fileexists(inifilename) then
begin
messagedlg('指定的配置文件不存在!',mterror,[mbok],0);
exit;
end;
inifile:=TInifile.Create(Inifilename);
result:=inifile.ReadInteger('options',Fieldname,0);
inifile.Free;