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

UptoLike

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

30
2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ
Ɂɚɞɚɧɢɟ. ɋɨɡɞɚɣɬɟ ɩɪɢɥɨɠɟɧɢɟ ɫ ɢɫɩɨɥɶɡɨɜɚɧɢɟɦ ɤɨɦɩɨɧɟɧɬɚ
TStringGrid. ȼ ɩɪɨɝɪɚɦɦɟ ɧɚɣɞɢɬɟ ɩɪɢɦɟɧɟɧɢɟ ɦɟɯɚɧɢɡɦɭ ɡɚ-
ɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ.
ȼɚɪɢɚɧɬɵ ɂɫɯɨɞɧɵɟ ɞɚɧɧɵɟ
1
Ɋɚɡɪɚɛɨɬɚɬɶ ɩɪɢɥɨɠɟɧɢɟ ɞɥɹ ɨɛɪɚɛɨɬɤɢ ɪɟɡɭɥɶɬɚɬɨɜ ɫɨɪɟɜɧɨ-
ɜɚɧɢɣ. ɂɫɯɨɞɧɵɟ ɞɚɧɧɵɟ: ɜɪɟɦɹ ɫɬɚɪɬɚ, ɜɪɟɦɹ ɮɢɧɢɲɚ, ɤɨɧ-
ɬɪɨɥɶɧɨɟ ɜɪɟɦɹ. Ɉɬɦɟɬɢɬɶ ɬɟ ɪɟɡɭɥɶɬɚɬɵ, ɤɨɬɨɪɵɟ ɭɤɥɚɞɵɜɚ-
ɸɬɫɹ ɜ ɤɨɧɬɪɨɥɶɧɨɟ ɜɪɟɦɹ. ȼɪɟɦɹ ɫɬɚɪɬɚ ɢ ɜɪɟɦɹ ɮɢɧɢɲɚ ɜɜɨ-
ɞɢɬɶ ɜ ɬɚɛɥɢɰɭ. Ɉɬɦɟɬɢɬɶ ɫɩɨɪɬɫɦɟɧɨɜ, ɭɥɨɠɢɜɲɢɯɫɹ ɜ ɤɨɧ-
ɬɪɨɥɶɧɨɟ ɜɪɟɦɹ, ɫɩɟɰɢɚɥɶɧɵɦ ɫɢɦɜɨɥɨɦ ɢɥɢ ɫɨɨɛɳɟɧɢɟɦ
«ɇɨɪɦɚ ɜɵɩɨɥɧɟɧɚ» ɜ ɫɜɨɛɨɞɧɨɦ ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ
2
ɋ ɩɨɦɨɳɶɸ ɬɚɛɥɢɰɵ TStringGrid ɜɜɟɫɬɢ ɷɥɟɦɟɧɬɵ ɦɚɬɪɢɰɵ ɢ
ɩɨɞɫɱɢɬɚɬɶ ɫɭɦɦɭ ɤɜɚɞɪɚɬɨɜ ɟɝɨ ɫɬɨɥɛɰɨɜ
3
Ɋɚɫɫɱɢɬɚɬɶ ɫɪɟɞɧɢɟ ɩɚɪɚɦɟɬɪɵ ɝɪɭɩɩɵ ɫɬɭɞɟɧɬɨɜ. ɂɫɯɨɞɧɵɟ
ɞɚɧɧɵɟ: ɤɨɥɢɱɟɫɬɜɨ ɛɚɥɥɨɜ, ɧɚɛɪɚɧɧɵɯ ɤɚɠɞɵɦ ɫɬɭɞɟɧɬɨɦ ɩɪɢ
ɬɟɫɬɢɪɨɜɚɧɢɢ; ɪɨɫɬ ɢ ɜɟɫ ɤɚɠɞɨɝɨ ɫɬɭɞɟɧɬɚ. Ɋɚɫɫɱɢɬɚɬɶ ɫɪɟɞ-
ɧɢɣ ɛɚɥɥ, ɫɪɟɞɧɢɣ ɜɟɫ ɢ ɫɪɟɞɧɢɣ ɪɨɫɬ ɫɬɭɞɟɧɬɨɜ ɜ ɝɪɭɩɩɟ. ȼ
ɩɪɢɥɨɠɟɧɢɢ ɢɫɩɨɥɶɡɨɜɚɬɶ ɬɚɛɥɢɰɭ TStringGrid ɞɥɹ ɜɜɨɞɚ ɢ
ɜɵɜɨɞɚ ɢɧɮɨɪɦɚɰɢɢ
4
ɉɪɟɞɫɬɚɜɢɬɶ ɜ ɜɢɞɟ ɬɚɛɥɢɰɵ ɢɬɨɝɢ ɞɟɹɬɟɥɶɧɨɫɬɢ ɱɟɬɵɪɟɯ
ɚɝɟɧɬɨɜ ɮɢɪɦɵ ɩɨ ɫɛɵɬɭ n-ɨɣ ɩɪɨɞɭɤɰɢɢ. ɂɫɯɨɞɧɨɣ ɢɧɮɨɪɦɚ-
ɰɢɟɣ ɫɱɢɬɚɬɶ ɨɛɴɟɦ ɩɪɨɞɚɠ ɩɨ ɤɜɚɪɬɚɥɚɦ. Ɋɚɫɫɱɢɬɚɬɶ ɨɛɴɟɦ
ɩɪɨɞɚɠ ɤɚɠɞɨɝɨ ɚɝɟɧɬɚ ɡɚ ɝɨɞ
5
ɉɪɟɞɫɬɚɜɢɬɶ ɜ ɜɢɞɟ ɬɚɛɥɢɰɵ ɜɟɞɨɦɨɫɬɶ ɫɜɟɞɟɧɢɣ ɨ ɩɪɨɩɭɫɤɚɯ
ɡɚɧɹɬɢɣ ɫɬɭɞɟɧɬɚɦɢ. ɂɫɯɨɞɧɨɣ ɢɧɮɨɪɦɚɰɢɟɣ ɹɜɥɹɟɬɫɹ: ɤɨɥɢ-
ɱɟɫɬɜɨ ɱɚɫɨɜ, ɩɪɨɩɭɳɟɧɧɵɯ ɩɨ ɭɜɚɠɢɬɟɥɶɧɨɣ ɢ ɧɟɭɜɚɠɢɬɟɥɶ-
ɧɨɣ ɩɪɢɱɢɧɟ. Ⱦɥɹ ɜɜɨɞɚ ɢ ɯɪɚɧɟɧɢɹ ɢɧɮɨɪɦɚɰɢɢ ɢɫɩɨɥɶɡɨɜɚɬɶ
ɬɚɛɥɢɰɭ TStringGrid. ɋɬɭɞɟɧɬɨɜ, ɩɪɨɩɭɫɬɢɜɲɢɯ ɛɨɥɟɟ ɏɏɏ
ɱɚɫɨɜ ɩɨ ɧɟɭɜɚɠɢɬɟɥɶɧɨɣ ɩɪɢɱɢɧɟ, ɨɬɦɟɬɢɬɶ ɜ ɫɜɨɛɨɞɧɨɦ
ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ ɫɩɟɰɢɚɥɶɧɵɦ ɫɨɨɛɳɟɧɢɟɦ. ɏɏɏɜɜɨɞɢɦɚɹ
ɜɟɥɢɱɢɧɚ
ɑɚɫɬɶ II. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ
1. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ
Ⱦɥɹ ɭɩɪɚɜɥɟɧɢɹ ɜɵɩɨɥɧɟɧɢɟɦ ɩɪɨɝɪɚɦɦɵ ɢɫɩɨɥɶɡɭɸɬɫɹ ɫɥɟɞɭɸɳɢɟ
ɤɨɦɚɧɞɵ ɩɭɧɤɬɚ ɦɟɧɸ Run.
Ʉɨɦɚɧɞɚ Ɉɩɢɫɚɧɢɟ
Run (F9)
ɉɪɨɝɪɚɦɦɚ ɜɵɩɨɥɧɹɟɬɫɹ ɛɟɡ ɨɫɬɚɧɨɜɤɢ ɧɚ ɤɚɠɞɨɣ ɫɬɪɨɤɟ.
ɗɬɚ ɤɨɦɚɧɞɚ ɷɤɜɢɜɚɥɟɧɬɧɚ ɜɵɩɨɥɧɟɧɢɸ ɩɪɨɝɪɚɦɦɵ ɜɧɟ ɨɬ-
2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ
Ɂɚɞɚɧɢɟ.    ɋɨɡɞɚɣɬɟ ɩɪɢɥɨɠɟɧɢɟ ɫ ɢɫɩɨɥɶɡɨɜɚɧɢɟɦ ɤɨɦɩɨɧɟɧɬɚ
           TStringGrid. ȼ ɩɪɨɝɪɚɦɦɟ ɧɚɣɞɢɬɟ ɩɪɢɦɟɧɟɧɢɟ ɦɟɯɚɧɢɡɦɭ ɡɚ-
           ɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ.
ȼɚɪɢɚɧɬɵ                         ɂɫɯɨɞɧɵɟ ɞɚɧɧɵɟ
            Ɋɚɡɪɚɛɨɬɚɬɶ ɩɪɢɥɨɠɟɧɢɟ ɞɥɹ ɨɛɪɚɛɨɬɤɢ ɪɟɡɭɥɶɬɚɬɨɜ ɫɨɪɟɜɧɨ-
            ɜɚɧɢɣ. ɂɫɯɨɞɧɵɟ ɞɚɧɧɵɟ: ɜɪɟɦɹ ɫɬɚɪɬɚ, ɜɪɟɦɹ ɮɢɧɢɲɚ, ɤɨɧ-
            ɬɪɨɥɶɧɨɟ ɜɪɟɦɹ. Ɉɬɦɟɬɢɬɶ ɬɟ ɪɟɡɭɥɶɬɚɬɵ, ɤɨɬɨɪɵɟ ɭɤɥɚɞɵɜɚ-
    1       ɸɬɫɹ ɜ ɤɨɧɬɪɨɥɶɧɨɟ ɜɪɟɦɹ. ȼɪɟɦɹ ɫɬɚɪɬɚ ɢ ɜɪɟɦɹ ɮɢɧɢɲɚ ɜɜɨ-
            ɞɢɬɶ ɜ ɬɚɛɥɢɰɭ. Ɉɬɦɟɬɢɬɶ ɫɩɨɪɬɫɦɟɧɨɜ, ɭɥɨɠɢɜɲɢɯɫɹ ɜ ɤɨɧ-
            ɬɪɨɥɶɧɨɟ ɜɪɟɦɹ, ɫɩɟɰɢɚɥɶɧɵɦ ɫɢɦɜɨɥɨɦ ɢɥɢ ɫɨɨɛɳɟɧɢɟɦ
            «ɇɨɪɦɚ ɜɵɩɨɥɧɟɧɚ» ɜ ɫɜɨɛɨɞɧɨɦ ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ
            ɋ ɩɨɦɨɳɶɸ ɬɚɛɥɢɰɵ TStringGrid ɜɜɟɫɬɢ ɷɥɟɦɟɧɬɵ ɦɚɬɪɢɰɵ ɢ
    2
            ɩɨɞɫɱɢɬɚɬɶ ɫɭɦɦɭ ɤɜɚɞɪɚɬɨɜ ɟɝɨ ɫɬɨɥɛɰɨɜ
            Ɋɚɫɫɱɢɬɚɬɶ ɫɪɟɞɧɢɟ ɩɚɪɚɦɟɬɪɵ ɝɪɭɩɩɵ ɫɬɭɞɟɧɬɨɜ. ɂɫɯɨɞɧɵɟ
            ɞɚɧɧɵɟ: ɤɨɥɢɱɟɫɬɜɨ ɛɚɥɥɨɜ, ɧɚɛɪɚɧɧɵɯ ɤɚɠɞɵɦ ɫɬɭɞɟɧɬɨɦ ɩɪɢ
            ɬɟɫɬɢɪɨɜɚɧɢɢ; ɪɨɫɬ ɢ ɜɟɫ ɤɚɠɞɨɝɨ ɫɬɭɞɟɧɬɚ. Ɋɚɫɫɱɢɬɚɬɶ ɫɪɟɞ-
    3
            ɧɢɣ ɛɚɥɥ, ɫɪɟɞɧɢɣ ɜɟɫ ɢ ɫɪɟɞɧɢɣ ɪɨɫɬ ɫɬɭɞɟɧɬɨɜ ɜ ɝɪɭɩɩɟ. ȼ
            ɩɪɢɥɨɠɟɧɢɢ ɢɫɩɨɥɶɡɨɜɚɬɶ ɬɚɛɥɢɰɭ TStringGrid ɞɥɹ ɜɜɨɞɚ ɢ
            ɜɵɜɨɞɚ ɢɧɮɨɪɦɚɰɢɢ
            ɉɪɟɞɫɬɚɜɢɬɶ ɜ ɜɢɞɟ ɬɚɛɥɢɰɵ ɢɬɨɝɢ ɞɟɹɬɟɥɶɧɨɫɬɢ ɱɟɬɵɪɟɯ
            ɚɝɟɧɬɨɜ ɮɢɪɦɵ ɩɨ ɫɛɵɬɭ n-ɨɣ ɩɪɨɞɭɤɰɢɢ. ɂɫɯɨɞɧɨɣ ɢɧɮɨɪɦɚ-
    4
            ɰɢɟɣ ɫɱɢɬɚɬɶ ɨɛɴɟɦ ɩɪɨɞɚɠ ɩɨ ɤɜɚɪɬɚɥɚɦ. Ɋɚɫɫɱɢɬɚɬɶ ɨɛɴɟɦ
            ɩɪɨɞɚɠ ɤɚɠɞɨɝɨ ɚɝɟɧɬɚ ɡɚ ɝɨɞ
            ɉɪɟɞɫɬɚɜɢɬɶ ɜ ɜɢɞɟ ɬɚɛɥɢɰɵ ɜɟɞɨɦɨɫɬɶ ɫɜɟɞɟɧɢɣ ɨ ɩɪɨɩɭɫɤɚɯ
            ɡɚɧɹɬɢɣ ɫɬɭɞɟɧɬɚɦɢ. ɂɫɯɨɞɧɨɣ ɢɧɮɨɪɦɚɰɢɟɣ ɹɜɥɹɟɬɫɹ: ɤɨɥɢ-
            ɱɟɫɬɜɨ ɱɚɫɨɜ, ɩɪɨɩɭɳɟɧɧɵɯ ɩɨ ɭɜɚɠɢɬɟɥɶɧɨɣ ɢ ɧɟɭɜɚɠɢɬɟɥɶ-
            ɧɨɣ ɩɪɢɱɢɧɟ. Ⱦɥɹ ɜɜɨɞɚ ɢ ɯɪɚɧɟɧɢɹ ɢɧɮɨɪɦɚɰɢɢ ɢɫɩɨɥɶɡɨɜɚɬɶ
    5
            ɬɚɛɥɢɰɭ TStringGrid. ɋɬɭɞɟɧɬɨɜ, ɩɪɨɩɭɫɬɢɜɲɢɯ ɛɨɥɟɟ ɏɏɏ
            ɱɚɫɨɜ ɩɨ ɧɟɭɜɚɠɢɬɟɥɶɧɨɣ ɩɪɢɱɢɧɟ, ɨɬɦɟɬɢɬɶ ɜ ɫɜɨɛɨɞɧɨɦ
            ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ ɫɩɟɰɢɚɥɶɧɵɦ ɫɨɨɛɳɟɧɢɟɦ. ɏɏɏ – ɜɜɨɞɢɦɚɹ
            ɜɟɥɢɱɢɧɚ


ɑɚɫɬɶ II. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ
1. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ
     Ⱦɥɹ ɭɩɪɚɜɥɟɧɢɹ ɜɵɩɨɥɧɟɧɢɟɦ ɩɪɨɝɪɚɦɦɵ ɢɫɩɨɥɶɡɭɸɬɫɹ ɫɥɟɞɭɸɳɢɟ
ɤɨɦɚɧɞɵ ɩɭɧɤɬɚ ɦɟɧɸ Run.
  Ʉɨɦɚɧɞɚ                           Ɉɩɢɫɚɧɢɟ
Run (F9)     ɉɪɨɝɪɚɦɦɚ ɜɵɩɨɥɧɹɟɬɫɹ ɛɟɡ ɨɫɬɚɧɨɜɤɢ ɧɚ ɤɚɠɞɨɣ ɫɬɪɨɤɟ.
             ɗɬɚ ɤɨɦɚɧɞɚ ɷɤɜɢɜɚɥɟɧɬɧɚ ɜɵɩɨɥɧɟɧɢɸ ɩɪɨɝɪɚɦɦɵ ɜɧɟ ɨɬ-
                                  30