来源:https://blog.csdn.net/yudehui/article/details/8031514
主要的核心代码如下:
string ls_pbd = ‘e:\例子目录\例子文件.pbd’
setlibrarylist(ls_pbd)
if pos(getlibrarylist(),ls_pbd)>0 then
if fileexists(ls_pbd) then
else
return
end if
else
return
end if
string ls_dir
string ls_dataobject[] = {‘d_debug’,’d_params’,’d_procexec’,’d_search’,’d_edit_userlist’,’d_columns’,’d_export_info’,’d_export_tables’,’d_search_exact’,’d_triggers’,’zz_d_toolbars’}
datastore ld
…..
…..
ld = create datastore
j = upperbound(ls_dataobject)
for i = 1 to j
ld.dataobject = ls_dataobject
ls_swap = ‘$PBExportHeader$’+ls_dataobject+’.srd~r~n’+ld.describe(‘datawindow.syntax’)
af_writefile(ls_dir+ls_dataobject+’.srd’,ls_swap) //写文件
next
destroy ld
….
MessageBox(‘信息’,’完成。’)