Экспорт графики через макрос можно ли сделать ?

Программа Владимира Неуймина RastrWin и ее клоны: ActOpus, Барс. Статическая устойчивость.

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 17 апр 2008, 09:41

Цитата:

внешнюю прогу вызвать можно через CreateObject...


а можно поподробнее с каким нибудь простеньким примером ?

чтонибудь а-ля

1. вызвать внешнее приложение

2. дождаться его завершения

3. продолжить работу макроса

т.к если это возможно - остается только "скриншотер" найти работающий из ком. строки (а не найдется так Sign of Misery можно какой попробовать использовать )



Цитата:

из внешнего скрипта можно пользоваться методами Растра, но среди нет такого, который позволит вывести картинку схемы куда-либо...


внешним скриптом/приложением можно клацать на кнопки меню. изврать конечно порядочный, но добиться можно всего (только пробовать даже не хочется пока более простые и надежные варианты не кончились.
Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

Сообщениеmci » 17 апр 2008, 10:09

bdfy писал(а) Thu, 17 April 2008 10:41

Цитата:

внешнюю прогу вызвать можно через CreateObject...


а можно поподробнее с каким нибудь простеньким примером ?

чтонибудь а-ля

1. вызвать внешнее приложение

2. дождаться его завершения

3. продолжить работу макроса

т.к если это возможно - остается только "скриншотер" найти работающий из ком. строки (а не найдется так Sign of Misery можно какой попробовать использовать )




смотри примеры в макро студии Растра здесь и здесь
mci
 
Сообщения: 0
Зарегистрирован: 10 июн 2006, 23:00

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 17 апр 2008, 14:08

первый описывает динамическую передачу данных в ексель. второй тоже о высоком Smile

из хелпа

Цитата:

Наиболее ценным свойством VBScript является возможность работы с внешними

объектами. Наиболее известные из них - все составляющие MS Office (Excel, Word и тд).

Программа Rastr также организована в виде объекта. С объектом можно производить

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

объекты также имеют свойства с которыми можно манипулировать (получать и

устанавливать значения).

Set fso = CreateObject("Scripting.FileSystemObject")

Set fldr = fso.CreateFolder("C:/MyTest")

MsgBox "Создана папка: " & fldr.Name


из всего этого мне совершенно непонятно как будут выглядеть нужные мне команды для управления приложением. для екселя еще ладно - там все эти команды в макросах можно посмотреть. а с отличными от офиса приложениями что делать ?

допустим мой "скриншотер" будет поддерживать работу через парам. ком. строки. Как это сделать ? т.е пример выполенения простейшего cmd\bat файла системного из растра хотелось бы увидеть...

Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

Сообщениеmci » 17 апр 2008, 14:26

bdfy писал(а) Thu, 17 April 2008 15:08



допустим мой "скриншотер" будет поддерживать работу через парам. ком. строки. Как это сделать ? т.е пример выполенения простейшего cmd\bat файла системного из растра хотелось бы увидеть...






например так:



  Set WshShell =CreateObject("WScript.Shell")


CommandPath="notepad.exe C:\Program Files\RastrWin\start.rbs"
Return = WshShell.Run(CommandPath, 1, True)
mci
 
Сообщения: 0
Зарегистрирован: 10 июн 2006, 23:00

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 17 апр 2008, 14:39

так, так, так...

спасибо огромное. работает.

осталось найти/написать нужный "скриншотер" и я в дамках... Smile
Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

Сообщениеmci » 17 апр 2008, 14:43

bdfy писал(а) Thu, 17 April 2008 15:39

осталось найти/написать нужный "скриншотер" и я в дамках... Smile




будут какие результаты - расскажи, тема весьма интересная...

mci
 
Сообщения: 0
Зарегистрирован: 10 июн 2006, 23:00

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 17 апр 2008, 23:25

обсуждали тут возможность создания маленькой спец. проги - именно окно графики чтоб хвататала. но у окна графики нет ни постоянного класса ни даже названия Sad только что хватать в ручную Window Scannerом каждый раз класс и прописывать руками. может чего все таки и получится... т.к вручную указывать область захвата будет неудобно.

Скриншотер из ком. строки я нашел. Лежал под носом Very Happy Irfanview оказывается все умеет.

http://forum.ixbt.com/topic.cgi?id=23:36896

я уже вижу свет в конце туннеля Cool вот с екселем еще разберусь...
Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 18 апр 2008, 01:47

что характерно кстати...

Цитата:

i_view32.exe /capture=0

Capture the whole screen.



i_view32.exe /capture=1

Capture the foreground window.



i_view32.exe /capture=2

Capture client area of the foreground window.






в режиме 1 и 2 хватается окно графики но почему то не полностью. только часть. см. скрины. что бы это означало...

http://img219.imageshack.us/img219/4231/capture1bugto5.th.jpg

А полностью вот так

http://img219.imageshack.us/img219/6859/capture1yl7.th.jpg
Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеИван » 18 апр 2008, 02:30

крутил, крутил... ощущение что фиксированную область окна графики хватает почему то. мелкую схему можно поймать, но это ж не выход.

запостил на форум ирфана... может помогут

http://en.irfanview-forum.de/vb/showthread.php?p=8860#post88 60
Иван
 
Сообщения: 0
Зарегистрирован: 12 апр 2008, 21:12

Re: Экспорт графики через макрос можно ли сделать ?

СообщениеGar » 18 апр 2008, 20:06

Имхо правильное направление, правда незнаю уж как оно, всетаки где-то с Хаком граничит.

Посмотрите в MS Spy я думаю можно определить характерные для этого окна параметры.

Имхо перхватывать окно с графикой и то что туда рисуется - экспортировать в EMF и на диск - всеж вектор получаем.

Имхо функциональности MFC или .NET должно хватить. За неимением РАСТР, к сожалению попробовать неначем.

Если кто раст подкинет, студенческую или демку, готов убить вечер.

Gar
 
Сообщения: 0
Зарегистрирован: 19 мар 2007, 00:00


Вернуться в Rastr