查询问题!!高手进来!@!

2980486 2003-12-20 10:52:41
我想在 pb 中实现在意个表中查处多项来 一起选中!怎么班!加急1!
...全文
43 10 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
suzh1133 2003-12-22
  • 打赏
  • 举报
回复
如果只是对符合条件的多条记录进行标识(比如将符合条件的行用红色标识),建议使用modify
119119 2003-12-22
  • 打赏
  • 举报
回复
建议使用存储过程。
tommyhuanglei 2003-12-22
  • 打赏
  • 举报
回复
建议做个函数,顺便用上存储过程。
poemlake 2003-12-20
  • 打赏
  • 举报
回复
我的代码是不完整的,这是以前编的,可以参考一下ll_filter的写法,其它的要配合其它事件来完成
mittee 2003-12-20
  • 打赏
  • 举报
回复
修改 select 语句
ls_oldsql = dw_1.object.datawindow.table.select
ls_newsql = ls_oldsql + "and xx= 12 and ........." //如果没有where注意加上
dw_1.object.datawindow.table.select = ls_newsql
dw_1.retrieve()
dw_1.object.datawindow.table.select = ls_oldsql
poemlake 2003-12-20
  • 打赏
  • 举报
回复
程序找到后高亮显示找到的字段
poemlake 2003-12-20
  • 打赏
  • 举报
回复
汉字为字段名称:
查询的汉字输入到sle_qwss中
long ll_found_row
string qwssx,ll_filter
ulong ll_len
qwssx=trim(sle_qwss.text)
ll_len=len(qwssx)
ll_filter="mid(来源,pos(来源,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'" &
+" or "+"mid(植物形态,pos(植物形态,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'" &
+" or "+"mid(生长地,pos(生长地,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"&
+" or "+"mid(采制,pos(采制,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"&
+" or "+"mid(化学成分,pos(化学成分,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"&
+" or "+"mid(性味,pos(性味,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"&
+" or "+"mid(功能主治,pos(功能主治,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"&
+" or "+"mid(附注,pos(附注,'"+qwssx+"')," +string(ll_len)+")='"+qwssx+"'"
dw_1.setfilter(ll_filter)
dw_1.filter()
dw_2.setfilter(ll_filter)
dw_2.filter()
if ll_len<=0 then
dw_2.object.来源.background.color=rgb(255,255,255)
dw_2.object.植物形态.background.color=rgb(255,255,255)
dw_2.object.生长地.background.color=rgb(255,255,255)
dw_2.object.采制.background.color=rgb(255,255,255)
dw_2.object.化学成分.background.color=rgb(255,255,255)
dw_2.object.性味.background.color=rgb(255,255,255)
dw_2.object.功能主治.background.color=rgb(255,255,255)
dw_2.object.附注.background.color=rgb(255,255,255)
dw_2.object.来源.color=rgb(0,0,0)
dw_2.object.植物形态.color=rgb(0,0,0)
dw_2.object.生长地.color=rgb(0,0,0)
dw_2.object.采制.color=rgb(0,0,0)
dw_2.object.化学成分.color=rgb(0,0,0)
dw_2.object.性味.color=rgb(0,0,0)
dw_2.object.功能主治.color=rgb(0,0,0)
dw_2.object.附注.color=rgb(0,0,0)
return
end if
ll_found_row=dw_1.find(ll_filter,1,9999)
if ll_found_row>0 then
dw_1.setredraw(false)
dw_1.scrolltorow(ll_found_row)
dw_1.setredraw(true)
dw_1.postevent("rowfocuschanged")
end if
klbt 2003-12-20
  • 打赏
  • 举报
回复
"在意个表中查处多项"是?
是不是输入一个字符串,在几个列同时查找匹配数据?
bunnysky 2003-12-20
  • 打赏
  • 举报
回复
取得查找到的记录行号,标记为选中不就可以了!!
xingxing 2003-12-20
  • 打赏
  • 举报
回复
可以实现的,需要修改数据窗口的语句。
在编写程序的过程中,我遇到了这样的需求:在基于Windows 9x 或 Windows NT4.0 的程序中,要求确定键盘、鼠标处于空闲状态的时间。查询了有关资料文档以后,发现Windows 9x和Windows NT4.0 没有提供API或系统调用来实现这样的功能。但是,在Windows 2000中提供了一个新的函数:GetLastInputInfo(),这个函数使用结构 LASTINPUTINFO 作为参数: LASTINPUTINFO lpi; lpi.cbSize = sizeof(lpi); GetLastInputInfo(&lpi); 调用函数GetLastInputInfo()以后, 结构成员lpi.dwTime 中的值便是自上次输入事件发生以后的毫秒数。这个值也就是键盘、鼠标处于空闲状态的时间。可惜的是这个函数只能在Windows 2000中使用,Windows 9x 或Windows NT4.0不提供此API函数。那么,如何在Windows 9x 或Windows NT4.0中实现GetLastInputInfo()的功能呢?笔者的方法是利用系统钩子对键盘、鼠标进行监控。 Windows中的钩子实际上是一个回调函数,当用户有输入动作的时候,Windows要调用这个函数。比较典型的系统钩子应用就是键盘钩子和鼠标钩子: HHOOK g_hHookKbd = NULL; HHOOK g_hHookMouse = NULL; 在Windows中,一个系统(相对于一个特定进程而言)钩子必须用一个动态链接库(DLL)来实现。不妨将这个动态链接库命名为IdleUI.dll。 这个动态链接库在Windows 9x和Windows NT4.0 中实现了GetLastInputInfo()的功能。IdleUI.dll中有三个函数: BOOL IdleUIInit() void IdleUITerm(); DWORD IdleUIGetLastInputTime(); IdleUIInit()是环境初始化函数,IdleUITerm()是环境清理函数,分别在MFC应用程序的InitInstance() 和 ExitInstance()中调用它们。当用IdleUIInit()做完初始化后,就可以调用第三个函数IdleUIGetLastInputTime()来获取最后一次输入事件后的时钟。从而实现与GetLastInputInfo()一样的功能。程序TestIdleUI.exe是用来测试IdleUI动态库的,程序中调用了IdleUIInit 和 IdleUITerm,同时在程序的客户区中间显示键盘、鼠标空闲的秒数。 void CMainFrame::OnPaint() { CPaintDC dc(this); CString s; DWORD nsec = (GetTickCount() - IdleUIGetLastInputTime())/1000; s.Format( "鼠标或键盘空闲 %d 秒。",nsec); CRect rc; GetClientRect(&rc); dc.DrawText(s, &rc, DT_CENTER|DT_VCENTER|DT_SINGLELINE); } 图一显示了TestIdleUI运行时的情形。 图一 TestIdleUI运行画面 为了连续的显示,TestIdleUI设置刷新定时器间隔为一秒。 void CMainFrame::OnTimer(UINT) { Invalidate(); UpdateWindow(); } 运行TestIdleUI,当键盘和鼠标什么也不做时,可以看到计时器跳动,当移动鼠标或按键时,计时器又恢复到零,这样就实现了对输入设备空闲状态的监控。实现细节请看下面对IdleUI.dll工作原理的描述: 首先调用IdleUIInit ()进行初始化,安装两个钩子:一个用于监控鼠标输入,一个用于监控键盘输入。 HHOOK g_hHookKbd; HHOOK g_hHookMouse; g_hHookKbd = SetWindowsHookEx(WH_KEYBOARD,MyKbdHook,hInst, 0); g_hHookMouse = SetWindowsHookEx(WH_MOUSE,MyMouseHook,hInst, 0); 当用户移动鼠标或按下键盘键时,Windows调用其中的一个钩子并且钩子函数开始记录时间: LRESULT CALLBACK MyMouseHook(in

1,108

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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