展开全部
定义下COMBOBOX的onchange事件即可,再根据内容对memo添加相关即可!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果你的下拉列表框中的选项是固定的,那么你可以用
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
case combobox1.ItemIndex of
0:begin
memo1.text:='jb';
end;
1:begin
memo1.text:='djb';
end
.....
end;
end;
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
case combobox1.ItemIndex of
0:begin
memo1.text:='jb';
end;
1:begin
memo1.text:='djb';
end
.....
end;
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
COMBOBOX的onchange中加入代码,
Memo1.lines.add(uppercase(combobox1.text));
Memo1.lines.add(uppercase(combobox1.text));
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
COMBOBOX的onchange事件
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
memo1.Text:=combobox1.items.strings[combobox1.ItemIndex];
end;
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
memo1.Text:=combobox1.items.strings[combobox1.ItemIndex];
end;
更多追问追答
追问
COMBOBOX中items的东西填哪?
追答
就填在items属性里。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询