FiveTech Software tech support forums

... & To pages selected on the print dialog when the FROM USER clause is used. This method returns a two dimension array but also you can pass the nFrom and nTo variables by reference, for example: aPages := oPrn:GetPages(@nFrom, @nTo)

We frequently use the functions AT( cSearch, cStr, [nFrom], [nEnd] ) // xHarbour AT( cSearch, cStr ) // Harbour HB_AT( cSearch, cStr, [nFrom], [nEnd] ) // Harbour In many cases, we may need to convert both cSearch and cStr to Upper/Lower case for the ...

Syntax:
oBrw:SetGroupHeader( cGrpHdr, [nFrom], [nUpto], [oFont], [nAlign] )

In the above case:

oBrw:SetGroupHeader( "Section 1", 3, 5 )

... // heat_update //----------------------------------------------------------------------------// FUNC Automatic( oMeter, nActual ) LOCAL n LOCAL nFrom := nActual FOR n = nFrom TO oMeter:nTotal step 0.001 nActual = n oMeter:Set( nActual ) NEXT nActual = oMeter:nTotal oMeter:Set( nActual ) RETURN ...

Solucionado!!! la instruccion seria oBrw:MoveCol(nFrom,nTo,.T.) lo que pasa es que no viene documentada en la ayuda.

Gracias!!

function ExtractLine( cText, nFrom ) I found out that if I use instead of nAt := At( CRLF, SubStr( cText, nFrom ) ) nAt := At( CRLF, cText, nFrom ) the speed of the function is much better. Is it save to remove SubStr here? Thanks in advance ...

... , .t. ),::RunScrpt( cPrg, cParams, nWd ) ) METHOD RunScrpt( cPrg, cParams, nWd ) CLASS XXXXX local lRet := .t. local oRun local cTxtFile, cLine, nFrom := 1 local cPrgs := "Prgs\" if File( cPrgs + cPrg + ".prg" ) TRY if File( "comp.log" ) ferase( "comp.log" ...

... static function PrintBox( lPreview ) local oPrn local aRTF := { 100, 1000 } // { nFrom, nTop } DEFAULT lPreview := .f. if lPreview PRINT oPrn NAME "FWH RICHEDIT FILE" PREVIEW else PRINT oPrn NAME "FWH RICHEDIT FILE" ...

... to read line by line, we have found that this is a very fast way to do it, much faster than using MemoLine(): function ExtractLine( cText, nFrom )  local cLine, nAt  nAt := At( CRLF, SubStr( cText, nFrom ) )  if nAt > 0    cLine := Substr( cText, nFrom, nAt - ...

... oWndRC, oTree, oMemo, oSplit    local cRCFile := cGetFile( "*.rc", "Select a resources file" )    local cTxtFile, cLine, nFrom := 1, cItemText := "", cText    local oItem, oBmpItem, oDlgItem, oIcoItem, oMnuItem, oMnuString    DEFINE WINDOW oWndRC TITLE cRCFile ...

... is # if yes I us another font. It is hardcoded but for my task ok. Regards, Otto IF left(cdata,1)="#" cLine = SubStr(ExtractLine( cData, @nFrom ),2) oFont1 := ::oFntGross oFont1:Activate( hDC ) SetTextColor( hDC, aColors[ 1 ] ) SetBkColor( hDC, aColors[ 2 ] ) DrawTextEx( hDC, cLine ,; ...

... columna de texto. STRETHCOL_NONE es la opción por defecto para mantener la compatibilidad con versiones anteriores. 8. Nuevo método: MoveCol( nFrom, nTo ): En contraste con el método SwapCols que intercambia la posición de dos columnas, este método mueve una columna desde la posición "nFrom" ...

... the last column or stretching the last widest text column. STRETHCOL_NONE is default for keeping backward comaptibility. 8. New Method: MoveCol( nFrom, nTo ): In contrast to SwapCols method which swaps the position of two columns, this method moves a column from position nFrom to the new position ...

Addendum:

I can play again when using :play(nFrom,nTo) by specifying the nFrom and nTo parameters, but I don't know how to play again using layFull().

Bert

... rtf finished printing so you know where to start printing the next? That's exactly what comes back on the 2nd element that reprintbox returns ({ nFrom, nBottom }). I think the feature was document on what's new. I'm currently using it with very much success. I hope my comment helps. Reinaldo.