Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
іНФОРМАТИКА 1.doc
Скачиваний:
24
Добавлен:
15.08.2019
Размер:
13.85 Mб
Скачать
  1. Компонент tform

Властивості форми:

property Active: Boolean-property ActiveControl: TWinControl;

Містить True, якщо вікно активно (має фокус введення) Визначає дочірній елемент, що містить фокус введення

property ActiveMDIChild: TForm;

Визначає дочірнє midi вікно з фокусом введення

TBorderIcon = (biSystemMenu, biMinimize, biMaximize, biHelp) ; TBorderIcons = set of TBorderIcon; property Borderlcons: TBorderIcons;

Визначає наявність кнопок в заголовку вікна: biSystemMenu - є кнопка виклику системного меню; biMinimize - є кнопка мінімізації; biMaximize - є кнопка максимізації; biHelp - є кнопка виклику довідкової служби

property Canvas: TCanvas;

Канва для промальовування фону вікна. Цю властивість можуть використовувати не віконні дочірні елементи

property ClientHeight: Integer;

Висота клієнтської частини вікна

property ClientRect: TRect;

Прямокутник клієнтської частини вікна

property ClientWidth: Integer;

Ширина клієнтської частини вікна

property HelpFile: Strings;  

Кожна форма може мати індивідуальний Help- файл, ім'я якого містить ця властивість. Якщо ім'я не вказане, використовується Hdp-файл додатку

property Icon: TIcon;

Містить піктограму вікна. Для головної форми ця властивість визначає також піктограму програми

property KeyPreview: Boolean;  

Якщо має значення True, форма отримує події від клавіатури, перш ніж вони поступлять в елемент з фокусом введення

property MDIChildCount: Integer;

У рамковому MDI-вікні указує кількість пов'язаних з ним дочірніх midi-oкнo

property MDIChildren[I: Integer]: Tforms;

У рамковому MDI-вікні відкриває доступ до I-му дочірньому вікну

property Menu: TMainMenu;

Містить головне меню вікна

TModalResuit = Low(Integer)..High(Integer) ; property ModalResult: TModalResuit;

Для модального вікна містить результат діалогу

property PixelsPerInch: Integer;

Визначає роздільну здатність вікна в пікселях на один лінійний дюйм для етапу конструювання форми

TPosition = (poDesigned, poDefault, poDefaultPosOnly, poDefaultSizeOnly, poScreenCenter) ; property Position: TPosition;  

Визначає положення і розміри вікна у момент його появи на екрані: poDesigned - такі ж, як на етапі конструювання вікна; poDefault - положення і розміри визначає Windows; poDefaultposOnly - положення, як на етапі конструювання, розміри визначає Windows; л poDefaultSizeOnly - розміри, як на етапі конструювання, положення визначає Windows; poScreenCenter - в центрі екрану з розмірами, як на етапі конструювання

TPrintScale = (poNone, poProportional, poPrintToFit); property PrintScale: TPrintScale;  

Визначає масштабування вікна при його друці на принтері: poNone - немає масштабування; кожен піксель вікна відтворюється однією крапкою на папері; рорrороrtional - форма масштабується так, щоб її образ на папері був максимально схожий на її зображення на екрані; poPrintToFit- форма друкується з такими ж пропорціями, як на екрані, але з розмірами, за полняющими лист паперу

property Scaled: Boolean;

Разрешает/запрещает масштабувати форму, якщо значення її властивості PixelPerinch відрізняється від поточного дозволу екрану

TileMode = (tbHorizonial, tbVertical);

property TileMode: TTileMode;

Визначає стиль розташування дочірніх вікон MDI-додатку при їх впорядкуванні мозаїкою

property WindowMenu: TMenuItem;

Визначає пункт головного меню рамкового MDI-вікна, до якого додаються опції дочірнього вікна

TWindowState = (wsNormal, wsMinimized, wsMaximized) ; property WindowState: TWindow State;

Визначає стан вікна у момент його появи на екрані: wsNormal - звічайне

Вікно; wsMinimized - мінімізовано до піктограми; wsMaximized - розкрито на важ екран

Примітка

Якщо в безлічі властивості BоrderIcon прибрати кнопки biMinimize: biMaximize, а у властивість WindowState помістити значення wsMaximized, форма займе весь простір екрану, включаючи нижню панель завдань.

Методи форми:

procedure Arrangelcons;

 

Упорядковує піктограми закритих дочірніх вікон MDI-додатку

procedure Cascade;

Має в своєму розпорядженні дочірні MDI-вікна каскад

procedure Close;

 

Закриває вікно. Для головного вікна завершує роботу програми

function CloseQuery: Boolean

Повертає True, якщо можна закрити вікно

procedure DefocusControl(Control: TWinControl;

Removing: Boolean);

Відбирає фокус введення у дочірнього елементу Control. Якщо при цьому Removing=True, фокус введення отримує форма

procedure FocusControl(Control: TWinControl);

Передає фокус введення дочірньому елементу Control

function GetFormImage: TBitmap;

Містить поточне зображення вікна форми

procedure Next;

Робить активним наступне mdi-okнo

procedure Previous;

Робить активним попереднє mdi-okнo

procedure Tile;

Располагает дочерние MDI-окна мозаикой

procedure Print;

Друкує вікно на принтері

procedure Release;

Чекає закінчення обробки всіх подій форми і її дочірніх елементів, після чого знищує вікно і звільняє всю пов'язану з ним пам'ять

procedure SendCancel- Mode(Sender: TControl);  

Відновлює початковий стан вікна: звільняє мишу, припиняє прокрутку і закриває меню

procedure SetFocus;

Передає фокус введення формі. Форма при цьому повинна бути активною і видимою

procedure Show;

Показує форму в немодальному режимі

function ShowModal: Integer;

Показує форму в модальному режимі і повертає результат діалогу

Події форми:

property OnActivate: TNoti

fyEvent;

Виникає у момент активізації вікна (при отриманні фокусу введення)

TCloseAction = (caNone, caHide

caFree, caMinimize);

TCloseEvent = procedure(Sender:

TObject; var Action: TCloseAction) of object;

property OnClose: TCloseEvent;

Виникає перед закриттям вікна. Параметр Action уточнює необхідні дії: саNоnе - не закривати вікно; caHide - заховати вікно; caFree - знищити вікно; caMimimize - мінімізувати вікно

TCloseQueryEvent = proce

dure(Sender: TObject; var CanClose: Boolean) of object;

property OnCloseQuery: TCloseQueryEvent;

Возникает перед закрытием окна. В параметре canclose обработчик сообщает о возможности закрытия окна

property OnCreate: TNotifyEvent;  

Виникає при створенні вікна, але до його появи на екрані

property OnDeactivate: TNotifyEvent;

Виникає при передачі активності іншому вікну тієї ж програми

property OnDestroy: TNotifyEvent;

Виникає перед руйнуванням вікна

THelpEvent = function (Command: Word; Data: Longint; var CallHelp: Boolean): Boolean of object;

property OnHelp: THelpEvent;

Виникає при зверненні до довідкової служби. У параметрі callHelp обробник повідомляє про можливість отримання допомоги

property OnHide: TNotifyEvent;

Виникає перед зникненням вікна

property OnPaint: TNotifyEvent;

Виникає при необхідності промальовування вікна

property OnResize: TNotifyEvent;

Виникає при зміні розмірів вікна

property OnShow: TNotifyEvent;

Виникає при появі вікна на екрані