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) . ң ү ә ң ң . ә ң ү, ң ә ғ қ өң . ң ө . ң қ .қ ұң қ қ .
|
|