把图形剪切到剪切板

2010-07-17 03:37:42 172 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

VBA高效操作剪切板：从基础DataObject到Windows API实战本文详细介绍了VBA操作剪切板的两种核心方法：便捷的DataObject对象与功能强大的Windows API。通过对比分析，帮助开发者根据实际场景选择最佳方案，实现Excel与外部应用的高效数据交换，并提供了完整的实战代码与兼容性处理技巧。阅读详情

//---------------------------------------------------------------------------

#include <vcl.h>
#include <Clipbrd.hpp>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::copy1Click(TObject *Sender)
{
Clipboard()->Assign(Image1->Picture);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::cut1Click(TObject *Sender)
{
TRect ARect;
Copy1Click(Sender);
Image1->Canvas->CopyMode=cmWhiteness;
ARect=Rect(0,0,Image1->Width,Image1->Height);
Image1->Canvas->CopyRect(ARect,Image1->Canvas,ARect);
Image1->Canvas->CopyMode=cmSrcCopy;
}
//---------------------------------------------------------------------------
错误提示：
[C++ Error] Unit1.cpp(28): E2268 Call to undefined function 'Copy1Click'
麻烦哪位帮忙解决一下
谢谢。。。

...全文