不知为什么下面的程序初始化是没有执行的?
procedure TForm1.FormCreate(sender:TObject);
begin
ComboBox1.ItemIndex :=0;
Shape1.brush.Color :=clwhite;
shape2.Brush.Color :=clwhite;
shape3.Brush.Color :=clwhite;
shape4.Brush.Color :=clwhite;
panel2.Enabled:=true;
end;
procedure TForm1.FormCreate(sender:TObject);
begin
ComboBox1.ItemIndex :=0;
Shape1.brush.Color :=clwhite;
shape2.Brush.Color :=clwhite;
shape3.Brush.Color :=clwhite;
shape4.Brush.Color :=clwhite;
panel2.Enabled:=true;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货