跟着老侯玩编程 跟着老侯玩编程
首页
    • 语法基础
    • 标准控件
    • 网络编程
    • 附录
    • 官方案例代码
    • Git
    • SVN
    • 语法基础
    • 前端模块化
    • 语法基础
    • Web编程
    • 数据库
    • 构建工具
    • 代码片断
    • 学习方法
    • 计划说明
    • 软件分享
留言
首页
    • 语法基础
    • 标准控件
    • 网络编程
    • 附录
    • 官方案例代码
    • Git
    • SVN
    • 语法基础
    • 前端模块化
    • 语法基础
    • Web编程
    • 数据库
    • 构建工具
    • 代码片断
    • 学习方法
    • 计划说明
    • 软件分享
留言
  • 语法基础

    • 开篇
    • 单元文件结构
    • 变量
    • 语句
    • 基本数据类型
    • 复杂数据类型
    • 例程
    • 数组
    • 初识面向对象
    • 属性
    • 方法
    • 接口
    • 反射机制初探
    • Package
  • 标准组件

    • TButton
    • TEdit
    • TLabel
    • TFrame
    • TActionList
    • TCheckBox
    • TCheckGroup
    • TComboBox
    • TGroupBox
    • TListBox
    • TMainMenu
    • TMemo
    • TPanel
    • TPopupMenu
    • TRadioButton
    • TRadioGroup
    • TScrollBar
    • TToggleBox
  • 网络编程

    • 互联网协议
    • 初识Socket
    • 网络IO模型
    • 轮询模型
    • 异步选择模型
  • 附录

    • LSP相关
    • 第二季相关
  • delphi
  • 标准组件
舞动的代码
2020-09-01

TListBox

# TListBox 列表

列表主要逐行显示,可以选择

  1. # 添加控件

    mark

  2. # 设置内容

    mark

  3. # 运行效果

    mark

  4. # 示例代码
      procedure TForm1.Button1Click(Sender: TObject);
      begin
        ListBox1.Items.Add('添加一行');
      end;
      
      
      procedure TForm1.Button2Click(Sender: TObject);
      begin
        ListBox1.DeleteSelected;
      end;
      
      procedure TForm1.Button3Click(Sender: TObject);
      begin
     ListBox1.Clear;
      end;
      
      procedure TForm1.Button4Click(Sender: TObject);
      begin
        ListBox1.Items.Delete(2);     //这里的2,就是第三行,因为编号是从0开始的
      end;
      
      procedure TForm1.Button5Click(Sender: TObject);
      begin
        ListBox1.Items.LoadFromFile('s.txt');
      end;
      
      procedure TForm1.Button6Click(Sender: TObject);
      begin
        ListBox1.Items.SaveToFile('m.txt');
      end;
      
      procedure TForm1.Button7Click(Sender: TObject);
      begin
        Form1.Caption := ListBox1.Items[ListBox1.ItemIndex];
      end;
          
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
  1. # 补充
TGroupBox
TMainMenu

← TGroupBox TMainMenu→

Theme by Vdoing | Copyright © 2013-2020 冀ICP备16006233号-1
  • 跟随系统
  • 浅色模式
  • 深色模式
  • 阅读模式