1.在窗口新建用户事件  ue_export   

2.事件调用函数 gf_dw_to_excel(THIS.dw_dict)

3.写函数 ：boolean lb_setborder

boolean lb_mergecolumnheader

boolean lb_setmaxrow

string ls_objname

string ls_borderbeinobj

string ls_borderendobj

string ls_filename

integer li_printheader

n_cst_dw2excel n_excel

string ls_path

string ls_file

integer li_rc

 

 

li_rc = getfilesavename("请选择你要保存的文件名称",ls_path,ls_file,"xls","All Files (*.xls),*.xls","d:\",32770)

IF li_rc = 1 THEN //1

ls_filename = ls_path

END IF //1

n_excel.of_setgridborder(lb_setborder,ls_borderbeinobj,ls_borderendobj)

n_excel.of_mergecolumnheader(lb_mergecolumnheader,ls_objname)

n_excel.of_setprintheader(li_printheader)

n_excel.of_settipswindow("w_tipsabc","正在生成Excel文件,请稍候.....")

n_excel.of_dw2excel(dw_export_exlcel,ls_filename)

 

4.窗口的导出按钮触发事件   

PARENT.triggerevent("ue_export")

RETURN