Використання створеної форми ActiveFormX

↑

▷ Содержание

⇐ ПредыдущаяСтр 14 из 16Следующая ⇒

Послідовність виконання:

1 Відкрити MS Excel

2 Вибрати Сервис/Макрос/Редактор Visual Basic

3 Вставити нову форму: Insert/User Form

4 Добавити додатковий компонент ActiveFormX: Tools/Additional Controls, вибрати ActiveFormX Control

5 Добавте компонент ActiveFormX на форму

6 Виконати програму: Run/Run (див.рис.)

Робота з компонентами-серверами COM MS Word і MS Excel

Постановка задачі: створити додаток, який використовує компоненти-сервери COM MS Word і MS Excel.

Послідовність виконання:

1 Створюємо додаток: File/New/Application

2 Добавте на форму компоненти TWordApplication, TExcelApplication, TExcelWorksheet.

3 Створіть функцію-обробник події OnCreate форми Form1:

4 Збережіть усе: File/Save All

5 Виконайте програму: Run.

Створення компонентів CORBA

Постановка задачі: створити компонент-сервер CORBA з методом, який повертає квадрат числа, створити клієнт CORBA, який використовує об’єкт CORBA.

Послідовність виконання:

Створення сервера CORBA

Перед початком роботи установіть Borland VisiBroker for C++ 4.5 в папку c:\Inprise\vbroker

1 Закрийте існуючі проекти: File/Close All

2 Вибрати прапорці на View/Toolbars/CORBA і Tools/VisiBroker SmartAgent

3 Створіть CORBA сервер: File/New/Other/Multitier/CORBA Server

4 Виберіть тип серверу: Console Applcation та добавте новий IDL файл: Add New IDL File

5 У файл з розширенням.idl вставте код:

module MyModule

{

interface My

{

float f(in float x);

};

};

6 Збережіть усе: File Save All, назвіть файл.idl MyServ, а проект Server

7 Вкажіть шлях до бібліотек vboker: Project/Options/Directories|Conditionals

Натисніть кнопку "..." справа від Include Path і виправте $(VBROKERDIR)\include на C:\Inprise\vbroker\include

Натисніть кнопку "..." справа від Library Path і виправте $(VBROKERDIR)\lib на C:\Inprise\vbroker\lib

8 Натисніть кнопку New CORBA Object Implementation

9 Виберіть Interface Name: MyModule::My, та виберіть Show Updates

10 У вікні Project Updates натисніть Ok

11 Змініть реалізацію функції f наступним чином:

CORBA::Float MyImpl::f(CORBA::Float _x)

{

return (_x*_x);

}

12 Скомпілюйте проект: Project/Build Server

Створення клієнта CORBA

Послідовність виконання:

1 Закрийте існуючі проекти: File/Close All

2 Створіть CORBA клієнт: File/New/Other/CORBA Client

3 Виберіть Application Type: Windows Application, добавте файл (Add IDL Files) MyServ.idl

4 Добавте на форму компоненти поле Edit і кнопку Button

5 File/Save All

6 Вкажіть шлях до бібліотек vboker

7 Натисніть кнопку Use CORBA Object (при помилці добавте в файл idl пустий рядок)

8 Виберіть Interface Name: MyModule::My

9 Добавте обробник події OnClick для Button1:

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Edit1->Text=my->f(StrToFloat(Edit1->Text));

}

10 Скомпілюйте проект: Project/Build Project1

11 Виконайте програму Server.exe і, не закриваючи її, програму Project1.exe

Наприклад, при вводі в поле числа 2 і натиску кнопки повинен появитись результат: 4

Познавательные статьи:



Где возникла философия и почему?

Относительная высота сжатой зоны бетона

Сущность проекции Гаусса-Крюгера и использование ее в геодезии

Тарифы на перевозку пассажиров