无码高清视频|成人自拍视频|欧美成人午夜无码A片秀色直播|草美女视频网站|美女被操网站在线观看

填空題

在窗體上畫(huà)一個(gè)標(biāo)簽(名稱為L(zhǎng)abel1)和一個(gè)時(shí)鐘組件(名稱為Timer1),添加2個(gè)按鈕“開(kāi)始”(Button1)和“停止”(Button2)。程序運(yùn)行后,單擊窗體“開(kāi)始”按鈕,時(shí)鐘組件啟動(dòng),并開(kāi)始在標(biāo)簽中更新顯示當(dāng)前時(shí)間,每隔1秒鐘變換一次,按停止按鈕停止計(jì)時(shí)。(見(jiàn)圖)。請(qǐng)?zhí)羁?#65377;


然后編寫(xiě)如下幾個(gè)事件過(guò)程: 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Timer1.Enabled :=(①) ;   
    Timer1.Interval  := (②) ; 
end;  
procedure TForm1.Button1Click(Sender: TObject); begin 
  Timer1.Enabled := (③) ; 
end;  
procedure TForm1.Button2Click(Sender: TObject); begin
    Timer1.Enabled :=  (④); 
end;  
procedure TForm1.Timer1Timer(Sender: TObject); begin 
    label1.Caption  :=  TimeToStr(⑤); 
end;

答案: ①false;②1000;③true;④false;⑤time
微信掃碼免費(fèi)搜題