|
첫번째 질문 저장 버튼을 눌렀을때 첨부한 파일과 같이 뜹니다.
그런데 파일형식에 엑셀이라고 표현해주고 싶은데 그부분을 어떻게 해야할지 모르겠습니다.
밑에 소스처럼 했는데 실행파일을 끄고 나면
"book4의 변경된 내용을 저장하시겠습니까? "라는 메세지가 뜹니다.
이런 부분을 해결하기 위해서 if (SaveDialog1->Execute())
이 조건을 썻는데 이게 잘못 쓴건지 궁금합니다.
두번째 질문은
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"D",(TVariant)Form1->EditFpmax1->Text);
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"E",(TVariant)Form1->EditFtmax1->Text);
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"F",(TVariant)Form1->EditState->Text);
이것처럼 데이터를 엑셀파일 시트 5에 d , e, f 에 데이터를 입력하는데
한번만 입력하고 맙니다.
이 데이터를 실시간으로 입력하고 싶습니다.
답변 부탁드리겠습니다.
===============================================================================
TVariant strTitle;
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(strTitle);
ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"A",(TVariant)"VERSION : ") ; //버젼
ExcelWorksheet1->Cells->set_Item((TVariant)1,(TVariant)"B",(TVariant) Form1->StatusBar1->Panels->Items[1]->Text) ; //버젼
ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"A",(TVariant)"일련 번호 : ") ; //시리얼 넘버
ExcelWorksheet1->Cells->set_Item((TVariant)2,(TVariant)"B",(TVariant)Form1->EditSerial1->Text) ; //시리얼 넘버
ExcelWorksheet1->Cells->set_Item((TVariant)3,(TVariant)"A",(TVariant)"DATE : ") ; //날짜
ExcelWorksheet1->Cells->set_Item((TVariant)3,(TVariant)"B",(TVariant)Form1->EditYear->Text) ; //year
ExcelWorksheet1->Cells->set_Item((TVariant)3,(TVariant)"C",(TVariant)Form1->EditMonth->Text) ; //month
ExcelWorksheet1->Cells->set_Item((TVariant)3,(TVariant)"D",(TVariant)Form1->EditDate->Text) ; //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)Form1->EditHour->Text); //TIME
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"B",(TVariant)Form1->EditMinute->Text); //TIME
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"C",(TVariant)Form1->EditSecond->Text); //TIME
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"D",(TVariant)Form1->EditFpmax1->Text); //압력
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"E",(TVariant)Form1->EditFtmax1->Text); // 온도
ExcelWorksheet1->Cells->set_Item((TVariant)5,(TVariant)"F",(TVariant)Form1->EditState->Text); // STATE
ExcelWorksheet1->Activate();
if (SaveDialog1->Execute())
{
ExcelWorksheet1->SaveAs((WideString)(SaveDialog1->FileName));
}
//Excel 프로그램 종료
ExcelApplication1->Disconnect();
ExcelWorksheet1->Disconnect();
ExcelWorkbook1->Disconnect();
==============================================================================
|