Pergunta : Verific a lima do ik existem

Os caros peritos,

I têm este para carregar e conservar os 3 listviews a file.

procedure TMainForm.FormClose (Sender: TObject; ação do var: TCloseAction);
begin
SaveListViewToFile (lstvGlucose, “Glucose.sav ");
SaveListViewToFile (lstvBolus, “Bolus.sav ");
SaveListViewToFile (lstvFoodDB, “FoodDB.sav ");
end;
(*---------------------------------------------------*)
procedure TMainForm.FormCreate (Sender: TObject);
begin
LoadListViewToFile (lstvGlucose, “Glucose.sav ");
LoadListViewToFile (lstvBolus, “Bolus.sav ");
LoadListViewToFile (lstvFoodDB, “FoodDB.sav ");
end; o

But quando eu começo minha aplicação a primeira vez as limas não faz as saídas yet.
so, mim começ a 3 vezes uma mensagem de erro. Como posso eu impedir this.
That o programm primeiramente olhar se o otherwist do fileexist cria it.

P class= do

Resposta : Verific a lima do ik existem

A solução fundada é muito creativa, mas à revelia as limas serão conservadas (ou carregadas de) no dobrador das aplicações conseqüentemente
   ExtractFilePath (Application.ExeName)    é desnecessário.