Fórum 3 edit´s em tempo de execução #236694

08/06/2004

0

Prezados amigos, estou precisando desenvolver um programa que ao ser escolhido o numero de pagamentos seja criado em tempo de execursão o mesmo numero de conjunto de 3 edit e seus label
como fazer
desde ja agradeço


Dpinho

Dpinho

Responder

Posts

08/06/2004

Paulo_amorim

Olá

TEdit.Create(Self).Name := ;

a partir daí vai setando as propriedades...
top, left, visible true, Text, e o que mais quiser...

O que vc precisa colocar é
Parent := Form;
Name := ´edtMeuEdit´


Tem que dizer o nome e quem eh o pai dele...

Espero que ajude
Até+


Responder

Gostei + 0

08/06/2004

Dpinho

Olá TEdit.Create(Self).Name := ; a partir daí vai setando as propriedades... top, left, visible true, Text, e o que mais quiser... O que vc precisa colocar é
Parent := Form;
Name := ´edtMeuEdit´
Tem que dizer o nome e quem eh o pai dele... Espero que ajude Até+


ja tentei e não estou conseguindo nada, poderia da uma dica maior tipo assim onde colocar os comando, preciso cria tipo um panel com os edit e label, mais o botão para finalizar a operação, sei que estou pedindo muito mais ta dificil
]obrigado


Responder

Gostei + 0

09/06/2004

Tatuweb

Exemplificando o que já foi dito acima, segue um exemplo de como criar um Edit e um label em run-time:

var
  MeuEdit: TEdit;
  MeuLabel: TLabel;
begin
  MeuLabel := TLabel.Create (Self);
  MeuEdit := TEdit.Create (Self);
  MeuLabel.Parent := Form1;
  MeuEdit.Parent := Form1;
  MeuLabel.Top := 20;
  MeuEdit.Top := MeuLabel.top + 16;
  MeuLabel.Left := 10;
  MeuEdit.Left := 10;
  MeuLabel.Caption := ´ClubeDelphi´;
  MeuEdit.Width := 160;
end;

O código acima vc coloca onde quiser. Se vc quer, por exemplo, que o Edit e o label sejam criado quando um botao for clicado vc coloca o codigo no evento OnClick do botão.


Responder

Gostei + 0

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

Aceitar