FiveTech Software tech support forums

... you try using STRTRAN(). It is the solution here. Yes, do you test with STRTRAN ? run all ok ? sure ? IF nMode==2 //modify ntest1 := STRTRAN(str(oBrowse:aArraydata[nRecord][2]), ".", ",") ntest2 := STRTRAN(str(oBrowse:aArraydata[nRecord][3]), ".", ",") ...

... oBrw:aArrayData, aCopy ),; oBrw:Unlock( .t. ), ; acopy:=NIL ,; oBrw:RefreshCurrent(), oBrw:SetFocus() ) ENDMENU but when I modify it the nRecord:= oBrowse:nArrayAt is the same

... field as it is done on yunus.prg If I add and delete, a number is not inserted So we arrived at this conclusion which seems to work AEval( oBrowse:aDeleted, { |a| IF(a[ 32 ] ==0, a[32] := len(oBrowse:aDeleted),nil) } ) also because the programmer checked for days the exact correspondence ...

... ) and work aDataform on Xbrowse When I go to save I made       // save oDbf Report.dbf       // delete rows                 if ! Empty( oBrowse:aDeleted )            AEval( oBrowse:aDeleted, { |a| a[ 31 ] := -a[ 31 ] } )            oDbfMod:SaveArrayToDBF( ...

Use

Code: Select all  Expand view

oBrw:Delete()

to delete rows. Please do not use your own functions to delete.

To delete a record on Array I use this function del_row( oBrowse ) if ! Empty( oBrowse:aArrayData ) ADel( oBrowse:aArrayData, oBrowse:nArrayAt, .t. ) oBrowse:Refresh() endif xbrowser oBrowse:aDeleted <------ return nil it delete the row but then when ...

... cell the command imposes the new brush samples when there are images ( with :bBmpData ) or when on a column there is a color         WITH OBJECT  oBrowse:aCols[6]           :bClrStd := {|| { CLR_WHITE,IIF(oBrowse:aArrayData[ oBrowse:nArrayAt,6],(oBrowse:aArrayData[ ...

... la linea oBrw:nRowsel() y la columna que quiero pero el valor no se como extraerlo Por el foro he leído una contestación diciendo esto: Eval( oBrowse:bLine ) Pero, me da error. Sabrían decirme como se hace? Un saludo Juanjo

look this https://i.postimg.cc/m2BqWMbr/Y.png Do you happen to notice something strange? I made : @ 120, 02 XBROWSE oBrowse OF oDlg....NOBORDER WITH OBJECT oBrowse :lDrawBorder := .t. :nClrBorder := Rgb(195,195,185) ... now I see you here is the error https://i.postimg.cc/s2jDB19f/hgh.png ...

... lAppend ) are provided if the programmer wants to provide edit of the Row in a dialog form. These methods use TDataRow/FW_Record class. can i use oBrowse:EditSource() with Record-Set ? ( Header as "Structure" ? ) Yes. This method works with any datasource, eg. dbf, tdatabase, ado recordset, ...

... active ROW / COL where Cursor are ? when using FASTEDIT i got a "big" Input Windows ... how to get "Inline Edit" ? can i use oBrowse:EditSource() with Record-Set ? ( Header as "Structure" ? ) can i "seek" in XBROWSE when use a Record-Set ?

oDbf     := oBrw:oDbfnAt      := 1nSaveRec := oDbf:RecNo()////do while nAt <= Len( oBrw:aSelected )   oDbf:GoTo( oBrw:aSelected[ nAt ] )   // PRINT oDbf:Fields the way you want   nAt++enddooDbf:GoTo( nSave...

What is the source of your browse? Array or DBF or whatelse? My solution is an example that works with DBF. If not DBF, you should understand the logic and apply to your case. SEE your mail I use Tdatabase oDbf:=TComuni():New() oDbf:setorder(1) oDbf:Gotop() local aCols := { ; { "COMUNE", ...

What is the source of your browse? Array or DBF or whatelse?

My solution is an example that works with DBF.
If not DBF, you should understand the logic and apply to your case.

... dialog "options of Print" and then I can print the browse here the function I use to print the browse Function Print_Browse_Comuni(oBrowse,lPrv,lLandscape)local oPrn, oFn1, oFn2, oFn3, nRec, cSTit, nPre:=0local aDes, aHas, nHor, nVer, nRow:=5.5, cFormloca cFont:="Arial"local ...