Código Delphi [-] forma :TComponent; begin forma := Application.FindComponent(qrytempo.FieldByName('forma').asstring); .....................
forma :TComponent; begin forma := Application.FindComponent(qrytempo.FieldByName('forma').asstring); .....................