Добрый день.
Вопрос вот в чем: В модуле Обмен бизнес-документами в меню XML/ Экспорт данных в XML-файл открывается интерфейс настройки, где есть кнопка "Экспорт". Как вызвать нажатие этой кнопки из внешнего преложения?! (Версия Галактики 8.10, СУБД может быть разной)
Как программно "нажать" кнопку
Модераторы: m0p3e, edward_K, Модераторы
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
1. Есть AqA скрипт, который можно стартануть при запуске галки.
2. есть клавиатурные повторители
3. можно послать событие приложению. Что-то баловалься я с этим - хотел програмно галку закрыть.
4. Можно в конце концов через апи попробовать вызвать фейс галки и выполнять в нем событие для этой кнопки - вроде тоже было такое возможно.
2. есть клавиатурные повторители
3. можно послать событие приложению. Что-то баловалься я с этим - хотел програмно галку закрыть.
4. Можно в конце концов через апи попробовать вызвать фейс галки и выполнять в нем событие для этой кнопки - вроде тоже было такое возможно.
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
по 4 нашел вот такой пример
(VBA)
Dim GalApp As Variant, Iface As Variant
Set GalApp = CreateObject("GalNet.App")
IFace = GalApp.LoadVip("API_Functions", "Prepare", "export", "export.dbf")
if (IFace Is Nothing) then
MsgBox "Функции API не реализованы"
Exit Sub
end if
//вызов функций
IFace.Prepare
IFace.OpenFile "export.dbf", 1000
Set IFace = Nothing
наскока помню galnet.cfg должен лежать в exe в этом случае.
а 3 сложно
.
(VBA)
Dim GalApp As Variant, Iface As Variant
Set GalApp = CreateObject("GalNet.App")
IFace = GalApp.LoadVip("API_Functions", "Prepare", "export", "export.dbf")
if (IFace Is Nothing) then
MsgBox "Функции API не реализованы"
Exit Sub
end if
//вызов функций
IFace.Prepare
IFace.OpenFile "export.dbf", 1000
Set IFace = Nothing
наскока помню galnet.cfg должен лежать в exe в этом случае.
а 3 сложно
