davidmedina29
19-02-2016, 01:05:26
if DM.Q_PerNomina.State=dsInsert then
begin
DM.Q_PerNomina.FieldByName('PERIODO').AsString := cxTextEdit1.Text;
DM.Q_PerNomina.FieldByName('MES').AsString := cxComboBox2.Text;
DM.Q_PerNomina.FieldByName('EJERCICIO').AsString := cxComboBox1.Text;
DM.Q_PerNomina.Post;
MessageDlg('Dato Guardado', mtInformation, [mbOK], 0);
fPeriodosNominaNvo.Close;
end
buenas tardes me sale este error.. undeclared identifier 'dsInsert' en la primera linea de codigo donde esta el dsInsert. Que estoy haciendo mal?
begin
DM.Q_PerNomina.FieldByName('PERIODO').AsString := cxTextEdit1.Text;
DM.Q_PerNomina.FieldByName('MES').AsString := cxComboBox2.Text;
DM.Q_PerNomina.FieldByName('EJERCICIO').AsString := cxComboBox1.Text;
DM.Q_PerNomina.Post;
MessageDlg('Dato Guardado', mtInformation, [mbOK], 0);
fPeriodosNominaNvo.Close;
end
buenas tardes me sale este error.. undeclared identifier 'dsInsert' en la primera linea de codigo donde esta el dsInsert. Que estoy haciendo mal?