Bloquear o minimizar? tem como?

Delphi

18/02/2004

Gostaria de que quando o usuario clicasse no icone no caption pra minimizar... daria uma msg a ele... e nao permitiria ele minimizar.. como eu faco isso?

Desde já agradeco.

[]s


Titanius

Titanius

Curtidas 0

Respostas

Cebikyn

Cebikyn

18/02/2004

Não seria mais fácil remover o botão de minimizar? (Na propriedade BorderIcons do form)


GOSTEI 0
Nildo

Nildo

18/02/2004

Acho que o que ele quer é assim:

If PodeMinimizar then
Deixa_minimizar
else
Não_deixa_minimizar

mas ao invez disso, coloque que quando nao poder minimizar remova o botao minimizar, senao mostre ele


GOSTEI 0
Titanius

Titanius

18/02/2004

Neste caso não, pois o que eu realmente queria é o seguinte:

Tenho o Form1... nele eu chamo o Form2 pelo .SHOW.. nisso vou mexendo no form2... quando minimizo o Form1 ele some com o form2 também... estou usando o TrayIcon.. gostaria que somente o formulario principal sumisse... pensei q tendo como bloquear o minimizar..eu bloquearia e apenas faria com que o form1 ficasse nao visivel...

Estou procurando em todos os lugares e nao acho nada sobre isto...
:cry:
[]s


GOSTEI 0
Fabio.hc

Fabio.hc

18/02/2004

tente assim:

  private
    { Private declarations }
    procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;

implementation

{$R *.dfm}

procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
   if (Msg.CmdType = SC_MINIMIZE) then
      ShowMessage(´Vc não tem permissão para minimizar´)
   else
      DefaultHandler(Msg);
end;



GOSTEI 0
Titanius

Titanius

18/02/2004

:D :D :D
Beleza Fabio..... consegui.... valeu mesmo.... ! ! ! ! ! ! !

Obrigado a todos pelo interesse...

[]s

:lol: :lol: :lol:


GOSTEI 0
POSTAR