送分哦, 有关picturebox的问题

Question

我就要用picturebox 因为image没有hwnd

Answer 1

可以将image 放到picturebox里面去。

Answer 2

kao 就是不能用image,我的程序中不能用image1

Answer 3

把 PictureBox 的 BorderStyle 设为 0 - None。

Answer 4

 to:zyl910(910：分儿，我来了！)　我靠,你真吊

Answer 5

用StretchBlt 这个api处理一下，另外，用picturebox的PaintPicture 方法也可以。
StretchBlt VB声明 
Declare Function StretchBlt Lib "gdi32" Alias "StretchBlt" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long 
说明 
将一幅位图从一个设备场景复制到另一个。源和目标DC相互间必须兼容。这个函数会在设备场景中定义一个目标矩形，并在位图中定义一个源图象。源矩形会根据需要进行伸缩，以便与目标矩形的大小相符 

Answer 6

在代码中实现：
Private Sub picture1_Paint()
Picture1.PaintPicture Picture1.Picture, 0, 0, ScaleWidth, ScaleHeight
End Sub

Answer 7

为什么 用paintpicture这样  画出来的 比picturebox本身小??????
  Picture1.PaintPicture Picture1.Picture, 0, 0, 15000, Picture1.Height, _
    0, 0, Picture1.Picture.Width, Picture1.Picture.Height

Answer 8

应该是个简单问题吧：
把 PictureBox 的 AutoSize属性 设为 True。 
把 PictureBox 的 BorderStyle属性 设为 0 - None。 

Answer 9

to:  zyl910(910：分儿，我来了！在瞎说,  我把你  heihei 了

Answer 10

更正:为什么 用paintpicture这样  画出来的 比picturebox本身小??????
  Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, _
    0, 0, Picture1.Picture.Width, Picture1.Picture.Height

Answer 11

你的意思是把大图片与小的PictureBox一样，还是相反？

Answer 12

因为还有边框，应该是：
Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.Picture.Width, Picture1.Picture.Height, _
    0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight

Answer 13

如果是“小图片与大的PictureBox”：
Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, _
    0, 0, 图片宽, 图片高

Answer 14

kao ,To :zyl910(910：分儿，我来了！图片本身比pictureBox大的多

Answer 15

后面不用写：
Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight

Answer 16

你是要 PictureBox 去适应 图片，还是相反？

Answer 17

thks 已经解决!!!!!!!!!!!!!!Picture1.PaintPicture Picture1.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight  & 把 PictureBox 的 Autoredraw属性 设为 True。 

Answer 18

问题就在这儿，他问的是：
   如何让picturebox里的图片和picturebox一样大?????? 

Answer 19

搞半天是Autoredraw没有设为True。
倒……

Answer 20

怎么加分;  每人加20分,可惜不够hehe

Answer 21

这样无论,  比picturebox大还是小,都能解决

Answer 22

To green221()：
anw(安宁)说“切，以后你的贴子不跟了”，分儿全给我吧！

Answer 23

kao 给你5分,  你老瞎说

Answer 24

Delphi问题：我基于Panel组件做了一个ActiveX控件（注意不是ActiveForm,也不是VCL组件），但是新的控件没有MouseMove和MouseDown事件，请问各位高手，如何增加上这个事件，最好有详细的步骤说明，另见http://www.csdn.net/expert/topic/482/482855.shtm和http://www.csdn.net/expert/topic/494/494278.shtm，上还有100分，如能解决立即这100分相送，另外再加送200分。Delphi问题