|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
zjwy (我在网上飘) |
★☆☆☆☆ |
-
|
普通会员 |
|
2004/1/13 10:31:56 |
标题: |
请教:如何把BITBlT取得的图形保存成文件,附代码 |
浏览:1181 |
|
加入我的收藏 |
楼主: |
procedure TVideo.Button1Click(Sender: TObject); var temBitmap:Tbitmap; Bhandle:HBITMAP; begin BitBlt(Image3.Canvas.Handle, 0,0,image3.Width,image3.Height, video.Canvas.Handle, image2.Left,image2.Top, SRCCOPY);
image3.Picture.SaveToFile('C:\My Documents\3.bmp'); Image3.Refresh; end;
执行之后出现一个警告栏:'can not create file C:\My Documents\3.bmp' 请哥哥姐姐帮忙!!!!!!!!!!!!!!!!!1
----------------------------------------------
- |
作者: |
bios (阿贡) |
★☆☆☆☆ |
-
|
盒子中级会员 |
|
2004/1/13 11:53:45 |
1楼: |
video.Canvas.Handle 改成image2.Canvas.Handle 就可以了
----------------------------------------------
|
|