Не могу записать переменую и массив в файл

PutInFile(String FileName,char N,int Y[])
{
        int iFileHandle = FileCreate(FileName);
        FileWrite(iFileHandle,(char*)N, sizeof(N));
        FileClose(iFileHandle);
}

int iFileHandle = FileCreate(FileName); 
FileWrite(iFileHandle, &N, sizeof(N)); 
FileClose(iFileHandle);

PutInFile(String FileName,char N,int Y[])
{
        int iFileHandle = FileCreate(FileName);
        FileWrite(iFileHandle,&N, sizeof(N));
        FileWrite(iFileHandle, Y, sizeof(Y));
        FileClose(iFileHandle);
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        int Y[1000];
        for(int i=0;i<1000;i++)
        Y[i]=i;
        PutInFile(SaveDialog1->FileName,1,Osc);
}

FileWrite(iFileHandle, *Y, sizeof(*Y));

char a[5]={'1','2','3','4','5'};
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        int iFileHandle = FileCreate("C:\SomeName.txt");
        FileWrite(iFileHandle, a, sizeof(a));
        FileClose(iFileHandle);
 
}

void PutInFile(String FileName, int N,int Y[])
{
        int iFileHandle = FileCreate(FileName);
        FileWrite(iFileHandle, Y, N * sizeof(Y[0]));
        FileClose(iFileHandle);
}
 
...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        int Y[1000];
        for(int i=0;i<1000;i++)
             Y[i]=i;
        PutInFile(SaveDialog1->FileName, 1000, Y);
}

class ReadWrite
{
        //строчка ver
        char* ver;
        //v-Версия
        char v;
        //Число графиков
        char N;
        //L-Длина графика
        long L;
        //Коэфициенты умножения
        char k[];
        //t-общее время записи
        long t;
        //Массив байт графиков
        int Y[][128];
        public:
        ReadWrite();
        //Функция записи в файл
        void PutInFile(String FileName,byte N,long L,long t,int k[],int sizeK,int Y[][8],int sizeY);
        //Функция извлечения записаной информации из файла
        void GetFromFile(String FileName);
 
};

void ReadWrite::PutInFile(String FileName,byte N,long L,long t,int k[],int sizeK,int Y[][8],int sizeY)
{
        //создаем вайл и получаем его хендл
        int iFileHandle = FileCreate(FileName);
        //Записуем ver в начало файла
        FileWrite(iFileHandle,(char*)ver, sizeof(ver));
        //Записываем номер версии
        FileWrite(iFileHandle,&v, sizeof(v));
        //Записываем число массивов
        FileWrite(iFileHandle,&N, sizeof(N));
        //записываем максимальную длину масива
        FileWrite(iFileHandle,&L, sizeof(L));
        //записываем время записи
        FileWrite(iFileHandle,&t, sizeof(t));
        //записываем массив коэфициентов
        FileWrite(iFileHandle,k, sizeK);
        //сохраняем массив с данными
        FileWrite(iFileHandle,Y, sizeY);
        //закрываю файл
        FileClose(iFileHandle);
 
 
}

void ReadWrite::GetFromFile(String FileName)
{
  //хендл файла
  int iFileHandle;
  //длина файла
  int iFileLength;
  //прочитаные байты
  int iBytesRead;
  //буфур в который мы будем читать файл
  int *pszBuffer;
 
      //Открываем файл получаем его хендл
      iFileHandle = FileOpen(FileName, fmOpenRead);
      //повучаем длину файла в байтах
      iFileLength = FileSeek(iFileHandle,0,2);
      //передвигаем курсов в начало файла
      FileSeek(iFileHandle,0,0);
      //бувер для чтения файла делаем равным длине файла + 1байт
      pszBuffer = new int[iFileLength+1];
      //читаем в pszBuffer, повучаем количество прочитаных байт в iBytesRead
      iBytesRead = FileRead(iFileHandle, pszBuffer, iFileLength);
      //записываем в конец буфера 0
      pszBuffer[iFileLength]=0;
      //закрываем читаемый файл
      FileClose(iFileHandle);
 
      //Вот сдесь и начинается неправильная запись информации в переменные. Почему?
 
      //записываем чило массивов
      N=pszBuffer[4];
      //записываем максимальную длину масива
      L=pszBuffer[5];
      //Общее время записи
      t=pszBuffer[6];
      //Получаем массив коэфициентов
      for(int i=0;i<N;i++)
        k[i]=pszBuffer[7+i];
      //Массив графиков
      for(int i=0;i<N;i++)
        for(int j=0;j<1000;j++)
                Y[j][i]=pszBuffer[8+j+i*1000];
 
}

void __fastcall TForm1::Save1Click(TObject *Sender)
{
        //Создаем 8 массивов по 1000 элэметнов
        //заполняем их цифрама от 0 до 999
        int osc[1000][8];
        for(int i=0;i<8;i++)
        for(int j=0;j<1000;j++)
        osc[j][i]=j;
 
        //создаем массив коэфициентов
        int k[8];
        for(int i=0;i<8;i++)
        k[i]=1;
 
        //выбираем имя файла в окне "сохранить как"
        SaveDialog1->Execute();
        //Записываем данные
        rw->PutInFile(SaveDialog1->FileName,8,1000,1000,k,sizeof(k),osc,sizeof(osc));
}

void __fastcall TForm1::Open1Click(TObject *Sender)
{
//выбираем имя файла в окне "открыть"
OpenDialog1->Execute();
//извлекаем данные из файла
rw->GetFromFile(OpenDialog1->FileName);
}

ReadWrite::ReadWrite()
{
        ver="ver";
        v=1;
}