civilian 님 감사 합니다.
civilian 님이 쓰신 글 :
: uses
: ComObj;
:
: procedure TForm1.Button1Click(Sender: TObject);
: var
: ExcelApp: Variant;
: begin
: // 챠트 이미지를 클립보드에 복사
: Chart1.CopyToClipboardBitmap;
:
: ExcelApp := CreateOleObject('Excel.Application');
: try
: ExcelApp.Visible := True;
: ExcelApp.WorkBooks.Add();
: ExcelApp.WorkBooks[1].WorkSheets[1].Name := 'Grid Data';
: ExcelApp.Workbooks[1].WorkSheets['Grid Data'].Paste;
: finally
: end;
: end;
:
: 간단하게는 이렇게 하면 될겁니다.
:
: 좀더 입맛에 맞는 것은 연구해보시길.
:
: sai 님이 쓰신 글 :
: : TChart의 이미지를 엑셀 파일에 저장 또는 붙여넣기 하는 방법 알려 주시면 감사 하겠습니다.
|