高考问答犹他爵士队 如新:DELPHI的小总是问题 List Box和Combo Box部件
来源：百度文库 编辑：高考问答 时间：2024/05/06 04:06:45
这段话怎么做，我没看明白，主要是那个文本怎样加入啊？
List Box(列表框)和Combo Box(组合框)都显示列表项目，所不同的是组合框占用较少的空间。常见的Windows操作系统中，显示可用磁盘驱动器时，用的就是组合框。列表框则提供了一个项目列表以供选择，如Windows打开文件操作时显示文件列表的就是List Box。
下列程序段将Edit1的文本加入到ListBox1中，并清空Edit1中的文本：
procedure TForm1.AddButtonClick(Sender:TObject);
begin
ListBox1.Items.Add(Edit1.text);
Edit1.Text := ‘’;
end;
常见的组合框初始化用以下的语句可以实现，它用下拉式列表框的第一项来初始化组合框的缺省值：
procedure TForm1.ComboBox1Text(Sender:TObject);
begin
if ComboBox1.Text = ‘’then
ComboBox1.Text := ComboBox1.Items.String[1] ;
end;
以上就是文本输入的基本部件。
List Box(列表框)和Combo Box(组合框)都显示列表项目，所不同的是组合框占用较少的空间。常见的Windows操作系统中，显示可用磁盘驱动器时，用的就是组合框。列表框则提供了一个项目列表以供选择，如Windows打开文件操作时显示文件列表的就是List Box。
下列程序段将Edit1的文本加入到ListBox1中，并清空Edit1中的文本：
procedure TForm1.AddButtonClick(Sender:TObject);
begin
ListBox1.Items.Add(Edit1.text);
Edit1.Text := ‘’;
end;
常见的组合框初始化用以下的语句可以实现，它用下拉式列表框的第一项来初始化组合框的缺省值：
procedure TForm1.ComboBox1Text(Sender:TObject);
begin
if ComboBox1.Text = ‘’then
ComboBox1.Text := ComboBox1.Items.String[1] ;
end;
以上就是文本输入的基本部件。
楼上说的不错。
前面的fi为textfile变量，后面必有一个“指示文件存盘路径”的字符串；
你可以到
http://vip.delphifans.com/bbs/
http://www.delphibbs.com/
这两个论坛蛮不错！
这个论坛上问下，很多热心人！