. : , , , , . , .
Delphi 7.0: TForm, TLabel, TDriveComboBox, TMainMenu, TListView, TImageList, TStatusBar, TButton, TAboutBox.
TFORM
Delphi 7.0, . ( TForm) ( 1), ( 2), . Form1 TForm1, , .
File/New/Form (//). . Form2, Unit2. .
1
TForm
Active | True, |
ActiveControl | , |
BorderIcons | |
BorderStyle | |
Canvas | |
FormStyle | |
ClientRect ClientHeight ClientWidth | |
DropTarget | True, |
Floating | True, |
FormState | |
HelpFile | |
Icon | , , |
KeyPreview | True, , |
Menu | |
ModalResult | , , |
PixelsPerInch | . |
Parent | "" |
Position | |
PrintScale | |
Scaled | True, PixelsPerInc |
Visible | True, |
WindowState | (, ..) |
|
|
, , , , , . Project/Options, Forms Main form .
2
TForm
OnActivate | |
OnClose | |
OnCloseQuery | |
OnCreate | |
OnDeactivate | |
OnDestroy | |
OnHelp | |
OnHide | (Visible=False) |
OnPaint | |
OnShortCut | , |
OnShow | (Visible=True) |
TLABEL
.
3
, TLabel
Align | |
Alignment | |
Caption | , |
Color | |
Constraints | |
Cursor | |
Font | |
Height | |
Name | |
Top | |
Transparent | , |
Visible | |
Width | |
Procedure SetBounds | |
Procedure SetFocus | |
constructor Create | |
OnClick | |
OnDblClick | |
OnMouseEnter | |
OnMouseLeave |
, - .
TMAINMENU
TMainMenu , Windows.
, Standard () TMainMenu . 4.
TMainMenu , TEdit TLabel, . , , . , . . MainMenu1. . Localizable () Caption () , Enter. , .
|
|
4
TMainMenu
AutoHotkeys: TMenu.Item.AutoFlag | maAutomatic maParent, Delphi , , . maManual, RethinHotkeys |
AutoLineReduction: TMenu.Item.AutoFlag | maAutomatic maParent, Delphi , , . maManual, RethinkLines |
Items[Index:Integer]:TMenuItem | |
OnAdvancedDrawItem: TAdvancedDrawItemEvent | |
OnClick: TNotifyEvent | |
OnDrawItem:TMenuDrawItemEvent; | |
Procedure Add | |
Procedure Clear | Items |
Procedure Delete | Index Items |
Function GetImageList | |
TCustomImageList | ImageIndex |
Function GetParentMenu: TMenu | , |
Function IndexOf: Integer | Item |
Procedure InitiateAction | |
Procedure Insert | Item Index |
TMainMenu , .
TSTATUSBAR
5
, StatusBar
Height | |
Font | |
SizeGrip | |
Alignment | |
Width | |
Style |
StatusBar ( ).
TBUTTON
TButton , , . color . 6.
6
TButton
Cancel | True, OnClick Esc |
Default | True, OnClick Enter |
ModalResult: TModalResult | , |
Property OnClick |
|
|
TButton .
TABOUTBOX
, , (Label, Image) AboutBox.ShowModal ( , , ..). " ".
TDRIVECOMBOBOX
DriveComboBox (). . Drive, , Text.
TextCase : tcUpperCase , tcLowerCase .
DriveComboBox , DirectoryListBox, DirList DriveComboBox. DirectoryListBox. , OnChange DriveComboBox
DirectoryListBox1.Drive:= DriveComboBox1.Drive;
, DriveComboBox1, Drive DirectoryListBox1.
DriveComboBox DirectoryOutline:
DirectoryOutline1.Drive:= DriveComboBox1.Drive;
TLISTVIEW
Windows 95/98 , , .
ViewStyle, . : vsIcon , vsSmallIcon , vsList , vsReport . Windows .
, :
( MIcon), ( MSmallIcon), ( MList) ( MReport);
GroupIndex RadioItem true;
Checked ViewStyle , .
, Items. , . , TreeView. NewItem NewSubItem. : , vsReport .
Caption , . , , vsReport.
ImageIndex . , ImageList. LargeImages vsIcon SmallImages vsSmallIcon, vsList vsReport. 0. -1 ( ), . StateIndex Item Properties . . , StateIndex, , ImageList, StateImages ListView.
|
|
Columns vsReport ShowColumnHeaders ( ), true. Columns , ListView Columns .
Checkboxes . . , Items[i], Checked.
HotTrack HotTrackStyles . HoverTime ( Delphi 5) .
Selected .
Delphi 5 ListView WorkAreas.
( ), vsIcon vsSmallIcon. WorkAreas , Items, . WorkAreas ( ), ListView. Add. Rect TRect . Color , . DisplayName . , , ShowWorkAreas true.
TIMAGELIST
ImageList , , 0. . , .
TImageList . TImageList ImageList Editor.
, Add, Delete, Clear. , . . , , , , . , , .
. , , .., . .
7.
7
TImageList
Height | Integer | |
Width | Integer | |
AllocBy | Integer | , |
Count | Integer | . |
. , . Drag & Drop, . , TListView, : , . , , . exe .
|
|
TListView TDriveComboBox, . TLabel, .