[code="python"]TreeViewItem cdItem
tv_1.GetItem(handle,cdItem)
long finded
String tablelabel,tablename
tablelabel = cdItem.Label
if tablelabel "" Then
select count(*)
into:finded
from pbcattbl
where pbt_cmnt = :tablelabel;
select pbt_tnam
into:tablename
from pbcattbl
where pbt_cmnt = :tablelabel;
if finded = 0 Then
select count(*)
into:finded
from pbcattbl
where pbt_tnam = :tablelabel;
tablename = tablelabel
end if
if finded >= 1 Then
string ls_syntax,ls_sql,ls_error,colname,collabel
long ls_rowcount,i
//查找要显示的字段
ls_sql ="SELECT pbc_cnam,pbc_cmnt FROM pbcatcol where pbc_tnam = '"+tablename+"'"
ls_syntax =sqlca.syntaxfromsql(ls_sql, ' ',ls_error)
if len(ls_error)>0 then messagebox("错误",ls_error)
dw_3.create(ls_syntax,ls_error)
if len(ls_error)>0 then messagebox("错误",ls_error)
dw_3.settransobject(sqlca)
dw_3.retrieve()
ls_rowcount = dw_3.RowCount()
ls_sql ="SELECT "
for i = 1 to ls_rowcount
ls_sql= ls_sql + dw_3.GetItemString(i,1)
if i ls_rowcount Then
ls_sql = ls_sql + ","
end if
next
ls_sql = ls_sql + " FROM "+tablename
ls_syntax =sqlca.syntaxfromsql(ls_sql, ' ',ls_error)
if len(ls_error)>0 then messagebox("错误",ls_error)
dw_1.create(ls_syntax,ls_error)
if len(ls_error)>0 then messagebox("错误",ls_error)
*/
dw_1.settransobject(sqlca)
dw_1.modify("IF(MOD(GETROW(),2)=0,RGB(192, 192, 192), RGB(255, 255, 255))")
dw_1.retrieve()
//THIS.PostEvent("ue_postopen")
else
MessageBox("错误","数据库中没有该表")
end if
end if
分享到:
相关推荐
标题 "PB-数据库保存图片并在Datawindow中显示" 涉及到的是使用PowerBuilder(PB)这个开发工具,将图片数据存储在数据库中,并在DataWindow控件中进行显示的技术。下面,我们将深入探讨这一主题。 1. **Power...
ldatastore.dataobject=ldw.dataobject ldatastore.settransobject( sqlca) if f_addwhere_retrieve(ldatastore,ls_condition)=1 then if ldatastore.rowcount( )=1 then ldw.object.data[ll_...
标题中的“通过在dataobject加全局函数得到引用的dw及window”是指在PowerBuilder(PB)编程中,如何利用DataObject(DO)对象来获取对其所关联的DataWindow(DW)以及窗口(Window)对象的引用。这在开发过程中非常...
/ids_Data.DataObject = dw_1.dataobject //将dw_condation数据窗口对象与ids_Data连接 ids_Data.SetTransObject(sqlca) dw_1.getfullstate(str) ids_data.setfullstate(str) gf_saveasascii2excel(ids_data)
这里全是定义的数据属性,是setitem,update,object.data等方法访问的根源 如果存在table()里的column,数据窗口里可以不存在任何对象,仍然可以访问数据窗口的数据 如果想创建一个空的数据窗口,可以只定义: release 12;...
在PB中,数据窗口是处理数据库的关键组件之一,能够以直观的方式展示数据,并支持复杂的查询和数据操作。 #### 二、Edit Source 的作用 “Edit Source”功能允许开发者直接编辑数据窗口对象的源代码,这对于调整...
- **Object.data属性**:该属性用于获取或设置Table中的数据。 - **Table(column)**:此方法用于指定特定列的操作,如获取或设置列的数据。 - **Column属性**:Column属性用于指定Table中的列,可以设置列的标题、...
随后,你需要指定DataStore关联的数据对象(DataObject),例如`ds_sale_117`: ```pb ds_sale.DataObject = "ds_sale_117" ``` 2. **实例化和设置事务对象**: 实例化DataStore并将其与SQLCA(SQL Control ...
17. **快速复制数据窗口数据**:通过`dw_1.object.data = dw_2.object.data`可以直接将数据从一个数据窗口复制到另一个结构相同的数据窗口。 18. **根据条件改变记录颜色**:在数据窗口中,可以使用`if`语句结合`...
接着,在Data页定义数据源,通常需要日期时间(dt)、高压(gy)、低压(dy)等列数据,从Source Data列表中选择并拖拽到Target Data列表,其中dt应置于前列,用作横坐标。 4. **定义图形显示格式**:通过OLE ...
- `DataWindow.Object.Data()`: 获取或设置数据窗口中某个字段的值。 6. **图形和用户界面函数**: - `SetWindowFont()`: 设置窗口的字体。 - `SetWindowText()`: 设置窗口标题。 - `SetCursor()`: 设置当前...
dw_1.object.data = dw_2.object.data ``` 这种方式可以快速实现数据的复制。 ### 17. 行高亮显示 为了实现不同行之间的颜色区分,可以使用以下逻辑: ```pb if Mod(getrow(), 2) = 0 then rgb(0, 255, 255) // ...
首先,在DataWindow的“Data Export”设置中,需将“format to configure”修改为PDF,并选择Distill方法进行输出。随后,通过代码设置DataWindow的打印机属性为“Sybase DataWindow PS”,并指定自定义PostScript...
2. **数据类型匹配**:Excel的数据类型可能与PB中的数据类型不完全匹配,因此在将数据导入DataWindow时,可能需要进行转换。 3. **范围选择**:如果Excel文件包含多个工作表或大量数据,开发者需要指定要访问的工作...
开发者可以使用PB的.NET DataWindow对象,通过拖放操作将Web服务的方法添加到数据窗口中,然后在代码中执行这些方法。 5. 使用步骤: - 导入Web服务:在PB中,开发者可以通过“导入Web服务”向导将Web服务的WSDL...
在PB中,这主要通过数据窗口(DataWindow)和数据对象(DataObject)来实现。在这个源码中,开发者利用了数据对象来构造和操作游戏中的方块形状,这是PB的一个重要特性,数据对象可以用于存储和处理结构化数据,而不...
2. **PBDOM(PowerBuilder Data Object Model)**:用于在运行时动态创建和修改DataWindow对象。 3. **ActiveX和OLE**:如何在PB应用中集成其他组件或控件。 4. **Web发布**:利用PB的Web发布功能,将桌面应用转换为...
2. **解析JSON字符串**:SailJSON提供了解析JSON字符串的函数,例如`SailJsonParse()`,它将JSON字符串转换为PowerBuilder的DataWindow或DataObject结构,方便进一步操作。 3. **生成JSON字符串**:对于需要输出为...
PB使用PBDOM(PowerBuilder Data Object Model)模型,它允许开发者通过图形化界面创建和操作数据库对象,大大简化了数据库应用的开发过程。此外,PB的DataWindow组件是其一大特色,能够方便地进行数据展示和交互,...
- DataObject: d_datawsrv_demo 4. **添加Function** - 在n_datawebservice中添加一个Function,用于返回查询结果。 - Function Name: getdata_for_pb - Return Type: string - Arguments: 无 #### 实现细节...