Amigos del foro nuevamente por aqui, Necesito escribir el texto de un ComboBox en un archivo de texto pero sin que se repita.
estoy utilizando este codigo.
Código Delphi
[-]var
F: TextFile;
sArchivo: string;
begin
sArchivo := ExtractFilePath( Application.ExeName ) + 'Prueba.txt';
AssignFile( F, sArchivo );
if FileExists( sArchivo ) then
Append( F )
else
Rewrite( F );
WriteLn( F, ComboBox1.Text' );
CloseFile( F );
end
;