准备工作:
首先下载完所有的fmb文件和pll文件,这里不提供下载,打开注册表,修改forms_path(搜索找到),在前面加入你的下载完后的两个路径,ok做完这些就可以使用forms builder了
打开TEMPLATE.fmb,然后另存为XXPOM100N.FMB,删除这几个文件,图1-1
1-1
1 新建一个窗口,修改名称(随便,我的是winform),子类选WINDOW,画布暂时留空,因为我们目前没建画布,如图1-2
1-2
2新建画布,修改 名称(随便),画布类型->内容,子类->CANVAS,窗口->你刚刚建的window,建了画布,不要忘了刚刚的窗口还没设主要画布哦,图1-3
1-3
3新建数据块,模块向导->下一步->表或者视图->输入表名,导入数据->下一步->下一步->仅创建模板
4在程序单元新建一个规格一个主体
规格代码如下:
PACKAGE pkg_formTest IS
procedure delete_row;
procedure insert_row;
END;
主体代码如下
PACKAGE BODY pkg_formTest IS
procedure delete_row is
begin
delete from formTest where id=:FORMTEST.ID;
end delete_row;
procedure insert_row is
begin
insert into formTest(id,pname,tel,address,birthday,sex)
values(:FORMTEST.id,:FORMTEST.pname,:FORMTEST.tel,:FORMTEST.address,:FORMTEST.birthday,:FORMTEST.sex);
end insert_row;
END;
formTest是数据库对应的表名
:数据块.项名对应表单的输入框,例如我的数据块叫做FORMTEST,里面有个ID项,所以应该写:FORMTEST.ID,注意 FORMTEST前面的分号不可以少,如图
5 在数据块->触发器下新建两个触发器on-delete和on-insert,代码如下
on-delete
pkg_formTest.delete_row;
on-insert
pkg_formTest.insert_row;
pkg_formTest是包名,insert_row是过程名,就是调用步骤4的程序单元
6数据块的项下新建两个项,取名为submit,canner,名字随意,子类选按钮
7 在刚刚的按钮下新建两个触发器when-button-pressed,对应删除和保存按钮,他们的代码如下
canner下的触发器:
Delete_Record;
submit下的触发器
Commit_Form;
8挂载