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

Компьютеры и все что с ними связано
mau89
Автолюбитель
Автолюбитель
Сообщения: 87
Зарегистрирован: 13 янв 2010, 00:00
Награды: 1
Рейтинг: 87
Репутация: 0

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

Сообщение mau89 » 21 мар 2010, 17:02

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

 

slart
АвтоЭксперт
АвтоЭксперт
Сообщения: 1091
Зарегистрирован: 23 авг 2005, 00:00
Награды: 3
Рейтинг: 4 334
Репутация: +18

Сообщение slart » 21 мар 2010, 19:35

сочувствую. насколько знаю, мсворд закрытый формат. про визио щас позырим

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

а так-то нехилые заданьица стали давать.
живот не от пива, а для пива!

mau89
Автолюбитель
Автолюбитель
Сообщения: 87
Зарегистрирован: 13 янв 2010, 00:00
Награды: 1
Рейтинг: 87
Репутация: 0

Сообщение mau89 » 21 мар 2010, 19:41

Вот и я о том же да :( мне надо просто как отчет создать с полученными данными, это же можно сделать через макрос если не ошибаюсь, просто выгрузить инфу в ворд
мечта SUBARU IMPREZA WRX STI!!!

windym
Автолюбитель со стажем
Автолюбитель со стажем
Сообщения: 189
Зарегистрирован: 08 май 2009, 00:00
Награды: 1
Рейтинг: 189
Репутация: 0

Сообщение windym » 21 мар 2010, 19:42

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

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

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

mau89
Автолюбитель
Автолюбитель
Сообщения: 87
Зарегистрирован: 13 янв 2010, 00:00
Награды: 1
Рейтинг: 87
Репутация: 0

Сообщение mau89 » 21 мар 2010, 19:52

Проблема что я только начал это делать, и кроме тех задания у меня ничего нет, как начать я не в курсе поэтому и спрашиваю здесь, может кто нибудь помочь. А если я не ошибаюсь то макрос же пишет определенные действия которые сделал, следовательно другую диаграмму он не разберет, а мне нужно чтоб он разные разбирал :(
мечта SUBARU IMPREZA WRX STI!!!

windym
Автолюбитель со стажем
Автолюбитель со стажем
Сообщения: 189
Зарегистрирован: 08 май 2009, 00:00
Награды: 1
Рейтинг: 189
Репутация: 0

Сообщение windym » 21 мар 2010, 20:07

я именно с 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 файл

slart
АвтоЭксперт
АвтоЭксперт
Сообщения: 1091
Зарегистрирован: 23 авг 2005, 00:00
Награды: 3
Рейтинг: 4 334
Репутация: +18

Сообщение slart » 21 мар 2010, 22:21

да.. через комобъекты придется.
живот не от пива, а для пива!