byRef argument type mismatch

[Faust]

Баг, вынесенный в заголовок темы возникает, когда я использую конструкцию

Код: Выделить всё

MoveToEx mDC, w + j, h, 0&

Компилятор ругается, выделяя ноль. В API-Guide упоминается некий null pointer, но использование null или vbNull приводит к тем же результатам. Что следует поменять в строке, если мне не нужны выдаваемые функцией результаты?
ЗЫ. На всякий случай: функцию я объявляю вот так:

Код: Выделить всё

Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, lpPoint As POINTAPI) As Long


[GM]

А если вот так:

Код: Выделить всё

Private Type POINTAPI
    X As Long
    Y As Long
End Type
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal lpPoint As Long) As Long

MoveToEx Me.hdc, 10, 10, ByVal 0&


[vvs_adm]

To GM
А для чего у тебя объявление типа POINTAPI? Разве что для прикола

[Faust]

thnx