Страница 1 из 1

Кто хорошо разбирается в Delphi, нужна помощь

Добавлено: 21 мар 2010, 17:02
mau89
В общем задача вот такая, нужно написать приложение которое сможет, открывать файл MS Visio и делать разбор этой диаграммы, т.е брать допустим каждую стрелочку считывать что написанно в ней заносить потом это все в файл MS Word. Кто сможет помочь подсказать или что нибудь посоветовать? :amin: т.к я один не смогу это написать, а если не напишу то мне :cherep: :( Нужно это для курсовой по специальности на 4 курс в ИМиКН :amin:

Добавлено: 21 мар 2010, 19:35
slart
сочувствую. насколько знаю, мсворд закрытый формат. про визио щас позырим

Добавлено спустя 2 минуты 18 секунд:

а так-то нехилые заданьица стали давать.

Добавлено: 21 мар 2010, 19:41
mau89
Вот и я о том же да :( мне надо просто как отчет создать с полученными данными, это же можно сделать через макрос если не ошибаюсь, просто выгрузить инфу в ворд

Добавлено: 21 мар 2010, 19:42
windym
попробуй подключиться из своей программы к Visio
дальше записывай макросы в visio и совершай те действия, которые должна выполнять программа, и смотри что за код в них записывается

Добавлено спустя 1 минуту 38 секунд:

а в ворд не проблема выгрузить, у делфи есть компоненты для работы с вордом

Добавлено: 21 мар 2010, 19:52
mau89
Проблема что я только начал это делать, и кроме тех задания у меня ничего нет, как начать я не в курсе поэтому и спрашиваю здесь, может кто нибудь помочь. А если я не ошибаюсь то макрос же пишет определенные действия которые сделал, следовательно другую диаграмму он не разберет, а мне нужно чтоб он разные разбирал :(

Добавлено: 21 мар 2010, 20:07
windym
я именно с Visio не работал
но могу подсказать первые шаги
1 в главный var где у тебя записанно Form1:Form; добавь строчку Visio: Variant;
2 но кнопку повесь событие OnClick
3 вставь в него следующие строчки:
Visio := CreateOleObject('Visio.Application');
Viso.Workbooks.Open[Edit1.Text] ; - в эдите у тебя будет записан полный адрес файла который ты открываешь
Visio.Visible:=true;


P.s. пишу по памяти, с делфи уже давно не работал
этот код должен открыть visio файл

Добавлено: 21 мар 2010, 22:21
slart
да.. через комобъекты придется.