FiveTech Software tech support forums

... static function PrintPage() local hOldRes := GetResources() local hMeta := oMeta1:hMeta local oDlg, oRad, oPageIni, oPageFin local nOption := 1 ,; nFirst := 1 ,; nLast := len(DEVICE:aMeta) if nLast == 1 PrintPrv(nil, nOption, nFirst, nLast) RETU nil endif SET RESOURCES TO cResFile DEFINE DIALOG ...

... una matriz con la sangría izquierda, la sangría derecha y la primera línea de sangría referenciada al margen izquierdo. SetIndent( nLeft, nRight, nFirst ) -> Pone la sangría izquierda, la sangría derecha y la primera línea de sangría referenciada al margen izquierdo. GetParagraph() -> Devuelve ...

... It returns an array with left indentation, right indentation and first line indentation referenced to the left margin. SetIndent( nLeft, nRight, nFirst ) -> Sets the left indentation, right indentation and first line indentation referenced to the left margin. GetParagraph() -> It returns ...

... static function PrintPage() local hOldRes := GetResources() local hMeta := oMeta1:hMeta local oDlg, oRad, oPageIni, oPageFin local nOption := 1 ,; nFirst := 1 ,; nLast := len(DEVICE:aMeta) if nLast == 1 PrintPrv(nil, nOption, nFirst, nLast) RETU nil endif SET RESOURCES TO cResFile DEFINE DIALOG ...

... adding that code in the resize routine (see below) but it doesn't runs. **** function ridimensiona(oWnd,oSplit,oBrw,oFld,oBtn,oCbx) local i oSplit:nFirst=oWnd:nWidth()-oSplit:nWidth-300 oFld:Move(90,oSplit:nFirst+oSplit:nWidth,oWnd:nHeight-200-60,100,.t.) oBrw:Move(85,05,oSplit:nFirst-10,oWnd:nHeight-200-60,.t.) ...