| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Corel+Delphi [D7, WinXP]
Darken © (2004-10-07 23:20:00)Читал статью как под Corel8 все прекрасно работает!(попробовал применить примеры к 12 корелу и о-очень в этом засомневался, хотя может когда то!... у кого то оно и работало...)
Так вот может кто имеет информацию по взаимодействию Дельфи и Корела (только не корела-8)!
Все что мне удалось методом научного тыка, так вот это только и сделать:
var
Mspace, Acad : OleVariant;
acad:=CreateOleObject('CorelDraw.Application');
Mspace:= acad.CreateDocument;
acad.visible:=true;
Mspace:=acad.ActiveLayer.CreateEllipse2(3.404433, 8.602063, 1.891102, -1.891102, 90, 90, False);
Mspace:=acad.ActiveLayer.CreateEllipse(9.404433, 8.602063, 1.891102, -1.891102, 90, 90, False);
acad.ActiveLayer.CreateRectangle(9.404433, 8.602063, 1.891102, -1.891102, False);
acad:= mspace.Duplicate(5, -7);
acad:=mspace.Move( -5.754354, 0.756441);
Так вот если кто знает как выбрать обьект(фигуру), задать его параметры и т.д. E-mail: as_6@list.ru
GROL (2004-10-17 01:40:00) [1]Инициализировать советую так:
if Ver in [10..12] then CreateOleObject('CorelDraw.Application.'+IntToStr(Ver));
CorelDraw := CreateOleObject('CorelDraw.Automation.'+IntToStr(Ver));
Кузя (2004-10-08 16:11:00) [2]Кури материалы здесь
http://www.delphikingdom.com/table/search.asp?namekey=Corel&ItemID=&isQuestion=1&Qwaddress=&TypeEqv=0&Count=10
От себя могу добавить, что от версии к версии что-то добавляется а что-то и перестает работать :(
| |
