Перевертывание строки.

#include <vcl.h>
#pragma hdrstop
#include "C:\Documents and Settings\Admin\Рабочий стол\reverse.cpp"
extern AnsiString reverse(AnsiString a);
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString s;
s=Edit1->Text;
reverse(s);
Edit1->Text=reverse(s);
}

 
//нагуглил такую функцию. Но с++ ругается, мол надо тип не char, а AnsiString.
char reverse(char s[100000]){
        int c,i,j;
        c=i=j=0;
        for(i=0,j=strlen(s)-1;i<j;i++,j--){
        c=s[i];
        s[i]=s[j];
        s[j]=c;
        }
        return s[j];
        }

AnsiString reverse(AnsiString Stroka)
{
 
        AnsiString Result;
        char * str=Stroka.c_str();
        char * strnew= new char[Stroka.Length()+1];
        for(int i=Stroka.Length()-1;i>=0;i--)
        {
                strnew[(Stroka.Length()-1)-i]=str[i];
        }
        strnew[Stroka.Length()]='\0';
        Result=strnew;
        delete [] strnew;
        return Result;
}
 
 
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
        AnsiString s;
        s=Edit1->Text;
        Edit1->Text=reverse(s);
}

AnsiString reverse(AnsiString Stroka)  // сюда курсор перемещается AnsiStri|ng reverse
{
 
        AnsiString Result;
        char * str=Stroka.c_str();
        char * strnew= new char[Stroka.Length()+1];
        for(int i=Stroka.Length()-1;i>=0;i--)
        {
                strnew[(Stroka.Length()-1)-i]=str[i];
        }
        strnew[Stroka.Length()]='\0';
        Result=strnew;
        delete [] strnew;
        return Result;
}