There follows a fragment of a program in Borland C++:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Memo1->Clear();
ListBox1->Clear();
Memo1->Lines->LoadFromFile("c:\\blitz\\history.txt");
a=Memo1->Lines->Count;
x=0;
while (x<a)
{
str1=Memo1->Lines->Strings[x];
if (str1 != "")
{
DATA MANIPULATION HERE, THEN

if (ListBox1->Items->Count==0)
ListBox1->Items->Strings[0]=str3;
else
ListBox1->Items->Add(str3);
}
}
ListBox1->Items->SaveToFile("C:\\blitz\\history.txt");
Close();
}

The form does not close, but "history.txt" is OK.

Any notions?

Jim Taylor