Ver Mensaje Individual
  #3  
Antiguo 09-03-2014
gorsan gorsan is offline
Miembro
 
Registrado: jun 2003
Ubicación: Alcala de Henares (Madrid)
Posts: 87
Reputación: 24
gorsan Va por buen camino
Perdón. Ahí va como debe..
Código Delphi [-]
 
with DMFicha.IBQNomina do
 try
 DisableControls;
 Close;
 SQL.Clear;
 SQL.Add('SELECT PRIMER_APELLIDO, SEGUNDO_APELLIDO, NOMBRE, CAMPO4, CAMPO5, CAMPO6,');
 SQL.Add('HORAS_REALES, HORAS_CALCULADAS, SALARIO');
 SQL.Add('FROM FICHA');
 SQL.Add('WHERE CAMPO4='+quotedstr(ComboBox1.Text));
 SQL.Add(' AND CAMPO5='+quotedstr(ComboBox2.Text));
 SQL.Add('ORDER BY PRIMER_APELLIDO');
 Open;
 DMFicha.RvProject2.Execute;
 finally
 EnableControls;
 end;
 close;
 end;
Responder Con Cita