:
1. өң .
2. .
3. ұғ .
1. өң . ұ ң қ ү Unit1 . өң қ . Ә ғ , ң ғғ ө ө. ѳң ғң ү , ұ ү (Unit) ә. ү ң ү өң . ұ ғң ә . ә ө ө ө. ғ ә - ө ұ . ұ ұң ө ө қ. ұ //, { }, * *- ғ ө . , ү ү қ. ұ .
unit Unit1; {ң }
interface { ө }
uses {қ қғ }
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
Type { }
TForm1 = class (TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private {ң ө}
{ Private declarations }ұ ұқ, , , ғ , қ ө.
Public // ң қ ө
{ Public declarations } ұ қ ө ұқ, , , ғ .
end;
var { , ө}
Form1: TForm1; { ұқ, , , ғ }
Implementation
{ң ө}
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
Begin
-әң ғ
end;
End.
ү ғ ғ ө. ғ . , қ ғ қ .
ғ . қ ғ . ұ ә қ , ә қғ ә F9 қ ү ғ . ү, ғ қ ғ . ң ғ ғ . / ғң қ , қ ғ/. ә . қ, қ ғ ғ ұ ғ . ғ Delphi- қ ң өң қ.
|
|
2. . ұ ң құ ө. ө + ң , ғ . ұ қ, ң қ қ қ . Project.exe1ө , ә қ. қғ, ө, қ қғ, ғ қғ .
3. ұғ . ұ ү ә әң . ұғ 1-ң : 1 , 2 , 1, 1 ө. ғ ң қ ө , қ ғ .
қ ұқ:
1. ғ қ ?
2. қ ұ?
3. қ ?
4. ұғғ ө?
қ. .
:
1. құ.
2. Delphi өң.
1. құ. ұ ғ ғ қ . ғ қ ң ө ң қ ү ғ ү .
ң құ ө:
қ;
;
(ү ) ;
.
қ Unit қ ө , ң , ү ү қ. ө interface ө ; implementation ө . ң ң end ө ү қғ. ө ұ ғ ң :
Unit Unit1;
Interface //
Implementation //
End.
қ (, , ) , қ қ ө, ұ ң ұ . ғ ө ң өң ң ңғ қ . қ, ұ ң қ ү .
|
|
ғ, қ құғ , ң ө ү . ғ , , ғ ә қ ү ү .
Unit1 қ қ ң, ө ә ө:
Unit Unit1;
Interface
Uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, ExtCtrls;
Type
TfmExemple= class (Tform)
Panel1: Tpanel;
BbRun: TbitBtn;
BbClose: TbitBtn;
Edinput: Tedit;
LbOutput: Tlabel;
MmOutput: Tmemo;
Private {Private declarations}
Public
{Private declarations}
End;
Var fmExample:TfmExample;
Implementation
{SR*.DFM}
End.
әң ә Delphi- құғ, қ ғ ғ қ қ ү , ө . (TfmExample ) ә (fmExample ) ғ.
ң :
TFmExample=class(Tform)
Panel1:Tpanel;
BBRun:TbitBtn;
BBclose:TbitBtn;
Edinput:Tedit;
LbOuutput:Tlabel;
mmOutput:Tmemo;
Private {Private Declarations}
Public {Public Declaration}
End;
ө ғ, Delphi-ң қ ү ү құң қ. құ ү ә , ұ (ү ) .
2. Delphi өң.
Object Pascal ү құғ ғ , ө, Texample1 ұ . ө ң type қ ө ұ, ғ өң ө.
Tform Windows құғ ә қғ қң ә .
TFmExample= class (Tform)
TFmExample ң ғ ө, class қ ө қң қ ң ө.
қ ң қ қң - ұққ ұ қ ө ә ң ү ң, ғғ ң ң . ұ ң ұ , қ қ қ ү қ. ә қғ қ құ, ң ң Tobject қ (Delphi- қғ қ ), ң ң ө ғ - ұқ .
FmExample ү қ , . қ ұ ң var қ ө .
|
|
Unit <>;
interface
< ө>
implementation
< ө >
initialization < ө>
finalization
<қ ө>
end.
Unit ө (); қ ; <> - (ұ); interface ө (); ң ө ; implementation ө (); ө ; initialization ө (); finalization ө (ң); ңғ ң қ; end ө ңң .
қ ұқ:
1. ?
2. ң қ қ ?
3. .
4. .