Fórum Criar Componente (Edit) em tempo de execução! #488110

06/08/2014

0

Existe alguma forma de criar um 'Edit', um 'Label' através de um Button?

EX: Tenho dois Campos, ou seja, dois Edit's que realizam uma operação em si seja soma ou subtração.
Se eu quiser adicionar mais um 'Edit', sem precisar deixar ele invisível ou desativado, existe essa possibilidade?
Marcos Silva

Marcos Silva

Responder

Post mais votado

06/08/2014

Buenas,

Seguem exemplos:

var
  objLabel1: TLabel;
  objEdit1   : TEdit;
.
.
.
  // Label
  objLabel1 := TLabel.Create(<<Nome do Form onde será criado>>);

  with objLabel1 do
  begin
    Parent  := <<Nome do Form onde será criado>>;
    Name  := 'objLabel1';
    Caption := 'Caption';
    Left    := 16;
    Top     := 12;
    Width   := 233;
  end;

  // Edit
  objEdit1 := TEdit.Create(<<Nome do Form onde será criado>>);

  with objEdit1 do
  begin
    Parent := <<Nome do Form onde será criado>>;
    Text     := 'Text';
    Name  := 'objEdit1';
    Left     := 16;
    Top     := 32;
    Width  := 233;
  end;


Abraççç,
Renato

Renato Rubinho

Renato Rubinho
Responder

Gostei + 1

Mais Posts

06/08/2014

Itamar Souza

Boa tarde

veja se isso ajuda:
http://systemexplorer.net/pt/file-database/file/dbrtl140-bpl

att
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar