起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 141|回复: 4

【搞定】自动填充问题**

[复制链接]
发表于 2007-9-20 08:42:14 | 显示全部楼层 |阅读模式
一个字段,设置了它的自动填充值为一个参数,在预览时,没有自动填充,
但是自动填充的值如果是函数中的新建id,在在预览时,就会自动填充,请问是哪里的原因
回复

使用道具 举报

发表于 2007-9-20 08:49:29 | 显示全部楼层
参数的话,必须在运行期才有效。
函数没有这个限制。
摘自用户文档:
3) 在应用系统运行时,业务参数会在其对应环境级别上创建出相应的实例,使用到业务参数的地方会根据环境链来获取或设置业务参数对象的值;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-20 09:13:58 | 显示全部楼层
procedure TRLZYCSZ.ParamGZRWBHCSGetValue(Sender: TObject; var Value: Variant);
var
  lTempStr: string;
begin
   Value := TCommonUtils.GetAutoIncreaseID(Self.Context,
    TBizParam(Sender).ID, TBizParam(Sender).DisplayName);
  { 可根据需要定制Value的格式 }
   ltempstr  := TCommonUtils.StrToRightLenStr(Variants.VarToStr(Value), '0', 6);
  value :='GZ'+  lTempStr;
end
看一下,有什么不对吗,可是运行起来没有效果
回复 支持 反对

使用道具 举报

发表于 2007-9-20 09:19:00 | 显示全部楼层
要在平台上运行。
记得参数组单元要编译一下。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-9-20 09:32:59 | 显示全部楼层
搞定,谢谢
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-6-28 04:57 , Processed in 0.046101 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表