![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#5
|
|||
|
|||
|
Gracias Vecino por tu ayuda, efectivamente funciona como me has indicado. Con estas líneas:
DecodeDate(DTPDesde.Date,AA,MM,DD); IBDSParte.Close; IBDSParte.SelectSQL.Text := 'Select * from PARTE where MES = ' + IntToStr(MM); IBDSParte.Open; Gracias Jhonny. No es un TQuery, es un TIBDataSet, y una de sus propiedades es SelectSQL. De todas maneras he probado con tus indicaciones y así también funciona: DecodeDate(DTPDesde.Date,AA,MM,DD); IBDSParte.Close; IBDSParte.SelectSQL.Clear; IBDSParte.sELECTSQL.Add('Select * from PARTE where MES= ' + IntToStr(MM)); IBDSParte.Open; Gracias de nuevo a los dos. Tomás. |
|
|
|