программа, которая считывает текст из файла и выводит на экран только предложения, не содержащие запятых

[shadowfiend]

написать программу, которая считывает текст из файла и выводит на экран только предложения, не содержащие запятых.
делаю на application.

//открытие файла  и вывод на Memo.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (OpenDialog1->Execute());
Memo1->Lines->Clear();
Memo1->Lines->LoadFromFile("text.txt");
}

дальше не знаю что и как делать

[Spawn™Production®]

Ну как что, идти по линиям, искать в них запятые и удалять линии с запятыми...
Но лучше уж сразу в Memo выводить строки без запятых, т.е. придётся считывать файл не в Memo, а в переменную.

[shadowfiend]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
TStringList * Lst = new TStringList; // задается переменная
if (OpenDialog1->Execute());   // открывает файл
Memo1->Lines->Clear();
        Lst->LoadFromFile("text.txt"); //считывает на Lst  текст
        for(int i=0;i<Lst->Count;i++)  //просматривает все линии
                if(!Lst->Strings[i].Pos(",")) //если строки без" , ", то их считывает на Memo
                        Memo1->Lines->Add(Lst->Strings[i]);
        delete Lst; // удаляет переменную Lst
}

что то такое сделал. Но все равно не работает. Программа запускается, но файл не считывается на Memo.