＋设为首页 ＋添加到收藏夹
请将保存后文件打开看看，我显示的却是坏图象文件:
Image1->Picture->Assign(Clipboard());
Image1->Picture->SaveToFile("test.bmp");
#include <vcl\Clipbrd.hpp>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Graphics::TBitmap *pBitmap = new Graphics::TBitmap;
Clipboard()->Open();
if(Clipboard()->HasFormat(CF_BITMAP))
pBitmap->Assign(Clipboard());
pBitmap->SaveToFile("C:\\123\\234.bmp");
delete pBitmap;
}
TClipboard *pCB = Clipboard();
if (pCB->HasFormat(CF_BITMAP))
{
Graphics::TBitmap *bmp;
bmp = new Graphics::TBitmap;
try
{
bmp->LoadFromClipboardFormat(CF_BITMAP, pCB->GetAsHandle(CF_BITMAP), 0);
}
catch(...)
{
delete bmp;
bmp = NULL;
}
Image1->Picture->Assign(bmp);
Image1->Picture->SaveToFile("test.bmp");
delete bmp;
bmp = NULL;
}
羡慕楼上的;
1.头文件包含<JPEG.hpp>了吗？
2.为什么不用SavePictureDialog?
