1)form上有一个edit1和一个listview1,我想在点击listview1时让edit1显示listview1的caption,但是下面这句在执行时,如果我点击listview1的空白处,会报错,为什么?怎么改?listview1的viewstyle属性为vsicon!
edit1.text:=listview1.selected.caption;
2)我想在显示form时,使listview1中的某一项为默认的选中状态,应该怎么办?
edit1.text:=listview1.selected.caption;
2)我想在显示form时,使listview1中的某一项为默认的选中状态,应该怎么办?
解决方案 »
- 如何找到 内存错误 的代码在哪里??
- 可以把一個界面一分為二,然後點一下會隱藏一個界面,全部顯示另一個界面,再點一下就恢復了,這是什麼控件??
- 我想做一个socket组件,再收到buffer数据后做些拆包封包操作。请帮助。
- 虚拟串口的类型
- 有没有高手,是高手来解决这个问题...
- 如何在EDIT中既限制只能输入数字又保证能输入小数?在线等~~~
- 如何计算两个日期间隔多少天?
- 我设的整形的全局变量在其他的单元中,值总是0,为什么??
- 话务自动呼叫分配及排队机制的问题
- 有关DELPHI的Image控件问题
- 数据库一个字段 我定义成 float 类型 怎么 输入的小数后总给我保留出一长串小数
- VB与EXCEL报表问题
if listview1.selected<>nil then edit1.text:=listview1.selected.caption;
2. 在onformshow的时候用
listview1.items[n].selected:=true;
csdn的输入框真讨厌,怎么都对不齐。
edit1.text:=listview1.selected.caption;
if listview1.selcount=0 then exit;
可以改为如下:
if listview1.selected <> nil then
edit1.text:=listview1.selected.caption
else
edit1.text := '';
2)在form的OnShow事件里加一句代码,例如:
if listview1.items.count > 0 then
listview1.items.item[0].selected := True;