Delphi 10.2 移动开发LIstView的问题?急急急

weixin_43788560 2020-05-23 10:47:28
放教一下,Delphi 10.2 使用ListView,显示记录,怎么能获得ListView--ItemAppearance--Item--Text1的值?
我用Toggle DesignMode 设计好布局,然后
var
item:TListviewItem;
... ...
item := listview1.Items.Add;
item.Data['Text1'] :='客户:'+ClientModule1.ClientDataSet1.FieldByName('KHMC2').AsString;
item.Data['Text2'] :='ID:'+ClientModule1.ClientDataSet1.FieldByName('ID').AsString;
数据通过循环把数据输入到Listview 后,后期操作某一记录时无法获得该记录的ID值
请问点击某一记录后,如何获得Text2中的ID值?
...全文
221 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
weixin_43788560 2020-05-23
  • 打赏
  • 举报
回复
procedure TForm1.ListView1ItemClick(const Sender: TObject; const AItem: TListViewItem); begin showmessage(ListView1.Items.AppearanceItem[ListView1.ItemIndex].Data['Text1'].AsString); end;

80,472

社区成员

发帖
与我相关
我的任务
社区描述
移动平台 Android
androidandroid-studioandroidx 技术论坛(原bbs)
社区管理员
  • Android
  • yechaoa
  • 失落夏天
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧