Скачать: CL | DM;

Corel+Delphi   Найти похожие ветки 

← →
Darken   (2004-10-07 23:20) [0]

Читал статью как под 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

---

← →
Кузя   (2004-10-08 16:11) [1]

Кури материалы здесь
http://www.delphikingdom.com/table/search.asp?namekey=Corel&ItemID=&isQuestion=1&Qwaddress=&TypeEqv=0&Count=10

От себя могу добавить, что от версии к версии что-то добавляется а что-то и перестает работать :(

---

← →
GROL   (2004-10-17 01:40) [2]

Инициализировать советую так:
if Ver in [10..12] then CreateOleObject("CorelDraw.Application."+IntToStr(Ver));
CorelDraw := CreateOleObject("CorelDraw.Automation."+IntToStr(Ver));

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c