Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.25;
Скачать: CL | DM;

Вниз

Активация приложения   Найти похожие ветки 

 
DoNotKnow   (2003-08-12 23:39) [0]

Добрый вечер. Возможно ли сделать моё приложение активным в определённое время, когда оно неактивно? Заранее благодарен.


 
CrazyAngel ©   (2003-08-13 01:21) [1]

Конечно можно - чтоб наверняка :
не помню откуда

procedure TForm1.BringToFrontAnyway;
var
OldTimeOut: DWORD;
hWnd: Integer;
begin
hWnd := GetForegroundWindow;
if (not paused)and needreboot then endt.Enabled := true;
if hWnd = Application.Handle then Exit;
if hWnd = form1.Handle then Exit;
SystemParametersInfo(SPI_GETFOREGROUNDLOCKTIMEOUT, 0, @OldTimeOut, 0);
SystemParametersInfo(SPI_SETFOREGROUNDLOCKTIMEOUT, 0, Pointer(0), 0);
SetForegroundWindow(Application.Handle);
SystemParametersInfo(SPI_SETFOREGROUNDLOCKTIMEOUT, 0, Pointer(OldTimeOut), 0);
showwindow(hWnd,SW_MINIMIZE);
SetWindowPos(Application.Handle,HWND_TOPMOST, Left, Top,Width,Height, SWP_NOMOVE or SWP_NOSIZE);
end;



Страницы: 1 вся ветка

Текущий архив: 2003.08.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
1-81628
ghost_by
2003-08-12 18:13
2003.08.25
вопрос про DBGrid.onDrawColumnCell


14-81908
DeMoN-777
2003-08-07 09:08
2003.08.25
Вроде вопрос по php.ini


7-81966
Фагот
2003-06-10 15:08
2003.08.25
Опять про CD-Rom


14-81890
Viktor Kushnir
2003-08-08 09:16
2003.08.25
Internet via e-mail


1-81606
Сергеич
2003-08-15 12:20
2003.08.25
Обработка ошибок