B blue_tear Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-02 #3 比如说我想点击 ListView上的任何一个Item能在Edit上显示字母A 程序如下,我知道一定有问题,你给我看如何改 procedure TForm1.ListView1Click(Sender: TObject); var item:tlistitem; begin if item.selected then edit1.text:='a'; end; 不要笑我!
比如说我想点击 ListView上的任何一个Item能在Edit上显示字母A 程序如下,我知道一定有问题,你给我看如何改 procedure TForm1.ListView1Click(Sender: TObject); var item:tlistitem; begin if item.selected then edit1.text:='a'; end; 不要笑我!
P philipliu Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-02 #4 为什么不写在OnSelectItem事件上呢?
B blue_tear Unregistered / Unconfirmed GUEST, unregistred user! 2001-05-02 #5 谢谢你,我记住你了!!以后有问题还要请教你!:)