图库的使用

元件的变形

自定义属性

按钮

闪烁信号灯

编辑选中的图形

动态创建图形

可移动标签

定义连接点

读写图形属性

编辑线条顶点

调用Windows API函数

调用Visual Graph函数

脚本回调控件的事件

运行状态鼠标拖动图形

表格

明细式报表

制作对话盒

制作菜单

工具栏的使用

使用WEB数据库

ActiveX在VC6中的使用

ActiveX在Delphi6中使用

ActiveX在VB6中的使用

首页

可移动标签

观察下面这个元件,它有一个文字标签,标签上有一个点,鼠标拖动这个点,可以改变标签的位置,标签和调控点都在图形选择框外面。

下面说明制作方法:

一、在集成开发环境中新建一个图形文件,画面上放一个“水平开关”元件。该元件在系统Lib子目录下的“电力设备.tbl”里。

二、这个元件没有带文字标签,我们想办法改进一下它。

三、在元件上按右键选择“编辑元件”,打开一个新的窗口,我们现在已经“进入”元件的“内部”了,现在我们看到的页面就是外面看到的那个“水平开关”。

四、在图库列表中选择绘制矩形单元,设置这个单元的LineType(边线)为0,Pattern(图案)为0,并添加文字。

五、在图库列表的基本图形中选择“ControlPoint”单元,鼠标到上面这个矩形单元的中间按下,则添加了一个只有一个点的线条Line3。

六、在事件列表中找到OnNodeChange,双击,编写下面的代码:

Rect1.MoveTo(Sender.X[0]-Rect1.Width/2,Sender.Y[0]-Rect1.Height/2)

七、选择上面两个图形,设置Locked(锁定)属性为true。锁定的图形在图元中将不被选中。

八、选择菜单“文件/保存”,其实这里的保存并非保存到文件或硬盘,而是更新了元件。接着,关闭窗口。

九、测试这个元件,我们看到元件上现在带了一个标签,移动元件,标签跟着移动。标签上面有一个黄色的菱形,拖动,标签跟着移动。