edit의 내용을 엑셀로 저장하도록 프로그램을 만들고 있어요..
이곳 볼랜드포럼에서 많은 도움을 얻었는데, 아래 소스좀 봐주세요..

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

    WideString strFileName = ExtractFileName(SaveDialog1->FileName);
    WideString strFilePath = ExtractFilePath(SaveDialog1->FileName);
    WideString strFileExt = ExtractFileExt(SaveDialog1->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->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(strFileName);

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

버튼을 누르면, 엑셀이 보이지 않게 실행이 되고, File Save Dialog 가 뜨면서 파일을 엑셀 형식으로 저장을 합니다.
저장이 제대로 되긴 하는데, 경로의 문제가 있네요.
제가 임의로 지정한 폴더에 저장이 되질 않고,  '내 문서' 에 저장이 되어버리네요.
왜 그런거죠?  이 문제 해결좀 해주세요.
급합니다.  ㅠ.ㅜ  일욜도 없이 회사 나와서 일하고 있습니다.
꼭 좀 해결해 주세요.