FiveTech Software tech support forums

... lo unico que ahi el nombre que uso el que los creo uso nombres largisimos y complejos para diferenciar paginas, secciones, etc. (topmostSubform[0].Page1[0].EmployeeName[0].f1_1[0]) no se asusten, ahi pueden usar por ejemplo un nombre secillo como "NOMBRE_EMPLEADO" y listo. :-) salu2

Mr. Rao using bar-labels from dialog is not included for the moment ? I noticed TOP is not shown I added the sample to my new sample-tool It is easy to use and works fine. Testing saves a lot of time. ----- The 3. radio-group is used for dialog-tests ------------ Maybe still adding another 4 radios ...

... TfrxComponent); begin if callhbfunc('file',['.\sub\'+trim(<masterdata."imgid">)+'.jpg']) then TfrxPictureView(page1.FindObject('picture1')).Picture.LoadFromFile('.\sub\'+trim(<masterdata."imgid">)+'.jpg') else TfrxPictureView(page1.FindObject('picture1')).Picture:=nil; ...

... TfrxComponent); begin if callhbfunc('file',['.\sub\'+trim(<masterdata."imgid">)+'.jpg']) then TfrxPictureView(page1.FindObject('picture1')).Picture.LoadFromFile('.\sub\'+trim(<masterdata."imgid">)+'.jpg') else TfrxPictureView(page1.FindObject('picture1')).Picture:=nil; ...

... in a series of EMF files. The path of the files to be created is set by calling PSSetFileName() before starting the print job. Files are named Page1.emf, Page2.emf, Pagen.emf

... in FastReport: AddPicture (cParent, cName, cFileName, Nleft, NTOP, nWidth, nHeight) cParent = is the object where the image is affiliated (Ex: 'Page1') cName = Name that the object of BMP will take the report cFileName = Image path. Here is exactly where I wanted to work. I thank you all.

Try this in function Page1

Code: Select all  Expand view

@ 30, 25 XBROWSE oBrw1 SIZE 232, 178 PIXEL OF oFld:aDialogs[ 1 ] ALIAS  "ASCKEY"
 

... oFld:bClrText := {| o, n | 128 } oFld:oFont := oFont // each Folderpage is defined in a extra function ( to keep the main-dialog small in size ) PAGE1( oFld) PAGE2( oFld) PAGE3( oFld) PAGE4( oFld) ACTIVATE DIALOG oDlg CENTERED ; ON INIT DLG_BACK( oDlg, 2, .T., 16038911, 16777215, 0.5, "Marble.bmp", ...

... Si hago la conexion, Todo lo que tu dices hasta el Query. Ejem Select * from tutbla ya tienes una consulta y luego doy Despues pulsas la pestaña (Page1) comienzas a diseñar tu reporte. La duda en donde me muestra la columnas de Query, porque no las veo y las necesito para hacer el reporte. De ...

... el icono de consulta ado, das doble click y escribes tu qry Ejem Select * from tutbla ya tienes una consulta Despues pulsas la pestaña (Page1) comienzas a diseñar tu reporte

Armando,

a ver... Fastreport te imprimirá tantas etiquetas como registros le envies, ahora, para q te imprima una al lado de la otra, fijate en la propiedad de 'Page1', Propiedad : Column, ponele 2.

Espero haberte entendido, y q esto te sirva.

Salu2, Ariel.

... "+" OF oDlg1 SIZE 10, 10 @ 3, 2 SAY "Normal" OF oDlg1 oPages:AddPage( oDlg1 ) http://www.pflegeplus.com/pictures/page1.jpg oDlg1:bPainted := { | hDC | GradientFill( hDC, 0, 0, oDlg1:nHeight, oDlg1:nWidth, { { 0.50, 16054371, 8388608 } } ) } DEFINE DIALOG oDlg2 ...

1. Remove the GETs inside Opt_Page1() and Opt_Page2(). They are not needed.

2. Use oSay:SetText() method to change the text of the SAY instead of creating a new one.

EMG

... Jack, please have a look at \samples\ Testfb.prg how to control a Browser inside Folders. REDEFINE FOLDER oFld1 ID 110 OF oDlg ; PROMPT "&Page1", "P&age2" ; DIALOGS "Sub1", "Sub2" ; ON CHANGE( Testbrowse( nOption, nOldOption ) ) //----------------------------------------------------------------------------// ...

... Main() local n_ordem:=space(10) local oSay1 local nStatus_med:=1 DEFINE WINDOW oWnd_med TITLE "Test Folders"; @ 0, -0.5 FOLDER oFld PROMPTS "Page1", "Page2","Page3" ; SIZE 247, 270 BOTTOM @ 33, 0 SAY oSay1 PROMPT "" OF oFld:aDialogs[ 1 ] ; SIZE oWnd_med:nWidth() +3, oWnd_med:nHeight() - 78; ...