Question

Delphi编译问题，用 combobox，button和memo建立一个程序实现以下功能

选中下拉菜单的一项时，按下button，则将选中的值添加到memo中
麻烦写出以下几点： 1.组件调用情况； 2.属性设置情况； 3.主题代码部分。谢谢~~小弟也是别人要求帮忙的，看了下书实在是看不懂，明天急着交....所以来着求大神..

Answer 1

添加ComboBox1、Button1、Memo1三个控件

双击窗体空白处给窗体添加OnCreate事件代码如下（主要是为了以代码的方式给combobox设置可选的内容
当然也可以在属性编辑器中赵combobox的items属性来添加 一行代表一个选项）
procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.AddItem('第一项', Sender);
ComboBox1.AddItem('second项', Sender);
ComboBox1.AddItem('第3项', Sender);
end;

双击按钮添加单击事件如下
procedure TForm1.Button1Click(Sender: TObject);
begin
if ComboBox1.ItemIndex>=0 then
Memo1.Lines.Add(ComboBox1.Items.Strings[ComboBox1.ItemIndex]);
//itemindex属性表示 combobox、listbox等相似控件的选项序号从零开始 如果没有选择就是-1
//第i个选项的文字内容 表示为ComboBox1.Items.Strings[i]
Memo控件添加一行表示为 Memo1.Lines.Add(‘添加的文字内容’)
end;

不知是否来得及呢。。。楼主

追问

现在还在吗？另外一题不知道能不能麻烦下你一块写了呢~
http://zhidao.baidu.com/question/1765991851564144860.html?sort=6#answer-1564907279

Answer 2

buttononclick
combobox.text
memo.lines.add

Answer 3

这个好弄

Memo1.Lines.Add(ComboBox1.Text);