以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何找到控件并显示在屏幕中央?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169582)

--  作者:小美菜
--  发布时间:2021/6/21 22:28:00
--  [求助]如何找到控件并显示在屏幕中央?
如何找到控件并显示在屏幕中央:蓝老师,我通过编码生成一个临时表(窗口)并填充好数据,根据临时表中数据每行在窗口中生成一个Lable控件,控件位置根据表中数据确定,现在是如何单击临时表某行,该行对应生成的控件显示在窗口中央。谢谢
--  作者:有点蓝
--  发布时间:2021/6/21 22:30:00
--  
控件.left = (窗口宽度-控件宽度)/2
控件.top= (窗口高度-控件高度)/2

--  作者:小美菜
--  发布时间:2021/6/22 8:47:00
--  
蓝老师不是这个意思,意思是我在临时表点击某行,则在已经绘制的窗口中找到该行对应的控件,按你这个会改变控件在窗口中的位置,而我想的是找到该控件后,通过改变水平竖直滚动条,以达到控件在窗口中间的目的
--  作者:有点蓝
--  发布时间:2021/6/22 9:00:00
--  
参考
Dim pnl  = e.Form.Controls("Panel1").basecontrol
pnl.VerticalScroll.Value = 100 设置垂直滚动条位置
pnl.HorizontalScroll.Value = 100 设置横向滚动条位置

--  作者:小美菜
--  发布时间:2021/6/24 21:46:00
--  
蓝老师:用DataTable.DataCols.Add( "工作小类", Gettype(String))增加的列,能指定字符串的长度吗?怎么指定?找了半天,都没有找到
--  作者:有点蓝
--  发布时间:2021/6/24 21:59:00
--  

DataTable.DataCols.Add( "工作小类", Gettype(String),16) http://www.foxtable.com/webhelp/topics/1428.htm


Add方法的语法有六个:

Add(ColumnName, GetType(Type))
Add(ColumnName, GetType(Type), Expression)
Add(ColumnName, GetType(Type), Expression, Caption)
Add(ColumnName, GetType(Type), MaxLength)
Add(ColumnName, GetType(Type), MaxLength, Expression)
Add(ColumnName, GetType(Type), MaxLength, Expression, Caption)

后三个语法是针对字符列的。
 

参数说明:

  • Name
    新增列的名称
     
  • Type
    新增列的数据类型,需要配合GetType关键字来获得数据类型,例如GetType(String)表示字符型,GetType(Boolean)表示逻辑型。
     
  • Expression
    可选参数,指定新增列的计算表达式。
    有关表达式的常识和语法,请参考应用篇中和表达式相关的章节,有非常详细的介绍。
     
  • MaxLength
    可选参数,用于指定字符列的长度,超过255将作为备注型。

     
  • Caption
    可选参数,用于设置列标题。

--  作者:小美菜
--  发布时间:2021/6/25 9:04:00
--  
蓝老师:
DataTable.ReplaceFor(“合同金额” ,“合同金额/10000” ) 出现下列错误,是什么问题呀?
从字符串“合同金额/10000”到类型“Double”的转换无效

--  作者:有点蓝
--  发布时间:2021/6/25 9:33:00
--  
使用sqlReplaceFor。注意sqlReplaceFor帮助的说明
--  作者:小美菜
--  发布时间:2021/6/25 9:40:00
--  
蓝老师:哪个表是窗口表,窗口表是通过统计生成的临时表,这个能用sqlReplaceFor?我试过了,不能用

[此贴子已经被作者于2021/6/25 9:45:05编辑过]

--  作者:有点蓝
--  发布时间:2021/6/25 9:49:00
--  
这种不能使用ReplaceFor了,只能遍历所有行,逐行计算

ReplaceFor只能是固定的值,不支持计算值,如:DataTable.ReplaceFor(“合同金额” ,“10000” )