怎么让datawindow里的行可选中?

tfe 2002-12-29 03:36:58
我这个datawindow里的行,不可选中。
怎么办?我看它的属性里。没有
mouse selection这个选项。
我现在要实现,选中行,点删除按钮就删除当前行。
怎么办?
能不能确定datawindow是tabular还是grid?
tabular是没有这个属性的。
如果是tabular那我要怎么才可以实现“选中行”,这个功能呢?
...全文
176 15 打赏 收藏 转发到动态 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
tfe 2002-12-30
  • 打赏
  • 举报
回复
谢谢大家
tfe 2002-12-30
  • 打赏
  • 举报
回复
呵呵,答案出来了,和tab order有关,以前做的人把datawindow里的所有对象的tab值都设成一个了。
改回来就好了。
lmf2008 2002-12-29
  • 打赏
  • 举报
回复
在rowfocuschaned是件里写
单行
if getrow() > 0 then
selectrow (getrow(),false)
selectrow(getrow(),true)
end if
多行
if getrow() >0 then
selectrow(getrow(), not isselected(getrow()))
end if
wjmsino 2002-12-29
  • 打赏
  • 举报
回复
在它的单击事件里试一下。
THIS.SelectRow ( 0 , FALSE )
THIS.SelectRow ( Row , TRUE )
THIS.ScrollToRow ( Row )
tfe 2002-12-29
  • 打赏
  • 举报
回复
老大们能不能试一下new 一个datawindow用tabular方式。
然后试一下可不可以选中某条记录。
ropriest 2002-12-29
  • 打赏
  • 举报
回复
dw_1.SetTransObject(sqlca)
dw_1.Modify("DataWindow.ReadOnly = Yes")
bomber2001 2002-12-29
  • 打赏
  • 举报
回复
厄!!用modify
tfe 2002-12-29
  • 打赏
  • 举报
回复
在open窗口时报错。
name not found 外部对象d_ticket_ticketlist.
但是这个d_ticket_ticketlist的确是dw_1控件的datawindow
songfrh 2002-12-29
  • 打赏
  • 举报
回复
这么写

dw_1.Object.d_ticket_ticketlist.Edit.DisplayOnly = 'Yes'
tfe 2002-12-29
  • 打赏
  • 举报
回复
是这样写吗?
dw_1.object.d_ticket_ticketlist.displayonly=false

//dw_1是控件名,d_ticket_ticketlist是datawindow名。
jeff_107 2002-12-29
  • 打赏
  • 举报
回复
displayonly属性不是这样写的。
你要用dw_1.object.datawindow.displayonly=true
tfe 2002-12-29
  • 打赏
  • 举报
回复
DW好象没有displayonly吧。
我试的在window的open里加上
dw_1.displayonly=true
结果告诉我incompatible property displayonly for type dw_1
dotnba 2002-12-29
  • 打赏
  • 举报
回复
我这个datawindow里的行,不可选中。
为什么不可以选中呢?
你无非是不想让他修改数据了。那么DisplayOnly = True
tfe 2002-12-29
  • 打赏
  • 举报
回复
应该是设置dw“是否可选中行”的一个属性。
我在grid'dw里。把这个属性去掉,它就不可选中了。
我做了一些测试。
如先点击一些行,然后再执行sql删除操作。结果只删了最上面的行。
pbsql 2002-12-29
  • 打赏
  • 举报
回复
mouse selection也不是选中行的意思,好象是选中列吧。

你可以对各列的背景色写个表达式,若是当前行就显示特殊的颜色,然后对当前行想怎么处理都行。
当数据存在主次表时,当更新了次表数据后,主表数据在后台有更变时。可利用刷新主表当前的方法重显主表数据。 /************************************************************ 函数名称: f_refresh_currentrow(adw) 功 能: 刷新DW当前数据,不可刷新NO update or 带arguments的DW 参数说明: adw 目标DW 返 回 值: integer 成功返回1,失败返回-1 作 者: sean 创建时间: 2010年8月18日 ************************************************************/ string ls_dataobject string ls_keys[] //key Column Name string ls_dbname[] //key field Name string ls_coltype[] //field style string ls_tablenm //table name string ls_condition //sql Condition long ll_currentrow //Current Row numeric long ll_column //Column count integer i datawindow ldw datastore ldatastore ldw=adw if ldw.rowcount( )=0 then return -1 elseif trim(ldw.describe( "datawindow.table.arguments"))<>'?' then messagebox('','刷新数据窗口当前失败!,数据窗口需要参数',exclamation!) return -1 else ll_currentrow=ldw.getrow( ) FOR ll_column = 1 TO long(ldw.object.datawindow.column.count)//key names If ldw.Describe("#"+string(ll_column)+".key") ='yes' Then i++ ls_keys[i]=ldw.Describe("#"+string(ll_column)+".name") ls_dbname[i]=ldw.Describe("#"+string(ll_column)+".dbname") ls_coltype[i]=ldw.Describe("#"+string(ll_column)+".coltype") End If NEXT if upperbound(ls_keys[])=0 then messagebox('','刷新数据窗口当前失败!,没有主键',exclamation!) return -1 else ls_tablenm=left(ls_dbname[1],pos(ls_dbname[1],'.') -1) //table name for i=1 to upperbound(ls_keys[]) if pos('numb,deci,long,',LeftA(ls_coltype[i],4) +',')>0 then ls_condition+="and "+ls_dbname[i]+"="+string(f_getitem(ldw,ll_currentrow,ls_keys[i])) else ls_condition+="and "+ls_dbname[i]+"='"+string(f_getitem(ldw,ll_currentrow,ls_keys[i]))+"'" end if next ls_condition=mid(ls_condition,4) //sql Condition ldatastore=create datastore 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_currentrow]=ldatastore.object.data[1] ldw.setitemstatus( ll_currentrow, 0, primary!, NotModified!) //if ldw.getrow( )<>ll_currentrow then ldw.scrolltorow( ll_currentrow) end if else messagebox('','刷新数据窗口当前失败!,条件语法错误',exclamation!) return -1 end if destroy ldatastore end if end if

611

社区成员

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

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