Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-06-2010
pabloloustau pabloloustau is offline
Miembro
 
Registrado: dic 2009
Posts: 56
Poder: 15
pabloloustau Va por buen camino
valores de seccion archivos ini

hola a todos! estoy usando archivos ini y me surgio un problema con readsectionvalue. el problema es que con esta lectura me aparece la seccion seguida del valor ( section=value) y yo quiero que aparezca el valor solo. como puedo hacer esto?? les dejo mi codigo de prueba.

Código:
var ini: tinifile;
procedure TForm1.Button1Click(Sender: TObject);
begin
  ini:= tinifile.Create('C:\Documents and Settings\usuario\Escritorio\prueba.ini');
  ini.ReadSections(combobox1.Items);
  ComboBox1.ItemIndex := 0;
  end;

procedure TForm1.ComboBox1Click(Sender: TObject);
var str: string;
begin
    if (Sender is TcomboBox) then begin
    Str := ComboBox1.Items[ComboBox1.ItemIndex];
    ini.ReadSection(str, ComboBox2.Items);
    ini.ReadSectionValues(str, combobox3.items);
  end;
  ComboBox2.ItemIndex := 0;
  ComboBox3.ItemIndex := ComboBox2.ItemIndex;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
if (combobox1.text<>'') and (combobox2.text<>'') and (combobox3.text<>'') then
ini.Writestring(combobox1.Text,combobox2.Text,combobox3.Text);
end;
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Que tal una seccion dedicada ECO? edalmasso OOP 6 19-01-2006 00:31:41


La franja horaria es GMT +2. Ahora son las 16:53:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi