Загрузка 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);
}
//---------------------------------------------------------------------------

   case 1: // Get
        {
          memoHTML->Lines->Text = HTTP->Get(cbURL->Text);
          break;
        }

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