PHP DM Gate v0.9 » runtime error 216

tippa (09.02.10 15:17) [0]

В MCK создаю пустую форму с кнопкой, затем перечисляю все окна:
procedure TForm1.Button1Click(Sender: PObj);
function EnumWindowsTo(ToH:Hwnd):Bool;stdcall;
begin
Result:=true;
end;
begin
EnumWindows(@EnumWindowsTo,0);
end;

в конце выполнения программы появляется окошко с ошибкой "Runtime error 216 at 00404DC8", что не так?

<Цитата>
Дмитрий К © (09.02.10 15:44) [1]

Не хватает второго параметра в EnumWindowsTo
http://msdn.microsoft.com/en-us/library/ms633498%28VS.85%29.aspx

<Цитата>
tippa (09.02.10 16:03) [2]

спасибо.

<Цитата>