Set oSys = AkelPad.SystemFunction()
lpXXX = oSys.RegisterCallback("FunctXXX")
Function FunctXXX(...)
...
End Function
пишет, что "Недопустимое число аргументов или присвоения значения свойства"
Примеров, конечно на vbs в Scripts-Rus.txt я не нашёл
Posted: Mon Sep 10, 2012 2:39 pm
by VladSh
Andrey_A_A
Тут не подскажу.. Но думаю, что Basic не поддерживает калбэки, хотя могу ошибаться.
Posted: Tue Sep 11, 2012 10:15 am
by Instructor
Andrey_A_A
См. версию 11.5
Posted: Tue Sep 11, 2012 10:15 am
by Instructor
Добавлено: возвращен скрипт ShowMenu.js теперь как подключаемая библиотека. Исправлено: некорректно осуществлялся переход на место ошибки, при использовании метода Include с многократной вложенностью. Исправлено: метод RegisterCallback для VBScript не работал. Добавлен пример использования в документацию.
Added: script ShowMenu.js returned now as library. Fixed: incorrect goto error location when using Include() method with multiple nesting. Fixed: RegisterCallback method for VBScript not working. Added example of using in documentation.
' Функция создания списка всех файлов по указанному пути
Function ListFiles(FFolder)
Set FF = CreateObject("Scripting.FileSystemObject").GetFolder(FFolder)
For Each Files In FF.Files
fText = fText & Files & vbNewLine
Next
Set FF = Nothing : ListFiles = DelEndEmptyLine(fText)
End Function
Call AkelPad.Include("TestFun.vbs") : Folder = 0 : L = ListFiles(Folder)
выдаёт ошибку, нажимаю изменить ... не открывает
Posted: Wed Sep 12, 2012 3:44 pm
by VladSh
Instructor
oSet.Read не читает из файла, в котором есть комментарии (точка с запятой в начале строки).
Добавьте пожалуйста возможность работы с файлами с комментами, чтобы как и у других ini было.
выдаёт ошибку, нажимаю изменить ... не открывает
У меня такое сегодня было на js, но я там в аргументы передал лишнюю кавычку, и оно писало, что "незавершённая строковая константа". Долго не мог понять, что оно такое.. Instructor, если можно, было бы лучше в этом случае выводить сообщение, что-то типа "о некорректно переданных параметрах в аргументы"?
Posted: Wed Sep 12, 2012 5:40 pm
by Instructor
Andrey_A_A wrote:Вот обнаружил...
См. версию 11.7
Posted: Wed Sep 12, 2012 5:43 pm
by Instructor
Исправлено: некорректно осуществлялся переход на место ошибки, при вызове функции, добавленной методом Include.
Fixed: incorrect goto error location when calling function added with Include() method.