Ver Mensaje Individual
  #5  
Antiguo 17-05-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Otra opción no muy complicada es hacerte un procedimiento para cambiar nombres de secciones:
Código Delphi [-]
procedure CambiarNombreSeccion(const RutaNombre, Viejo, Nuevo: string);
var
  TS: TStrings;
  i : Integer;
begin
  TS:= TStringList.Create;
  try
    TS.LoadFromFile(RutaNombre);
    for i:= 0 to ts.Count -1 do
      if Pos(Viejo,'[' + TS[i] + ']') > 0 then
        TS[i]:= '[' + Nuevo + ']';
    TS.SaveToFile(RutaNombre);
  finally
    TS.Free;
  end;
end;

Por ejemplo para llamarlo:
Código Delphi [-]
CambiarNombreSeccion('C:\TEMPORAL\MiArchivoIni.INI','INFO','INFORMACION');

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 17-05-2011 a las 13:15:56.
Responder Con Cita