listview为vsIcon时的对应问题 急！！！！！！！

Question

listview在添加imagelisT中的图标的时候 除了CAPTION外是否可以添加保存其他的信息如这个图片在数据库中的PID字段（字符型） 以便当我们选择它的时候可以知道这个图标的PID的值（关键字）

Answer 1

可以啊，ListView的每个Items都有一个Data属性，往这个里面放就可以啦！

Answer 2

Linux2001(我想买手提电脑啊！) (可我不知道怎么写代码：（能给点代码吗？

Answer 3

你还真是麻烦，把分全部给我啊！
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ImgList, ComCtrls;type
  TForm1 = class(TForm)
    ListView1: TListView;
    ImageList1: TImageList;
    procedure ListView1DblClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.ListView1DblClick(Sender: TObject);
begin
  ShowMessage(PChar(ListView1.Selected.Data));
end;procedure TForm1.FormCreate(Sender: TObject);
const
  a :array [0..3] of PChar = ('a', 'b', 'c', 'd');
var
  i :integer;
begin
  for i :=0 to 3 do
    ListView1.Items[i].Data :=a[i];
end;end.