第9章鼠标、键盘和OLE.ppt

9.4.1 添加OLE容器控件 （2）使用OLE控件从文件嵌入对象 在图9.10中单击“从文件创建”选项按钮，单击“浏览”按钮选择文件，将所选的文件当作OLE对象插入。如图9.10所示。 （3）使用OLE控件链接对象 如果在图9.8或图9.10中选择“链接”复选框，就会插入一个链接对象。 使用链接对象，当应用程序没有运行时，对象的数据可能被另一个应用程序更改。 图9.10 从文件创建 9.4.1 添加OLE容器控件 （4）选择性粘贴文件 如果只需要利用文件的一部分，可以使用“选择性粘贴”来创建OLE对象。 使用“选择性粘贴”的步骤如下： 运行需要选择的文件，将需要选择的部分复制到剪贴板上。 在VB中用鼠标右键单击“OLE容器控件”，从快捷菜单中选择“特殊粘贴…”菜单项，出现“选择性粘贴”对话框如图9.11所示。 在对话框中选择“粘贴”或“粘贴链接”选项，单击“确定”按钮就创建了OLE对象。 选择“粘贴”复选框是插入一个嵌入对象，选择“粘贴链接”复选框是插入一个链接对象。在图9.11中，选择粘贴Word中的文本内容。 图9.11 选择性粘贴Word文本 9.4.1 添加OLE容器控件 3．在运行时创建显示“插入对象”对话框 如果在设计时不选择OLE对象，则在运行时也可以使用OLE对象的InsertObjDlg和PasteSpecialDlg方法来显示“选择性粘贴”和“插入对象”对话框，并在对话框中创建OLE对象。 语法： 对象. InsertObjDlg 对象. PasteSpecialDlg （1）InsertObjDlg方法 InsertObjDlg方法用来显示“插入对象”对话框，提供可用的对象清单，并根据用户的选择创建对象。 例如，显示“插入对象”对话框： OLE1.InsertObjDlg （2）PasteSpecialDlg方法 PasteSpecialDlg方法用来显示“选择性粘贴”对话框，允许用户从系统剪贴板中将对象粘贴到OLE控件。 9.4.1 添加OLE容器控件 4．在运行时创建链接或嵌入对象 （1）创建链接对象 用OLE控件的CreateLink方法，在运行时从文件中创建一个链接对象。 语法： CreateLink SourceDoc, [SourceItem] 说明： SourceDoc：为文件参数，从该文件创建对象。 SourceItem：从源文件中链接的数据。 例如，创建链接对象： OLE1.CreateLink C:\WINDOWS\Media\chord.wav （2）创建嵌入对象 在运行时，从文件中创建一个嵌入的对象，可以使用CreateEmbed方法。 语法： CreateEmbed Sourcedoc, [Class] 9.4.2 OLE容器控件的属性、方法和事件 1. OLE控件的常用属性 （1）Object属性 通过使用OLE控件的Object属性，可以使用链接或嵌入对象的属性和方法。Object属性在运行时是只读属性，它保持对OLE控件中对象的引用。使用该属性OLE控件必须包含可编程的对象。 语法： OLE控件名.Object[.属性|方法] （2）AutoActive属性 AutoActive属性用于设置激活OLE控件对象的方式，该属性对应的各种方式如表9.6所示。 属性值 属性常数 含义 vbOLEActivateManual 0-Manual 手工激活，使用DoVerb方法。 vbOLEActivateGetFocus 1-GetFocus 接受焦点激活。 vbOLEActivateDoubleclick 2-DoubleClick 双击或按ENTER键激活。 vbOLEActivateAuto 3-Autimatic 自动激活。 表9.6 各种激活方式 9.4.2 OLE容器控件的属性、方法和事件 （3）OLEType属性 OLEType属性返回OLE容器控件中对象的状态。0-vbOLELinked表示链接，1-vbOLEEmbedded表示嵌入，2- vbOLENone表示不包含对象。 （4）Class属性 Class属性为内嵌对象的类名。例如，当嵌入“媒体剪辑”时，OLE1控件设置为“OLE1.Class=MPlayer”。 （5）SizeMode属性 SizeMode属性用来指定OLE对象如何调整大小，或如何显示图像。0为剪裁，对象按实际大小显示；1为伸展，调整对象图像的大小使其充满OLE控件；2为自动，如果显示对象的大小作了改变，OLE控件自动调整大小；3为缩放，重新调整对象的大小使其尽可能充满OLE控件，且仍然维持该对象原来的比例。 9.4.2 OLE容器控件的属性、方法和事件 2. OLE控件的常用方法 （1）Update方法 要在OL