见代码:
function ShowItem(MyData: TMyData): TListItem;
var
vListItem: TListItem;
begin
vListItem := ListView1.Items.Add;
vListItem.Data := MyData;
vListItem.ImageIndex := 1;
vListItem.Caption := MyData.Caption;
Result := vListItem;
end;
我需要做什么才能使它适用于 TListBox?ListView.Items 属性似乎是 TListItem 的属性,而 ListBox.Items 不是,这意味着该函数将无法为 TListBox 返回正确的参数。
如何将其转换为 TListBox?
谢谢