A aaycsdn Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #1 不要说在表里设默认值.因为这个值可能会改变.如:操作员姓名.
N netabloid Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #4 将你要固定的列的 readonly 设置为:true ,在 Append 的时候给它设置一个固定值。
O onlyonekgx Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #5 在 BeforeInsert 事件中给你的字段赋值
Y yanlei Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #6 在field的onGetText procedure TForm1.Table1EmpNoGetText(Sender: TField; var Text: String; DisplayText: Boolean); begin Text:='1';//改变1为要改内容 end;
在field的onGetText procedure TForm1.Table1EmpNoGetText(Sender: TField; var Text: String; DisplayText: Boolean); begin Text:='1';//改变1为要改内容 end;
C chshanghai Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #7 在dbgrid 的数据源的ttable 控件或tquery 控件中有一个oninsert 事件中 table1.fieldname('name'):=变量
A aaycsdn Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #8 我的意思是: 当1#操作员输入到[操作员]这个字段时,不用他输,'1#'就直接上去了.而且他不能改.
O onlyonekgx Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #9 你登录的时候应该有一个值就是操作员的编号如:1#, 把这值赋给对应的字段不就行了, 把与此字段关联的控件设为只读
L lsys Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #10 在 BeforeInsert table1.fieldname('name').asvalue:=变量
Y Yong Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #11 先把 操作员对应的字段.readonly := True; 再在 table.OnNewRecord的事件里写: dataset.fieldbyname('操作员').Asstring := CurrentOperator; CurrentOperator是个变量,记录的是当前的操作员的名称或代码,在操作员登陆时给他 赋值就行了
先把 操作员对应的字段.readonly := True; 再在 table.OnNewRecord的事件里写: dataset.fieldbyname('操作员').Asstring := CurrentOperator; CurrentOperator是个变量,记录的是当前的操作员的名称或代码,在操作员登陆时给他 赋值就行了
L lzhuan Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #12 用一个全局变量吧 xxx 当1#操作员登陆xxx:=1#操作员 在query的onnewrecord中 query1.fieldbyname('name'):=xxx;
A aaycsdn Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-04 #14 lzhuan: 不好意思,发完分才看到. http://www.delphibbs.com/delphibbs/dispq.asp?lid=957701