¡Buen día a todos!
Gracias Román.
Por lo pronto lo hago leyendo el contenido de la sección en una lista de cadenas TStringList, y luego pasando los valores (lo que está a la derecha de "
Key=") a una tabla de memoria:
Código:
{ Cargar la lista de consultas personalizadas del
archivo .ini a la tabla de memoria TaConsultas }
ListCons := TStringList.Create;
Try
ArchInic.ReadSectionValues ('Consultas', ListCons);
For IndiCons := 0 To ListCons.Count - 1 Do
Begin
TaConsultas.Append;
TaConsultasRuta.Value :=
SubcaPost (ListCons [IndiCons], '=');
TaConsultas.Post;
End;
Finally
ListCons.Free;
End;
Seguimos en contacto.
Al González
.