[es] - PostMessage mogućnosti, ChangeCursor and SystemKeys

borovac
127.0.0.1

Član broj: 29278
Poruke: 220
*.as54.ze.bih.net.ba.

Profil

PostMessage mogućnosti, ChangeCursor and SystemKeys

^{17.10.2004. u 13:37 - pre 237 meseci}

1.Znam da se MinimizeAll može izvesti ovako

Code:
procedure MinimizeAll;
var
  intHwnd: Integer;
begin
  intHwnd := FindWindow('Shell_TrayWnd', nil);
  PostMessage(intHwnd, WM_COMMAND, 419, 0);
end;

Šta je ono 419?
Kako uraditi MaximizeAll?
2. Kako promijeniti kursor?
3. Da li se mogu onemogućiti sistemski ključevi (Alt+Esc,Ctrl+Alt+Del,Alt+F4 i sl.)?
Treba da dari na svim windowsima!

Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314

+102 Profil

Re: PostMessage mogućnosti, ChangeCursor and SystemKeys

^{17.10.2004. u 15:24 - pre 237 meseci}

1) Sta je 419 ? Po MSDN-u :

Citat:

Value of the low-order word of wParam. Specifies the identifier of the menu item, control, or accelerator.

2) Vidi http://www.experts-exchange.co...nguages/Delphi/Q_20665275.html

3) Za ALT+F4 :
U OnCreate ili na neko drugo mesto stavis :

Code:
Application.OnMessage := OnAppMessage;

i :

Code:

procedure TMainWindow.OnAppMessage(var Msg: TMsg; var Handled: Boolean);
begin
  Handled := FALSE;

  Case Msg.Message of
// Ako je ALT+F4 pritisnuto, setuj Handled na TRUE (time se obustavlja dalje procesuiranje trenutne poruke)
    WM_SYSKEYDOWN : If Msg.wParam = VK_F4 Then
                      Handled := TRUE;
  End;
end;

Ctrl+Alt+Del u NT sistemima ne mozes lako da blokiras... Pretrazi malo forum, bilo je reci o tome... U Win9x kod mozes da nadjes preko Google-a veoma lako...

Odgovor na temu

borovac
127.0.0.1

Član broj: 29278
Poruke: 220
*.as54.ze.bih.net.ba.

Profil

Re: PostMessage mogućnosti, ChangeCursor and SystemKeys

^{17.10.2004. u 15:33 - pre 237 meseci}

1. Ali koju kontrolu identifikuje 419?
To me zanima jer bih želi0 napraviti MaximizeAll. A zo to ja mislim treba nešto drugo umjesto 419.
3. Znam sve to uraditi za Win9x:
U NT sistemima Ctrl+Alt+Del se preko registrija može onemogućiti.

Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314

+102 Profil

Re: PostMessage mogućnosti, ChangeCursor and SystemKeys

^{17.10.2004. u 15:49 - pre 237 meseci}

Citat:

U NT sistemima Ctrl+Alt+Del se preko registrija može onemogućiti.

Ali to nije najefikasniji nacin (da disejblujes TaskManager)... Sta ako ti program 'pukne' ??? Onda TaskMgr ostaje disejblovan do daljneg...

Odgovor na temu