unit datosnominas;

interface

uses
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Param, FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf, FireDAC.DApt.Intf, FireDAC.Stan.Async, FireDAC.DApt, FireDAC.Comp.DataSet, FireDAC.Comp.Client, uFireDacHelper,
  System.SysUtils, System.Classes, Data.DB,  
  Bde.DBTables;

type
  TDMNominas = class(TDataModule)
    qempleados: TFDQuery;
    qempleadosid: TSmallintField;
    qempleadosnombre: TWideStringField;
    dsqtrabajadores: TDataSource;
    Query1: TQuery;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DMNominas: TDMNominas;

implementation

{%CLASSGROUP 'Vcl.Controls.TControl'}

{$R *.dfm}

end.