void __fastcall TFormMain::Button1Click(TObject *Sender)
{
    SaveDialog1->Execute();

    WideString strTitle = "Data Save";
    WideString strFile = "C:\\test.xls";
    WideString FileName;

    ExcelApplication1->Connect();
    // true 화면에 보임, false 화면에 보이지 않음
    ExcelApplication1->set_Visible(0,false);
    ExcelApplication1->set_DisplayAlerts(TDefLCID(), false);
    ExcelWorkbook1->ConnectTo(ExcelApplication1->Workbooks->Add());
    //첫번째 워크시트와 연결
    ExcelWorksheet1->ConnectTo(ExcelApplication1->Worksheets->get_Item((TVariant)1));
    //워크시트의 이름

    ExcelWorksheet1->set_Name(strTitle);

    ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"A",(TVariant)Edit20->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"B",(TVariant)Edit30->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"C",(TVariant)Edit40->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"D",(TVariant)Edit50->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"E",(TVariant)Edit60->Text) ;

    ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"A",(TVariant)Edit19->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"B",(TVariant)Edit29->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"C",(TVariant)Edit39->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"D",(TVariant)Edit49->Text) ;
    ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"E",(TVariant)Edit59->Text) ;

    ExcelWorksheet1->Activate();
    ExcelWorksheet1->SaveAs(strFile);

    ExcelApplication1->Disconnect();
    ExcelWorksheet1->Disconnect();
    ExcelWorkbook1->Disconnect();

}

버튼을 클릭하면, 엑셀이 실행되지 않고, 엑셀의 각 cell에 Edit19->Text 이런 형식으로 값이 들어갑니다.
그리고 "C:\\test.xls";  이렇게 저장이 됩니다.
제가 하고 싶은건, SaveDialog를 사용해서, 파일명도 제 맘대로, 저장 위치도 제 맘대로 하고 싶어요..

SaveDialog->Execute();

이거밖에 모르겠어요..
SaveDialog랑 위 소스를 어떻게 연결을 시켜야 할지, 너무 막막합니다..  
시간은 없고..  ㅠ.ㅜ 
도와주세요 제발~~