Как перевести Ansistring в char[256]

 char *d = new char[256];
    String m = Edit1->Text;
 
    d = m.c_str();

AnsiString m = Edit1->Text;
int i = StrToInt(m[...]);

float asc(char x)
{
int M;
M=(int)x;
return M;
}
 int M[256];
M[i]=asc(A[i]);

int i = m[1];

//----------------------------------------------------------------
#pragma argsused
asc(char x) //Перевод из символьного типа в числоовой (ASCII)
{
int M;
M=(int)x;
return M;
}
 
 
 
 
 
void main()
{
SetConsoleOutputCP(1251); //Русский язык
SetConsoleCP(1251);
 
    int k , c , l , i=0;
    char str[256];
    char A[256];
    int B[256];
    int M[256];
 
 
 
 
 cout<<"Введите ваше сообщение :"<<endl;
 cin>>str;
 
 k=strlen(str);                         //определение длины предложения
 cout<<"Длина вашего сообщения:"<<k<<endl;
 
cout<<"Повторите ввод вашего сообщения"<<endl;
for (i=0;i<k;i++)
 cin>>A[i];                             //Ввод сообщения в определенный масив
 
for(i=0;i<k;i++)
  M[i]=asc(A[i]);                       //перевод из char в int
 
 
 cout<<"Ведите 1 ключ"<<endl; //ввод 1 ключа
  cin>>c;
 
for(i=0;i<k;i+=2)                       //сложение симвлоа и 1 ключа
   B[i]=M[i]+c;
 
 
 cout<<"Ведите 2 ключ"<<endl; //ввод 2ключа
 cin>>l;
 
for(i=1;i<k;i+=2)                       //сложение симвлоа и 2 ключа
   B[i]=M[i]+l;
 
ofstream f1("DECODES.txt");             //запись симвлолв в файл
for(i=0;i<k;i++)
   f1<<B[i]<<endl;
   f1<<"________________________________________________\n";
   f1<<"|Длина:"<<k<<"|1 ключ:"<<c<<"|2 ключ:"<<l<<"|";
 f1.close();
cout<<"Выполеннно!";
getch();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        int PPP;
        AnsiString m = Edit1->Text;
        int k  = StrToInt(Edit2->Text);   
        for (int i = 1;i<=m.Length();i++)
                {
                        PPP = ((unsigned char)m[i] + k);
                        if (PPP >= 256) 
                               PPP=PPP-255;
                        m[ i ] = (char)PPP;
}
        Edit3->Text = m;
}

PPP = ((unsigned char)m[i] + k);