bel, командних кнопок Button).
В основні властивості форми, які визначають її вигляд, і поведінка під час роботи програми входять: - ім'я форми (призначене для управління формою і доступу до її компонентів) - текст заголовка-ширина форми-висота форми-вид кордону. Межа може бути звичайною (bsSizeable), тонкої (bsSingle), або відсутні (bsNone). - Кнопки управління вікном (згорнути, розгорнути). - Значок в заголовку діалогового вікна, що позначає кнопку виведення системного меню. - Колір фону. - Шрифт.
Всі ці властивості програміст може змінювати на свій розсуд і смак.
Для того щоб форму зробити функціональної і працездатною в неї потрібно додати компоненти. Компоненти, необхідні для розробки «Емулятора робочого столу Windows», міститися на вкладках:
Standart:
MainMenu, PopupMenu, Label, Edit, GroupBox, Panel, CheckBox, ComboBox використовувалися для створення меню, перегляду інформації, добавленіятекстових міток, створення гнучкого інтерфейсу.:
BitBtn і SpeedButton використовуються для організації кнопок навігації, Image для вставки зображень. - елемент для рельєфного оформлення інтерфейсу.
У своїй роботі я користувався т Технологією ADO.
ADO - це технологія стандартного звернення до реляційних структурам даних від Microsoft. Вона аналогічна BDE за призначенням і те саме що йому за можливостями.
В Палітрі компонентів Delphi є сторінка ADO, що містить набір компонентів, що дозволяють створювати повноцінні програми БД, які звертаються до даних через ADO.
Як керівництво до використання, я переглядав навчальне відео # «justify">.
2.2 Листинги
Лістинг № 1.Unit1;
, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, DB, ADODB, ExtCtrls, DBCtrls, Grids, DBGrids;
=class (TForm): TDataSource;: TDBGrid;: TDBNavigator;: TADOConnection;: TADOQuery;: TButton;: TEdit;: TButton;: TButton;: TButton;: TButton;: TButton;: TLabel;: TButton;: TLabel;: TEdit;: TButton;: TLabel;: TEdit;: TLabel;: TEdit;: TButton; Button1Click (Sender: TObject); Button2Click (Sender: TObject); Button3Click (Sender: TObject); Button4Click (Sender: TObject); Button5Click (Sender: TObject); Button6Click (Sender: TObject); Button7Click (Sender: TObject); Button8Click (Sender: TObject); Button9Click (Sender: TObject);
{Private declarations}
{Public declarations};
: TForm1;
{$ R *. dfm}
TForm1. Button1Click (Sender: TObject);. Active:=False;. SQL. Text:=«SELECT Гості. Прізвище, гості. Ім'я, гості. По батькові, Регістр. Номер, Регістр. Дата_заселенія, Регістр. Дата_виезда »
+ «FROM Гості INNER JOIN Регістр ON Гості. Id_гостя=Регістр. Id_гостя WHERE (реєстр. Дата_заселенія <= # »+ Edit1. Text +« #) AND (реєстр. Дата_виезда>=# »+ Edit1. Text +« #) »;. Active:=True;;
TForm1. Button2Click (Sender: TObject);. Active:=False;. SQL. Text:=«SELECT * FROM Гості»;. Active:=True;;
TForm1. Button3Click (Sender: TObject)...
