Código:
While Not EOF (F) do
begin
ReadLn(F,Linea);
frmPrincipal.lstServicios.Items.Add( Linea);
end;
Creo que así sí, no?
Cita:
|
contenido tipo lstServicios.items.clear despues de ejecutar el procedimiento CargarServicios.
|
Tú mismo te estas respondiendo, al acceder a Items.text, estas borrando lo que hubiese antes.
Saludos