FiveTech Software tech support forums

...   oRep:bskip := { || IF(oRep:nCounter % 2 =0 , oRep:lShadow :=.F.,oRep:lShadow :=.T.) }          return  nil  I also want to eject the page and make pijama effect but not work AEval( oRep:aColumns, { | o | o:lShadow := ! o:lShadow } )    oRep:bskip := { ...

Cesar, gracias por responder. Voy a probar con la segunda opción que es la que necesito. Con GROUP ON... EJECT se puede pero salta a siguiente hoja por cada grupo, y lo que se quiere es que quepan al menos dos grupos en cada hoja, cuyos HEADERs sean iguales al REPORT TITLE ...

Look this, https://github.com/rgl/EjectVolumeMedia/blob/master/main.c https://stackoverflow.com/questions/7704599/eject-usb-device-via-c-sharp https://social.msdn.microsoft.com/Forums/en-US/18f7b985-b9d2-4c91-a371-26f58277dc1b/usb-device?forum=Vsexpressvb ...

hi,

when have a Listbox / Combobox with Drive-Letter i want to show all but "disable" all "fix Drive"

i want to use it for USB-Stick which i want to "safe eject"

... after each line is printed, we need to know the postion it takes on the page ( line count ), and as it nears the bottom, we will then need to eject that page, start a new one, print the header information, and then resume the printing of the RTF. This option is not possible. 4). After the ...

... line at a time with the memoline output, after each line I can check to see if I've reached the maximum lines per page, and then I can do a page eject, print the new header, and continue the disclaimer text. To do this with SayText( ) we would need another parameter to call a function after each ...

... cCompress: String for compressed mode, by default "15" cNormal: String for normal mode, by default "18" cFormFeed: String for EJECT, by default "12" hDC: Printing file Handle (Internal use) nRow: Current printing row nCol: Current pringing column nLeftMargin: Left ...

... cCompress: String for compressed mode, by default "15" cNormal: String for normal mode, by default "18" cFormFeed: String for EJECT, by default "12" hDC: Printing file Handle (Internal use) nRow: Current printing row nCol: Current pringing column nLeftMargin: Left ...

... can be executed from the command line, or through any method that passes command line arguments. Simple options allow you to burn, erase, load and eject CDs and DVDs . This makes CommandBurner suitable for integration with programs, scripts and batch files . We imagine that CommandBurner would ...

Gracias a todos los que intentaron ayudar.
Me doy por vencido, no pude evitar el eject de 1 pagina con la Tprinter. Me quedo con la TDosPrn .
Saludos.

... are only for internal use, nothing special. I could count the lines to the last bottomline of a complete section. Reaching this line, forcing a EJECT and starting with a new page. I couldn't find a solution to do a EJECT on a defined line. Do You have a working sample ? best regards Uwe :?:

Try:

Create a function to return the quarter of the year. Sort the array by quarter plus whatever else you need.

function quarter( dDate )
...
return nQuarter

report oRpt...group on quarter( aArray[...] )

activate report oRpt...on endgroup {|oRpt| oRpt:endpage() }

How command the Eject report each n records of an array ?
I wish create a report of a page of first 3 months, another page the other 3 month, another page ... until 12 month

... next i if len(campoSubgr)>0 GROUP ON &(campoSubgr) ; HEADER eval(bTextoSubgr); //HEADER CTextoSubgr+': '+oRpt:aGroups[1]:cValue; FONT 2 // EJECT Si se quiere que salte de página en cada group. endif END REPORT sysrefresh() ACTIVATE REPORT oRpt GO TOP //oFontNorm:end() //oFontNegr:end() ...

Holá, en este caso, debes usar la clase TDOSPRN.PRG, ejemplo: USB com TDOSPRN.PRGEnla cabecera de mi rutina de impresión hice esto:cPorta := PrnGetPort()cPrinter := PrinterPortToName( cPorta )if empty(cPrinter)   cPrinter := PrinterPortToName( "USB002"...