1. StringGrid. .
1 - 2 .
( ) .
"" - . , , .
, , . StringGrid.
1. StringGrid Additional. StringGrid , . StringGrid .
StringGrid, ( ):
ColCount, RowCount - , .
FixedCols, FixedRows - ( ; ) , .
DefaultColWidth, DefaultRowHeight - , .
Options.goEditing - (true) (false) .
Options.goTabs - (true) (false) Tab ( ).
2. , : StringGrid , Label1 - , Label2 - , Button1 - . :
 |
3. , StringGrid , , .
4. ( , StringGrid1).
5. , StringGrid1. Cells StringGrid1. , 0. StringGrid1 i - j - , StringGrid1.Cells [i, j] , . ( 0).
6. StringGrid ( StrGridToArr), : - ( var), - TStringGrid.
7. ( - ), OnClick Button1 StrGridToArr .
|
|
|
8. Label2, Caption (IntToStr, FloatToStr).
: .
:
1. , 3.
2. .
3. , .
4. .
5. .
6. , 7.
7. , .
8. , .
9. .
10. .
11. , 5.
12. .
2. StringGrid
1. StrGridToArr 1. Button2 ( 2).
2. ( - ), OnClick Button2.
3. Label2, , , ( ) #13 - Enter ( ), Caption Label2. , , , , Label2.AutoSize True ( Label2.AutoSize False , ).
: .
:
1. N (N ). , . .
2. ( A 1 A 2, A 2 A 3, , AN A 1, N - A).
3. ( , ) .
4. .
5. N (N ). .
6. ( , ).
7. .
8. .
9. , , . , .
10. N (N ). , .
11. .
|
|
|
12. , , , . , .
4. -. StringGrid2, , . StrGridToArr 1. StringGrid2 ArrToStrGrid, : ; - TStringGrid. StringGrid2 .
5. Button3. OnClick Button3 StrGridToArr ArrToStrGrid.
1-2.
1. ?
2. ? .
3. ?
4. ?
5. StringGrid?
6. StringGrid ?
7. .
8. ?
3. . Memo.
1. Memo , , . Memo . Standard.
2. . , : Memo1 , Memo2 - , Label1 Label2 - , Button1 - , Button2 - , . , (. ):
 |
3. Memo .
4. , .
5. Memo Lines, ( ), : Memol.Lines[0], Memol - Memo -, Lines - Memo, , , Memo.
6. Memo , OnClick Button1.
7. , OnClick Button2.
8. Memo . Memo Add Lines. : Memo2.Lines.Add(<, >). OnClick Button2.
: .
:
1. . , Delphi.
2. . , .
3. . , .
4. . .
|
|
|
5. . , .
6. . ( , - , , - ).
7. . , .
8. . , , , , , , .
9. . , .
10. . , .
11. . ( , , - ).
12. . , , , , , , .
3.
1. ?
2. ? .
3. ? ?
4. ?
5. ?
4. ()
1. 4 - 5. , : StringGrid1 , Label1, Label2 - , Button1 - , . , :
2. TStringGrid StrGridToArr2.
3. .
4. OnClick Button1 : StrGridToArr2; , ; Label2.
: .
:
1. .
2. , , . , 0.
3. , . , false.
4. .
5. , - , [-15; 15].
6. , , . , 0.
7. .
8. ( ) , . , 0.
9. .
10. .
11. , , . , 0.
|
|
|
12. , .
5. . StringGrid.
1. : StringGrid2 - ( ); Label3 - StringGrid2; Button2 - , . , :
 |
2. TStringGrid Arr2ToStrGrid.
3. . : .
4. OnClick Button2 : StrGridToArr2; , ; Arr2ToStrGrid.
: .
:
1. .
2. , .
3. , , .
4. .
5. , , .
6. : , , 3.
7. : , K ( ).
8. : , , K ( ).
9. .
10. : , , , 3.
11. : () .
12. .
.
:
1. .
Randomize. () . . .
2. .
Random. :
function Random [ (Range: Integer) ];
, Real : 0 <= X < 1. k, : 0 <= X < k.
3. .
for i:= 1 to 50 do A[i]:=Random(10); // A[i]Î[0;9]
, , , :
for i:= 1 to 50 do a[i]:=Random(20)-10; // A[i]Î[-10;9]
: . , - ( var). .
1. .
2. ( ) .
3. , .
4. ( - , ).
5. , . .
6. , .
7. .
8. , [3; 15).
9. , .
10. ( - , ).
|
|
|
11. , . .
12. , 10.
.
- . . .
: array [indexType1,..., indexTypeN] of baseType,
indexType ( ). . .
array of . array , of .
.
type TStates = array [1..50] of string; TCoordinates = array [1..3] of Integer; var States: TStates; { 50 strings } Symbols: array [0..80] of Char; { 81 characters } const Coordinates: TCoordinates = (10, 20, 5); { 3 integers }
, , Symbols[3]
, . . , , n n-.
().
, 5 () 20 :
var Table: array [1..5] of array[1..20] of Double; : var Table: array [1..5, 1..20] of Double;, , , Table[2][10] Table[2, 10].
- Low, High, Length, - . Low , High - , Length - () .
, , .
, ( type).
