請教一下我用ADOQUERY查出來的數據假如是
張三 25 班長
李四 25 團支書
...
我想把這個數據傳到一個STRINGLIST裏面
如果這樣寫
for i:=0 to adoquery.RecordCount-1 do begin
stringlist.Add(trim(adoquery.FieldS[I].AsString));
END;
adoQUERY.Next;
showmessage(stringlist)发现進來的是
張三
李四
怎麽能把數據集當前整行傳給stringlist?
stringlist.Add(trim(query.FieldS[I].AsString));
就是這句出問題,可我找不到怎麽改。就是showmessage(stringlist)的结果是
張三 25 班長
李四 25 團支書
張三 25 班長
李四 25 團支書
...
我想把這個數據傳到一個STRINGLIST裏面
如果這樣寫
for i:=0 to adoquery.RecordCount-1 do begin
stringlist.Add(trim(adoquery.FieldS[I].AsString));
END;
adoQUERY.Next;
showmessage(stringlist)发现進來的是
張三
李四
怎麽能把數據集當前整行傳給stringlist?
stringlist.Add(trim(query.FieldS[I].AsString));
就是這句出問題,可我找不到怎麽改。就是showmessage(stringlist)的结果是
張三 25 班長
李四 25 團支書
解决方案 »
- 请教用sql语句按字段名对查询结果排序问题
- 在 insert into ...values(...)里,如果 values 里有一些参数可能为空值。该如何处理?(程序中,所以有可能是空值)
- 如何通过双击TabSheet的Tab关闭,释放这个Sheet?
- StringGrid的中的每一格不能左右拉的更宽一点
- 请教各位专家
- 我要在Delphi中添加TRaveDataText组件,请问要添加那个单元?
- 怎么实现像网络邻居中的IP地址的输入一样的edit控件(再现等待)
- 我有个小程序,我出钱,谁有兴趣做下?
- 为了实现检查网络上是否还有打开的计算机,我想编写程序通过ping命令来实现.但不知道怎样实现.或是有什么其他的好办法解决??敬请各位相告.请详细点!!!!
- delphi 中如何将string转成extended?急求。。。。。。strtofloat用不了啊?
- 函数指针的使用问题
- 如何設置TlistView行列值,以及動態獲得Combobox的選中項
for i:=0 to adoquery.RecordCount-1 do begin改成for i:=0 to adoquery.fieldCount-1 do begin就好了,谢谢田伯光和太可怕!
for j:=0 to adoquery.fieldCount-1 do
stringlist.Add(trim(adoquery.FieldS[j].AsString));
adoQUERY.Next;
END;