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

UptoLike

Составители: 

ɚ)
ɛ)
Ɋɢɫ. 3.2.2. Ɏɨɪɦɚ ɩɪɨɟɤɬɢɪɭɟɦɨɣ ɩɪɨɝɪɚɦɦɵ:
ɚɨɫɧɨɜɧɨɟ ɦɟɧɸ; ɛɫɨɨɛɳɟɧɢɟ «ɇɟɜɟɪɧɵɣ ɫɢɦɜɨɥ»
1.3. Ɇɟɯɚɧɢɡɦ ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ
1. ɉɪɢ ɤɚɠɞɨɣ ɢɫɤɥɸɱɢɬɟɥɶɧɨɣ ɫɢɬɭɚɰɢɢ ɫɪɟɞɚ Delphi ɩɟɪɟɯɜɚɬɵɜɚɟɬ
ɭɩɪɚɜɥɟɧɢɟ ɩɪɨɝɪɚɦɦɨɣ. Ⱦɥɹ ɬɨɝɨ ɱɬɨɛɵ ɫɚɦɨɦɭ ɭɩɪɚɜɥɹɬɶ ɢɫɤɥɸɱɢɬɟɥɶ-
ɧɨɣ ɫɢɬɭɚɰɢɟɣ, ɧɟɨɛɯɨɞɢɦɨ ɨɬɦɟɧɢɬɶ ɬɚɤɨɟ ɩɨɜɟɞɟɧɢɟ ɫɪɟɞɵ. Ⱦɥɹ ɷɬɨɝɨ
ɜɵɡɨɜɢɬɟ ɨɩɰɢɸ Tools/Debugger ɢ ɧɚ ɫɬɪɚɧɢɰɟ Language Exceptions ɭɛɟ-
ɪɢɬɟ ɜɵɛɨɪ ɜ ɩɟɪɟɤɥɸɱɚɬɟɥɟ Stop on Delphi Exceptions.
2. ȼ ɩɪɨɝɪɚɦɦɟ ɢɫɩɨɥɶɡɭɟɬɫɹ ɦɟɯɚɧɢɡɦ ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ. ȿɫɥɢ ɜ
ɹɱɟɣɤɭ ɜɜɨɞɢɬɫɹ ɤɚɤɨɣ-ɥɢɛɨ ɫɢɦɜɨɥ ɤɪɨɦɟ ɰɢɮɪɵ ɢ ɞɟɫɹɬɢɱɧɨɣ ɬɨɱɤɢ, ɬɨ
ɧɚ ɷɤɪɚɧ ɜɵɜɨɞɢɬɫɹ ɫɨɨɛɳɟɧɢɟ: «ɇɟɜɟɪɧɵɣ ɫɢɦɜɨɥɪɢɫ. 3.2.2ɛ.
ɇɨɜɵɟ ɤɨɦɩɨɧɟɧɬɵ, ɫɜɨɣɫɬɜɚ, ɫɨɛɵɬɢɹ
TstringGrid
ColCount Ʉɨɥɢɱɟɫɬɜɨ ɫɬɨɥɛɰɨɜ ɬɚɛɥɢɰɵ
RowCount Ʉɨɥɢɱɟɫɬɜɨ ɫɬɪɨɤ ɬɚɛɥɢɰɵ
DefaultColWidt
h
ɒɢɪɢɧɚ ɫɬɨɥɛɰɚ ɬɚɛɥɢɰɵ
Cells[ACol,
ARow]
Ɉɩɪɟɞɟɥɹɟɬ ɫɨɞɟɪɠɢɦɨɟ ɹɱɟɣɤɢ ɫ ɬɚɛɥɢɱɧɵɦɢ ɤɨɨɪ-
ɞɢɧɚɬɚɦɢ (ACol, ARow)
Options/goEditin
g
Ɂɚɞɚɧɨ True. ȼ ɷɬɨɦ ɫɥɭɱɚɟ ɪɚɡɪɟɲɟɧɨ ɪɟɞɚɤɬɢɪɨɜɚ-
ɧɢɟ ɹɱɟɣɤɢ
ɋɨɛɵɬɢɹ
OnSetEditText ȼɨɡɧɢɤɚɟɬ ɩɪɢ ɡɚɜɟɪɲɟɧɢɢ ɪɟɞɚɤɬɢɪɨɜɚɧɢɹ ɹɱɟɣɤɢ
(Aɋol, ARow). ȼ ɩɚɪɚɦɟɬɪɟ Value ɨɛɪɚɛɨɬɱɢɤ ɩɨɥɭ-
ɱɚɟɬ ɪɟɡɭɥɶɬɚɬ ɜɜɨɞɚ ɢɥɢ ɪɟɞɚɤɬɢɪɨɜɚɧɢɹ ɬɟɤɫɬɚ
3. ȼɵɡɨɜɢɬɟ ɩɭɧɤɬ ɦɟɧɸ File| Save project as ɢ ɫɨɯɪɚɧɢɬɟ ɦɨɞɭɥɶ ɤɚɤ
U2, ɩɪɨɟɤɬ ɤɚɤ Project2 ɜ ɤɚɬɚɥɨɝ Lab_2.
29
                  ɚ)                                  ɛ)
              Ɋɢɫ. 3.2.2. Ɏɨɪɦɚ ɩɪɨɟɤɬɢɪɭɟɦɨɣ ɩɪɨɝɪɚɦɦɵ:
          ɚ – ɨɫɧɨɜɧɨɟ ɦɟɧɸ; ɛ – ɫɨɨɛɳɟɧɢɟ «ɇɟɜɟɪɧɵɣ ɫɢɦɜɨɥ»
     1.3. Ɇɟɯɚɧɢɡɦ ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ
     1. ɉɪɢ ɤɚɠɞɨɣ ɢɫɤɥɸɱɢɬɟɥɶɧɨɣ ɫɢɬɭɚɰɢɢ ɫɪɟɞɚ Delphi ɩɟɪɟɯɜɚɬɵɜɚɟɬ
ɭɩɪɚɜɥɟɧɢɟ ɩɪɨɝɪɚɦɦɨɣ. Ⱦɥɹ ɬɨɝɨ ɱɬɨɛɵ ɫɚɦɨɦɭ ɭɩɪɚɜɥɹɬɶ ɢɫɤɥɸɱɢɬɟɥɶ-
ɧɨɣ ɫɢɬɭɚɰɢɟɣ, ɧɟɨɛɯɨɞɢɦɨ ɨɬɦɟɧɢɬɶ ɬɚɤɨɟ ɩɨɜɟɞɟɧɢɟ ɫɪɟɞɵ. Ⱦɥɹ ɷɬɨɝɨ
ɜɵɡɨɜɢɬɟ ɨɩɰɢɸ Tools/Debugger ɢ ɧɚ ɫɬɪɚɧɢɰɟ Language Exceptions ɭɛɟ-
ɪɢɬɟ ɜɵɛɨɪ ɜ ɩɟɪɟɤɥɸɱɚɬɟɥɟ Stop on Delphi Exceptions.
     2. ȼ ɩɪɨɝɪɚɦɦɟ ɢɫɩɨɥɶɡɭɟɬɫɹ ɦɟɯɚɧɢɡɦ ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ. ȿɫɥɢ ɜ
ɹɱɟɣɤɭ ɜɜɨɞɢɬɫɹ ɤɚɤɨɣ-ɥɢɛɨ ɫɢɦɜɨɥ ɤɪɨɦɟ ɰɢɮɪɵ ɢ ɞɟɫɹɬɢɱɧɨɣ ɬɨɱɤɢ, ɬɨ
ɧɚ ɷɤɪɚɧ ɜɵɜɨɞɢɬɫɹ ɫɨɨɛɳɟɧɢɟ: «ɇɟɜɟɪɧɵɣ ɫɢɦɜɨɥ!» ɪɢɫ. 3.2.2ɛ.
                    ɇɨɜɵɟ ɤɨɦɩɨɧɟɧɬɵ, ɫɜɨɣɫɬɜɚ, ɫɨɛɵɬɢɹ
                             TstringGrid
 ColCount           Ʉɨɥɢɱɟɫɬɜɨ ɫɬɨɥɛɰɨɜ ɬɚɛɥɢɰɵ
 RowCount           Ʉɨɥɢɱɟɫɬɜɨ ɫɬɪɨɤ ɬɚɛɥɢɰɵ
 DefaultColWidt     ɒɢɪɢɧɚ ɫɬɨɥɛɰɚ ɬɚɛɥɢɰɵ
 h
 Cells[ACol,        Ɉɩɪɟɞɟɥɹɟɬ ɫɨɞɟɪɠɢɦɨɟ ɹɱɟɣɤɢ ɫ ɬɚɛɥɢɱɧɵɦɢ ɤɨɨɪ-
 ARow]              ɞɢɧɚɬɚɦɢ (ACol, ARow)
 Options/goEditin   Ɂɚɞɚɧɨ True. ȼ ɷɬɨɦ ɫɥɭɱɚɟ ɪɚɡɪɟɲɟɧɨ ɪɟɞɚɤɬɢɪɨɜɚ-
 g                  ɧɢɟ ɹɱɟɣɤɢ
                               ɋɨɛɵɬɢɹ
 OnSetEditText      ȼɨɡɧɢɤɚɟɬ ɩɪɢ ɡɚɜɟɪɲɟɧɢɢ ɪɟɞɚɤɬɢɪɨɜɚɧɢɹ ɹɱɟɣɤɢ
                    (Aɋol, ARow). ȼ ɩɚɪɚɦɟɬɪɟ Value ɨɛɪɚɛɨɬɱɢɤ ɩɨɥɭ-
                    ɱɚɟɬ ɪɟɡɭɥɶɬɚɬ ɜɜɨɞɚ ɢɥɢ ɪɟɞɚɤɬɢɪɨɜɚɧɢɹ ɬɟɤɫɬɚ
    3. ȼɵɡɨɜɢɬɟ ɩɭɧɤɬ ɦɟɧɸ File| Save project as ɢ ɫɨɯɪɚɧɢɬɟ ɦɨɞɭɥɶ ɤɚɤ
U2, ɩɪɨɟɤɬ ɤɚɤ Project2 ɜ ɤɚɬɚɥɨɝ Lab_2.

                                  29