justify"> також проводиться у події OnClick і відкривається модальне вікно Про програму (Малюнок 5), в якому описані короткі відомості про програму та її творця:
procedure TForm1. N3Click (Sender: TObject);
begin
Form3.Show;;
В
Малюнок 5 Модальне вікно ?
Модуль Unit3 призначений для виведення вікна, що містить відомості про закінчення гри, з який відбувався ігровий процес (Малюнок 3). Програмування здійснюється наступним чином:
Form1.Canvas.Font.Name: = 'Times New Roman';
Form1.Canvas.Font.Size: = 36;
Form1.Canvas.Font.Color: = clBlack;
Form1.Canvas.TextOut (70,160, 'Кінець гри!');
Form1.Canvas.Font.Size: = 10;
Form1.Canvas.TextOut (120,210, 'Ахметов І.Р., 2012');
form1.timer2.Enabled: = False;
clock: = 0;
Form1.Caption: = 'Парні картинки';
end;
2 Компоненти Delphi
2.1 Компонент TMainMenu
В
TMainMenu - дозволяє помістити головне меню в програму. При приміщенні TMainMenu на форму це виглядає, як просто іконка (Малюнок 1). Іконки даного типу називають невидимим (Невізуальні) компонентом, оскільки вони невидимі під час виконання програми. br/>В
Малюнок 6 Іконки компонентів на формі, створене меню
Створення меню включає три кроки:
1) приміщення TMainMenu на форму;
2) виклик Menu Designer (Малюнок 7);
) визначення пунктів меню в Menu Designer.
В
Малюнок 7 Menu Designer
Цей компонент доступний з модуля MENUS, і знаходиться на сторінці Палітри компонентів Standard.
Цей компонент представляє головне меню форми і успадковує всі методи і властивості TMenu. Особливість його в тому, що в ньому реалізований складний механізм об'єднання меню. Це необхідно з наступних причин:
1. Якщо в додатку є кілька форм зі своїми меню, то для спрощення роботи доцільно поєднати їх в одне і управляти меню з головної форми.
2. Об'єднання меню потрібно при роботі з інтерфейсом MDI і його підвікні.
. Механізм об'єднання меню використовується серверами OLE, що запускаються за місцем знаходження об'єкта OLE. Завантажуючись, сервер дописує здійсн...
