|
안녕하세여?
신디입니다.
얼마전에 메모데이타를 엑셀로 저장하는 질문 드렸는데
허접하게나마 해결은 했는데 몇가지 문제점 발생
일단 메모에 데이타를 엑셀에 저장을 했구여
1.엑셀파일에 셀안에 Enter까지 저장되더라구여
12345다음에 이상한 문자가 저장이 되거든여
첨부파일 참고하세여.
2.버튼을 클릭하면 Load되구여
코드는 아래와 같음
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int k, j;
ExApp->Connect();
// true 화면에 보임, false 화면에 보이지 않음
ExApp->set_Visible(0,false);
ExBook->ConnectTo(ExApp->Workbooks->Add());
//첫번째 워크시트와 연결
ExWS->ConnectTo(ExApp->Worksheets->get_Item((TVariant)1));
//워크시트의 이름
ExWS->set_Name(WideString("test"));
k = Memo1->Lines->Count;
for(j = 0 ; j <= k -1; j++)
{
ExWS->Cells->set_Item((TVariant)(j + 1), (TVariant)"A", (TVariant)Memo1->Lines->GetText());
}
//여기에 문제 있는 듯 엔터가 이상한 문자로 나오는데 도통알수가 ...
ExBook->SaveAs((TVariant)"C:\\Source\\Test.xls",TNoParam(),TNoParam(),TNoParam(),TNoParam(),TNoParam(),xlExclusive,TNoParam(),TNoParam(),TNoParam(),TNoParam(),0);
//Excel 프로그램 종료
ExApp->Disconnect();
ExBook->Disconnect();
ExWS->Disconnect();
}
|