Ativar/Desativar botoes e outros

[shenow 7]

Para quem nao entendeu o titulo do topico, esse topico vai apenas ensinar a desabilitar e habilitar botoes,+ pode ser usado para outras coisas alem de botoes...

To postando isso aki pra qm eh bem inciante em delphi,apenas para aprender codigos q ainda n conhece,de repente se gostarem posso postar outra coisa + avançada...

 

 

Começando com os códigos :

 

Abra o delphi...

Adicione dois butoes , mude o caption do primeiro para "on" e no segundo, mude a propriedade "enabled" para "false" ...

Agora clike duas vezes no 1º botao e adicione esse codigo :

 

Button1.Caption := 'off';

Button1.Enabled := False;

Button2.Caption := 'on';

Button2.Enabled := True;

 

Explicando o codigo : na primeira linha, vai mudar a caption do button1 para "off" , na segunda linha, vai mudar a propriedade enabled do button1 para false,assim,desabilitando o button 1 , na terceira linha, vai mudar a caption do button2 para "on",na ultima linha, apenas mudou a propriedade enabled do button2 para "true" fazendo assim com q o mesmo ficasse habilitado

 

Agora clike duas vezes no button 2 e adicione esse codigo:

 

Button2.Caption := 'off';

Button2.Enabled := False;

Button1.Caption := 'on';

Button1.Enabled := True;

 

Acho q nao precisa de explicação,fez a mesma coisa do outro codigo,apenas mudou a ordem dos buttons

 

Flw galera