OCX控件制作问题,OCX中包含PICTURE控件，如何使OCX控件中的PICTURE控件获得窗体中Picture中的图片。

[how123]

OCX控件制作问题,OCX中包含PICTURE控件，如何使OCX控件中的PICTURE控件获得窗体中Picture中的图片。

[sjj3000]

OCX控件制作时，OCX控件的属性里添加一个Picture属性，指向控件picture的picture属性就行了。

[how123]

能给出代码吗？

[韧恒]

先看到了你发的短消息，所以已在短信中回复，请查收！

[韧恒]

楼主的问题是这样的，将Picture 属性直接梆定到控件中Picture1的Picture属性上，而不使用中间变量(尽管那样做也可以)，为了说明问题，下面的控件代码中只有一个Picture属性。

Option Explicit

'注意！不要删除或修改下列被注释的行！
'MappingInfo=Picture1,Picture1,-1,Picture
Public Property Get Picture() As Picture
Set Picture = Picture1.Picture
End Property

Public Property Set Picture(ByVal New_Picture As Picture)
Set Picture1.Picture = New_Picture
PropertyChanged "Picture"
End Property

'从存贮器中加载属性值
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
Set Picture = PropBag.ReadProperty("Picture", Nothing)
End Sub

'将属性值写到存储器
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
Call PropBag.WriteProperty("Picture", Picture, Nothing)
End Sub



使用时，在窗体中加入如下代码即可。

Set UserControl11.Picture = Picture1.Picture

也可以在设计时直接指定图片，就象使用Picturebox控件一样。

[how123]

to songyaowu(不以分多而蹭之;不以分少而不答;习惯不结贴者拒之) (

非常感谢阁下的回复，OCX控件中的图片问题已经解决。

在下还有一问题想请教。如何过滤掉PICTURE控件中图片的背景部分，使图片有镂空效果。比如一个人物图片，去掉灰色背景（背景是统一的颜色）