Ver Mensaje Individual
  #2  
Antiguo 14-11-2018
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola a todos,

Echa un vistazo al siguiente código:

Código Delphi [-]
uses
  IniFiles;

procedure TForm1.FormCreate(Sender: TObject);
var
  IniFile: TIniFile;
begin
  IniFile := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'sample.ini');
  try
    IniFile.ReadSections(ListBox1.Items);
  finally
    IniFile.Free();
  end;
end;

Nota que el método "ReadSections" es lo que estás buscando. Lo que pasamos como argumento, en este caso, es la variable "Items" de un "ListBox", y, será en dicha variable donde se almacenen las secciones del archivo INI, todas ellas, independientemente de su nombre.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita