Page 60 - 4260
P. 60

end.

           Лістинг модуля Complex1

           unit Complex1;

           interface

           type
                  Tcomplex=record
                         // Тип комплексного числа
                         Re, Im: real
                  end;
           // Викликувані функції
           function Addc(x,y:Tcomplex):Tcomplex;   External 'Complex2' Index 1;
           function Subc(x,y:Tcomplex):Tcomplex;   External 'Complex2' Index 2;
           function Multc(x,y:Tcomplex):Tcomplex;  External 'Complex2' Index 3;
           function Divc(x,y:Tcomplex):Tcomplex;   External 'Complex2' Index 4;

           implementation
           end.


           Лістинг  моду  форм  програми  т а к и й   ж е , я к   у   з а в д а н н і  1,
           тільки в рядку uses додане посилання на модуль Complex1. У
           цьому модулі встановлюється зв'язок з DLL.


           Висновки
           1.   робо    програмам  які  часто  використовуються
              застосовують модулі й DLL
           2. М  о д у л ь    а б о  DLL  - ц е    н а б і р    г о т о в и х    п і д п р о г р а м  , щ  о
              зберігаються в компільованому  виді.
           3. Модуль     зв'язується   із   головно      програмо      при
              компонуванні.
           4. DLL зв'язується  і  головно  програм  динамічно: DLL
              завантажується на час звертання до її підпрограм.




                                          60
   55   56   57   58   59   60   61   62   63   64   65