Загрузка TXT с интернета в Edit

TMemoryStream *ms = new TMemoryStream();
IdHTTP1->Get("http://dl.dropbox.com/u/66...99/CheckVersion.txt");
AnsiString tempfile = GetEnvironmentVariable("temp") + "\\versions.txt";
ms->SaveToFile(tempfile);
ListBox1->Items->LoadFromFile(tempfile);
delete ms;

Edit1->Text= IdHTTP1->Get("http://dl.dropbox.com/u/66...99/CheckVersion.txt");

TMemoryStream *ms = new TMemoryStream();
IdHTTP1->Get("http://dl.dropbox.com/u/6...99/CheckVersion.txt");
AnsiString tempfile = (ExtractFilePath(Application->ExeName)+ "\\vers.txt");
ms->SaveToFile(ExtractFilePath(Application->ExeName)+ "\\vers1.txt");

void __fastcall TForm1::Button1Click(TObject *Sender)
{
String Url= "http://dl.dropbox.com/u/66755699/CheckVersion.txt";
    Edit1->Text= IdHTTP1->Get(Url);
}
//---------------------------------------------------------------------------

String Url= "http://dl.dropbox.com/u/66755699/CheckVersion.txt";
    Edit1->Text= IdHTTP1->Get(Url);

int ProcessHTTPError2(int ErrorCode)
{
    if (ErrorCode == 200) return 0;
    else if (ErrorCode == -1)
    {
        MessageBox(Application->Handle, "Произошла ошибка во время загрузки обновления.\r\n\r\nПроверьте интернет-соединение.", "Ошибка", MB_OK|MB_ICONWARNING);
    }
    else if (ErrorCode == 404)
    {
        MessageBox(Application->Handle, "Произошла ошибка во время загрузки обновления.\r\n\r\Обновление отсутствует на сервере.", "Ошибка", MB_OK|MB_ICONWARNING);
    }
    else
    {
        MessageBox(Application->Handle, ("Произошла ошибка во время загрузки обновления.\r\n\r\nОшибка "+ (AnsiString)404 + " - " + StatusString(404)).c_str(), "Ошибка", MB_OK|MB_ICONWARNING);
    }
    return 1;

Edit1->Text=NMHTTP1->BytesTotal;