注册 登录
编程论坛 VFP论坛

分享八,字段中显示进度百分比

laowan001 发布于 2022-02-15 09:33, 2962 次点击
方法是从网上找的,做成了函数,算是借花献佛,在此感谢原作者!!!
具体见附件,运行demo,里面有说明
只有本站会员才能查看附件,请 登录

只有本站会员才能查看附件,请 登录


[此贴子已经被作者于2022-2-15 09:39编辑过]

13 回复
#2
gs25367856782022-02-15 10:24
不简单!
#3
schtg2022-02-15 14:07
谢谢!
#4
shenlancwz2022-02-15 14:55
感谢感谢,虽然已经有此类解决方案,但这个方案也非常不错。
只有本站会员才能查看附件,请 登录


[此贴子已经被作者于2022-2-15 14:58编辑过]

#5
laowan0012022-02-15 15:58
以下是引用shenlancwz在2022-2-15 14:55:58的发言:

感谢感谢,虽然已经有此类解决方案,但这个方案也非常不错。

您这个方法非常好,能否分享一下下
#6
shenlancwz2022-02-15 16:22
回复 5楼 laowan001
1、用代码为Grid的Column添加容器控件,容器控件中再添加label、shape、image等控件,并设置好格式及布局,可用label控件做数据显示,shape做进度条;
2、Form添加方法(如命名为ShowJdt),在方法中处理容器控件中要显示的数据内容以及进度条的宽度、颜色等,

如:
Gird的设置
Grid1.columns(x).Sparse = .F.
Grid1.columns(x).CurrentControl='container1'
Grid1.columns(x).DynamicFontItalic = 'Thisform.ShowJdt()'  

From.ShowJdt中的代码
Grid1.columns(x).container1.shape1.width=根据字段值计算得出的进度条宽度值
……
如:
只有本站会员才能查看附件,请 登录


[此贴子已经被作者于2022-2-16 08:27编辑过]

#7
laowan0012022-02-15 19:23
回复 6楼 shenlancwz
谢谢啦!!!
#8
easyppt2022-02-16 08:23
谢谢分享!
#9
sam_jiang2022-02-16 09:53
回复 6楼 shenlancwz
厉害的!建议把它封装成一个类。。。

[此贴子已经被作者于2022-2-16 09:59编辑过]

#10
shenlancwz2022-02-16 11:41
回复 9楼 sam_jiang
大家都可以自动动手设计自己的风格且通过简单改几个参数就可以引用的代码,使用时引用即可。
#11
hu9jj2022-02-16 13:37
八仙过海,各显神通,都是不错的进度条显示方法。
#12
aqyejun2022-02-17 14:34
确实不错的风格~!值得学习!
#13
hjqwjx2022-03-05 20:38
Grid1.columns(x).DynamicFontItalic = 'Thisform.ShowJdt()'
这种用法真是新发现!
#14
sshhmm2022-12-03 17:09
1