Чтение массива чисел из Memo

void __fastcall TForm1::FormCreate(TObject *Sender) {
Memo1 -> Lines -> Clear();
Memo1 -> Lines -> LoadFromFile("Sample.txt"); 
}

while (CRC_Trans > 255){
CRC_Trans -= 255;
 }

TStringList *list = new TStringList;
list->LoadFromFile("Sample.txt");
for(unsigned int i = 1; i<=list->Count; i++)
{
Memo1 -> Lines -> Append(list-> Strings[i]);
crc_trans += .....;
WriteFile(hFile,&crc_trans,1,&kto,NULL);
}
delete list;

#include <fstream>
#include <vector>
#include <algorithm>  // std::copy
#include <iterator>    //  std::back_inserter
 
#include <memory> // std::auto_ptr
//----------------------- Variant STL ---------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
using namespace std;
 
vector<int> v;
ifstream ifs("1.txt");
if (ifs) copy(istream_iterator<int>(ifs),istream_iterator<int>(),back_inserter(v) );
else ShowMessage("Can't open file");
// вывод
for(size_t i=0; i<v.size(); i++) Memo1->Lines->Add(v[i]);
}
//-------------------------- Variant VCL ------------------------------------
void __fastcall TForm2::Button2Click(TObject *Sender)
{
std::auto_ptr<TStringList> SL (new TStringList);
std::vector<int> v;
 
try{ SL->LoadFromFile("1.txt"); }
catch(...){ ShowMessage("Can't open file"); }
 
SL->Delimiter=L' ';
SL->DelimitedText= SL->Text;
 
for(ssize_t i=0; i<SL->Count; i++)
  {
    int value=0;
    TryStrToInt(SL->Strings[i],value);
    v.push_back(value);
  }
// вывод
for(size_t i=0; i<v.size(); i++) Memo1->Lines->Add(v[i]);
}
//---------------------------------------------------------------------------

#include <fstream>
#include <vector>
#include <algorithm>  // std::copy
#include <iterator>    //  std::back_inserter
 
#include <memory> // std::auto_ptr
 
HANDLE hFile;
DCB dcb;
COMMTIMEOUTS CommTimeOuts;
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
using namespace std;
 
vector<int> v;
ifstream ifs("Varu.txt");
if (ifs) copy(istream_iterator<int>(ifs),istream_iterator<int>(),back_inserter(v) );  //если файл открыт, заносим числа в динамический массив v[i]
else ShowMessage("Can't open file");  
 
for(size_t i=0; i<v.size(); i++) Memo1->Lines->Add(v[i]);  // вывод на форму
}
 
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
unsigned int crc_tx, temp;
DWORD kto;
 
PurgeComm(hFile,PURGE_TXCLEAR);               //очистить буфер передатчика
PurgeComm(hFile,PURGE_RXCLEAR);               //очистить буфер приемника
 
for(int i=0; i<=Memo1->Lines->Count;i++)      //перебор по строкам
{
temp = StrToInt(Memo1->Lines->Strings[i]);   //преобразование строки в целое
 
WriteFile(hFile,&temp,1,&kto,NULL);               //отправляем полученное число по COM
 
crc_tx+=temp;                                           //контрольная сумма 
while(crc_tx>=255) { crc_tx-=255;}              //чтобы контрольная сумма не была большой
Label1->Caption = crc_tx;                            //выводим значение на форму
}
 
//**********************[B]Контрольная сумма[/B]**********************************
 
/*Sleep(500);                                            //ожидание
 
ReadFile(hFile,&crc_rx,1,&kto,NULL);               //читаем ответ с МК 
AnsiString st;
if(crc_rx == crc_tx) st = "Передача завершена успешно";         //если суммы совпадают, то все норм
        else st = "Обнаружена ошибка в контрольной сумме";
st += "\nОтправлено: " + IntToStr((int)crc_tx)+ "\nПринято: "+IntToStr((int)crc_rx);
Application->MessageBoxA(st.c_str(),"Передача завершена",MB_OK);
 */
 
PurgeComm(hFile,PURGE_TXCLEAR);              //очистить буфер передатчика
PurgeComm(hFile,PURGE_RXCLEAR);              //очистить буфер приемника
}

temp = StrToInt(Memo1->Lines->Strings[i]);

WriteFile(hFile,&v[i],1,&kto,NULL);

crc_t+=temp;                                           //контрольная сумма 
while(crc_t>=255) { crc_trans-=255;}          //чтобы контрольная сумма не была большой
Label1->Caption = crc_t;

//...
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <vector>  // !!!!!
//---------------------------------------------------------------------------
 
// ...
 
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
           std::vector<int> v;  // !!!!! 
// ...