Cita:
Empezado por alexiyordano
Hola Gran comunidad necesito que me ayude con un problemita en delphi 7 y una base de datos hecha access.
Necesito hacer un solo formulario de registros para 3 tablas y que eso resultado se muestren en 3 dbgrid diferentes, lo que no quiero hacer es 3 formulario para la tres tablas ya que el formulario de registros llevan los mismo datos para cada tabla
|
(1) Crea una propiedad (public) en el formulario donde puedas almacenar el nombre de la tabla.
(2) Después de crear el formulario y antes de hacer el Show, asignas el nombre de la tabla que desees a la propiedad.
(3) En el OnShow del formulario asignas a la tabla (tableName) el nombre de la propiedad.
(4) Luego abres la tabla.
Con esto consigues un sólo formulario que trabaja con 3 tablas diferentes (siempre que sean iguales).
(1)
Código Delphi
[-]
...
Type
....
private
FNombreTabla:string;
public
property NombreTabla:String read FNombreTabla write FNombreTabla;
...
(2)
Código Delphi
[-]
FormTabla := TFormTabla.Create(Application);
FormTabla.NombreTabla := 'TABLA1';
FormTabla.Show;
...
(3) y (4)
Código Delphi
[-]
...
procedure TFormTabla.OnShow(Sender:TObject);
begin
ADotable.TableName := Self.FNombreTabla;
ADoTable.Open;
end;
...
Un saludo.