(实战)为系统类添加NameValueTable属性,并且添加到相关对话框
2006-06-10 15:25
471 查看
描述:定义一个属性PartColor, 添加到Part类上去。
1、 create dir/src/part.met 文件,添加如下内容:
define attribute PartColor;
store PartColor as name value table;
display PartColor as "Color";
attach attribute to Part;
attach attribute to DPrtCre;
attach attribute to DPrtUpd;
attach attribute to DPrtGetI usage is output;
o:attach message SetDialogDefaults to DPrtCre in server bbksvr;
2、create dir/src/part.mth 文件,添加如下内容:
message DPrtCre:SetDialogDefaults(...)
{
if ( dstat = SetDialogDefaultsAtParent(DPrtCreClass,...) )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Red", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Green", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Blue", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "White", "+") )
goto EXIT;
}
3、edit dir/src/srccusmk.def, include "part.met" & "part.mth"
4、at dir/src:
nmake clobber clean
cnvdef
nmake init
nmake all
5、更新数据库架构
at dir/src, updatedb -o tmti.bak -n svr\tmti.prd
6、编辑对话框(详细见对话框编辑)
1、 create dir/src/part.met 文件,添加如下内容:
define attribute PartColor;
store PartColor as name value table;
display PartColor as "Color";
attach attribute to Part;
attach attribute to DPrtCre;
attach attribute to DPrtUpd;
attach attribute to DPrtGetI usage is output;
o:attach message SetDialogDefaults to DPrtCre in server bbksvr;
2、create dir/src/part.mth 文件,添加如下内容:
message DPrtCre:SetDialogDefaults(...)
{
if ( dstat = SetDialogDefaultsAtParent(DPrtCreClass,...) )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Red", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Green", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "Blue", "-") )
goto EXIT;
if ( dstat = objNameValueSet(thisObj, PartColorAttr, "White", "+") )
goto EXIT;
}
3、edit dir/src/srccusmk.def, include "part.met" & "part.mth"
4、at dir/src:
nmake clobber clean
cnvdef
nmake init
nmake all
5、更新数据库架构
at dir/src, updatedb -o tmti.bak -n svr\tmti.prd
6、编辑对话框(详细见对话框编辑)
相关文章推荐
- 系统美化实战之:修改系统属性对话框
- 【Android游戏开发之六】在SurfaceView中添加系统控件,并且相互交互数据!
- UIButton的相关属性/导航添加按钮
- 地磅称量系统之(37~39) 直接向数据库的数据表WtBill添加测试数据以及绑定用户控件和使用编码的方式控制dataGridView控件的每列属性和添加数据数据库的表中不存在的字段(非绑定列)
- 给android添加系统属性
- 给android添加系统属性:Settings.system和SystemProperties
- UPMS通用用户权限系统——添加枚举类型的用户属性,获取枚举值
- JQuery为textarea添加maxlength属性并且兼容IE
- 对话框相关(继续添加中)
- android 添加系统属性Settings.system
- LigerUi中表(Grid)控件的相关属性笔记(持续添加中)
- asp.net确认对话框(向控件添加属性)
- 物体的属性中可以添加东西。并且可以用这个访问。这个很好。
- js控制某个div层中a标签的class属性,点击实现添加class属性,并且删除其他同级的class属性
- 此数据库没有有效所有者,因此无法安装数据库关系图支持对象。若要继续,请首先使用“数据库属性”对话框的“文件”页或ALTER AUTHORIZATION语句将数据库所有者设置为有效登录名,然后再添加数据库关系图支持对象
- Android总结:Activity Intent Flags、Task相关属性及利用Intent属性调用系统app
- 给android添加系统属性:Settings.system和SystemProperties
- 打通前后端全栈开发node+vue进阶【课程学习系统项目实战详细讲解】(3):用户添加/修改/删除 vue表格组件 vue分页组件
- 此数据库没有有效所有者,因此无法安装数据库关系图支持对象。若要继续,请首先使用“数据库属性”对话框的“文件”页或 ALTER AUTHORIZATION 语句将数据库所有者设置为有效登录名,然后再添加数据库关系图支持对象。