Criar um componente em tempo de execução
Código
Var
MyButton : TButton;
MyButton := TButton.Create(MyForm);
with MyButton do
begin
Parent := MyForm;
height := 32;
Width := 128;
caption := 'DelphiBoy 2';
left := (MyForm.ClientWidth - Width) div 2;
top := (MyForm.Cliençeight - height) div 2;
end;
Publicidade
Vote na dica
Quantidade de votos: 0 votos
Aceitação: 0%
Detalhes da dica
Categoria: Componentes
Adicionada dia: 13/01/04
Por: Fabricio Giovanni Costa De Souza
Visualizada: 5371 vezes
Adicionada dia: 13/01/04
Por: Fabricio Giovanni Costa De Souza
Visualizada: 5371 vezes
COLUNISTAS
Publicidade
Enquete
O que achou do novo site?
Validações
Publicidade
Enquete
O que achou do novo site?
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009