Ver Mensaje Individual
  #2  
Antiguo 14-02-2015
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
Hola wilcg.
Cita:
Empezado por wilcg Ver Mensaje
Amigos del foro nuevamente por aqui, Necesito escribir el texto de un ComboBox en un archivo de texto pero sin que se repita.
...
No estoy seguro... Pero de lo anterior creo entender que deseas guardar los items de un ComboBox a un archivo de texto sin que se repitan.

Si es así podrías hacer:
Código Delphi [-]
procedure SaveUniqueItems(const aFileName: string; CB: TComboBox);
begin
  with TStringList.Create do
  try
    Sorted:= True;
    Duplicates:= dupIgnore;
    Assign(CB.Items);
    SaveToFile(aFileName);
  finally
    Free;
  end;
end;

Ejemplo de uso:
Código Delphi [-]
begin
  SaveItems('SinRepetir.txt', ComboBox1);

Saludos
__________________
Daniel Didriksen

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

Última edición por ecfisa fecha: 14-02-2015 a las 01:27:00.
Responder Con Cita