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 最简单的判断数字函数

Delphi2007-Delphi2010 程序不出现在任务栏的方法

Delphi 通过程序窗体句柄获取程序路径

Delphi 检测程序有没有被dll注入的代码

Delphi strtohexstr 字符串转换hex

Delphi 每年、月、周、日的开始与结束的时间

Delphi读写文本文件

Delphi xe5实现随机大小写字幕或者数字

Delphi windowsapi: muldiv

Delphi #9、 #10、 #13 表示的意思

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

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