Création dynamique de champs de saisie

**mjp** · 03/04/2008, 21h17

Bonjour,
Je dois faire des formulaires de saisie sur des tables dont je ne connais la structure qu'au dernier moment.
comment est-ce que je peux créer des tlabel ou des champs de saisie dynamiquement, en fonction de mes besoins.
En vous remerciant de votre aide.
Max

**ero-sennin** · 03/04/2008, 21h28

Salut,

Je te mets un exemple avec un TEdit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.Button1Click(Sender: TObject);
var
 NewEdit:TEdit;
begin
  // Création du composant
  NewEdit:=TEdit.Create(Form1);
  NewEdit.Parent:=Form1;
  // Emplacement du composant
  NewEdit.Top:=300;
  NewEdit.Left:=100;
  // On met le message "Coucou tout le monde"
  NewEdit.Text:='Coucou tout le monde';
end;