Ver Mensaje Individual
  #3  
Antiguo 07-05-2008
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 27
Delphius Va camino a la fama
Hola lKinGl,
Veamos si te entiendo...
Tienes un ComboBox en donde seleccionas el mes.
Tienes además, un TSpinEdit en donde seleccionas el año.
¿Y luego, al dar clic en un botón deseas realizar una consulta de modo tal que devuelva los registros que coincidan con dichos criterios?

Si es eso, te entendí.
Ahora, mi duda, sobre tu dilema... ¿en que parte tienes problemas?¿En el SQL?

Tu SQL debería ser más o menos así:

Código Delphi [-]
Query1.Sql.Add('select TUS_CAMPOS');
Query1.Sql.Add('from TU_TABLA');
Query1.Sql.Add('where CAMPO_MES = ' + Quoted(ComboBox1.Text));
Query1.Sql.Add(' and CAMPO_ANIO = ' + SpinEdit.Value );
Query1.Open;

Puede que tenga errores, no tengo Delphi a mano... pero creo que por allí va la mano.

Aunque recomiendo que sería mejor el uso de parámetros:

Código SQL [-]
select TUS_CAMPOS from TU_TABLA ehere CAMPO_MES = :MES and CAMPO_ANIO = :ANIO;

Código Delphi [-]
Query1.Params.ParamByName('MES').AsString := ComboBox.Text;
Query1.Params.ParamByName('ANIO').AsInteger := SpinEdit1.Value;
Query1.Open;

Si buscas sobre ParamByName y/o parámetros vas a encontrar información de como se maneja.

No se que componentes usas... si los indicaras te podría indicar un código más exacto... Puesto que estoy dudando si es Query1.Params.ParamByName o Query1.ParamByName.

Como dije, lo escribí al vuelo, pero creo que puede andar.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita