Delphi.
.
Delphi , Object Pascal. (RAD , Rapid Application Development ) , , , , Object Pascal, .
:
1. Delphi:
- Delphi , : , , , , , ;
- Standard: Label (), Edit ( ), MEMO ( ), Button ( ), Panel ( ). Additional: BitBtn ( ) StaticText ( ). .
- Object Pascal. , : , . : , , , , .
-
Delphi , , . ( ) (.. Object Pascal) . , Delphi. , , Object Pascal. , , , . , , , . , , , . 1.
Unit1 Form1.
: , , . , .
|
|
Delphi :
*.PAS ;
*.DFM ;
*.DCU : *.PAS *.DFM.
Unit < > Interface { , Delphi, , .} Implementation { , , , , . Interface .} Initialization { , .} Finalization { , .} |
. 1. .
*. DCU , *.EXE.
*.DPR. .
* , .
Delphi , . . , .. , , .
, Delphi :
Program Project1; Uses Forms, Unit in Unit.pas (Form1); {$R*.Res} Begin Application. Initialize; Application. CreateForm(TForm1, Form1); Application. Run; End. |
( *.DPR) ( *.EXE) . Project1, Program . Uses Forms Deplhi, , , ( ).
, , Form1 .
, Delphi , , Delphi, Project/View Source (/ ). , Delphi.
Delphi {$R*.DFM}. . Delphi *.DFM. .
, , .
|
|
Deplhi . Delphi . , .. Windows: Form1, , , , , .. *.DFM *.PAS ( ).
, .
, . .
, :
Align ( alNone);
Aligment - . : TaLeftJustify , TaRightJustify . , TaCenter - ;
AutoSize True ;
Caption ( ). ;
Color . , , clGreen, ( - $008000);
Enable True, ( ), ;
Height ;
Hint (), ;
Left . ;
Name (), ;
ParentColor True, , Color;
TabOrder Tab. . TabOrder . , , TabOrder 0, . TabOrder TabStop;
TabStop , ;
, ;
Top ;
Transparent True ;
Visible ;
Width ;
WordWrap True . False.
, (, ), , , (, ). .
|
|
. , () , , implementation.
, , , . Object Pascal, Procedure (), Function (). [1,2,3,4], . , , implementation {SR*.DFM}.
Delphi , , Events . , . . , OnClick, .
Button, . , . , , Edit Button , .
, Delphi . , , Event, OnClick . . 2.
Procedure TForm1.Button1Click (Sender: TObject): begin end; |
. 2. .
Object Pascal, .
Delphi , . , , , , , , , .
TEdit TMemo. Object Pascal , . , { }, //, , .
. , , , . . , . :
- , ;
|
|
- ;
- .
, .
. , . ( ) . , , , . :
;
;
;
;
();
;
-.
, . .
. () , : - 0, - 1 .. . (. 1).
1.
Low() | |
High() | |
Ord() | X |
Pred() | X |
Succ() | X |
Dec() | X |
Inc() | X |