delphi下推选择框
时间: 2023-07-21 09:00:37 浏览: 138
在Delphi中,你可以使用TComboBox组件来创建一个下拉选择框。下面是一个简单的示例代码:
```delphi
unit MainForm;
interface
uses
// 引入需要的单元
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
ComboBox1: TComboBox; // 创建一个TComboBox组件
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
// 在窗体创建时初始化下拉选择框
ComboBox1.Items.Add('选项1');
ComboBox1.Items.Add('选项2');
ComboBox1.Items.Add('选项3');
end;
end.
```
在窗体创建事件(FormCreate)中,我们添加了三个选项到ComboBox1组件中。你可以根据你的需求添加更多的选项。
希望这个简单的示例能够帮助到你。如果你还有其他问题,请随时提问!