12345678910111213141516171819202122232425262728293031323334353637 |
- $PBExportHeader$f_start_asset.srf
- global type f_start_asset from function_object
- end type
- forward prototypes
- global subroutine f_start_asset (integer arg_t)
- end prototypes
- global subroutine f_start_asset (integer arg_t);
- String arg_msg
- uo_accset uo_beginaccset
- uo_beginaccset = CREATE uo_accset
- IF arg_t = 1 THEN
- IF uo_beginaccset.begin_accset(arg_msg,TRUE) = 0 THEN
- MessageBox("系统提示",arg_msg)
- GOTO ext
- END IF
- ELSE
- IF uo_beginaccset.cancel_begin_accset(arg_msg) = 0 THEN
- MessageBox('系统提示',arg_msg)
- GOTO ext
- END IF
- END IF
- IF IsValid(w_main_scware) THEN
- w_main_scware.wf_build_menutree()
- END IF
- ext:
- DESTROY uo_beginaccset
- end subroutine
|