分享
 
 
 

Develop2K6.0常见问题解答

王朝other·作者佚名  2008-05-19
窄屏简体版  字體: |||超大  

问:如何在FORM中同时加入水平与垂直滚动条?

答:首先,必须将画布类型设置为“堆叠式”画布,其它类型的画布不能显示滚动条。将画布类型设置为“堆叠式”之后,该画布属性选项板的“物理属性”子类会出现“显示水平滚动条”与“显示垂直滚动条”两项内容,将其同时设置为“是”,则可以同时显示水平与垂直滚动条。

问:如何在告警框内显示message信息?

答:当使用系统缺省设置,不进行任何设定时,message信息将在FORM窗口的底部以小字显示。如果希望引起用户注意,可以将message信息显示在告警框中。例如,如果用户输入的数据类型错误,则弹出一个告警窗口,并在其中显示message信息:“输入数据类型不符”,这样,可以更加清晰地提醒用户输入有误,并允许用户及时地改正错误。

在告警框中显示message信息,只需要创建一个警告(alert)与一个ON_ERROR触发器,由于引用的是系统错误信息,所以不需要程序员自己编写捕捉错误并弹出相关警告信息的程序,从而提供了极大的便利。

在告警框内显示message信息的过程如下所述:

1. 创建一个只具有一个按钮的警告“general_error_alert”。

2. 在FORM一级创建ON_ERROR触发器,在出现错误时,将错误代码与信息显示在告警框中,程序如下:

declare

v_button number;

v_message varchar2(255);

begin

--将不需要显示的mesage信息屏蔽掉

if error_code in (0,40100,40400,40401,41051,40350)

then null;

else

--将错误代码与错误信息联系起来

v_message:=error_type || '-' || to_char(error_code) || ':' || error_text;

--将错误信息显示为告警信息

set_alert_property('general_error_alert',alert_message_text,v_message);

v_button:=show_alert('general_error_alert');

end if;

raise form_trigger_failure;

end;

问:如何一次退出所有FORM?

答:如果重复调用并打开了多个FORM,希望在点击任何一个FORM选单上的“退出”按钮时同时退出所有的FORM,需要在每一个FORM中设置一个全局变量global.quit_all,同时在选单条上加入一个“退出”按钮,并建立以下触发器:

1.在每一个FORM上建立WHEN_NEW_FORM_INSTANCE触发器:

:global.quit_all := 'N';

2.在每一个FORM上建立WHEN_WINDOW_ACTIVATED触发器:

if :global.quit_all = 'Y'

then exit_form;

end if;

3.在选单条的“退出”按钮上建立WHEN_BUTTON_PRESSED触发器:

:global.quit_all := 'Y';

exit_form;

注意,要么使用OPEN_FORM打开FORM,要么使用CALL_FORM打开FORM,不能两者混合使用,否则容易发生错误,无法一次退出所有的FORM。 问:如何在FORM与REPORT之间传递参数?

答:由于FORM与REPORT是两项独立的产品,不可能使用全局变量传递数据,所以它们之间的数据无法共享。如果希望REPORT继承FORM中的一些数据,可以将FORM中的有关数据作为参数,以参数列表的形式传递给REPORT。

例如,可以根据用户在FORM中的选择,在REPORT中动态生成符合查询条件的数据,方法是将FORM中的查询条件,作为参数传递给REPORT,从而在REPORT中动态生成查询结果。

在FORM与REPORT之间传递参数的程序如下所示:

declare

pl_id ParamList;

begin

―获取tmpdep的参数列表值

pl_id := Get_Parameter_List( 'tmpdep' );

―如果参数列表pl_id已存在,则删除它,然后重建。如果不删除当前pl_id,则无法创建参数列表,并在运行FORM时出现错误提示:参数列表已存在,无法重建

if Not Id_Null( pl_id )

then Destroy_Parameter_List(pl_id);

end if;

--创建参数列表tmpdep

pl_id:=Create_Parameter_List('tmpdep' );

--在参数列表pl_id中加入参数w_clause,同时对w_clause赋值

where deptno=:dept_deptno。

Add_Parameter( pl_id,'w_clause', TEXT_Parameter, 'where deptno=:dept.deptno');

--运行报表,并将现有参数列表pl_id与值传递给报表report1

run_product(reports,'C:\report\report1',synchronous,runtime,filesystem,pl_id);

end ;

问:从FORM调用REPORT时,如何使REPORT以满屏方式显示?

答:当从FORM调用REPORT时,REPORT将按缺省窗口大小(420×360)显示,如果希望REPORT以满屏方式显示,需要加入如下代码:

add_parameter(pl_id,maximize',TEXT_PARAMETER,'yes');

问:如何关闭REPORT运行时的参数窗口?

答:当FORM调用REPORT时,首先会弹出一个参数窗口,显示所有FORM传递给REPORT的参数,待点击该窗口中的“运行”后,才运行REPORT。我们也可以不显示该参数窗口,方法是在FORM中加入如下代码:

Add_Parameter(pl_id,'w_clause',TEXT_Parameter,'NO');

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有