microbiano
20-11-2009, 20:12:00
hola estoy en la etapa de impresion de un pequeño sistema y la verdad no veo la forma de imprimir con Quickreport.
les planteo el problema.
1.- base de datos sqlserver2000
2.- no se como pasar el resultado de un Adoquery al Quickreport, el Adoquery toma la conexion de un modulo en el cual se valida el usuario con el usuario con los permisos de la base de datos ejemplo usuario "SA".
en un form tengo el siguiente un boton con el siguiente codigo. el cual llama al reporte de impresion
procedure Tfcontribuyente.BitBtn4Click(Sender: TObject);
begin
Application.CreateForm(Tfrepor_contr, frepor_contr);
frepor_contr.Qresultado.SQL.Add('select nombre as [nombre] from sap_contrato');
frepor_contr.Qresultado.Open;
end;
y cuando creo el reporte de impresion pongo lo siguiente
procedure Tfrepor_contr.FormCreate(Sender: TObject);
begin
frepor_contr.nombre.DataField:=frepor_contr.Qresultado.Recordset.Fields['nombre'].value;
frepor_contr.QuickRep1.Preview;
end;
problemas.
1.- me muestra el informe sin ningun dato.
2.- me muestra el informe con el primer registro cuando en mi base de datos tengo 50 registros.
espero me puedan ayudar. :D
les planteo el problema.
1.- base de datos sqlserver2000
2.- no se como pasar el resultado de un Adoquery al Quickreport, el Adoquery toma la conexion de un modulo en el cual se valida el usuario con el usuario con los permisos de la base de datos ejemplo usuario "SA".
en un form tengo el siguiente un boton con el siguiente codigo. el cual llama al reporte de impresion
procedure Tfcontribuyente.BitBtn4Click(Sender: TObject);
begin
Application.CreateForm(Tfrepor_contr, frepor_contr);
frepor_contr.Qresultado.SQL.Add('select nombre as [nombre] from sap_contrato');
frepor_contr.Qresultado.Open;
end;
y cuando creo el reporte de impresion pongo lo siguiente
procedure Tfrepor_contr.FormCreate(Sender: TObject);
begin
frepor_contr.nombre.DataField:=frepor_contr.Qresultado.Recordset.Fields['nombre'].value;
frepor_contr.QuickRep1.Preview;
end;
problemas.
1.- me muestra el informe sin ningun dato.
2.- me muestra el informe con el primer registro cuando en mi base de datos tengo 50 registros.
espero me puedan ayudar. :D