Вниз
Скачать: CL | DM;

Диалоговое окно не должно перекрываться другими окнами   Найти похожие ветки 

← →
dmitry_12_08_73 ©   (2008-07-13 20:14) [0]

Как сделать, чтобы после открытия диалогового окна типа TOpenDialog  оно не перекрывалось другими окнами. То есть чтобы оно оставалось на переднем плане как обычное окно, у которого FormStyle = fsStayOnTop.
Процедура API:
SetWindowPos(OpenDialog1.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or  SWP_NOSIZE or SWP_NOACTIVATE)
не помогает


← →
KilkennyCat ©   (2008-07-13 21:55) [1]

Какими другими окнами? вообще, или только своего приложения?


← →
oldman ©   (2008-07-14 15:25) [2]


> Как сделать, чтобы после открытия диалогового окна типа
> TOpenDialog  оно не перекрывалось другими окнами.


Так делать нельзя!!!
Пока ты будешь настраивать параметры печати могут появиться системные сообощения, сообщения антивирусов, почтовые сообщения и т.д.
А в окнами твоей программы оно и так не должно перекрываться (если не сделать этого специально).


← →
Vlad Oshin ©   (2008-07-17 10:48) [3]

procedure JumpUp;
var
 Info: TAnimationInfo;
 Animation: LongBool;
 hApp: hWnd;
 nFalse:integer;
begin
 hApp := Application.Handle;
 if IsIconic(hApp) then
   Application.Restore
 else
 begin
   SetActiveWindow(hApp);
   Info.cbSize := SizeOf(Info);
   if SystemParametersInfo(SPI_GETANIMATION, SizeOf(Info), @Info, 0) then
     Animation := Info.iMinAnimate <> 0
   else
     Animation := False;
   Info.iMinAnimate := nFalse;
   SystemParametersInfo(SPI_SETANIMATION, SizeOf(Info), @Info, 0);
   ShowWindow(hApp, SW_MINIMIZE);
   ShowWindow(hApp, SW_RESTORE);
   Info.iMinAnimate := integer(Animation);
   SystemParametersInfo(SPI_SETANIMATION, SizeOf(Info), @Info, 0);
 end;
 Application.MainForm.Repaint;
end;

посмотрите, прикольная штучка, может прикрутите


← →
Palladin ©   (2008-07-17 12:30) [4]


> oldman ©   (14.07.08 15:25) [2]

ему можно... я уже вижу его будущее... слышу проклятья в его сторону... синяки и оторванные руки... )



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
11-1205742423
catdog
2008-03-17 11:27
2009.09.20
Удаление переменных из памяти


2-1247662840
dmitry_12_08_73
2009-07-15 17:00
2009.09.20
Подключение компонентаTWebBrowser к Internet Explorer


15-1248274085
картман
2009-07-22 18:48
2009.09.20
dcom


15-1248298671
Германн
2009-07-23 01:37
2009.09.20
SMS с задержкой


2-1247549864
Cyberdeity
2009-07-14 09:37
2009.09.20
Корень квадратный




   Наверх