Bonjour,
Je veux ouvrir une liste des Fiches, en faite je récupère le nom du fiche à partir du query , mais ça marche pas !
voila mon code :
procedure TFMenu.Button1Click(Sender: TObject);
Var
NomFiche : TComponentName;
begin
NomFiche := Query4.FieldByName('NomFiche').AsString ;
Fiche := Tform(NomFiche);
Fiche := TForm.create(Fiche);
Fiche.Show;
end;
avec Fiche variable de type TForm
Merci de m'aider