Разработка компонентов в DELPHI. Вощинская Г.Э. - 36 стр.

UptoLike

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

Ɋɢɫ. 4. Ɉɤɧɨ ɭɫɬɚɧɨɜɤɢ ɤɨɦɩɨɧɟɧɬɚ
ɇɨɜɵɣ ɤɨɦɩɨɧɟɧɬ ɦɨɠɟɬ ɛɵɬɶ ɭɫɬɚɧɨɜɥɟɧ ɜ ɫɭɳɟɫɬɜɭɸɳɢɣ ɩɚɤɟɬ
(Into existing package) ɢɥɢ ɧɨɜɵɣ ɩɚɤɟɬ (Into new package). ɗɬɨ ɨɩɪɟɞɟɥɹɟɬ-
ɫɹ ɜɵɛɨɪɨɦ ɡɚɤɥɚɞɤɢ.
ȼ ɩɟɪɜɨɣ ɫɬɪɨɤɟ ɞɨɥɠɧɨ ɛɵɬɶ ɭɤɚɡɚɧɨ ɢɦɹ ɦɨɞɭɥɹ, ɫɨɞɟɪɠɚɳɟɝɨ
ɤɥɚɫɫ ɤɨɦɩɨɧɟɧɬɚ. ȼ ɧɚɲɟɦ ɫɥɭɱɚɟ ɷɬɨ UMyButton.pas.
ȼɬɨɪɚɹ ɫɬɪɨɤɚ ɫɨɞɟɪɠɢɬ ɦɚɪɲɪɭɬɵ ɩɨɢɫɤɚ ɮɚɣɥɨɜ.
Ɍɪɟɬɶɹ ɫɬɪɨɤɚ ɨɩɪɟɞɟɥɹɟɬ ɢɦɹ ɩɚɤɟɬɚ, ɜ ɤɨɬɨɪɵɣ ɛɭɞɟɬ ɜɤɥɸɱɟɧ ɤɨɦ-
ɩɨɧɟɧɬ. Ɋɚɡɭɦɟɟɬɫɹ, ɫɨɛɫɬɜɟɧɧɵɟ ɤɨɦɩɨɧɟɧɬɵ ɩɪɚɜɢɥɶɧɟɟ ɫɨɯɪɚɧɹɬɶ ɜ ɧɨ-
ɜɵɯ, ɫɩɟɰɢɚɥɶɧɨ ɞɥɹ ɧɢɯ ɫɨɡɞɚɧɧɵɯ ɩɚɤɟɬɚɯ. ȿɫɥɢ ɤɨɦɩɨɧɟɧɬ ɞɨɛɚɜɥɹɟɬɫɹ
ɜ ɫɭɳɟɫɬɜɭɸɳɢɣ ɩɚɤɟɬ, ɬɨ ɨɧ ɦɨɠɟɬ ɛɵɬɶ ɜɵɛɪɚɧ ɢɡ ɜɵɩɚɞɚɸɳɟɝɨ ɫɩɢɫɤɚ,
ɢɧɚɱɟ ɜɜɨɞɢɬɫɹ ɢɦɹ ɧɨɜɨɝɨ ɩɚɤɟɬɚ. Ɋɚɫɲɢɪɟɧɢɟ .dpk ɛɭɞɟɬ ɞɨɛɚɜɥɟɧɨ ɚɜ-
ɬɨɦɚɬɢɱɟɫɤɢ. ɇɚɩɪɢɦɟɪ, ɟɫɥɢ ɩɚɤɟɬ ɧɚɡɵɜɚɟɬɫɹ MyButton, ɬɨ ɪɟɞɚɤɬɨɪ
ɩɚɤɟɬɚ ɝɟɧɟɪɢɪɭɟɬ ɢɫɯɨɞɧɵɣ ɮɚɣɥ ɫ ɢɦɟɧɟɦ MyButton.dpk, ɤɨɦɩɢɥɹɬɨɪ
ɝɟɧɟɪɢɪɭɟɬ ɜɵɩɨɥɧɹɟɦɵɣ ɮɚɣɥ (DLL) MyButton.bpl ɢ ɜɫɩɨɦɨɝɚɬɟɥɶ-
ɧɵɣ ɛɢɧɚɪɧɵɣ ɛɢɛɥɢɨɬɟɱɧɵɣ ɮɚɣɥ ɫ ɢɦɟɧɟɦ MyButton.dcp.
ɉɨɫɥɟɞɧɹɹ ɫɬɪɨɤɚ ɦɨɠɟɬ ɫɨɞɟɪɠɚɬɶ ɤɪɚɬɤɨɟ ɨɩɢɫɚɧɢɟ ɩɚɤɟɬɚ.
Ɂɚɩɨɥɧɢɜ ɩɨɥɹ ɢ ɧɚɠɚɜ ɤɧɨɩɤɭ OK, ɭɫɬɚɧɚɜɥɢɜɚɟɦ ɤɨɦɩɨɧɟɧɬ.
ȼ ɩɨɹɜɢɜɲɟɦɫɹ ɨɤɧɟ (ɪɢɫ. 5) ɧɚɞɨ ɞɚɬɶ ɩɨɥɨɠɢɬɟɥɶɧɵɣ ɨɬɜɟɬ ɧɚ ɩɪɢɝɥɚɲɟ-
ɧɢɟ ɨɬɤɨɦɩɢɥɢɪɨɜɚɬɶ ɩɚɤɟɬ.
36