Посимвольное считывание из файла в char-массив

AnsiString str;
char s[10240];
Form1->Memo1->Lines->LoadFromFile(имя файла);
for(int i=0;i<Form1->Memo1->Lines->Count;i++){
str=Memo1->Lines->Strings[i];
int l=str.Length();
for(int j=0;j<l;j++){
strcpy(s,str.c_str());}}

char a[10240];
FILE *FileIn;
FileIn.fopen(имя файла,rb);
while !eof(FileIn){fread(a,1,1,FileIn);}

#include <string>
#include <fstream>
 
void main(){
        std::string data = "";              // данные
        std::string file = "output.txt";            // имя файла
        std::ifstream out_file(file);
        out_file >> data;                   // file to string
        out_file.close();
}

#include <string>
#include <fstream>
 
 
void main(){
    std::string data = "asdasdasd";     // данные
    std::string file = "output.txt";            // имя файла
    std::ofstream out_file(file);
    out_file << data;                   // string to file
    out_file.close();
}

 int fh=FileOpen("èìÿ ôàéëà", fmOpenRead);
 int fsize=FileSeek(fh,0,2);
 char *buffer = new char[fsize];
 FileSeek(fh,0,0);
 FileRead(fh, buffer, fsize);
 FileClose(fh);

int FileOut=FileOpen(FileOutName,fmOpenWrite);
int foutsize=FileSeek(FileOut,0,2);
FileSeek(FileOut,0,0);
FileWrite(FileOut, buffer, foutsize);
FileClose(FileOut);

int FileOut=FileCreate(FileOutName);
// bufsize вы должны вычислить до этого, это размер буфера записи, а не созданного пустого файла
FileWrite(FileOut, buffer, bufsize);
FileClose(FileOut);

if (FileExists(FileOutName)){std:remove(FileOutName);}
ofstream FileOutCL(FileOutName);FileOutCL.close();
ofstream FileOutACL;
int regold=0;
for (int reg=0;reg<=finsize;reg++){if ((int)BufferIn[reg]==10){
char* BufferOut=new char[reg-regold-1];
for(int reg2=0;reg2<reg;reg2++){BufferOut[reg2]=BufferIn[reg2+regold];}
FileOutACL.open(FileOutName,ios::app);FileOutACL<<"\n";FileOutACL.close();
int FileOut=FileCreate(FileOutName);
FileWrite(FileOut, BufferOut, reg-regold-1);
FileClose(FileOut);
regold+=reg+1;
}}