[Erilar]

Сообщение от NumLock

я знаю:

Код:

function SetForegroundWindow(AHandle: THandle): Boolean;
var
  AWindow: THandle;
  AThreadId: Cardinal;
  AProcessId: Cardinal;
begin
  AWindow:=GetForegroundWindow;
  AThreadId:=GetCurrentThreadId;
  AProcessId:=GetWindowThreadProcessId(AWindow, nil);
  AttachThreadInput(AThreadId, AProcessId, True);
  Result:=Windows.SetForegroundWindow(AHandle);
  AttachThreadInput(AThreadId, AProcessId, False);
end;

Как этим пользоваться?