All Forums
 Категория Visio
 Форум Вопросы и ответы
 Delphi und Visio 2007
Author Previous Topic Topic Next Topic  

Erik

5 Posts
Posted - 11/01/2007 :  11:56:54
Доброго времени суток!

Хотел просить помощи так как в данный момент пытаюсь работать в visio через Delphi. Передо мной стоит следующая задача: необходимо в ActiveX DrawingControl нарисовать (программно) простейшие шейпы и сохранить на диск. Я прочитал форум однако ничего сколько нибудь конкретного не нашёл.

Зарание спасибо!

Erik

5 Posts
Posted - 11/01/2007 :  17:59:11
Конкретно я не могу найти описание процедур работающих с DrawingControl.

Дайте пожалуйста ссылку на нормальный справочник.
Go to Top of Page

zz 5

Russia
54 Posts
Posted - 11/01/2007 :  19:49:37
А чего тут сложного ? Был ли опыт работы с Word или Excel ? В книгах это есть, с Visio ничем принципиально не отличается. Другие методы (свойства), не более.

------------------------------------------------------------------------------------------------
Если автор пишет о том, чего не понимает, его работа будет понята только теми читателями, которые понимают в этом больше, чем он !
Go to Top of Page

Erik

5 Posts
Posted - 11/02/2007 :  15:14:07
Вот именно в этих других методах и заключается проблема.

Где бы найти хорошее (не SDK а хорошее) описание этих методов?
Go to Top of Page

Erik

5 Posts
Posted - 11/02/2007 :  17:08:18
Ну хотя бы для начала как кинуть определённый шейп на лист..

Пожалуйста....!
Go to Top of Page

zz 5

Russia
54 Posts
Posted - 11/02/2007 :  17:35:10
"Да пожалуйста" (с) м/ф "Вовка в тридевятом царстве" 

var
  F: Variant;
begin
  F := DrawingControl1.Document.Application.ActiveWindow.Page.Application;
  F.Documents.OpenEx('basic_m.vss',64);
  F.ActiveWindow.Page.Drop(F.Documents.Item('BASIC_M.VSS').Masters.ItemU('Square'), 10,10);


Соответсвенно, первая строчка - получение ссылки на объект Visio; вторая - открываем закладку basic; третья - бросаем элемент на активный лист.

------------------------------------------------------------------------------------------------
Если автор пишет о том, чего не понимает, его работа будет понята только теми читателями, которые понимают в этом больше, чем он !
Go to Top of Page

Erik

5 Posts
Posted - 11/02/2007 :  18:46:39
"Спасибо тебе, добрый человек".. Не помню откуда, да и неважно..
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)