Коллеги, у кого есть работы с CorelDRAW из 1с.
Покажите пример взаимодействия, пожалуйста.

Срочно нужно решать задачу, времени в обрез. Спасите.

из 1с ценник в CorelDRAW ? =)

google Imagemagick

Не совсем ценник. Нужно кучу этикеток напечать с уникальными кодами. КОды в файле. Я хочу читать коды из файла в 1с и пулять их CorelDRAW. Мне нужен пример работы с CorelDRAW как с COMОбъект.

Чо то типа этого наверно, только кореловские функции ))
   Photoshop = Новый COMОбъект("Photoshop.Application");
   PhotoDoc = Photoshop.Open("C:\1.jpg");
//    Photoshop.PlayAction("PhotoDoc.ResizeImage()");
//    PhotoDoc.PlayAction("Quadrant colors");
   PhotoDoc.RotateCanvas(35);
   PhotoDoc.Save();
   PhotoDoc.Close();
//    Photoshop.Quit();

Valerik0101, да оно. Вот функций CorelDRAW  мне бы найти.

(5)Я только не помню где и как искал функции фотошопа ((
Наверное в инете или в документации...

Valerik0101, если быстро сможешь найти - поделись информацией. Буду очень благодарен.

Что за задача?

Корел знаю хорошо, готов небольшую задачу выполнить бесплатно сегодня ночью.

Или сам читай http://coreldraw.com/wikis/howto/default.aspx

А чо поиск забанили?

http://aix.ucoz.ru/publ/delphi/iskhodniki_v_delphi7/delphi_i_corel_draw/12-1-0-101

(7) для начала запусти ексель и через его объектный бровзер посмотри, что оный дров вообще светит наружу...

(7) http://www.oberonplace.com/vba/draw.htm

Могу оплатить работу, если кто готов быстро решить. У меня запара.

Суть работы:
Напечать 500 000  этикеток с уникальным кодом. Коды в текстовых файлах. Нужно прочитать файл и вывести их нужным шрифтом в CorelDRAW  . Потом из CorelDRAW  мы будем печать на принтере zebra.

контакты аська 45613912, почта [email protected], 8926619OO22

А зачем для этого дров?

ДенисЧ, можно без него. Хотел Bar-One от zebra, но он OLE не поддерживает похоже.

решу за недорого

нужно получить 500 000 файлов ?!

(14) А оля для этого зачем? У меня родной 1сный баркод прекрасно работает и печатает... ЧТо на зебру (тут с параметрами страницы поиграться надо), что на простой принтер...

Да можно и прямо из 1с, наверное.
Мне нужно 400 000 этикеток, в макете 81 этикетка, значит нужно 400000/81 = 4938 макетов, т.е. 4938 файлов, если печатать в CorelDRAW.

Макет тебе нужен один... Всего один.

ДенисЧ, написал тебе в аську  - тишина.
кому интересно задание - контакты свои я в теме оставил.

(20) Аська у меня выключена и включена уже сегодня не будет.
Кроме того, это задание мне не интересно. Оно скучно.

ДенисЧ, так не бесплатно же. Если все так просто, то почему бы не помочь за деньги.

(22) Слово "неинтересно" тебе о чём-то говорит? Я пока не на помойках еду ищу. Поэтому не возьмусь. Уж извини.

ДенисЧ, я понял, было бы предложено. С другой стороны, я помочь просил.

Блин, как все не просто. Хочу вывести текст в начале листа - верхний левый угол. Ставлю координаты 0,0 - выводится в середине.. как в левый верхний угол записать? Какая у CorelDRAW система координат?

CorelDraw =Новый COMОбъект("CorelDraw.Automation.15");
CorelDraw.FileNew();
CorelDraw.SetDocVisible(True);
CorelDraw.CreateArtisticText( "Тест", 0,0);

В центре листа.

Базис, а как в левый верхний угол?

Размер листа какой? Там в микронах надо указать смещение.

Я тебе предложение кинул, собсно. Не мучайся, ибо у меня связка с дровами давно в планах, на тебе я и научусь.

Базис,  спасибо, надеюсь у нас получится решить вопрос. А народ, блин, отзывчивый )))

SVG формат покури - тот-же XML...
может можно сразу из 1с-ки...
типа: http://rus-linux.net/nlib.php?name=/MyLDP/mm/inkscape/inkscape-guide-15.html
а потом нам расскажешь...

SVG, нам тут не поможет. Базис, спасибо, помог. Организовал связку CorelDraw и Excel.