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

Delphi编译问题,用 combobox,button和memo建立一个程序实现以下功能,第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

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

感觉上面已经说的很详细了啊,install component 这凯锋只是一种安装方法,如果安装不能正常散孙培运行,可能需要你Tools-->Environment Options 增冲唯加路径


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11970789.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-20
下一篇 2023-05-20

发表评论

登录后才能评论

评论列表(0条)

保存