Ler valores da seção não funciona (TIniFile)

Delphi

25/03/2009

Oi gente.. estou com um pequeno probleminha usando o TIniFile.
Aqui meu código:
Const
  sFile = ´Files.ini´;

var
  IniFile: TIniFile;
  Strs: TStrings;
begin
  IniFile := TIniFile.Create(ExtractFileDir(ParamStr(0))+´\´+sFile);
  Strs := TStrings.Create;

  IniFile.ReadSectionValues(´Arquivos´, Strs);


O meu arquivo .ini:
[Arquivos]
Arq1=Buildings.ini
Arq2=Units.ini


Na ultima linha do meu código ele não funciona.
Porque a linha [b:c07a6240cd]IniFile.ReadSectionValues(´Arquivos´, Strs);[/b:c07a6240cd] não funciona???

Att,
.lg.


.lg.

.lg.

Curtidas 0

Respostas

.lg.

.lg.

25/03/2009

erro meu gente...
Eu deveria ter instanciado TStringList.
Strs := TStringList.Create;



GOSTEI 0
POSTAR