Desativar (X) de Form e Tecla ALT F4
Como eu Faço para dezativar o (X)-Fechar do Form e a combinação de teclas ALT+F4
Obrigado.
Anderson
Obrigado.
Anderson
Anonymous
Curtidas 0
Respostas
Carlos Filho
24/03/2003
Para desativar o botão Fechar de forma simples voce deve colocar a propriedade borderIcons do Form sem a opção [b:3705e01c25]biSystemMenu[/b:3705e01c25] ativada, ou seja, no Objec Inspecto localize a opção BorderIcons, clique no sinal de + ao lado da opção e coloque em FALSE a opção biSystemMenu.
O inconveniente é que você não terá também os botões de minimizar e de maximizar, mas se quiser colocar botões no formulário que façam o mesmo efeito vc deve usar Application.Minimize, Application.Restore e Form1.WindowState = wsMaximized
Espero ter ajudado
O inconveniente é que você não terá também os botões de minimizar e de maximizar, mas se quiser colocar botões no formulário que façam o mesmo efeito vc deve usar Application.Minimize, Application.Restore e Form1.WindowState = wsMaximized
Espero ter ajudado
GOSTEI 0
Carlos Filho
24/03/2003
[quote:33ea49aed1=´Ðerek Wildstar´]Para desativar o botão Fechar de forma simples voce deve colocar a propriedade borderIcons do Form sem a opção [b:33ea49aed1]biSystemMenu[/b:33ea49aed1] ativada, ou seja, no Objec Inspecto localize a opção BorderIcons, clique no sinal de + ao lado da opção e coloque em FALSE a opção biSystemMenu.
O inconveniente é que você não terá também os botões de minimizar e de maximizar, mas se quiser colocar botões no formulário que façam o mesmo efeito vc deve usar Application.Minimize, Application.Restore e Form1.WindowState = wsMaximized
Espero ter ajudado[/quote:33ea49aed1]
Foi mal, nem me ligue na segunda parte da pergunta.
Não testyei, mas pode ser que funcione se vc colocar a propriedade KeyPreview do Form em True e no evento OnKeyDown especificar que a combinação ALT+F4 não é permitida...
Se seu objetido é não permitir que o Form seja fechado de forma normal, basta colocar no evento OnClose do mesmo a seguinte declaração:
ou
no evento OnCloseQuery colocar a declaração:
O inconveniente é que você não terá também os botões de minimizar e de maximizar, mas se quiser colocar botões no formulário que façam o mesmo efeito vc deve usar Application.Minimize, Application.Restore e Form1.WindowState = wsMaximized
Espero ter ajudado[/quote:33ea49aed1]
Foi mal, nem me ligue na segunda parte da pergunta.
Não testyei, mas pode ser que funcione se vc colocar a propriedade KeyPreview do Form em True e no evento OnKeyDown especificar que a combinação ALT+F4 não é permitida...
Se seu objetido é não permitir que o Form seja fechado de forma normal, basta colocar no evento OnClose do mesmo a seguinte declaração:
Action := caNone
ou
no evento OnCloseQuery colocar a declaração:
CanClose := False;
GOSTEI 0