Saludos amigos, trabajo con Delphi XE7 y FireDAC.
Estoy intentando hacer un mantenimiento de tablas con un solo componente TFDTable que esta en un TDataModule, para eso el usuario debe elegir el nombre de las tabla que desea de un TComboBox, en su evento OnChange:
Código Delphi
[-]
procedure TForm3.cboTablaChange(Sender: TObject);
begin
dm.tblMantenimiento.Close;
if(cboTabla.Text='Aula')then
begin
dm.tblMantenimiento.TableName:='aula';
txtIdAula.DataField:='id_aula';
txtAula.DataField:='aula';
txtAulaEstado.DataField:='estado';
panelAula.Visible:=true;
panelCicloAcad.Visible:=false;
end;
if(cboTabla.Text='Ciclo Academico')then
begin
dm.tblMantenimiento.TableName:='cicloacademico';
panelCicloAcad.Visible:=true;
panelAula.Visible:=false;
end;
dm.tblMantenimiento.Active:=true;
end;
No hay problema cuando selecciono por primera vez Aula, luego cuando selecciono Ciclo Academico me aparece el siguiente error:
txtAula.text: Field 'aula' not found.
No se a ciencia cierta porque sale esto si estoy cerrando la tabla al comienzo...
Agradezco cualquier ayuda en esto.