关于动态创建数据窗口

littlerainsnow 2004-05-07 08:44:45

我有一个表，表中的字段都给出，我想动态创建一个窗口，在窗口上动态建立一个freeform形式的datawindow，各个字段来自那张表，能不能给出代码

多谢了

...全文

126 14 打赏收藏转发到动态举报

写回复

用AI写文章

14 条回复

切换为时间正序

请发表友善的回复…

发表回复

wjbboo 2004-09-09

打赏
举报

cxwsoftware 2004-08-06

打赏
举报

帮你顶!

地狱余烬 2004-08-06

打赏
举报

xingtao(as) 的代码,image 类型会出错,行不通

littlerainsnow 2004-05-10

打赏
举报

救救我吧：）

superbee111 2004-05-09

打赏
举报

学习中！

yebigroc 2004-05-09

打赏
举报

顶

littlerainsnow 2004-05-09

打赏
举报

klbt(快乐白兔）：
能不能举个例子，保存dw，再导入
谢谢啦

yangxingbo 2004-05-08

打赏
举报

好好学一下　我也不懂

klbt 2004-05-08

打赏
举报

用LibraryImport函数保存DW

feixianzhi 2004-05-08

打赏
举报

楼上的代码很好！！可以用！！

xingtao 2004-05-08

打赏
举报

string ERRORS, sql_syntax

string presentation_str, dwsyntax_str

sql_syntax = "SELECT * FROM 表名"

presentation_str = "style(type=freeform)"

dwsyntax_str = SQLCA.SyntaxFromSQL(sql_syntax,presentation_str, ERRORS)

IF Len(ERRORS) > 0 THEN

MessageBox("Caution", "SyntaxFromSQL caused these errors: " + ERRORS)

RETURN

END IF
dw_1.Create( dwsyntax_str, ERRORS)
dw_1.settransobject(sqlca)
dw_1.retrieve()
IF Len(ERRORS) > 0 THEN

MessageBox("Caution", "Create cause these errors: " + ERRORS)

RETURN

END IF

littlerainsnow 2004-05-08