er1Timer (Sender: TObject);
{Private declarations}
{Public declarations};
: TForm4;, bm, bs: word;, m1, s1, ms1: word;, sectime1: TDateTime;, min, sec, msec: word;
// bm, bh, bs: word;: TDateTime;: TTime;, TaimMin, TaimSec: word;, TotalTaim: longint;: boolean;
Unit3;
{$ R *. dfm} TForm4.Button1Click (Sender:
TForm4.Button2Click (Sender: TObject);: = false;. Edit1.Text: = '0 ';. Edit2.Text: = '0';. Edit3.Text: = '0 ' ;. MediaPlayer1.stop;;
TForm4.Button3Click (Sender: TObject);. close;;
TForm4.Timer1Timer (Sender: TObject);: = Time; (Now, hour, min, sec, msec); (signal = true) and ((hour = bh) and (min = bm ) and (sec = bs)) then.MediaPlayer1.Enabled: = true;. MediaPlayer1.Open;. MediaPlayer1.Play;
;;
.
Unit5;
, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls;
= class (TForm): TButton;: TButton;: TButton; Button1Click (Sender: TObject); Button2Click (Sender: TObject); Button3Click (Sender: TObject);
{Private declarations}
{Public declarations};
: TForm5;
Unit1;
{$ R *. dfm}
TForm5.Button1Click (Sender: TObject);. Align: = alleft;. Image1.Picture.LoadFromFile ('1. bmp ');. Label1.Font.Color: = clblue;;
TForm5.Button2Click (Sender: TObject);. Align: = alright;. Image1.Picture.LoadFromFile ('2. bmp ');. Label1.Font.Color: = clred;;
TForm5.Button3Click (Sender: TObject);. Align: = albottom;. Image1.Picture.LoadFromFile ('3. bmp ');. Label1.Font.Color: = clgreen;
end;.
Висновок
У ході виконання курсової роботи була розроблена програма В«Годинник - будильник - таймер - секундомірВ», яка призначена для виведення часу в цифровій формі. Реалізація програми задовольняє умові технічного завдання і має дружній користувачеві інтерфейс. p align="justify"> програмування delphi часовий
Список використаних джерел
1. Кучеренко, В. П. Тонкощі програмування на Delphi [Текст]: Навчальний посібник/В. П. Кучеренко. - М.: В«Пізнавальна книга плюсВ», 2000. - 192 с.: Іл. - 4100 екз. - ISBN 5-8321-0066-2 (в пер.). p>. Архангельський, А. Я. Прийоми програмування в Delphi [Текст]: Навчальний посібник/А.Я. Архангельський. - М.: ТОВ В«Біном-ПрессВ», 2004. - 848 с.: Іл. p>. Вірт Н. Алгоритми + структури = програми. [Текст]: М.: Мир, 1985. p>. Касьянов В.М. Графи в програмуванні: обробка, візуаліза...
