C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[62022] 엑셀 파일 만들기 문제...
추상엽 [sangyubi] 2107 읽음    2010-07-28 10:05
안녕하세요.
엑셀파일을 만들어야 하는일이 있어서 볼랜드 포럼에서 자료를 찾아 테스트 프로그램을 만들었습니다.

개발툴은 RAD STUDIO 2007 이구요.
테스트 한  엑셀은 2010 버전, 2007 버전 2가지 입니다.

아래는 소스 입니다. (소스는 볼랜드포럼에서 찾은 소스입니다...문제되면 삭제 하겠습니다.)
C:\ 에 1.xls 라는 파일로 만들게 했습니다.

TExcelApplication *ExcelApplication1;
TExcelWorksheet *ExcelWorksheet1;
TExcelWorkbook *ExcelWorkbook1;

ExcelApplication1 = new TExcelApplication(Application);
ExcelWorksheet1 = new TExcelWorksheet(Application);
ExcelWorkbook1 = new TExcelWorkbook(Application);

ExcelApplication1->Connect();
ExcelApplication1->set_Visible(0, false); // true 화면에 보임, false 화면에 보이지 않음

ExcelWorkbook1->ConnectTo(ExcelApplication1->Workbooks->Add());

//첫번째 워크시트와 연결
ExcelWorksheet1->ConnectTo(ExcelApplication1->Worksheets->get_Item((TVariant)1));

//워크시트의 이름
ExcelWorksheet1->set_Name(L"Name");
ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"A",(TVariant)"VERSION : ") ; //버젼
ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"A",(TVariant)"S/N : ") ; //시리얼 넘버
ExcelWorksheet1->Cells->set_Item((TVariant)3,(TVariant)"A",(TVariant)"DATE : ") ; //날짜
ExcelWorksheet1->Cells->set_Item((TVariant)4,(TVariant)"A",(TVariant)"TIME   P[mbar]  T[C]  STATE") ; //
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"A",(TVariant)"Test 2B") ;   //TIME
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"B",(TVariant)"Test 2B");   //data1
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"C",(TVariant)"Test 2B");   // data2
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"D",(TVariant)"Test 2B");   // data3

ExcelWorksheet1->Activate();
ExcelWorksheet1->SaveAs((WideString)("C:\\1.xls"));

//Excel 프로그램 종료
ExcelApplication1->Disconnect();
ExcelWorksheet1->Disconnect();
ExcelWorkbook1->Disconnect();

delete ExcelApplication1;
delete ExcelWorksheet1;
delete ExcelWorkbook1;


파일생성도 되고 파일에 값도 올바르게 쓰여집니다만,
만들어진 파일을 실행 하면 첨부된 이미지와 같은 경고 메세지가 나타나네요.
도데체 왜 이럴까요.. ㅠ

+ -

관련 글 리스트
62022 엑셀 파일 만들기 문제... 추상엽 2107 2010/07/28
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.