在窗体上画一个标签(名称为Label1)和一个时钟组件(名称为Timer1),添加2个按钮“开始”(Button1)和“停止”(Button2)。程序运行后,单击窗体“开始”按钮,时钟组件启动,并开始在标签中更新显示当前时间,每隔1秒钟变换一次,按停止按钮停止计时。(见图)。请填空。
然后编写如下几个事件过程:
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;
您可能感兴趣的试卷
你可能感兴趣的试题
的Object Pascal表达式是
A.一个项目中可以包含多种类型的文件
B.窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C.窗体的Hide方法和Release方法的作用完全相同
D.若工程文件中有多个窗体,可以根据需要指定一个窗体为主窗体
最新试题
数据库连接组件
下列()数据库引擎不仅可以连接Access,它还是一个通用的桌面数据库引擎。
对数据集执行插入、修改、删除操作,前提是必须具有对数据库的()权限。
打开的数据集通过BDE访问一个数据表Table,则调用Table的()方法可以使记录指针指向table第一个记录。
建立一个ADOTable对象的步骤是下列哪些选项()。
简述DBListBox和DBLookupListBox的区别。
Delphi 代码编辑器更具特色的是被称为“代码洞察”的功能,它能做到那几点?
Image 组件位于组件面板的Additional 标签上,用来把位图、()和图元文件显示在窗体中。
列表框(ListBox)组件的用途是什么?
一个表格数据感知控件DBGrid对象不但可以同时显示多个(),而且可以同时显示多行数据。