对话框中的附加变量跟布局:

对话框的函数:

用函数Set_KrlDlg()可天生一则对话信息。那意味着，该信息提醒被传送到信息缓存器中并显现正在零丁的一个带有按键的信息提醒窗口中。

DEFFCTExtfctpIntSet_KrlDlg(MyQuestion:OUTParameter[]:OUTTouchkey[]:OUTOption:OUT)

MyQuestion:普通信息提醒的布局

Parameter[]:通配符%1、%2跟%3的3个能够参数栏。即便没有利用通配符，也必需一直代入悉数3个参数。

Touchkey[]:7个能够按键标注布局。即便没有利用这些按键，也必需一直代入悉数7个按键。

Option：普通信息提醒选项的布局（预进终止、纪录正在信息提醒数据库中、顺序复位或取舍语句时连带删除信息提醒）

对话的返回值：对话的“句柄(handle)”。用该“句柄”可搜检是不是胜利天生了对话。同时，“句柄”也用作信息缓存器中的辨认号。

handle==-1:不克不及天生对话（例如由于另一则对话仍处于激活状态、借已失掉回覆或信息缓存器已过谦）

handle0:对话已胜利天生并以响应的辨认号保留正在信息缓存器中经管。

用函数Exists_KrlDlg()可搜检一则特定的对话是不是借存在。即搜检该信息提醒是不是借正在外部信息缓存器中。若是对话失掉应对，则此功用会解释按下的是哪个按键。

例如:

DEFFCTBOOLExists_KrlDlg(INTnHandle:ININTAnswer:OUT)

DECLINTnHandleanswer

nHandle:由函数“Set_KrlDlg(…)”供给的对话句柄.

Answer:有关哪个按键被按动的反应。如许，被界说为“Button[1]”的按键1便返回值1.

函数没有比及对话失掉回覆，而是仅仅正在缓存器中查找带有该句柄的对话。是以，KRL顺序中的扣问必需轮回停止，直至对话失掉回覆或被删除。

例如:

DECLBoolP1

P1=Exists_KrlDlg(nHandlenAnswer

present==TRUE:该对话借存在于信息缓存器中

present==FALSE:该对话不再位于信息缓存器中

Answer此刻以按下的按键的值前往写入。有效值为1到7，在于编程设定的按键号。

酿成事例:

正在USR_顺序中树立顺序”K_msg”

反应值监控:

--------------------------------------------------------------

例如:

天生EMZ的取舍框，取舍几号焊钳

DEFFCTINTSetDlgMsg()

DECLKrlMsg_TMsg

DECLKrlMsgPar_TPar[3]

DECLKrlMsgOpt_TOpt

DECLKrlMsgDlgSK_TSK[7]

INTnHandlenAnswer

T2形式下履行EMZ

Msg={Modul[]"vw_emz"Nr10Msg_txt[]"Antriebsschnittstelleselektieren"}提示信息条“EMZ利用几号对象用来丈量”

SK[1]={Sk_Type#VALUESk_txt[]"1"}天生的选项按钮

SK[2]={Sk_Type#VALUESk_txt[]"2"}

SK[3]={Sk_Type#VALUESk_txt[]"3"}

SK[4]={Sk_Type#VALUESk_txt[]"4"}

SK[5]={Sk_Type#VALUESk_txt[]"5"}

SK[6]={Sk_Type#VALUESk_txt[]"6"}

SK[7]={Sk_Type#VALUESk_txt[]"7"}

取舍几号焊钳

Opt={VL_StopTrueClear_P_ResetTrueLog_To_DBFALSE}信息属性设置

nHandle=Set_KrlDlg(MsgPar[]SK[]Opt)激活信息提醒

If(nHandle0)Then

While(Exists_KrlDlg(nHandlenAnswer))关闭对话窗口

Endwhile

Endif

Return(nAnswer)取舍按钮的值被收回

;

ENDFCT