.


:




:

































 

 

 

 


.




. : , , , , . , .

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, .

 





:


: 2017-02-11; !; : 510 |


:

:

.
==> ...

2040 - | 1910 -


© 2015-2024 lektsii.org - -

: 0.042 .