紫丁香社区 → 数据库 → 精华区文章阅读

Database 版 (精华区)

发信人: sleep (休息休息), 信区: Database
标  题: VISUAL FOXPRO开发技巧四则
发信站: 哈工大紫丁香 (2000年12月04日14:43:25 星期一), 站内信件

VISUAL FOXPRO开发技巧四则


1.组合框ComboBox的多栏使用
    熟悉VFP的用户都知道ComboBox对象若显示多栏式时，正常选择结果会以第一
栏的内容显示在选择项目上。但实际系统设计中要显示多个栏位如图书编号、名称
、作者和出版商，而选定的结果及要传递的值则可能是其中的任意一项，此时实现
方法如下：
    (1)设定ComboBox对象的属性ColumnCount为4；属性ColumnCountWidth为12，
40，12，40；属性RowSourceType为Field；属性RowSource为bookcode，title，
writer，publisher。
    (2)设定ComboBox对象的属性BoundColumn为2，表示图书名称为要显示的内容
。
    (3)设定ComboBox对象的事件Interactive Change Event的内容如下：
    ThisDisplayValue=ThisValue
    如欲将显示的内容贮存于其他变量，可添加如下内容：
    PublicUnknow_str
    Unknow_str=Thisvalue

    2.PageFrame的刷新记录内容
    在设计对数据库进行查询修改的操作界面时，将其设为PageFrame方式，在
ToolsBar条的记录移动按钮触发时，除当前活动页内容更新外，其他页内容并未刷
新，极易产生错误操作。解决问题方法如下：
    在ToolsBar中，把涉及到移动记录的Command按钮对象的Click事件作如下添加
：
    …
    thisparentparentactivepage=2
    thisparentparentpage2refresh()
    thisparentparentactivepage=3
    thisparentparentpage2refresh()
    …
    thisparentparentactivepage=n
    thisparentparentpage2refresh()
    n——为PageFrame的页数。

    3.任务进度栏的实现
    (1)选择系统菜单“工具”中“选项”条，单击“控件”栏，添加任务进度栏
控件MicrosoftProgressBarControl,Version50至ActiveX工具箱中。
    (2)创建表单Form1及Command对象Receive；选定表单控件工具栏中“查看类”
，添加控件MicrosoftProgressBarControl,Version50至表单Form1中，设置其属
性Max值为1000。
    (3)设置表单Form1中命令按钮Receive事件，Click内容如下：
    fori=1to1000
    forj=1to2000
    j=j＋1
    endfor
    thisformolecontrol1value=i
    i=i＋1
    endfor
    =messagebox('数据传送与展开完毕，OK!',0＋64,'信息窗口')
    thisformrelease
    clear events

    4.Grid模拟Browse窗口
    (1)创建表单Form1及Grid1对象；设定Form1属性BorderStyle为3，可自由调整
大小；在事件ResizeEvent中输入如下内容：
    ThisFormGrid1Width=ThisWidth
    ThisFormGrid1Height=ThisHeight
    (2)设定Grid1对象属性RecordSource为当前Form1所设定的工作区，属性Top与
Left值均为0；属性Width=ThisformWidth；属性Height=ThisformHeight。(湖
北顾伟义)

本文出自：《电脑报》1998年2月9日第5期12版



--
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.121]

[百宝箱] [返回首页] [上级目录] [根目录] [返回顶部] [刷新] [返回]

Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间：2.033毫秒