Строки AnsiString и массив char

void __fastcall TForm1::Button1Click(TObject *Sender)
{
char* memo1;      
char* memo2;       
char* memo12;  
 
int im1 = strlen((Memo1->Text).c_str());
int im2 = strlen((Memo2->Text).c_str());
memo1 = new char[im1+1];        
memo2 = new char[im2+1];        
memo12 = new char[im1+im2+1]; 
strcpy(memo1, (Memo1->Text).c_str());        
strcpy(memo2, (Memo2->Text).c_str());        
strcat(memo12, memo1);    
strcat(memo12, memo2);               
Memo5->Text = AnsiString(memo1);
Memo6->Text = AnsiString(memo2);
Memo3->Text = AnsiString(memo12);  
 
delete[] memo1;
delete[] memo2;
delete[] memo12;
}

Memo5->Text = Memo1->Text;
Memo6->Text = Memo2->Text;
Memo3->Text = Memo5->Text + Memo6->Text; // тут надо добавить еще какой-нибудь лабуды, имитирующей неинициализированный перед выполнением strcat буфер memo12

.........       
strcpy(memo12, memo1);    
strcat(memo12, memo2);

char stuff[100]; // not initialized
stuff[0] = '\0'; // first character is now the null terminator,
                 // so 'stuff' is effectively ""
strcpy(stuff, "hi ");  // this initializes 'stuff' if it's not already.

char stuff[100] = {};  // 'stuff' is initialized to all zeroes