DELPHI
09.03.01
,
, ,
2016
: . . .. ,
. . ..
681.32
Delphi: 09.03.01 , , , / ; . .. , .. . , 2016. 47 .
Delphi.
.
Microsoft Word 2007 Prog_D.doc.
. 4. . 8. .: 2 .
. . , . ..
. - . , . ..
-
, 2016
Delphi, , , .
( , , , , ()), .
30 . . 4, , . 5 . , .. .
62-2007.
1.
1.1. Delphi
Delphi . Delphi 6 (. 1): (Project1); (Object Tree View); (Object Inspector); (Form1); (Unit1.pas); (Exploring Unit1.pas).
, . Delphi ().
|
|
|
:
- ;
- : 1) (Standart), 2) (View), 3) (Debug), 4) (Custom), 5) (Desktop), 6) (Internet);
- .
. 1. Delphi
, (, ). , . , , .
:
- (Standart),
- (Additional),
- 32- Windows (Win32),
- (System),
- (Data Access),
- (Data Controls),
- BDE (BDE),
- (QReport),
- (Dialogs).
( Form1) . . , .
( Unit1.pas) . . .
F12 .
. .
. : - (Properties), - (Events).
.
, . , . - .
. .
, , .
Delphi , :
1) (.dpr),
2) (.dfm),
3) (.pas),
4) (.pas),
5) (.dof),
6) (.res).
EXE. Project/Compile <Ctrl>+<F9>.
Project/Build .
Run/Run <F9>.
|
|
|
Delphi (Form 1). : (Form 1); -, ; ; , .. , Windows. Delphi 2 .
, , , .
:
Caption , ;
Color ;
Position ( TPosition) (: poScreenCenter ).
LABEL, EDIT, BUTTON
Label .
Label :
false AutoSize ;
taCenter Alignment ;
true WordWrap , ;
true (false) Transparent ();
Caption (, );
Font .
Edit . , , BackSpace, Delete, . Text.
.
, Text.
, Edit, :
- Edit1.Text - StrToFloat(Edit1.Text);
- Edit1.Text - StrToInt(Edit1.Text).
:
- FloatToStr; : Edit4.Text:= FloatToStr(rez);
- ( 6 ) FloatToStrF(rez,ffFixed,6,2);
- IntToStr.
1. , , - . Edit1 OnKeyPress:
If not (((Key>='0') and (Key<='9')) or (Key=',') or (Key='-')) then Key:= #0;
2. Enter.
. Enter , .. . , Enter.
Edit, Edit2.
Enter , .. Edit2. OnKeyPress Edit1:
If Key = #13 then
begin
Key:= #0;
Edit2.SetFocus; { SetFocus }
end;
Button , . Button. , Caption.
|
|
|
. . OnClick . :
Form1.Close;
, Form1.
:
- Standard, Mainmenu ;
- Mainmenu Menu Designer. , . ;
- Object ( ) Caption (, ) Enter;
- (), , .
. Caption Enter. .
Menu Designer .
. .
:
- ;
- Form1.Close.
:
- ( NewForm, 4- );
- ViewUnit (1- ) unit1, implementation, unit2 uses unit2;
- (F12);
- : . ShowModal; (: Form2.ShowModal;);
- ( F9).
