比如 我在MDIForm 上加入一个ole控件 然后在"插入对象"菜单下写下:  OLE1.InsertObjDlg 后有一个对话框出来但是我如何插入richtextbox 中呢? 谢谢!!拜托!!

解决方案 »

  1.   

    对不起 是我自己 太急了!!!
    在MDIForm 的插入菜单中有一个子菜单:插入对象,我点击他后出来(如写字板中的点击"插入"菜单中的子菜单:对象后)的对话框一摸一样 
    但是我在richtextbox中插入不进去对话框中的对象.
    请问我如何才能在MDIForm 的子窗体 form1中的richtextbox中插入对话框中的对象
    拜托!!谢谢!!!比如 我在MDIForm 上加入一个ole控件 然后在"插入对象"菜单下写下:  OLE1.InsertObjDlg 后有一个对话框出来但是我如何在MDIForm的子窗体ActiveForm中的richtextbox 中插入呢? 谢谢!!拜托!!
      

  2.   

    作为OLE客户,richtextbox仅支持下列方法插入对象:1 在控件中显示嵌入对象
    在运行时,最终用户可拖动任何嵌入对象,并放入 RichTextBox 控件。在控件中可以嵌入两种对象:以图标形式显示的对象,和以数据形式显示的对象。下图显示了具有嵌入文件对象的 RichTextBox,作为第一种类型的示例。单击后,嵌入的对象就会象预料的那样,即启动与该文件相关联的应用程序。当控件中的数据以 RTF 文件形式保存时(用 SaveFile 方法),嵌入对象中的信息也将被保存。然而,如果最终用户在该控件中嵌入位图,则将显示该位图,而不是它的图标,如下所示:单击该位图将启动 Paint 应用程序,使最终用户能够编辑该位图。2 用 OLEObjects 集合的 Add 方法添加嵌入对象
    用 OLEObject 集合的 Add 方法可将嵌入对象以编程方式加入该控件,如下所示:Private Sub cmdAddObject_Click()
       '将蝴蝶位图添加到该控件中。
       RichTextBox1.OLEObjects.Add , , , "bfly.bmp"
    End Sub在运行时,可用 Add、Clear 和 Remove 方法,动态地向该控件中充填嵌入对象。
      

  3.   

    http://expert.csdn.net/Expert/topic/1207/1207019.xml?temp=8.086795E-02