[[Caral]]

Hola
Me estraña mucho todo esto, tal vez nos puedes explicar un poco mas?

Código Delphi [-]
procedure TFreceta.BitBtn8Click(Sender: TObject);
var
rep: string;
begin

Data.Tindicaciones.edit; // edito la tabla
Data.Tindicaciones.post; // graba la tabla sin nada de por medio
rep:=DBEdit2.Text; //uso esta variable para saver el codigo de la indicacion (receta) (odtengo el
//codigo del ultimo registro para imprimirlo de esta forma
//para imprimir uso este codigo para pasarselo al reporte que esta en el form llamado form1
Form1.ADOQuery1.close;
Form1.ADOQuery1.SQL.Text:='select * from Indicaciones WHERE Cod_ind Like'+Quotedstr('%'+rep+'%');
Form1.ADOQuery1.open;
Form1.Tdetalle.Active:=true;
Form1.Tmedicamento.Active:=true;
Form1.QuickRep1.Preview; // indico que el qreport es parte del form?
Data.Tindicaciones.insert;
Data.Tpaciente.insert;
Data.Tmedico.insert;
Data.Tindicaciones.edit; // otra vez edito la tabla como en el primer paso
DBText1.caption:=datetostr(DateTimePicker1.Date);
DBGrid1.Enabled:=false;
end;

Las partes que tengo dudas estan subrayadas
Saludos