有知道listview控件的具體使用方法請速回復,這裡先謝謝了。
解决方案 »
- delphi2010这样界面咋出来的!
- 在线等:串行口通讯上位机的数据发送问题。
- 如何快速作到客户端查询服务器数据?
- 各位,有关一个ADO的错误问题??急!!
- Delphi中有没有这样一个变量永久性地保存用户名。
- 你们好啊!如何我把listbox中的每条记录 在我创建的sql数据库中查找到 并输出sql中的和这条记录相关的其他字段到另一个listbox中
- ADOConnection如何处理登陆时对话框LoginPrompt的"Cancel"?
- CM_CANCELMODE是什么消息?干什么用的?
- 为什么我的delphi总是出现这个怪问题?在线等待、、、、、
- 关于使用了ADO的问题!
- 先取有效数字,然后让小数转换为百分数?
- 水晶报表(CRYSTAL REPORT)问题,如何使用CrpeDS???
↑有一個DEMO
var
node:tlistitem;
begin
while not table1.eof do
begin
node:=listview1.items.add;
node.caption:=table1.fields[0].asstring;
node.subitems.add(table1.fields[1].asstring);
.....
table1.next;
end;
end;
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1943529
with adodataset1 do
begin
close;
commandtext:='SELECT * FROM Y_考试项目';
open;
first;
while not eof do
begin
with ListView1.Items.Add do
begin
caption:=fieldbyname('项目名称').AsString;
SubItems.append(fieldbyname('学年').AsString);
SubItems.append(fieldbyname('学期').AsString);
SubItems.append(fieldbyname('参考项目').AsString);
StateIndex:=fieldbyname('id').Asinteger;
imageindex:=1;
end;
next;
end;
end;