如何用代码实现选中Listbox中所有行内容

xywu 2003-10-17 10:51:25
listbox中有4行,如何用代码实现选中Listbox中所有行内容
...全文
111 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
angle097113 2003-10-17
  • 打赏
  • 举报
回复
ListBox1.MultiSelect := True; 你没有写上这句话 写上就好了
hongjg 2003-10-17
  • 打赏
  • 举报
回复
某一行?

ListBox1.Selected[i] := true;
dulei115 2003-10-17
  • 打赏
  • 举报
回复
zhaojinghui(撒哈拉之雨的悲伤)的方法就可以!
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
ListBox1.MultiSelect := true;//这条语句也要
for i := 0 to ListBox1.Items.Count-1 do
begin
ListBox1.Selected[i] := true;
end;
end;
xywu 2003-10-17
  • 打赏
  • 举报
回复
我用的是delphi5,里面没有selectall这个方法
xywu 2003-10-17
  • 打赏
  • 举报
回复
大家没明白我的意思,我是指用写代码代替用鼠标选中Listbox中某一行这个效果
zhaojinghui 2003-10-17
  • 打赏
  • 举报
回复
ListBox1.SelectAll;

delphi5.x have not the method
zhaojinghui 2003-10-17
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
// ListBox1.MultiSelect := true;
for i := 0 to ListBox1.Items.Count-1 do
begin
ListBox1.Selected[i] := true;
end;
end;
dulei115 2003-10-17
  • 打赏
  • 举报
回复
怎么会没有呢?上面的是我在Delphi上试过了的代码。
xywu 2003-10-17
  • 打赏
  • 举报
回复
Listbox好象没有selectall这个方法
dulei115 2003-10-17
  • 打赏
  • 举报
回复
ListBox1.MultiSelect := True;
ListBox1.SelectAll;
dulei115 2003-10-17
  • 打赏
  • 举报
回复
ListBox1.Items.Text

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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