Problemas al cargar el contenido de un fichero en un ListBox

[[Lepe]]

While Not EOF (F) do
begin
ReadLn(F,Linea);
frmPrincipal.lstServicios.Items.Add( Linea);
end;

Creo que así sí, no?

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