Fórum Botão da aplicação na barra de tarefas #285928

23/06/2005

0

Delphi

Mesmo quando bloqueamos Alt + F4 na aplicação ao executá-la em XP fica disponível a opção de ficha-la clicando como botão direito do mouse no botão da aplicação na barra de tarefas.

Tem como desabilitar esta opção?

Um abraço


Aurino003

Aurino003

Responder

Posts

01/07/2005

Sandra

aurino003,

No onCreate do form principal, faça:
procedure TForm1.FormCreate(Sender: TObject);
var
  SysMenu: HMenu;
begin
  SysMenu := GetSystemMenu(application.handle, False);
  EnableMenuItem(SysMenu, SC_CLOSE, MF_DISABLED or MF_GRAYED);
end;

:D


Responder

Gostei + 0

04/07/2005

Aurino003

Sandra,

:D Obrigado pela dica!

Problema solucionado.


Um abraço

aurino003, No onCreate do form principal, faça: 
procedure TForm1.FormCreate(Sender: TObject);
var
  SysMenu: HMenu;
begin
  SysMenu := GetSystemMenu(application.handle, False);
  EnableMenuItem(SysMenu, SC_CLOSE, MF_DISABLED or MF_GRAYED);
end;
:D



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar