| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2003/5/19 21:16:19 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 如何将符合条件的数据库的查询结果以文本的方式显示出来？？而不是显示在gbgird的网格中？？比如说，符合条件的有123456789，这几个数字就显示在程序界面上的memo或其他类似的显示文本的控件中？我试了DBRichEdit1等，不知为什么只能显示一个结果，而不能显示所有结果，我很困惑！ ---------------------------------------------- delphi菜鸟 |
|||||
| 作者： |
|
2003/5/19 21:22:01 | ||||
| 1楼： | 把各个字段的值取出，再一个个加到edit中 ---------------------------------------------- -/\ /\---->（个人之愚见，敬请大家指教！） ( ~_~ ) (?) (?) |
|||||
| 作者： |
|
2003/5/19 22:05:29 | ||||
| 2楼： | …… 被禁用帐号，帖子内容自动屏蔽！ …… ---------------------------------------------- 发布广告，账号被禁用！ |
|||||
| 作者： |
|
2003/5/20 14:40:56 | ||||
| 3楼： | 但是这样的话，程序太复杂，且太大了，因为数据的查询结果会很多！ ---------------------------------------------- delphi菜鸟 |
|||||
| 作者： |
|
2003/5/20 20:57:27 | ||||
| 4楼： | 不会很多，用query得到结果， var sGetResult: string; 用一个循环 First; for i:= 1 to RecordCount do begin sGetResult := FieldByName('字段名1').asString + ' '; sGetResult := sGetResult + FieldByName('字段名2').asString + ' '; ... sGetResult := sGetResult + FieldByName('字段名n').asString + ' '; memo1.lines.add(sGetResult); Next; end; ---------------------------------------------- - |
|||||
| 作者： |
|
2003/5/20 21:08:02 | ||||
| 5楼： | 甚至可以更简洁 var sGetResult : String ; i, j: integer ; begin With Query do begin First ; for i:= 0 to RecordCount - 1 do begin sGetResult := ' ; for j:= 0 to FieldCount - 1 do begin sGetResult := sGetResult + Fields[j].AsString ; end ; Next ; end ; end ; // 没试过 不过我的眼睛己经编译通过了?? ----------------------------------------------  |
|||||
| 信息 |
| 登陆以后才能回复 |
