要借助dw把srd读进来,然后再写到pbd中:
string ls_syntax,ls_errors
ls_syntax=dw_1.Describe("DataWindow.Syntax")
if not FileExists("test.pbd") then
LibraryCreate("test.pbd", "测试")
end if
if LibraryImport("test.pbd","d_test",ImportDataWindow!,ls_syntax,ls_errors)=1 then
messagebox("","export ok")
end if