Ver Mensaje Individual
  #4  
Antiguo 03-09-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola de nuevo principiante22, de la forma que te puse tienes que hacer un ReadString de todas tus claves que tengas, no había utilizado la función ReadSectionValues que te devuelve inclusive con el nombre de la clave pero de toda la sección, si aun quieres hacerlo de esa forma, tendrías que pasar priimero a un StringList auxiliar, recorres y quitas lo que no te sirve que sería lo que esta antes del igual, te pongo un ejemplo.

Código Delphi [-]
var
 i, posi : Integer;
 sl      : TStringList;
 valor   : STring;
begin
 ......... 
  sl := TStringList.Create;
  Archivoini.ReadSectionValues('Seccion1',sl);
 
  for i := 0 to sl.Count-1 do
   begin
    posi := Pos('=',sl[i]);
    valor := copy(sl[i],posi+1,Length(sl[i])-1);
    ComboBox1.Items.Add(valor);
   end;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita