关于ListItem的问题

[Demogodyou]

请教：如何在ListView的ListItem中保存一些String信息，怎样让ListItem显示Hint。
或者有什么可以保存String信息的第三方控件可以推荐一下。
谢谢！

[gzmhero]

用ListItem的Data来保存。是一个指针能够保存任何的结构数据。

[Demogodyou]

怎么用？可否贴个例子上来。谢谢！

[gzmhero]

type
PMyStruct=^TMyStruct;
TMyStruct=record
strTemp:string;
.........
end;

var
p:PMyStruct;
ListItem:TListItem;
begin
ListItem:=TListView.Add....
.....
new(p);
p^.strTemp:='hahaha';
ListItem.Data:=p;

[Demogodyou]

谢谢！
可否让ListItem显示Hint ，请高手指教！

[gzmhero]

不是Hint是InfoTip
在OnInfoTip事件里面写代码，InfoTip就是你要显示的Hint．

procedure TForm1.ListView1InfoTip(Sender: TObject; Item: TListItem;
var InfoTip: String);
begin
InfoTip:=Item.Caption;
end;