动态创建数据窗口时,如果使所有列的autoselect属性设置为no

zytczdd 2003-05-26 03:18:51
我这样写的代码,可是设置不成功,但也不出错
new_syntax=sqlca.syntaxfromsql(new_sql, &
'style(type=grid),column (edit.autoselect=no)',error_syntaxfromsql)

...全文
160 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
zytczdd 2003-05-27
  • 打赏
  • 举报
回复
楼上的,这个我已经看过了,但我做的是一个函数,不能确定字段名是什么
帮助文件中有一句话说明可以设置全部的字段,
但我不会用
You can use AutoSelect with SyntaxFromSQL. The setting applies to all the columns in the generated syntax.
EastSmart 2003-05-26
  • 打赏
  • 举报
回复
慢慢看看
<transaction object>.SyntaxFromSQL(<SQL select string>, &
"Style(Detail_Bottom_Margin=<an integer> Detail_Top_Margin=<an integer> Header_Bottom_Margin=<an integer> Header_Top_Margin=<an integer> Horizontal_Spread=<an integer> Left_Margin=<an integer> Report=<Yes or No> Type=<Form, Grid, Tabular, Graph, or Label> Vertical_Size=<an integer> Vertical_Spread=<an integer> )" + &
"Text(Alignment=<0 - Left, 1 - Right, 2 - Center> Background.Color=<a long> Background.Mode=<0 - Opaque, 1 - Transparent> Border=<0 - None, 1- Shadow, 2 - Box, 3 - Resize, 4 - Underline, 5 - 3D Lowered, 6 - 3D Raised> Color=<a long> Font.CharSet=<0 - Ansi, 1 - default, 2 - Symbol, 128 - Shift JIS, 255 - OEM> Font.Face='<name of type face (i.e., SYSTEM, COURIER)>' Font.Family=<0 - AnyFont, 1 - Roman, 2 - Swiss, 3 - Modern, 4 - Script, 5 - Decorative> Font.Height=<an integer> Font.Italic=<0 - False, 1 - True> Font.Pitch=<0 - default, 1 - Fixed, 2 - Variable> Font.Strikethrough=<0 - False, 1 - True> Font.Underline=<0 - False, 1 - True> Font.Weight=<400 - Normal, 700 - Bold> Font.Width=<an integer> )" + &
"Column(Background.Color=<a long> Background.Mode=<0 - Opaque, 1 - Transparent> Border=<0 - None, 1- Shadow, 2 - Box, 3 - Resize, 4 - Underline, 5 - 3D Lowered, 6 - 3D Raised> Color=<a long> Edit.AutoHScroll=<Yes or No> Edit.AutoSelect=<Yes or No> Edit.AutoVScroll=<Yes or No> Edit.FocusRectangle=<Yes or No> Font.CharSet=<0 - Ansi, 1 - default, 2 - Symbol, 128 - Shift JIS, 255 - OEM> Font.Face='<name of type face (i.e., SYSTEM, COURIER)>' Font.Family=<0 - AnyFont, 1 - Roman, 2 - Swiss, 3 - Modern, 4 - Script, 5 - Decorative> Font.Height=<an integer> Font.Italic=<0 - False, 1 - True> Font.Pitch=<0 - default, 1 - Fixed, 2 - Variable> Font.Strikethrough=<0 - False, 1 - True> Font.Underline=<0 - False, 1 - True> Font.Weight=<400 - Normal, 700 - Bold> Font.Width=<an integer> )" + &
"Datawindow(Color=<a long> Label.Columns=<number of labels across on a page>Label.Columns.Spacing=<an integer> Label.Ellipse_Height=<an integer> Label.Ellipse_Width=<an integer> Label.Height=<an integer> Label.Name='<constant string containing pre-defined label name>'Label.Rows=<number of rows of labels on a page>Label.Rows.Spacing=<an integer> Label.Shape=<roundrectangle, rectangle, or oval>Label.Sheet=<Yes or No> Label.TopDown=<Yes or No> Label.Width=<an integer> Message.Title='<text displayed in titlebar of datawindow error messagebox>' Print.Margin.Bottom=<an integer> Print.Margin.Left=<an integer> Print.Margin.Right=<an integer> Print.Margin.Top=<an integer> Rows_Per_Detail=<an integer> Timer_Interval=<# of milliseconds between refresh of time-related values (default is 0 for 1 minute)> Units=<0 - PB Units, 1 - Pixels, 2 - 1/1000 inch, 3 - 1/1000 cm> ) ",<string variable to hold errors>)

611

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder DataWindow
社区管理员
  • DataWindow社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧