Собственно сабж. Не буду рассказывать предысторию, дошел до следующего:
Создаю новый проект, на форме один статик текст, в Declare global external function пишу


В событии open окна пишу


Это всё. При запуске вижу 87, вместо желанного нуля.

87 -- Invalid parameter (Неверно задан параметр), хотя функция какбэ даже без параметров.. Может кто в курсе как это побороть?

P.S. если это дело повесить на кнопку вместо open, то 87 только при первом нажатии, при последующих прекрасный ноль.

Dim2000
Легко. Не вызывать функцию там, где это не имеет смысла.
Вы имеете в виду что перед ней должны быть другие winapi функции?

В любом случае, что бы там не происходило перед GetLastError, сначала вылазит 87, а потом то что должно быть на самом деле.

spas2001Ну вообще-то возвращается ulong, а не longИсправил, ничего не изменилось(

Локшин Марк
Сказали же, не вызываь ее просто так. Эта ошибка лезет откуда-то из недр виртуальной машины от ее вызовов Win API функций. С точки зрения Windows не различимо что вызвали что-то из скрипта или из внутреннего кода виртуальной машины.Ну я же вызывал ее не из научного интереса первоначально..

Вешаю на кнопку соединение с фтп сервером и получение файла, естественно хочу знать соединилось или нет, скопировалось или нет, для этого использую GetLastError. При первом нажатии при любом исходе возвращает 87 (и если успешно файл скопирует и если неправильный путь прописать и хоть еще что).

P.S. даже не так, не при первом нажатии, а при первом вызове GetLastError, последующие нормальный результат дают.

Локшин Марк
Вызывайте WinAPI функцию и сразуже следом за ней GetLastError СРАЗУ СЛЕДУЮЩЕЙ СТРОКОЙ В ТОМ ЖЕ СКРИПТЕ.Так и делал.. в первый раз 87, независимо от того что та функция должна была установить.

Я конечно могу обойти эту беду, вызвав GetLastError разок в open (тогда на кнопке потом все хорошо), но хотелось бы как-то понять (я ж думал это моя ошибка, а не пауэрбилдеровская)

Dim2000
Функции, устанавливающие этот самый LastError. Это неочевидно ;)?
Очевидно. Но пока они были я мог сомневаться, а вдруг и правда неверные аргументы передаю.
А вот пока ошибки не случилось, этот самый LastError должен бы нулем быть по логике, не?

Dim2000
А та функция устанавливает LastError? И вообще, где код ;)?
Щас озаботился сделать короткий пример, чтоб показать, что я не вру и вроде догнал где собака порылась..

Вот такой код на кнопке ведет себя как раз как я описал: при первом нажатии 87, при последующих 0

Dim2000
Как я и думал, не воспроизводится.
что, сразу 0 дает?
значит у меня что-то(
PB 11.5 build 3127 кстати

Anatoly Moskovsky
Вот смотрите, сценарий при котором LastError может портиться между вызовами FindWindowW и GetLastError:

PowerScript:
l_handle = FindWindowW(0,ls_wname)
Внутри:
Вызов LoadLibrary("User32.dll")
Вызов GetProcAddress("FindWindowW")
Вызов FindWindowW()

PowerScript:
l_error = GetLastError()
Внутри:
Вызов LoadLibrary("kernel32.dll")
Вызов GetProcAddress("GetLastError")
Вызов GetLastError()

Как видим при первом запуске вашего кода, между вызовами FindWindowW и GetLastError производятся еще ряд вызовов которые также устанавливают LastError
Это только те, что точно должны вызваться. А есть еще и работа самого интерпретатора PB, и не исключено что там вызываются еще дополнитеные ф-и WinAPIВот кстати да, загвоздка где-то в подгрузке библиотек. Когда для примера пытался вместо FindWindow вызывать CopyFile (который тоже из kernel32), то GetLastError уже проходит нормально..

Хотя вон же люди пишут что не воспроизводится..