FiveTech Software tech support forums

... antes cServer := GetPvProfString("mysql","host" ," " ,"connect.ini" al cargar oFr := frReportManager():New() del FastReport aborte el sistema por el mismo motivo que no ubica sus archivos por que abria q modificar el prg en las ...

... el método setuserdataset() para establecer un area de trabajo con un Rowset de la clase nativa de FWH para MariaDb. Con dolphin sería así: oApp:oFr:SetUserDataSet( "Cheques", MySqlFields( oCheques ),; // "fecven;feegre;nroche;desbanc;desplaza;destino;importe",; {|| oCheques:GoTop() ...

joseluisysturiz wrote:Prueba esto, Saludos

*WITH OBJECT oFr // AGREGO IMAGEN EXTERNA AL REPORTE
* :AddPicture(cParent, cName, cFileName, 0, 0, 7, 2)
*END

con que version de fastreport trabajas

... NEW REPORT El nuevo reporte se crea con 3 bandas o áreas ya definidas TITLE, MASTER DATA y FOOTER. Sin embargo cuando lo hago desde código con oFr:DesignReport() Entra al diseñador creando el reporte sin las tres bandas. Me interesa que al crear el nuevo reporte desde código lo haga creándolo ...

... defined for this copy, additional I need to change some picture in the copy, to do it we can use the OnPrintPage event from [x]harbour code (oFr:SetEventHandler( "Report", "OnPrintPage", {|copia| } ), but I need to change the picture in FR from HB code, then what I need ...

Hi,

Try of adding or extracting some of these numbers :

oFr:PreviewOptions:SetButtons( 1+4+8+16+32+64+128+1024 )

else view events PrinterOptions... sorry my english

Regards.

Hi,

Test :

oFr:PrintOptions:SetCopies(nCopy)

Regards.

... #define DMPAPER_LEGAL 5 // Legal 8 12 x 14 in #define DMPAPER_EXECUTIVE 7 // Executive 7 14 x 10 12 in #define DMPAPER_A4 9 // A4 210 x 297 mm */ oFr:PrintOnSheet:= 1 espero te sirva, salu2. Ariel.

Respuesta a la 2da.pregunta, saludos...

oFr: PrintOptions:SetCopies(nCopy)

You can try opening the text file and then pass the variable. Best regards, Otto cText := memoread("text.txt") oFr := frReportManager():New() oFr:LoadLangRes( "German.xml" ) oFr:SetIcon( 1 ) oFr:LoadFromFile( ".\REPS\TRANSFERS.FR3" ) oFr:AddVariable( "MYDATA", ...

... MEMVAR oApp CLASS TClientes DATA oWin DATA oBar DATA oBtn DATA oFont DATA cTitle DATA oBrw DATA oCol DATA oDbf DATA cAlias DATA oFr METHOD New() CONSTRUCTOR METHOD Activar() METHOD Borrar() END CLASS METHOD New() CLASS TClientes ::oDbf:= Abrir ( "CLIENTES", {} ) ::cAlias ...

Gracias Ray;


paso la variable

oFr:AddVariable( "oData", "cImagen" , "'" + cImagen + "'" )

en propiedades de file link le puse [cImagen] y listo

gracias,

Saludos,
Mauricio

Mauricio, Yo lo hago de esta manera, espero te sirva : local cImg2Shw := "x:\yyyyy\zzzzz\imagen.bmp" .. .. .. .. oFr:AddVariable( "ReportData", "RepVarName", "'" + cImg2Shw + "'" ) .. .. Y en tu formato, agregas un objeto de imagen y ...

Prueba esto, Saludos

*WITH OBJECT oFr // AGREGO IMAGEN EXTERNA AL REPORTE
* :AddPicture(cParent, cName, cFileName, 0, 0, 7, 2)
*END

... de esta manera, 1.- Tengo una funcion para crear los dataset y no tener que escribir la definicion por cada reporte *-- PROCEDURE MAKEDATASET( oFr, cAlias, oQry, bRelation ) *-- LOCAL nHeader LOCAL cHeader := '' *-- DEFAULT lRelation := bRelation := { || NIL } *-- FOR nHeader = 1 TO oQry:FCount() ...