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

UptoLike

ВУЗ: 

ВГУ | Воронеж

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

Рубрика: 

25
ɉɥɚɧ ɡɚɧɹɬɢɹ
ɑɚɫɬɶ I. Ʉɨɦɩɨɧɟɧɬ TstringGrid. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ.
1. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ: ɪɚɛɨɬɚ ɩɨɞ ɪɭɤɨɜɨɞɫɬɜɨɦ
ɩɪɟɩɨɞɚɜɚɬɟɥɹ 20 ɦɢɧɭɬ.
2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ 60 ɦɢɧɭɬ.
ɑɚɫɬɶ II. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ.
1. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ: ɪɚɛɨɬɚ ɩɨɞ ɪɭɤɨɜɨɞɫɬɜɨɦ ɩɪɟɩɨ-
ɞɚɜɚɬɟɥɹ 20 ɦɢɧɭɬ.
2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ 60 ɦɢɧɭɬ.
ɑɚɫɬɶ I. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ
1. Ʉɨɦɩɨɧɟɧɬ TstringGrid. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ
Ʉɨɦɩɨɧɟɧɬ TsringGrid ɩɪɟɞɧɚɡɧɚɱɟɧ ɞɥɹ ɫɨɡɞɚɧɢɹ ɬɚɛɥɢɰ, ɜ ɹɱɟɣɤɚɯ
ɤɨɬɨɪɵɯ ɪɚɫɩɨɥɚɝɚɸɬɫɹ ɩɪɨɢɡɜɨɥɶɧɵɟ ɬɟɤɫɬɨɜɵɟ ɫɬɪɨɤɢ. ɋɜɨɣɫɬɜɨ
Cells[Acol,Arow] ɤɨɦɩɨɧɟɧɬɚ TstringGrid ɨɩɪɟɞɟɥɹɟɬ ɫɨɞɟɪɠɢɦɨɟ ɹɱɟɣɤɢ
ɫ ɬɚɛɥɢɱɧɵɦɢ ɤɨɨɪɞɢɧɚɬɚɦɢ Acol, Arow (ɧɨɦɟɪ ɫɬɨɥɛɰɚ, ɧɨɦɟɪ ɫɬɪɨɤɢ).
Ⱦɥɹ ɨɛɪɚɛɨɬɤɢ ɢɫɤɥɸɱɟɧɢɣ ɜ Object Pascal ɩɪɟɞɭɫɦɨɬɪɟɧ ɦɟɯɚɧɢɡɦ
ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ:
try
<ɨɩɟɪɚɬɨɪɵ>
except
<ɨɛɪɚɛɨɬɱɢɤɢ ɢɫɤɥɸɱɟɧɢɣ>
else
<ɨɩɟɪɚɬɨɪɵ>
end;
1.1. ɉɨɞɝɨɬɨɜɢɬɟɥɶɧɵɟ ɞɟɣɫɬɜɢɹ
ȼ ɫɜɨɟɦ ɢɧɞɢɜɢɞɭɚɥɶɧɨɦ ɤɚɬɚɥɨɝɟ ɫɨɡɞɚɣɬɟ ɤɚɬɚɥɨɝ Lab_3.
1.2. ɉɨɫɬɪɨɟɧɢɟ ɩɪɢɥɨɠɟɧɢɹ ɫ ɢɫɩɨɥɶɡɨɜɚɧɢɟɦ ɤɨɦɩɨɧɟɧɬɚ
TstringGrid
ȼ ɩɪɢɥɨɠɟɧɢɢ ɪɟɲɚɟɬɫɹ ɡɚɞɚɱɚ ɩɨɞɫɱɟɬɚ ɫɪɟɞɧɟɝɨ ɛɚɥɥɚ ɤɚɠɞɨɝɨ ɫɬɭ-
ɞɟɧɬɚ. ɂɫɯɨɞɧɚɹ ɢɧɮɨɪɦɚɰɢɹ
– ɨɰɟɧɤɢ ɤɚɠɞɨɝɨ ɫɬɭɞɟɧɬɚ, ɤɨɬɨɪɵɟ ɜɜɨɞɹɬ-
ɫɹ ɜ ɬɚɛɥɢɰɭ. ȼ ɩɨɫɥɟɞɧɟɦ ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ ɨɬɪɚɠɚɟɬɫɹ ɪɟɡɭɥɶɬɚɬ ɪɚɫɱɟ-
ɬɚ – ɫɪɟɞɧɢɣ ɛɚɥɥ ɫɬɭɞɟɧɬɚ.
Ɂɚɝɪɭɡɢɬɟ ɩɪɢɥɨɠɟɧɢɟ-ɩɪɢɦɟɪ. Ⱦɥɹ ɷɬɨɝɨ ɜɵɩɨɥɧɢɬɟ ɤɨɦɚɧɞɭ
File/Open. ɉɪɢɥɨɠɟɧɢɟ-ɩɪɢɦɟɪ ɧɚɯɨɞɢɬɫɹ ɜ ɩɨɞɤɚɬɚɥɨɝɟ Lab2.
ɉɪɢɦɟɱɚɧɢɟ: ɞɥɹ ɬɨɝɨ, ɱɬɨɛɵ ɡɚɝɪɭɡɢɬɶ ɩɪɢɥɨɠɟɧɢɟ ɧɟɨɛɯɨɞɢɦɨ ɨɬ-
ɤɪɵɬɶ ɮɚɣɥ ɩɪɨɟɤɬɚ.
1. Ɉɡɧɚɤɨɦɶɬɟɫɶ ɫ ɨɤɧɨɦ ɩɪɢɥɨɠɟɧɢɹ.
                                 ɉɥɚɧ ɡɚɧɹɬɢɹ
ɑɚɫɬɶ I. Ʉɨɦɩɨɧɟɧɬ TstringGrid. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ.
    1. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ: ɪɚɛɨɬɚ ɩɨɞ ɪɭɤɨɜɨɞɫɬɜɨɦ
        ɩɪɟɩɨɞɚɜɚɬɟɥɹ                                     20 ɦɢɧɭɬ.
    2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ                             60 ɦɢɧɭɬ.
ɑɚɫɬɶ II. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ.
    1. Ʉɨɦɩɢɥɹɰɢɹ ɢ ɨɬɥɚɞɤɚ ɩɪɨɝɪɚɦɦ: ɪɚɛɨɬɚ ɩɨɞ ɪɭɤɨɜɨɞɫɬɜɨɦ ɩɪɟɩɨ-
        ɞɚɜɚɬɟɥɹ                                          20 ɦɢɧɭɬ.
    2. ɋɚɦɨɫɬɨɹɬɟɥɶɧɚɹ ɪɚɛɨɬɚ                             60 ɦɢɧɭɬ.

ɑɚɫɬɶ I. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ
1. Ʉɨɦɩɨɧɟɧɬ TstringGrid. Ɉɛɪɚɛɨɬɤɚ ɢɫɤɥɸɱɢɬɟɥɶɧɵɯ ɫɢɬɭɚɰɢɣ
     Ʉɨɦɩɨɧɟɧɬ TsringGrid ɩɪɟɞɧɚɡɧɚɱɟɧ ɞɥɹ ɫɨɡɞɚɧɢɹ ɬɚɛɥɢɰ, ɜ ɹɱɟɣɤɚɯ
ɤɨɬɨɪɵɯ ɪɚɫɩɨɥɚɝɚɸɬɫɹ ɩɪɨɢɡɜɨɥɶɧɵɟ ɬɟɤɫɬɨɜɵɟ ɫɬɪɨɤɢ. ɋɜɨɣɫɬɜɨ
Cells[Acol,Arow] ɤɨɦɩɨɧɟɧɬɚ TstringGrid ɨɩɪɟɞɟɥɹɟɬ ɫɨɞɟɪɠɢɦɨɟ ɹɱɟɣɤɢ
ɫ ɬɚɛɥɢɱɧɵɦɢ ɤɨɨɪɞɢɧɚɬɚɦɢ Acol, Arow (ɧɨɦɟɪ ɫɬɨɥɛɰɚ, ɧɨɦɟɪ ɫɬɪɨɤɢ).
     Ⱦɥɹ ɨɛɪɚɛɨɬɤɢ ɢɫɤɥɸɱɟɧɢɣ ɜ Object Pascal ɩɪɟɞɭɫɦɨɬɪɟɧ ɦɟɯɚɧɢɡɦ
ɡɚɳɢɳɟɧɧɨɝɨ ɛɥɨɤɚ:
                                   try
                             <ɨɩɟɪɚɬɨɪɵ>
                                 except
                       <ɨɛɪɚɛɨɬɱɢɤɢ ɢɫɤɥɸɱɟɧɢɣ>
                                  else
                             <ɨɩɟɪɚɬɨɪɵ>
                                  end;
    1.1. ɉɨɞɝɨɬɨɜɢɬɟɥɶɧɵɟ ɞɟɣɫɬɜɢɹ
    ȼ ɫɜɨɟɦ ɢɧɞɢɜɢɞɭɚɥɶɧɨɦ ɤɚɬɚɥɨɝɟ ɫɨɡɞɚɣɬɟ ɤɚɬɚɥɨɝ Lab_3.
     1.2. ɉɨɫɬɪɨɟɧɢɟ   ɩɪɢɥɨɠɟɧɢɹ    ɫ    ɢɫɩɨɥɶɡɨɜɚɧɢɟɦ   ɤɨɦɩɨɧɟɧɬɚ
TstringGrid
     ȼ ɩɪɢɥɨɠɟɧɢɢ ɪɟɲɚɟɬɫɹ ɡɚɞɚɱɚ ɩɨɞɫɱɟɬɚ ɫɪɟɞɧɟɝɨ ɛɚɥɥɚ ɤɚɠɞɨɝɨ ɫɬɭ-
ɞɟɧɬɚ. ɂɫɯɨɞɧɚɹ ɢɧɮɨɪɦɚɰɢɹ – ɨɰɟɧɤɢ ɤɚɠɞɨɝɨ ɫɬɭɞɟɧɬɚ, ɤɨɬɨɪɵɟ ɜɜɨɞɹɬ-
ɫɹ ɜ ɬɚɛɥɢɰɭ. ȼ ɩɨɫɥɟɞɧɟɦ ɫɬɨɥɛɰɟ ɬɚɛɥɢɰɵ ɨɬɪɚɠɚɟɬɫɹ ɪɟɡɭɥɶɬɚɬ ɪɚɫɱɟ-
ɬɚ – ɫɪɟɞɧɢɣ ɛɚɥɥ ɫɬɭɞɟɧɬɚ.
     Ɂɚɝɪɭɡɢɬɟ ɩɪɢɥɨɠɟɧɢɟ-ɩɪɢɦɟɪ. Ⱦɥɹ ɷɬɨɝɨ ɜɵɩɨɥɧɢɬɟ ɤɨɦɚɧɞɭ
File/Open. ɉɪɢɥɨɠɟɧɢɟ-ɩɪɢɦɟɪ ɧɚɯɨɞɢɬɫɹ ɜ ɩɨɞɤɚɬɚɥɨɝɟ Lab2.
    ɉɪɢɦɟɱɚɧɢɟ: ɞɥɹ ɬɨɝɨ, ɱɬɨɛɵ ɡɚɝɪɭɡɢɬɶ ɩɪɢɥɨɠɟɧɢɟ ɧɟɨɛɯɨɞɢɦɨ ɨɬ-
ɤɪɵɬɶ ɮɚɣɥ ɩɪɨɟɤɬɚ.
    1. Ɉɡɧɚɤɨɦɶɬɟɫɶ ɫ ɨɤɧɨɦ ɩɪɢɥɨɠɟɧɢɹ.
                                 25

Страницы