Ver Mensaje Individual
  #3  
Antiguo 17-11-2007
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.740
Reputación: 26
ContraVeneno Va por buen camino
En lugar de abrir un TQuery, luego un TADOTable y luego todo el relajo que estas haciendo, sería mucho mejor simplemente utilizar un Tquery.

Código Delphi [-]
With TuQuery do begin
 if active then close;
 SQL.Clear;
 SQL.Add('Select I.Medico, I.Fecha, I.Paciente.....etc'); //todos los campos que necesitas de Indicaciones
 SQL.Add('M.Medicamento, M.Cantidad, M.Precio.....etc'); //todos los campos que necesitas del detalle
 SQL.Add('From Indicaciones I');
 SQL.Add('join Detalle_Ind M on I.Llave = M.Llave'); //tu campo llave que une a los dos tablas
 SQL.Add('where I.Cod_ID = :CodigoIndicacion');
 ParamByName('CodigoIndicacion').AsString := DBEdit2.Text;
 Open;
end; //

Y luego simplemente enlazas tu reporte a este query y listo.
Nunca es recomendable utilizar "Select *", las bases de datos cambia y seguro a tu aplicación en algún momento le cambiaras algo y si utilizas "Select *" un cambio que hagas en la base de datos, ocasionará que cambies también el programa.
__________________


Última edición por ContraVeneno fecha: 17-11-2007 a las 00:51:59.
Responder Con Cita