$PBExportHeader$f_waitforrslt.srf global type f_waitforrslt from function_object end type forward prototypes global subroutine f_waitforrslt (integer arg_waitsec, string arg_title, boolean arg_if_allow_cancel) end prototypes global subroutine f_waitforrslt (integer arg_waitsec, string arg_title, boolean arg_if_allow_cancel);// 等待结果 // 等待最长时间arg_waitsec s_waitforwsrslt_para s_para s_para.waitsecond=arg_waitsec s_para.title=arg_title s_para.if_allow_cancel=arg_if_allow_cancel OpenWithParm(w_waitforwsrslt,s_para) end subroutine