FiveTech Software tech support forums

... //----------------------------------------------------------------------------// //function WebView2_OnEval( cJson, hWebView ) // // local nAt := AScan( aWebViews, { | o | o:hWebView == hWebView } ), nResult // // if nAt != 0 .and. ! Empty( aWebViews[ nAt ]:bOnEval ) // nResult = Eval( ...

Sorry,
I just copy the command wrong. The right is:

ADD COLUMN TO XBROWSE oLbxBrw DATA {|| oLbxBrw:oDbf:Fields(cCampo):value } HEADER Rtrim(oVfa5:titulo) SIZE aFields[oBrw:nAt,3]*10

... no es la solución definitiva, te sugiero le tires una mirada a la función SUBSTRIN_INDEX() o a la sunción SUBSTRING() apoyada por la función nAt() Digo que no es una solución definitiva porque el problema será cuando el nombre o apellido sea compuesto, por ejemplo Luis San Juan Pérez, Diego ...

Enrico cName :- "Amy Halady" What I expect nAt := at( " ", cName ) scans forward from left to right so starting with "Amy " so space is the 4th character nRat := rat( " ", cName ) scans backwards from right to ...

Enrico cName :- "Amy Halady" What I expect nAt := at( " ", cName ) scans forward from left to right so starting with "Amy " so space is the 4th character nRat := rat( " ", cName ) scans backwards from right to ...

Dear Jimmy,

nAt = AScan( ::aControls, { | oControl | oControl:hWnd == hChild } )
::aControls[ nAt ]

... ( IIF(Len(oBrw:aselected) >1,aClone:=Giverows(oBrw),; aCopy := aclone(oBrw:aRow)),; oBrw:SetFocus() ) Function Giverows(oBrw) local n,atmp:={},nAt For n= 1 to Len( oBrw:aselected) nAt := oBrw:aArrayData[ oBrw:aselected[n] ] aadd( aTmp, aclone(nat)) next return aTmp But then the paste is wrong

... run ok oBrw:aSelected give number or numbers not the row oBrw:aRow is as ::aArrayData[ ::nArrayAt ] you can make For n= 1 to Len( oBrw:aselected) nAt := oBrw:aArrayData[ oBrw:aselected[n] ] aadd( acopy, aclone(nat)) next just an idea

... IIF(Len(oBrw:aseleted) >1,Aclone:= Giverows (oBrw),aCopy := aclone(oBrw:aRow)),; oBrw:SetFocus() ) Function Giverows (oBrw) local n,uBook,nAt local aTmp:= {} For n = 1 to len(oBrw:aselected) uBook := Eval( oBrw:bBookMark ) nAt := Ascan( oBrw:aSelected, uBook ) aCopy:= aclone(oBrw:aArrayData[ ...

... xbusco, obusco, oRS1 ), oBrw:recset := ors1 ) of odlgSTK REDEFINE combobox oOrden var xOrden items tOrden ID 212 on change ( xOrden := oOrden:nAt, CambioOrden( ors1 ,xorden), obusco:setfocus() ) OF odlgSTK REDEFINE XBROWSE oBrw ID 181 recset oRS1 OF oDlgSTK FIELDS ; iif ( ( oRS1:Fields( "disconti" ...

... var xdomic ID 206 OF ofld1:aDialogs[ 1 ] REDEFINE COMBOBOX oAudit_ant var wAudit_Ant ITEMS Taudit_antf ; ON CHANGE ( xAudit_Ant := oAudit_ant:nAt, CargoAntInfo( xAudit_Ant, ofld1:aDialogs[ 1 ] ) ) ; ID 4001 OF ofld1:aDialogs[ 1 ] when len( Taudit_antf ) > 0 REDEFINE say oNaudit var xnaudit ...

... esta forma tengo que almacenar en un array y despues en el boton de acceso a los datos que seleccione del combobox tengo que leer el array por un :nAt del combobox, lo que quisiera es no tener que hacer eso, directamente que cuando seleccione del combobox me devuelva la columna del "indice" ...

... var xdomic ID 206 OF ofld1:aDialogs[ 1 ] REDEFINE COMBOBOX oAudit_ant var wAudit_Ant ITEMS Taudit_antf ; ON CHANGE ( xAudit_Ant := oAudit_ant:nAt, CargoAntInfo( xAudit_Ant, ofld1:aDialogs[ 1 ] ) ) ; ID 4001 OF ofld1:aDialogs[ 1 ] when len( Taudit_antf ) > 0 ......... *------------------------------------------------------------------------------------------------------------- ...

Perhaps, if you are using pellesC, you need to "remove" the SORT variable in the combobox as NO.

Maybe:
ON Change := cTipo_Cli[ oCbx:nAt ]

Regards, saludos.

... local nValore:= 6 local nTipo := 3 run ok For n= 1 to 90 For k= 1 to 90 For j= 1 to 90 nTotale := Calcolo_3_numeri(n,k,j,ntipo) If nTotale=nvalore nAt := AScan( aTmp, { |a| a[1] = k .and. a[2] = n .or. a[3] = j } ) If nAt == 0 aadd(aTmp,{n,k,j}) Endif Endif next next next I understood the error ...