multiwin

[wildamd]

http://coderx.ru/downloads.php?do=file&id=22
ребят, есть у кого исходники этой программки? или наброски подобного?
заранее спасибо

Добавлено через 14 часов 6 минут
ну?) смелее)) никто помочь не может?

[wSpirit]

Если еще кто-то будет искать решение такой проблемы под Интерлюд, то для себя сделал так:

1) Узнал Хэндл главного окна
2) Перехватил оконную процедуру
3) Заблокировал сообщение о потери фокуса

Тоесть клиент так и не узнает что окно потеряло фокус, и не снизит фпс


Код:

var
  MainHwnd: Integer;
  OldL2WndProc: function(hwnd,uMsg,wParam,lParam: Integer): Integer; stdcall;

function NewL2WndProc(hwnd,uMsg,wParam,lParam: Integer): Integer; stdcall;
begin
  if hwnd = MainHwnd then
  if uMsg = $0008 then //WM_KILLFOCUS
  begin
    Result:= 0;
    Exit;
  end;

  Result:= CallWindowProc(@OldL2WndProc, hwnd,uMsg,wParam,lParam);
end;


//hook wnd proc
    MainHwnd:= hWnd;
    Integer(@OldL2WndProc):= GetWindowLong(MainHwnd, GWL_WNDPROC);
    SetWindowLong(MainHwnd, GWL_WNDPROC, Integer(@NewL2WndProc))

[Elecktron]

1 а с клавиатурой/мышью проблем не возникает?
2 куда это "всунуть"?