.


:




:

































 

 

 

 


қ. құ.




 

:

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





:


: 2017-02-24; !; : 1362 |


:

:

, .
==> ...

1794 - | 1563 -


© 2015-2024 lektsii.org - -

: 0.029 .