Delphi TComboBox 设置默认值

本文整理自网络，侵删。

 

for I := 0 to 200 do
begin
  Edit_Y.Items.Add((1949+i).ToString);
end;

Edit_Y.ItemIndex:=Edit_Y.Items.IndexOf(formatdatetime('yyyy',now()));


 

相关阅读 >>

Delphi 2009 泛型容器单元(generics.collections)[3]: tstack<t>

Delphi 数组定义

Delphi 读取流 image1 stream 加载到image2 timage 对象

Delphi getforegroundwindow 与 getactivewindow 的区别

Delphi 程序窗体最大化、组件居中显示代码

Delphi有用的函数extractfilename、extractfilepath

Delphi的idhttp报iohandler value is not valid错误的原因

Delphi过滤字符串头部和尾部得到中间部分

Delphi 写开关防火墙代码

Delphi 悬浮窗口 浮动窗口 迅雷下载浮动窗口的实现

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi TComboBox 设置默认值