在PB中如何控制DATAWINDOW列的修改属性

原创 2004年07月09日 23:44:00

PB中如何控制DATAWINDOW列的修改属性

在编制管理信息应用系统中,一般都会遇到一个共同问题,那就是如何根据不同情况去控制表中的数据列,比如对于同一DATAWINDOW不同的用户有不同的操作(如对于数据录入人员可以更改数据,而对于查询人员一般不能更改数据),下面就以一个简单的工资表为例来说明利用PB如何在DATAWINDOW中控制列的修改方式。

  工资表基本列如下:
代码
姓名
工作时间
基础工资
浮动工资
岗位工资
知识分子补贴
其它工资
code
name
workdata
basesa
movesa
stationsa
bt
othersa
char
varchar
char
decimal
decimal
decimal
decimal
deciaml

 在PB中有两种方式可控制列属性,一是静态方式,另一种是动态方式实现。所谓静态方式就是在列的属性上通过选项实现。所谓动态方式就是利用编程实现。现分别给予介绍:

  一、静态方法 

  (1)在datawindow中选中某列后点MOUSE右键,选"properities"后系统弹出一标签,选中"Edit"标签,将"Display Only"选项制为有较;

  (2)或者选中"Expression"标签,在"Protect Express"中填入"1";

(3)或者选中"Expression"标签,在"Protect Express"中填入条件表达式,如工作时间不满一年的人员不能修改,则写入"if (daysafter(date(workdate),today()) <= 365,1,0)";

  (4)在datawindow中,将某列的Tab Order 值制为0,则该列因得不到焦点而不能被修改;

  (5)在DataWindow Painter 状态下选取Rows菜单,再选取Update Properties,弹出Specify Update Properties对话框,将Allow Updates 设为空。

  二、动态修改方法

  (1)将整个Datawindow设置为保护方式:利用DataWindow Object的ReadOnly属性可以将整个Datawindow 设置为保护方式。
  语法为:

  dw_1.Object.DataWindow.ReadOnly=value

  或 dw_1.Modify("DataWindow.ReadOnly{=value}"),

  其中:value表示Datawindow是否为只读(read-only)状态,它有两个取值:Yes 和No。Yes表示使Datawindow为read-only;No 则相反,默认值是No。例如:如果要使Datawindow设置为保护方式,可以在相应事件的脚本中包含下列代码:

  dw_1.Modify("DataWindow.ReadOnly=Yes")

  或者为:dw_1.Object.DataWindow.ReadOnly=Yes  

 (2)只保护Datawindow的某些列

 方法一:利用列的Protect属性

  语法为:

  dw_1.Object.name.Protect=integer 或 dw_1.Modify("columnname.Protect{=integer}")。

  参数说明:cloumnname:为要保护的列名;integer:为该列的保护状态,值为0或False时该列不受保护;值为1或True时该列受到保护。例如,要将列name设置为保护状态,则相应的代码为:dw_1.Object.name.Protect=1 或者为:
dw_1.Moidfy("name.Protect=1")

  方法二:利用列的TabSequence属性,在程序执行时可以根据需要将该列的TabOrder置为0,从而达到保护的目的。   语法为

  dw_1.Object.name.TabSequence= number
  
或dw_1.Modify("columnname.TabSequence{=number}")

  参数说明:columnname:要保护的列名;number:该列的TabOrder值(0-32000)。

  例如,要将列name设置为保护状态,相应的代码为:

  dw_1.Object.name.TabSequence=0

  或者:dw_1.Modify("name.Tabsequence=0")

  方法三:利用修改列的EDIT属性中的DisplayOnly属性值。

  语法为:

  dw_1.Object.columnname.Edit.DisplayOnly=value

  或 dw_1.Modify("columnname.Edit.DisplayOnly{=value}")

  参数说明:columnname:要保护的列名;

  value:表示该列是否为只显示(DisplayOnly)状态,它有两个取值:Yes和No。Yes表示不允许用户输入数据(只显示):No则相反,默认值是No。

  例如:如果要使列name设置为只显示,可以在相应事件的脚本中包含下列代码:

  dw_1.Object.name.Edit.DisplayOnly=Yes

  或者:dw_1.Modify("name.Edit.DisplayOnly=Yes")

  用该方法时列虽不能被修改,但该列能得到焦点,上述的其它方法则不能。

  三、有选择的保护某些行

  上述方法将对DataWindow的所有行起作用,但要想只保护其中的某些行,则需要用列的保护(Protect)属性(取值同上述方法二),但这是在建立DataWindow时实现的。方法为:在DataWindow画板(Painter)中,双击相应的列,弹出Column Object 对话框,选取Expressions页,在Protect后的框中写入if(条件表达式,1,0)。灵活运用条件表达式可以获得多种保护效果。

 (1)只允许修改新插入的行

  在一个DataWindow中,有时会有这样的需要:已有的数据只能浏览不允许修改,只有用户新输入的数据才允许修改,此时表达式为:

  if(isrownew(),0,1),或者if(not isrownew(),1,0)

  (2)某一列的保护情况要根据其它列的数据进行

  如在员工工资管理中,只有工作年限大于5年时才允许输入知识分子补贴(bt),则列bt的Protect后的框中输入:if(integer(mid(string(today(),'yyyymmdd'),1,4)) - integer(mid(workdata,1,4))>5,0,1)

 (3)要保护的行只有在执行时才能确定,并且不断变化例如在员工工资管理中,假设工资的修改只有该工资的输入者是变化的,且一般情况下只有在执行时才能确定条件需要一个变量,这就需要在建立DataWindow时为其指定一个检索数据的参数(如flag),然后在可修改列的Protect后的框中输入(user_name是该DataWindow中的一列,代表输入者的名称):      if (user_name=flag,0,1)

  在实际应用时还要注意参数的实际类型。

(4)在表中增加一个标志列

 上述方法基本上均要求要保护的行有一定的规律可循,当这些行没有规律时,可以在相应的表中专门增加一个标志列(设列名为flag),取值为1和0,然后在其它列的Protect后的框中直接输入flag的表达式。运行时若该行的flag=1,在该行相应的列处于保护状态。对于标志列值的修改,可以由数据管理员修改或根据某种情况在程序中灵活设置。

如何在DW中设置自动列宽

如何在DW中设置自动列宽 作者 华软 raymen 看到《如何在DW中设置自动列宽》,从我的类库中扣了一段代码回复了,后来又从旧硬盘中找到原来老外写的对象,上传给大家吧$PBExportHeade...
  • tlammon
  • tlammon
  • 2016年05月07日 23:14
  • 906

PB数据窗口对象之字段的修改属性

数据窗口只能修改一个数据表。当数据窗口的数据来源于不止一个数据表时,可以用脚本控制数据窗口的修改属性来对数据表逐个进行修改。 当数据窗口是用来接受用户的手工录入数据时,应该设置两方面的属性才能确保数据...
  • u012369435
  • u012369435
  • 2014年07月04日 11:00
  • 1356

获取数据窗口数据列的数据类型

获取数据窗口数据列的数据类型 llCount = Long(idwLTRList.Describe("DataWindow.Column.Count")) For i = 1 To llCount...
  • ribut9225
  • ribut9225
  • 2013年04月22日 08:36
  • 1443

DataWindow列属性修改

在编制管理信息应用系统中,一般都会遇到一个共同问题,那就是如何根据不同情况去控制表中的数据列,比如对于同一DATAWINDOW不同的用户有不同的操作(如对于数据录入人员可以更改数据,而对于查询人员一般...
  • benjaminaaa
  • benjaminaaa
  • 2013年11月21日 17:55
  • 568

PB数据窗口对象之字段属性和计算域属性

〓字段和计算域的属性-更多见帮助(DataWindow objectproperties) *获取字段的类型(Coltype属性) 字段的ColType属性是一个非常有用的属性,使用该属性可以...
  • u012369435
  • u012369435
  • 2014年07月04日 13:01
  • 3366

在PB中如何控制DATAWINDOW列的修改属性 -- 方法较全

在编制管理信息应用系统中,一般都会遇到一个共同问题,那就是如何根据不同情况去控制表中的 在编制管理信息应用系统中,一般都会遇到一个共同问题,那就是如何根据不同情况去控制表中的数据列,比如对于同一DAT...
  • Swordstone
  • Swordstone
  • 2013年12月23日 17:03
  • 801

Datawindow常使用的内容

一、数据窗口中的每一个字段有一个序号,该序号是数据窗口的data   source中排列的序号,在程序中可用序号来对字段进行访问。如:dw_1.Modify( "#3.width   =   10 "...
  • tlammon
  • tlammon
  • 2016年03月27日 11:41
  • 1190

PB [Grid风格数据窗口改变线条颜色] 的变通实现方法(也可以成为 带表头的Grid数据窗口)

PB中Grid类型的数据窗口是用的最广泛的一种类型,特点:创建快速,位置调整方便,运行后用户也可以方便的调整列的宽度,列的位置, 运行效率也最高。         但是这个数据窗口类型的线条颜色是固...
  • zidielang
  • zidielang
  • 2016年11月18日 21:25
  • 1014

PB,PowerBuilder---合并相同单元格,相同的只显示一行

PB,合并行,sparse
  • luoxiya521
  • luoxiya521
  • 2015年01月14日 14:30
  • 1501

PB动态数据窗口

〓创建动态数据窗口 若要动态创建数据窗口,需要使用函数Create,该函数的语法如下: dw_1.Create(syntax{,errorbuffer}) 其中,dw_1是数据窗口控件的名称,该...
  • u012369435
  • u012369435
  • 2014年07月03日 19:37
  • 760
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:在PB中如何控制DATAWINDOW列的修改属性
举报原因:
原因补充:

(最多只允许输入30个字)