Введение в технологию программирования. Ч.1. Среда объектно-ориентированного программирования Delphi. Коржов Е.Н - 26 стр.

    Ʉɨɦɩɨɧɟɧɬɵ, ɤɨɬɨɪɵɟ ɫɨɞɟɪɠɢɬ ɩɪɢɥɨɠɟɧɢɟ, ɩɟɪɟɱɢɫɥɟɧɵ ɜ ɬɚɛɥɢɰɟ.
ȼ ɬɚɛɥɢɰɟ ɩɪɢɜɟɞɟɧɵ ɫɜɨɣɫɬɜɚ, ɫɤɨɪɪɟɤɬɢɪɨɜɚɧɧɵɟ ɨɬɧɨɫɢɬɟɥɶɧɨ ɡɚɞɚɧ-
ɧɵɯ ɩɨ ɭɦɨɥɱɚɧɢɸ ɪɢɫ. 3.2.1.
  Ʉɨɦɩɨɧɟɧɬ                                   ɋɜɨɣɫɬɜɚ
  Panel1            Caption – ɨɱɢɫɬɢɬɶ
                    Align – alBottom
  BitBtn1           Kind – bkClose
  StringGrid1       Align – alClient
                    ColCount – 6
                    Rowcount – 11
                    DefaultColWidth – 100
                    Options | goEditing – True. (ȼ ɷɬɨɦ ɫɥɭɱɚɟ ɪɚɡɪɟɲɟɧɨ
                                                 ɪɟɞɚɤɬɢɪɨɜɚɧɢɟ ɹɱɟɣɤɢ)
      Form1             Caption – ɥɚɛɨɪɚɬɨɪɧɚɹ ɪɚɛɨɬɚ ʋ 2




                Ɋɢɫ. 3.2.1. Ɏɨɪɦɚ ɩɪɨɟɤɬɢɪɭɟɦɨɣ ɩɪɨɝɪɚɦɦɵ
      2. Ɉɡɧɚɤɨɦɶɬɟɫɶ ɫ ɩɪɨɝɪɚɦɦɨɣ.
      ȼ ɩɪɨɝɪɚɦɦɟ ɢɫɩɨɥɶɡɭɟɬɫɹ ɫɨɛɵɬɢɟ ɤɨɦɩɨɧɟɧɬɚ StringGrid1
OnSetEditText (Sender: Tobject; Acol, Arow: LongInt; Const Value: String).
ɗɬɨ ɫɨɛɵɬɢɟ ɜɨɡɧɢɤɚɟɬ ɩɪɢ ɡɚɜɟɪɲɟɧɢɢ ɪɟɞɚɤɬɢɪɨɜɚɧɢɹ ɹɱɟɣɤɢ (Aɫol,
Arow). ȼ ɩɚɪɚɦɟɬɪɟ Value ɨɛɪɚɛɨɬɱɢɤ ɩɨɥɭɱɚɟɬ ɪɟɡɭɥɶɬɚɬ ɜɜɨɞɚ ɢɥɢ ɪɟɞɚɤ-
ɬɢɪɨɜɚɧɢɹ ɬɟɤɫɬɚ.
      ɂɫɩɨɥɶɡɨɜɚɧɧɨɟ ɜ ɩɪɨɝɪɚɦɦɟ ɫɜɨɣɫɬɜɨ ɤɨɦɩɨɧɟɧɬɚ TstringGrid
Cells (Acol, Arow) ɨɩɪɟɞɟɥɹɟɬ ɫɨɞɟɪɠɢɦɨɟ ɹɱɟɣɤɢ ɫ ɬɚɛɥɢɱɧɵɦɢ ɤɨɨɪɞɢ-
ɧɚɬɚɦɢ (Acol, Arow). Ɉɛɪɚɬɢɬɟ ɜɧɢɦɚɧɢɟ, ɧɚ ɩɟɪɜɨɦ ɦɟɫɬɟ ɫɬɨɢɬ ɧɨɦɟɪ
ɫɬɨɥɛɰɚ, ɧɚ ɜɬɨɪɨɦ ɦɟɫɬɟ – ɧɨɦɟɪ ɫɬɪɨɤɢ. ȼ ɉɚɫɤɚɥɟ ɦɵ ɩɪɢɜɵɤɥɢ, ɱɬɨ ɧɚ
ɩɟɪɜɨɦ ɦɟɫɬɟ ɫɬɨɢɬ ɧɨɦɟɪ ɫɬɪɨɤɢ. Ɇɚɫɫɢɜ Ⱥ ɹɜɥɹɟɬɫɹ ɬɪɚɧɫɩɨɪɬɢɪɨɜɚɧɧɵɦ
ɩɨ ɨɬɧɨɲɟɧɢɸ ɤ ɦɚɫɫɢɜɭ Cells.
                          Ʌɢɫɬɢɧɝ ɩɪɨɝɪɚɦɦɵ:
unit Unit1;
{
                                    26