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

UptoLike

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

46
2
ɂɡ ɮɨɪɦɵ Aboutbox ɜɨɡɦɨɠɟɧ ɩɟɪɟɯɨɞ ɤ ɮɨɪɦɟ ɥɚɛɨɪɚ-
ɬɨɪɧɨɣ ɪɚɛɨɬɵ ʋ 2. ɂɡ ɮɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɨɣ ɪɚɛɨɬɵ ʋ 2
ɜɨɡɦɨɠɟɧ ɩɟɪɟɯɨɞ ɤ ɮɨɪɦɟ Aboutbox. ȼɨɡɦɨɠɧɨɫɬɶ ɩɪɟ-
ɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ ɜ ɨɛɟɢɯ
ɮɨɪɦɚɯ. ɋɬɢɥɢ ɮɨɪɦ ɜɵɛɪɚɬɶ ɫɨɨɬɜɟɬɫɬɜɭɸɳɢɟ ɪɟɲɚɟɦɨɣ
ɡɚɞɚɱɢ
3
Ɋɚɛɨɬɚ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɧɚɱɢɧɚɬɶɫɹ ɫ ɜɜɨɞɚ ɩɚɪɨɥɹ.
ɉɪɢ ɩɪɚɜɢɥɶɧɨɦ ɜɜɨɞɟ ɩɚɪɨɥɹ ɨɫɭɳɟɫɬɜɥɹɟɬɫɹ ɩɟɪɟɯɨɞ ɤ
ɫɥɟɞɭɸɳɟɣ ɮɨɪɦɟ. ɗɬɚ ɮɨɪɦɚ ɞɨɥɠɧɚ ɩɪɟɞɨɫɬɚɜɢɬɶ ɜɵɛɨɪ:
1) ɥɚɛɨɪɚɬɨɪɧɚɹ ɪɚɛɨɬɚ; 2) ɤɨɧɟɰ ɪɚɛɨɬɵ. ȼɢɞɢɦɨɣ ɧɚ ɷɤ-
ɪɚɧɟ ɞɨɥɠɧɚ ɛɵɬɶ ɬɨɥɶɤɨ ɜɵɛɪɚɧɧɚɹ ɜ ɞɚɧɧɵɣ ɦɨɦɟɧɬ
ɮɨɪɦɚ. ȼɨɡɦɨɠɧɨɫɬɶ ɩɪɟɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɢɦɟɟɬ ɬɨɥɶɤɨ ɮɨɪ-
ɦɚ ɜɵɛɨɪɚ. Ɏɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɵɯ ɪɚɛɨɬ ɞɨɥɠɧɵ ɩɪɟɞɫɬɚɜ-
ɥɹɬɶ ɫɨɛɨɣ ɩɪɹɦɨɭɝɨɥɶɧɢɤ ɛɟɡ ɪɚɦɤɢ ɢ ɡɚɝɨɥɨɜɤɚ
4
Ɋɚɛɨɬɚ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɧɚɱɢɧɚɬɶɫɹ ɫ ɜɜɨɞɚ ɩɚɪɨɥɹ.
ɉɪɢ ɪɚɛɨɬɟ ɫ ɮɨɪɦɚɦɢ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ ɜɨɡɦɨɠɧɨɫɬɶ
ɩɟɪɟɯɨɞɚ ɨɬ ɮɨɪɦɵ ɤ ɮɨɪɦɟ. ȼ ɤɚɠɞɵɣ ɦɨɦɟɧɬ ɜɪɟɦɟɧɢ ɧɚ
ɷɤɪɚɧɟ ɜɢɞɢɦɨɣ ɞɨɥɠɧɚ ɛɵɬɶ ɬɨɥɶɤɨ ɨɞɧɚ ɮɨɪɦɚ. ȼɨɡɦɨɠ-
ɧɨɫɬɶɸ ɩɪɟɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɵ ɨɛɥɚɞɚɬɶ
ɮɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɵɯ ɪɚɛɨɬ
5
Ƚɥɚɜɧɚɹ ɮɨɪɦɚ ɞɨɥɠɧɚ ɩɪɟɞɨɫɬɚɜɢɬɶ ɜɵɛɨɪ: 1) ɥɚɛɨɪɚɬɨɪ-
ɧɚɹ ɪɚɛɨɬɚ ʋ 2; 2) ɥɚɛɨɪɚɬɨɪɧɚɹ ɪɚɛɨɬɚ ʋ 4; 3) ɤɨɧɟɰ ɪɚ-
ɛɨɬɵ. ɂɡ ɤɚɠɞɨɣ ɥɚɛɨɪɚɬɨɪɧɨɣ ɪɚɛɨɬɵ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨ-
ɜɚɬɶ ɜɨɡɦɨɠɧɨɫɬɶ ɜɟɪɧɭɬɶɫɹ ɤ ɝɥɚɜɧɨɣ ɮɨɪɦɟ. ȼɨɡɦɨɠ-
ɧɨɫɬɶ ɡɚɤɨɧɱɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ
ɬɨɥɶɤɨ ɩɪɢ ɪɚɛɨɬɟ ɫ ɝɥɚɜɧɨɣ ɮɨɪɦɨɣ
ɉɪɨɝɪɚɦɦɭ ɡɚɩɢɲɢɬɟ ɜ ɜɚɲ ɤɚɬɚɥɨɝ Lab_4.
3.4. Ƚɥɚɜɧɨɟ ɦɟɧɸ ɮɨɪɦɵ. ȼɫɩɨɦɨɝɚɬɟɥɶɧɵɟ ɦɟɧɸ. ɋɬɚɧɞɚɪɬɧɵɟ
ɞɢɚɥɨɝɢ. ɉɪɨɝɪɚɦɦɵ, ɭɩɪɚɜɥɹɟɦɵɟ ɫɨɛɵɬɢɹɦɢ. ɋɨɛɵɬɢɹ,
ɨɛɪɚɛɚɬɵɜɚɟɦɵɟ ɮɨɪɦɨɣ. ɋɨɛɵɬɢɹ ɨɬ ɤɥɚɜɢɚɬɭɪɵ ɢ ɦɵɲɢ.
ɋɨɛɵɬɢɹ ɩɪɨɬɨɤɨɥɚ Drag & Drop
ɐɟɥɶ: ɢɡɭɱɢɬɶ ɧɚɛɨɪ ɨɛɪɚɛɨɬɱɢɤɨɜ ɫɨɛɵɬɢɣ, ɫɜɹɡɚɧɧɵɯ ɫ ɦɵɲɶɸ ɢ
ɤɥɚɜɢɚɬɭɪɨɣ; ɨɡɧɚɤɨɦɢɬɶɫɹ ɫ ɪɟɚɥɢɡɚɰɢɟɣ ɢɧɬɟɪɮɟɣɫɚ Drag & drop.
Ɋɟɡɭɥɶɬɚɬ ɨɛɭɱɟɧɢɹ: ɩɨɫɥɟ ɭɫɩɟɲɧɨɝɨ ɡɚɜɟɪɲɟɧɢɹ ɡɚɧɹɬɢɹ ɩɨɥɶɡɨɜɚ-
ɬɟɥɶ ɞɨɥɠɟɧ:
ɡɧɚɬɶ ɫɩɨɫɨɛɵ ɫɨɡɞɚɧɢɹ ɝɥɚɜɧɨɝɨ ɢ ɜɫɩɨɦɨɝɚɬɟɥɶɧɨɝɨ ɦɟɧɸ;
ɡɧɚɬɶ ɤɨɦɩɨɧɟɧɬɵ ɩɚɧɟɥɢ Dialogs;
ɭɦɟɬɶ ɢɫɩɨɥɶɡɨɜɚɬɶ ɦɟɬɨɞ Execute ɜ ɨɪɝɚɧɢɡɚɰɢɢ ɫɬɚɧɞɚɪɬɧɵɯ
ɞɢɚɥɨɝɨɜ;
ɭɦɟɬɶ ɢɫɩɨɥɶɡɨɜɚɬɶ ɤɨɦɩɨɧɟɧɬ TImage ɜ ɩɪɢɥɨɠɟɧɢɹɯ;
            ɂɡ ɮɨɪɦɵ Aboutbox ɜɨɡɦɨɠɟɧ ɩɟɪɟɯɨɞ ɤ ɮɨɪɦɟ ɥɚɛɨɪɚ-
            ɬɨɪɧɨɣ ɪɚɛɨɬɵ ʋ 2. ɂɡ ɮɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɨɣ ɪɚɛɨɬɵ ʋ 2
            ɜɨɡɦɨɠɟɧ ɩɟɪɟɯɨɞ ɤ ɮɨɪɦɟ Aboutbox. ȼɨɡɦɨɠɧɨɫɬɶ ɩɪɟ-
     2
            ɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ ɜ ɨɛɟɢɯ
            ɮɨɪɦɚɯ. ɋɬɢɥɢ ɮɨɪɦ ɜɵɛɪɚɬɶ ɫɨɨɬɜɟɬɫɬɜɭɸɳɢɟ ɪɟɲɚɟɦɨɣ
            ɡɚɞɚɱɢ
            Ɋɚɛɨɬɚ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɧɚɱɢɧɚɬɶɫɹ ɫ ɜɜɨɞɚ ɩɚɪɨɥɹ.
            ɉɪɢ ɩɪɚɜɢɥɶɧɨɦ ɜɜɨɞɟ ɩɚɪɨɥɹ ɨɫɭɳɟɫɬɜɥɹɟɬɫɹ ɩɟɪɟɯɨɞ ɤ
            ɫɥɟɞɭɸɳɟɣ ɮɨɪɦɟ. ɗɬɚ ɮɨɪɦɚ ɞɨɥɠɧɚ ɩɪɟɞɨɫɬɚɜɢɬɶ ɜɵɛɨɪ:
            1) ɥɚɛɨɪɚɬɨɪɧɚɹ ɪɚɛɨɬɚ; 2) ɤɨɧɟɰ ɪɚɛɨɬɵ. ȼɢɞɢɦɨɣ ɧɚ ɷɤ-
     3
            ɪɚɧɟ ɞɨɥɠɧɚ ɛɵɬɶ ɬɨɥɶɤɨ ɜɵɛɪɚɧɧɚɹ ɜ ɞɚɧɧɵɣ ɦɨɦɟɧɬ
            ɮɨɪɦɚ. ȼɨɡɦɨɠɧɨɫɬɶ ɩɪɟɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɢɦɟɟɬ ɬɨɥɶɤɨ ɮɨɪ-
            ɦɚ ɜɵɛɨɪɚ. Ɏɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɵɯ ɪɚɛɨɬ ɞɨɥɠɧɵ ɩɪɟɞɫɬɚɜ-
            ɥɹɬɶ ɫɨɛɨɣ ɩɪɹɦɨɭɝɨɥɶɧɢɤ ɛɟɡ ɪɚɦɤɢ ɢ ɡɚɝɨɥɨɜɤɚ
            Ɋɚɛɨɬɚ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɧɚɱɢɧɚɬɶɫɹ ɫ ɜɜɨɞɚ ɩɚɪɨɥɹ.
            ɉɪɢ ɪɚɛɨɬɟ ɫ ɮɨɪɦɚɦɢ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ ɜɨɡɦɨɠɧɨɫɬɶ
            ɩɟɪɟɯɨɞɚ ɨɬ ɮɨɪɦɵ ɤ ɮɨɪɦɟ. ȼ ɤɚɠɞɵɣ ɦɨɦɟɧɬ ɜɪɟɦɟɧɢ ɧɚ
     4
            ɷɤɪɚɧɟ ɜɢɞɢɦɨɣ ɞɨɥɠɧɚ ɛɵɬɶ ɬɨɥɶɤɨ ɨɞɧɚ ɮɨɪɦɚ. ȼɨɡɦɨɠ-
            ɧɨɫɬɶɸ ɩɪɟɤɪɚɬɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɵ ɨɛɥɚɞɚɬɶ
            ɮɨɪɦɵ ɥɚɛɨɪɚɬɨɪɧɵɯ ɪɚɛɨɬ
            Ƚɥɚɜɧɚɹ ɮɨɪɦɚ ɞɨɥɠɧɚ ɩɪɟɞɨɫɬɚɜɢɬɶ ɜɵɛɨɪ: 1) ɥɚɛɨɪɚɬɨɪ-
            ɧɚɹ ɪɚɛɨɬɚ ʋ 2; 2) ɥɚɛɨɪɚɬɨɪɧɚɹ ɪɚɛɨɬɚ ʋ 4; 3) ɤɨɧɟɰ ɪɚ-
            ɛɨɬɵ. ɂɡ ɤɚɠɞɨɣ ɥɚɛɨɪɚɬɨɪɧɨɣ ɪɚɛɨɬɵ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨ-
     5
            ɜɚɬɶ ɜɨɡɦɨɠɧɨɫɬɶ ɜɟɪɧɭɬɶɫɹ ɤ ɝɥɚɜɧɨɣ ɮɨɪɦɟ. ȼɨɡɦɨɠ-
            ɧɨɫɬɶ ɡɚɤɨɧɱɢɬɶ ɪɚɛɨɬɭ ɩɪɢɥɨɠɟɧɢɹ ɞɨɥɠɧɚ ɫɭɳɟɫɬɜɨɜɚɬɶ
            ɬɨɥɶɤɨ ɩɪɢ ɪɚɛɨɬɟ ɫ ɝɥɚɜɧɨɣ ɮɨɪɦɨɣ
     ɉɪɨɝɪɚɦɦɭ ɡɚɩɢɲɢɬɟ ɜ ɜɚɲ ɤɚɬɚɥɨɝ Lab_4.
     3.4. Ƚɥɚɜɧɨɟ ɦɟɧɸ ɮɨɪɦɵ. ȼɫɩɨɦɨɝɚɬɟɥɶɧɵɟ ɦɟɧɸ. ɋɬɚɧɞɚɪɬɧɵɟ
       ɞɢɚɥɨɝɢ. ɉɪɨɝɪɚɦɦɵ, ɭɩɪɚɜɥɹɟɦɵɟ ɫɨɛɵɬɢɹɦɢ. ɋɨɛɵɬɢɹ,
      ɨɛɪɚɛɚɬɵɜɚɟɦɵɟ ɮɨɪɦɨɣ. ɋɨɛɵɬɢɹ ɨɬ ɤɥɚɜɢɚɬɭɪɵ ɢ ɦɵɲɢ.
                    ɋɨɛɵɬɢɹ ɩɪɨɬɨɤɨɥɚ Drag & Drop
   ɐɟɥɶ: ɢɡɭɱɢɬɶ ɧɚɛɨɪ ɨɛɪɚɛɨɬɱɢɤɨɜ ɫɨɛɵɬɢɣ, ɫɜɹɡɚɧɧɵɯ ɫ ɦɵɲɶɸ ɢ
ɤɥɚɜɢɚɬɭɪɨɣ; ɨɡɧɚɤɨɦɢɬɶɫɹ ɫ ɪɟɚɥɢɡɚɰɢɟɣ ɢɧɬɟɪɮɟɣɫɚ Drag & drop.
   Ɋɟɡɭɥɶɬɚɬ ɨɛɭɱɟɧɢɹ: ɩɨɫɥɟ ɭɫɩɟɲɧɨɝɨ ɡɚɜɟɪɲɟɧɢɹ ɡɚɧɹɬɢɹ ɩɨɥɶɡɨɜɚ-
ɬɟɥɶ ɞɨɥɠɟɧ:
      – ɡɧɚɬɶ ɫɩɨɫɨɛɵ ɫɨɡɞɚɧɢɹ ɝɥɚɜɧɨɝɨ ɢ ɜɫɩɨɦɨɝɚɬɟɥɶɧɨɝɨ ɦɟɧɸ;
      – ɡɧɚɬɶ ɤɨɦɩɨɧɟɧɬɵ ɩɚɧɟɥɢ Dialogs;
      – ɭɦɟɬɶ ɢɫɩɨɥɶɡɨɜɚɬɶ ɦɟɬɨɞ Execute ɜ ɨɪɝɚɧɢɡɚɰɢɢ ɫɬɚɧɞɚɪɬɧɵɯ
ɞɢɚɥɨɝɨɜ;
      – ɭɦɟɬɶ ɢɫɩɨɥɶɡɨɜɚɬɶ ɤɨɦɩɨɧɟɧɬ TImage ɜ ɩɪɢɥɨɠɟɧɢɹɯ;



                                46