F9执行时,为什么我按任何一个控件,label1都不显示,错在哪里?
procedure TForm1.FormCreate(Sender: TObject);
var zy,hf,wh,ah0,ah1,ah2:string;
begin
zy:=combobox1.Text ;
if checkbox1.Checked then hf:='已婚' else hf:='未婚';
wh:=radiogroup1.Items[radiogroup1.itemindex];
if listbox1.Selected[0] then ah0:=listbox1.Items[0] else ah0:='';
if listbox1.Selected[1] then ah1:=listbox1.Items[1] else ah1:='';
if listbox1.selected[2] then ah2:=listbox1.Items[2] else ah2:='';
label1.Caption :='他是'+zy+','+hf+','+wh+',爱好'+ah0+ah1+ah2;end;