Fråga : Kontrollik sparar finns

Kära experter,

I har denna som ska laddas, och räddning de 3 listviewsna till file.

procedure TMainForm.FormClose (Sender: TObject; var-handling: 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;

But, när jag startar min applikation den första tiden, sparar gör inte går ut yet.
so, mig får 3 tider ett felmeddelande. Se, om fileexistotherwisten skapar it.

P, hur kan jag förhindra this.
That programmen först " klar "

Svar : Kontrollik sparar finns

Den grundada lösningen är mycket idérik, men standardinställer by sparar ska sparas i (eller laddas från), applikationmapp därför
   ExtractFilePath (Application.ExeName)    är onödig.