Господа, спасибо, проблемма решена. Использую код:
Цитата:
procedure TForm3.FormCreate(Sender: TObject);
begin
SetWindowPos( Handle, HWND_TOPMOST, Left, Top, Width, Height,SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE );
Application.NormalizeTopMosts;
RegisterHotkey (Handle, 1, MOD_ALT or MOD_SHIFT, VK_F7);
end;
|