Criar Edit Via Programação

[felipe_pr]

ae pessoal tudo bom?

eu estou com um poqueno problema....

estou tentando criar um TEdit via programação...

Ex: clico em um Button e ele cria um botao...

ps: eu estava fazendo com "Visible = true/false", mais como eu estou tentando criar um botao que "Adciona linhas" seria um numero indeterminando...

Obrigado..

[Progr'amador]

Pra criar um Edit via programação é isso:

procedure TForm1.Button1Click(Sender: TObject);
var Edit1 : TEdit;
begin
  Edit1 := TEdit.Create(Self);
  with Edit1 do begin
    Parent := Form1;
    Left := 50;
    Top := 50;
    Text := '';
  end;
end;

ps: eu estava fazendo com "Visible = true/false", mais como eu estou tentando criar um botao que "Adciona linhas" seria um numero indeterminando...

não entendi isso!

Abs. Progr'amador.

[felipe_pr]

Muito Obrigado!

vlw...

ps: eu estava fazendo com "Visible = true/false", mais como eu estou tentando criar um botao que "Adciona linhas" seria um numero indeterminando...

não entendi isso!

foi uma gambiarra =].... eu criei 5 edit..... e coloquei 4 invisivel... e quando eu clicava no botao eleficava visible.... hehehe =]

Abraços!

Felipe