Зарегистрирован: May 18, 2009 Сообщения: 34 Рейтинг: +0/-0
Добавлено: Ср 20 Май, 2009 11:02:55 Заголовок сообщения:
Спасибо oldDad за редакцию. Накосячил, согласен. Сам зашел по ссылкам а ни битые. Поэтому и начал дублировать и не заметил как страница стала уже второй. Я в форумах не силен. извините, в это время я еще в школу ходил. Кому надо и так я думаю разберутся.
Зарегистрирован: May 18, 2009 Сообщения: 34 Рейтинг: +0/-0
Добавлено: Пт 22 Май, 2009 5:46:49 Заголовок сообщения:
SpellBinder_у отвечаю про <в сотни раз> смотрите в коде
w := GetTickCount; в начале и
main.Label1.Caption := FloatToStr((GetTickCount - w) / 1000); вконце процедуры.Я не зря упражнялся с этим w. Попробуйте сами обработать Value_:=Value для
with TDb.GetTag(AFNameList.Strings[i]) на VB и Delphi напрмер для Tags.Count=1000 и почувствуйте разницу, а если Вы еще захотите попробовать и вложенный цикл, где то по тксту if err <> 0 then //если уставка не string_число, а указатель на тэг
with TDb.GetTag(Value) do begin, подискутируем.
Кому интереснтна тема Delphi\DLL\RSView32_TLB альтернатива
Basic\ActivX пишите andrey.seleznev@list.ru
Для тех кто работал с RSView32 хотел бы высказать мысль : RSView это только снаружи обьектная модель или интерфейс который работает из под своих DLL. Для работающего проекта RSView32 из под Delphi или C зная прцедуры и функции, а также значения этой модели можно делать все что хочешь:
создавать и удалять теги(любые) динмически, присваивать им значения, выполнять любые системные команды RSView, например вызывать скрины в нужной позиции, вести логи, тренды и извращатся над проектом как пожелаешь со стороны , не шевеля в самом проектке не одним пальцем, причем быстрее чем Basic\Script в сотни раз ... Думаю не открыл Америку.
Но для тех кому интерестно могу предоставить интересные исходники
Мне интересна идея доступа к проекту RSView через Delphi !!! И вообще интересно как ты эту модель к Delphi притянул? Что ? Как? Почему? Я бы с удовольствием прилепил свой front-end для создания\изменения проекта RSVew
Зарегистрирован: Aug 17, 2007 Сообщения: 157 Рейтинг: +2/-0 Откуда: СПб
Добавлено: Вт 16 Мар, 2010 20:35:19 Заголовок сообщения:
оказывает про объектную модель и ее использование в сторонних приложениях (such as Visual Basic or Visual C++) написано в самом хелпе к RSView32 -
Цитата:
Using the RSView32 Object Model from an external automation controller
-----------------------------------------------------------------------------------------
If you wish to access the RSView32 Object Model from an external automation controller (such as Visual Basic or Visual C++), you will need to create a new RSView32 Application object and set a Project object to the currently loaded RSView32 project.
Example
Код:
Dim RsvApp as RSView32.Application
Dim RsvProj as RSView32.Project
Set RsvApp = New RSView32.Application
Set RsvProj = RsvApp.ActiveProject
'Continue on with code using RsvProj
Tips
· If you use the Project object in more than one subroutine, you will want to dimension a global object variable using the Public statement.
· The runtime error "'429' ActiveX component can't create object" can be encountered on Windows 9x when the RSView32 object model is used from an external automation controller like Visual Basic.
To avoid this problem add the RDM directory to your path in autoexec.bat (for example, C:\Program Files\Rockwell Software\RDM).
Добавлено: Пт 19 Мар, 2010 11:00:19 Заголовок сообщения:
s60 писал(а):
теги, алармы, активность..... а экранов, быстрых клавишь, макросов - нету в модели....
См. в Help AddComponent Method как раз будет пример добавления имеющегося макроса в проект.
Только зачем?
Сделать плохо читаемый проект, чтобы замкнуть все на себя?
А потом самому забыть как сделано .
Зарегистрирован: May 05, 2005 Сообщения: 2773 Рейтинг: +89/-5
Добавлено: Сб 20 Мар, 2010 22:44:22 Заголовок сообщения:
Я ещё могу понять, когда в VBA дописывают функционал, который нужен, а его нет. Но назовите мне хотя бы одну причину, зачем писать пальцами на VBA то, что уже есть. Писать, отлаживать, вылавливать баги (все? не все? кто знает?), а потом подставлять доверчивого пользователя, позволившего аффтару написать свой уникальный код и растворившемуся в пространстве, оставив пользователя хоть и без сопровождения сего самопального продукта, но зато с багами. Вот радости-то....
Разве что, кому-то пописАть программы охота в своё удовольствие. Могу понять, но.... такие программы лучше писать дома, в виде хобби.
Я бы на месте пользователя запретил бы ещё в ТЗ написание уникального самопального кода и проверял бы готовый продукт на предмет его наличия в нём, и не подписывал бы любителям программирования акты, если он там всё-таки имеется. _________________ Обращайтесь к профессионалам.
теги, алармы, активность..... а экранов, быстрых клавишь, макросов - нету в модели....
в FT SE появилась Модель объекта FactoryTalk View SE Client
получается ко всем элементам, что нарисованы на экране *.gfx можно получить доступ с VBA Cool
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
Smart Solutions VDT GmbH | Friedrich-List-Allee 38, D-41844 Wegberg-Wildenrath, Germany Tel.: +49 2432 933 57 83 | e-Mail: office@vdt-solutions.de Все товарные знаки и торговые марки являются собственностью их владельцев.
При использовании материалов сайта ссылка на данный сайт обязательна. Открытие страницы: 0.141 секунды
FAQ
Поиск
Группы
Профиль
Войти и проверить личные сообщения
Вход
.