Проверка правильности выполнения кода, введённого в Memo - C++ Builder - Ответ 7609776

//---------------------------------------------------------------------------
#include <memory>
#include <vcl.h>
#pragma hdrstop
 
#include "Z1.h"
#include "Glavnoe.h"
#include "Z2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TZZ1 *ZZ1;
//---------------------------------------------------------------------------
std::auto_ptr< TStringList > list( new TStringList( ) );
// далее запихиваем в list верный ответ...
// и сравниваем:
bool ans_is_right( /*...*/ )
{
    int count1( list->Count ), count2( Memo3->Lines->Strings->Count );
 
    if( count1 != count2 )
    {
        return false;
    }
    for( int i( 0 ); i < count1; ++i )
    {
        if( list[i] != Memo3->Lines->Strings[i] )
        {
            return false;
        }
    }
    return true;
}
//---------------------------------------------------------------------------
__fastcall TZZ1::TZZ1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TZZ1::Button3Click(TObject *Sender)
{
Online->Show();
ZZ1->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TZZ1::Button1Click(TObject *Sender)
{
ZZ2->Show();
ZZ1->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TZZ1::Button2Click(TObject *Sender)
{
Memo3->Clear(); 
}
//---------------------------------------------------------------------------
 
void __fastcall TZZ1::Button4Click(TObject *Sender)
{
 
}
//---------------------------------------------------------------------------