query1查询的数据库内容如何反馈到一个类似memo中
我想实现 从一个数据库中 **.db 中查询语句 返回结果到一个memo
如何实现
我想实现 从一个数据库中 **.db 中查询语句 返回结果到一个memo
如何实现
解决方案 »
- 谁能将这段C代码转成delphi的?
- 毕业设计要用,急啊,高手来看一下
- 如何将TComm收到的数据由BCD码转换为十进制整数
- 如何将Visual Foxpro 5.0 的DBF文件导入至Access ???
- 100分啊,大家帮帮我,(1)
- 我用edit1.Text:=datetostr(date()),月份和日期前面没有0怎么办?
- 有关ActiveForm的问题!
- botton控制DBGrid改变背景颜色!
- 请问如何将jpg图片保存到oracle数据库中?
- 用过国产e语言没有?它哪个编译器真的是自己的?
- 共享Sender的响应时,Sender 的数组序号如何识别
- 关于在已经添加CheckBox的TreeView中响应MouseUp事件的提问
直接在这里写的,可能有笔误,见谅
proedure Test;
var
i : integer;
str : String;
begin
for i := 0 to AdoQuery1.fieldcount -1 do
begin
str := Str +' '+ AdoQuery1.Fields[i].DisplayText ;
end;
Memo1.lines.Append(Str);
AdoQuery1.first;
with AdoQuery1 do while not eof do
begin
Str := '';
for i := 0 to AdoQuery1.fieldcount -1 do
begin
str := Str +' '+ AdoQuery1.Fields[i].asString;
end;
Memo1.lines.Append(Str);
next;
end;
end;