엑셀에서 셀을 복사한 다음 TStringGrid에 복사하는 기능을 TStringList 이용해서 구핸해보았습니다.
TStringList 의 Text에 문자열을 넣으면 CRLF(\r\n) 부분은 자동으로 잘라서 Strings[]로 구분이 됩니다.
그리고 각 Cell 구분은 Tab('\t') 으로 되어있으니 '\t' 를 Delimiter 로 지정하여
DelimitedText 에 각 Strings[]를 넣어주면 또 잘라줍니다.
이런 토큰을 구하는 방법이야 여러가지가 있으니 편하신 방법을 사용하시고.
요지는 Excel에서 라인 구분은 \r\n 이고 Cell 구분은 \t 입니다.
(주의! DelimitedText 를 사용할 경우 문자열 중에 공백은 무조건 잘립니다.)
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TClipboard *cb = Clipboard();
if(cb->HasFormat(CF_TEXT)) {
TStringList * pList = new TStringList;
pList->Text = cb->AsText;
if(StringGrid1->RowCount < pList->Count) {
StringGrid1->RowCount = pList->Count;
}
for(int i=0; iCount; i++) {
TStringList * pCellList = new TStringList;
pCellList->Delimiter = L'\t';
pCellList->DelimitedText = pList->Strings[i];
if(StringGrid1->ColCount < pCellList->Count) {
StringGrid1->ColCount = pCellList->Count;
}
for(int j=0; jCount; j++) {
StringGrid1->Cells[j][i] = pCellList->Strings[j];
}
if(pCellList) delete pCellList;
}
if(cb)cb->Clear();
if(pList) delete pList;
}
else {
ShowMessage("Clipboard에 아무 문자열이 없습니다.");
}
}
StarWagon 님이 쓰신 글 :
: QnA 게시물을 보다가 다음과 같은 질답을 보았습니다.
:
:
http://cbuilder.borlandforum.com/impboard/impboard.dll?action=read&db=bcb_qna&no=58757
:
: 저도 궁금하던거라 답변대로 구현을 해보았는데요.
:
: StringGrid 에서 Ctrl+C를 해서 Excel에 Ctrl+V 하는 기능은 구현하였습니다.
: 그 반대로 Excel 에서 복사해서 StringGrid 에 붙여 넣기를 구현하기위해
: 아래 함수를 사용 하려 하니,
:
: int GetTextBuf(wchar_t *Buffer, int BufSize);
:
: Clipboard에서 wchar_t 형을 BufSize 만큼 가져오려고 시도하고,
: 실제 가져온 갯수만큼을 int 로 리턴하는 함수 인데,
:
: Clipbaord에 들어있는 text의 길이를 어떻게 알 수 있나요?
: BufSize를 적당히 늘리면서 return하는 값 이 BufSize 보다 작을 때까지 반복해야 되나요?
:
: 부디 조언 부탁 드립니다.