如果你写的过程的消息是LB_GETSEL,那就应该是这样的,试试,如果可以就要给分哦!!!
procedure Tfrmtmpdlg.LstItemSelect(var msg:TMessage);
begin
ShowMessage(IntToStr(msg.WParam));
end
procedure Tfrmtmpdlg.LstItemSelect(var msg:TMessage);
begin
ShowMessage(IntToStr(msg.WParam));
end
调试欢乐多
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货