.


:




:

































 

 

 

 


IJвҲ Ұ




3.1 ғ ұққ

 

ү , ң ғ ( 7).

 

 

7. ғң ү ө

 

ү ң ә min max ! ү Borland Delphi ғң button ( 8).


 

8. ң ғ ө

 

ғ , ғ ң StringGrid .

StringGrid ұ қ ү ү . ұ ғ ұ.

қ ұ ғң ә ғ ғ әқң ө ң ө қ қ қ.

қ қ ҥ ә ғ қ қ . Қ:

FixedRows қң .

FixedCols - қң ғ .

RowCount ұ ғ қ ұ

ColCount - ұ ғ ғ қ ұ (ғқ , қң қң ө ө .

ғғ қ қ Cells[Acol, AROW:integer]: stringқң ө ү . ұғ, Acol - ң ғө, AROW - ө, ө ө .

Top өң ғ ң ғ қққ.

Left - өң қ ң қ қққ.

Width өң .

Height өң .

Font ұқң ҧ ғ ҥ қ.

Options.goEditing ұғң ұ ө ү ө. ққ ә ғ, ө ұқ , ғ ұқ .

Options.goTab ң ұғ <Tab> ө ү ө. ққ ә ғ,ө ұқ , ғ ұқ .

Options.GoAlwaysShowEditor ң ө ү ө.

ң ә ң ү ә ң ғ ү Label ( 9).

 

Label1.Caption:=ң ү =+IntToStr(max)+ +ң =+IntToStr(min);

buf:=a[imax, jmax];

a[imax, jmax]:=a[imin, jmin];

a[imin, jmin]:=buf;

for i:=0 to n-1 do

for j:=0 to m-1 do

begin

StringGrid2.Cells[I,j]:=IntToStr(a[I,j]);

f:=true;

End;

 

9. ә ә ғ ғқ

10. ң ң ө

 

ғң Borland Delphi ң қ.

ғ ә құ,ө ғ. ұ ә құ әғң ұ . ә ңғ ғ . Delphi ү Object Pascalғ .

ң ғ ққ Windows қ қ ғқ ғ ә ғ.

ұ ғ ғ қ ү ғқ қ .

ҳ қ ғ құ ү ғ құ ө, ө . ң қ ө ө:

Delphi ұ ң ү үқ. ғң ұ ғ ғқ.


 

 

, , , қ ә ғ, .

ғ қ ә қ . ғ ғ ғ ғ ғ қ ғ қ. Delphi- ұ ғ . құ құқ .

Қ қ (Integer,real) ә қ ( ) қ ү, ң ғ ұғ қ. қ ө ң ә ң ғ қ , қ ғұ .

қ ұ қ B (10x10) . ң ү ә ң ң . ә ң ү, ң ә ғ қ өң . ң ө . ң қ .қ ұң қ қ .






:


: 2017-02-28; !; : 482 |


:

:

: , .
==> ...

1976 - | 1604 -


© 2015-2024 lektsii.org - -

: 0.01 .