398______________________________________________Глава 6

Она обычным образом вызывает диалоговое окно, в котором пользователь вы-
бирает открываемый файл. Затем объект, соответствующий этому файлу, загружа-
ется в контейнер методом LoadFromFile. Имя файла запоминается в переменной
FName. Последний оператор методом Repaint перерисовывает окно контейнера,
чтобы в нем немедленно отобразился открытый объект.

Теперь посмотрим, как работает наше приложение. Запустите его на выполне-
ние и выполните команду Новый. Перед вами откроется окно Вставка объекта (Insert
Object), представленное на рис. 6.3. В этом окне вам предоставляются две возмож-
ности: создание нового объекта OLE (радиокнопка Создать новый), или создать
объект из имеющегося файла (радиокнопка Создать из файла).

Рассмотрим сначала первую возможность. А этом случае в окне Тип объекта вы
должны указать тип вставляемого в контейнер объекта. Это может быть документ
Word, лист Excel, объект звукозаписи, точечный рисунок (как на рис. 6.3) и т.п.
Правда, к сожалению, надо отметить, что не любой тип объекта и не в любой вер-
сии Windows может быть вставлен. Так что с переносимостью подобных приложе-
ний могут возникнуть проблемы. Если вставка не получится, вам будет выдано со-
ответствующее сообщение.

Рис. 6.3

Окно вставки объекта OLE — вставка
нового объекта

После того, как вы выбрали тип объекта и щелкнули на ОК, в контейнере OLE
вашего приложения отобразится вид объекта по умолчанию. Этот вид зависит от
типа объекта. Возможно, в первый момент вы вообще ничего не увидите. Сделайте
двойной щелчок на контейнере, вызывая тем самым программу, обслуживающую
объект этого типа. Вы увидите, что ваше приложение чудесным образом преобра-
зится. В него встроится соответствующая программа вместе со своими инструмен-
тальными панелями и меню. На рис. 6.4 вы видите встроенную программу Micro-
soft Paint, обслуживающую объекты битовых матриц — точечные рисунки. Вы
можете нарисовать какое-то свое изображение или с помощью команды ее меню
Правка | Вставить из файла открыть какой-то файл с битовой матрицей. На
рис. 6.4., например, открыт файл, расположенный в каталоге \program files\Com-
mon Files\Borland Shared\lmages\Splash\16Color\athena.bmp. Далее вы может редак-
тировать загруженное изображение (правда, надеюсь, у вас не поднимется рука ре-
дактировать показанное на рис. 6.4 прекрасное фирменное изображение Borland).

Обратите внимание на то, что ваша инструментальная панель сохранилась на
экране и после загрузки объекта и начала работы с ним. И, главное, заметьте, что
не все разделы меню программы Microsoft Paint встроились в ваше приложение.
Нет первого меню — Файл, в котором содержатся команды открытия и сохранения
файлов. Это не случайно, так как далее будет показано, что сохранение объекта
OLE отличается от сохранения файла изображения. Как вы можете видеть на
рис. 6.4, вместо меню Файл, имеющегося в Microsoft Paint, встроилось меню Объ-
ект вашего приложения, в котором имеются соответствующие команды открытия
и закрытия файла. Именно ради этого мы и делали в своем приложении меню.