FiveTech Software tech support forums

Uwe, I had only copied a piece of my source back this is the original       WITH OBJECT  oApp():oGrid               :nRowHeight := 40                 WITH OBJECT oApp():oGrid:aCols[ 1]                               :cDataType     := 'F'              ...

Silvio,

WITH OBJECT oApp():oGrid
:nRowHeight := 200
END

WITH OBJECT oApp():oGrid:aCols[ 1]
:cDataType := 'F'
:nWidth := 40
:nDataBmpAlign := AL_CENTER
:lBmpTransparent := .T.
END

regards
Uwe

I made a xbrowse and set the first column with WITH OBJECT oApp():oGrid :nRowHeight := 200 WITH OBJECT oApp():oGrid:aCols[ 1] :cDataType := 'F' :nWidth := 40 :nDataBmpAlign := AL_CENTER :lBmpTransparent := .T. END But It show a small image https://i.postimg.cc/qMgGt9qC/ser.jpg ...

Sorry MrRao , here also not run ok I have WITH OBJECT oApp():oGrid WITH OBJECT oApp():oGrid:aCols[1] :AddResource("SORT_1_16") :AddResource("SORT_2_16") :nHeadBmpNo := 1 :nHeadBmpAlign := AL_RIGHT :bLClickHeader :={ ||(CuSel_Index(1,"CU"), ...

If I not insert oCustomers:SetXBrowse( oApp():oGrid ) and make only   oApp():oGrid := TXBrowse():New( oApp():oDlg )   oApp():oGrid:nTop    := 00   oApp():oGrid:nLeft ...

Perhaps I resolved for the visualization oApp():oGrid := TXBrowse():New( oApp():oDlg ) oCustomers:SetXBrowse( oApp():oGrid ) Instead of    aBrowse   := { { { || oCustomers:ID }, i18n("ID"), 100, ...

... I can make this DEFINE VMENUITEM OF oBar ; CAPTION "Elenco movimenti" ; IMAGE "GRID_IMPRIMIR2" ; MENU Stampa_Mov(oApp():oGrid,oCont,oBar); LEFT 10 where Stampa_Mov is a normal function with menupopup type Function Stampa_Mov(oGrid,oCont,oBar) Local oMenuStampa MENU oMenuStampa ...

Mr Nages to print this multiheader project with oBrw:report() is too hard because there many problems I use to print this command oApp:oGrid:Report( cTitle, , , { | oRep, oBrw, nCall| MyRepSetup( oRep, oApp:oGrid, nCall,1) } ) MyRepSetup static function MyRepSetUp( oRep, oBrw, nCall,ntipo ...

you must create a func and insert a codeblock type this: oBrw:bKeyDown := {|nKey| MyfunctionTecla(nKey,oBrw,oDlg) } Function MyfunctionTecla(nKey,oGrid,oDlg) Do case case nKey==VK_RETURN // here your function of modify record case nKey==VK_INSERT // here your function of add record case nKey==VK_DELETE ...

I treied to move these functions on another new file prg

Nuovo_Bilancio_Trimestre(lSaldo,oGrid)

Report_Nuovo_Bilancio_Trimestre(aBilancio)

but I have the same error

oGrid:bRClicked := {|nRow,nCol| your function }

any sample for use CLASS TRtfFile ?

thanks

Silvio.Falconi wrote:How I can transfer records/record into a rtf file ?

Look METHOD ViewDbf( cFile ) CLASS CLASS TRichEdit5

Made me this error Stack Calls===========   Called from:  => STRTRAN( 0 )   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:CLPROW( 8031 )   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:TOWORD( 8558 )   Call...