Hi all from Ukraine.
This is my function of VIDEOPROC CALLBACK
function myVideoProc(Handle : DWORD; Action, param1, param2 : DWORD; user : Pointer): BOOL; stdcall;
var clientRect : TRect;
begin
result := true;
case Action of
BassVideo_FoundVideo:
begin
ClientRect.Left := 0;
ClientRect.Top := 46;
ClientRect.Right := 800;
ClientRect.Bottom := 333;
BassVideo_SetVideoWindow(0, videoHandle, ClientRect, 0);
end;
BassVideo_PlayEvent:
begin
videoMode := param1;
end;
BassVideo_WM_Mouse_Click:
begin
ClientRect.Left := 0;
ClientRect.Top := 0;
ClientRect.Right := 800;
ClientRect.Bottom := 480;
BassVideo_SetVideoWindow(0, videoHandle, ClientRect, 0);
end;
end;
end;
but Click event don't work whis this code. Whats wrong?
videoHandle is a Handle of main form.
PS: Sorry for my poor English.
