sábado, 31 de março de 2018

Como criar um botão em runtime no Delphi?

É muito comum encontrar programadores de outras linguagens que acham que no Delphi para criar um objeto visual ou componente, é só clicar no ícone do componente, arrastá-lo para o form e então soltá-lo e tudo estará bem.

De fato existe esta facilidade, visto que o Delphi é uma ferramenta RAD, porém existe também a outra forma de se criar um componente, é através de codificação.

Para exemplificar, vou mostrar como criar um botão ou button em runtime.

1º Vou considerar que você já está com um projeto do Delphi aberto ;

2º Em "Object Inspector" clique na aba "events" e então clique duas vezes sobre "OnShow".

3º antes de begin, digite o seguinte

var   loBTN : TButton ;

4º Após o begin, digite o seguinte:

     loBTN := TButton.Create( self ) ;
     loBTN.Parent := self ;
     loBTN.Left := 40 ;
     loBTN.Top := 50 ;
     loBTN.Caption := 'BtnTeste' ; 

 5º agora é só compilar e executar. Quando o form for apresentado na tela, você verá que existe um botão do lado esquerdo:


É isso pessoal. Espero que seja útil.

Até+

Nenhum comentário:

Postar um comentário

PHP para iniciantes - Vídeo #1