Question

新手：delphi中combobox下拉框问题

我在combobox下拉中设置了 张三，李四，赵武，王六，孙八 五个人名，我现在的意思是，我点击combobox按钮，如果选择了张三就弹出一个窗体，选中李四则弹出另外一个窗体，依次类推，怎么去实现。本人新手，最好给出简单的实现例子。实现就给分，

Answer 1

这个不难实现：以设置张三就弹出窗口form2为例
在combobox1的onchange事件中添加如下代码：（或者你双击combobox1后添加如下代码）
if combobox1.Text='张三' then
form2.Showmodal;
同理：选'李四' 弹出 窗体form3如下
if combobox1.Text='李四' then
form3.Showmodal;
以此类推

楼主注意事先创建form2跟form3并且要在unit1单元的implementation 后面加上uses unit2,unit3; 哦，谢谢楼主赏分！！嘿嘿

Answer 2

//uses Unit3, Unit4;别忘了应用单元
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if SameText(ComboBox1.Text,'张三') then
Form3.Show
else if SameText(ComboBox1.Text,'李四') then
Form4.Show;
//继续加其他

end;

Answer 3

combobox1的onchange事件或click事件中添加代码。
如
if combobox1.text :='张三' then
begin
form2.showmodal;
end;
以此类推。
但是要先建好相应窗口，另外在你用combobox控件里引用你要弹出的窗口的单元；

Answer 4

onchange事件中：
case combobox1.itemindex of
0:form2.show;
1:form3.show;
2:form4.show;
end;