delphi中filelistbox控件如何实现第一个文件和最后个文件
答案:2 悬赏:10 手机版
解决时间 2021-02-19 05:01
- 提问者网友：心牵心
- 2021-02-18 23:15
比如按一下‘第一个’这个空间就可以回到第一个文件
最佳答案
- 五星知识达人网友：慢性怪人
- 2021-02-18 23:23
procedure TForm1.Button1Click(Sender: TObject);
begin
FileListBox1.ItemIndex:=0; //选中的一个
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
FileListBox1.ItemIndex:=FileListBox1.Count-1; //选中最后一个
end;
begin
FileListBox1.ItemIndex:=0; //选中的一个
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
FileListBox1.ItemIndex:=FileListBox1.Count-1; //选中最后一个
end;
全部回答
- 1楼网友：长青诗
- 2021-02-18 23:50
楼主是问选择文件的那个光标的移动么？
向下移动：
procedure tform1.button1click(sender: tobject);
begin
filelistbox1.itemindex:=filelistbox1.itemindex+1;
end;
下上移动：
procedure tform1.button1click(sender: tobject);
begin
filelistbox1.itemindex:=filelistbox1.itemindex-1;
end;
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯