진작 도움청할 걸 그랬네요; ;

답변 감사합니다.

=================================================
방코 님이 쓰신 글 :
: 요렇게 하면 될거 같은데요? AnsiString savepath =  ExtractFilePath(Application->ExeName) + strExcelName;
:
: 참고로 사용자의 바탕화면에 저장하려면
: SHGetSpecialFolderPath(NULL, 경로버퍼, CSIDL_DESKTOPDIRECTORY, FALSE); 등과 같이 하면
: 바탕화면 경로를 읽어올수 있지요.
:
:
: win 님이 쓰신 글 :
: :
: : 안녕하세요.
: :
: : 오늘 하루종일 헤매다가 혹시 도움을 받을 수 있을까해서 질문 하나 올립니다.
: :
: : 지금 엑셀 파일 저장 기능을 만들고 있습니다.
: :
: : 그런데 문제가 지정 위치를 정하지않으니 자동으로 "내문서" 위치에 저장이 됩니다.
: :
: : 그 위치를 실행파일이 저장된 폴더 위치로 바꾸고 싶은데..
: :
: : 실행파일 저장하는 위치가 고정되어 있지 않게해야되서 값을 고정된 폴더로 넣지 못합니다...
: :
: : 혹시 방법 있을까요?
: :
: :
: : ////////////////////////////////////////////////////////////////////////////////////////////
: :
: :     sprintf(temp,"%d%02d%02d",pyear, pmonth, pdata,);
: :
: :     TestStr=temp;
: :     strExcelName = TestStr;
: :     AnsiString savepath = strExcelName;
: :
: :         excel_book.OleProcedure("SaveAs" ,WideString(savepath)); // <--이부분
: :         excel_book.OleFunction("Close", (Variant)False);
: :         excel_sheet = Unassigned;
: :         excel_book = Unassigned;
: :         excel_app.OleFunction("Quit");
: :         excel_app = Unassigned;
: :       
: :
: : ////////////////////////////////////////////////////////////////////////////////////////////////