怎么在TComboBox中实现动态的数据？

Question

怎么在TComboBox中实现动态的数据？
比如我想在ComboBox1中实现这样的效果：下拉之后显示1995---当前年。
应该怎么做？？？？？

Answer 1

for i:=1995 to 2003 do
 combbox1.items.add(inttostr(i));

Answer 2

var
  Yearnow, Monthnow, Daynow,DayBir: Word;
  i:integer;
begin
  DecodeDate(NOW, Yearnow, Monthnow, Daynow);
  if not(yearnow<1995 ) then
   begin
     for i:=1995 to Yearnow do
        combbox1.items.add(inttostr(i));
   end;
end;

Answer 3

FormCreate或者FormShow事件不行吗？？

Answer 4

combobox1.items.clear;
for i:=1995 to 2003 do
 combbox1.items.add(inttostr(i));
combobox1.itmeindex:=0;

Answer 5

FormCreate或者FormShow事件不行吗？？
FormShow可以;
FormCreate,呵呵！你試下就知道了，如果你在程序運行中改變combbox的items的
話不行。
我建議你試一下，這樣可以幫你理解FormCreate,FormShow,FormActivate這幾個
事件的區別。

Answer 6

to:Xin1980(星)我试了FormCreate,FormShow,FormActivate,都一样呀，程序运行也没事呀。
到底有什么不一样呢？