Dúvida sobre habilitar/desabilitar botões

Delphi

13/03/2008

Galera so novato em Delphi e to com uma dúvida nesse código aqui que seria usado pra um programa de cadastro de clientes no caso vo botar só a Procedure:


procedure TFrmPrincipal.Restaura;
begin
BtIncluir.Enabled:= Not BtIncluir.Enabled;
BtAlterar.Enabled:= Not BtAlterar.Enabled;
BtExlcuir.enabled:= Not BtExlcuir.Enabled;
BtOk.Enabled:= Not BtOk.Enabled;
BtCancelar.Enabled:= Not BtCancelar.Enabled;
BtSair.Enabled := Not BtSair.Enabled;
end;


O programa funciona assim qd o usuário clicar no ´BtIncluir´ todos os botões ficam desabilitados inclusive o ´BtIncluir´ e habilita o ´BtOk´ e o ´BtCancelar´ que já estão desabilitados no Evento OnCreate do Form.
Eu não consigo entender como essa Procedure abilita os botões ´Ok´ e ´Cancelar´ já que está ali ´Not BtOk.Enabled´ essa Procedure não serveria só para Habilitar ? não estou entendo o ´Not´ muito bem...alguém pode me explicar isso aew ?

brigadoo


Psyjacko

Psyjacko

Curtidas 0

Respostas

Macario

Macario

13/03/2008

Olá colega [b:a30f8a259c]Psyjacko[/b:a30f8a259c]

O operador logico [b:a30f8a259c]not[/b:a30f8a259c] inverte o valor passado a ele:

Exemplo:
Voce incia o BtOk como true
BtOk.Enable := false

ao chamar a procedure Restaura ela faz o que:

BtOk.Enabled:= Not BtOk.Enabled;

Ou seja, BtOk esta ativo e ao usar not voce inverte a condição para inativo.

Espero ter ajudado.


8)
[/b]


GOSTEI 0
Psyjacko

Psyjacko

13/03/2008

Po agora eu entendí !

brigado !


GOSTEI 0
POSTAR