利用pb本身的功能,反编译pbd文件中的dw

主要的核心代码如下：

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('信息','完成。')