how call image on xbrowse from multiarray
I cannot use AddBitmap because I have bitmap on oTipClienti archive
and on xbrowse I have string oClienti:tipo
WITH OBJECT oBrwClienti:aCols[2]
:bStrData := { || oClienti:tipo }
END
I tried to call :bBmpData := { || CercaTipo(oClienti:Tipo) }
or load an array atipo( 2 size )
but not run ok
I cannot use AddBitmap because I have bitmap on oTipClienti archive
and on xbrowse I have string oClienti:tipo
WITH OBJECT oBrwClienti:aCols[2]
:bStrData := { || oClienti:tipo }
END
I tried to call :bBmpData := { || CercaTipo(oClienti:Tipo) }
static Function CercaTipo(ctipo)
local nRecno := oTipCli:RecNo()
local nOrder := oTipCli:OrdNumber()
local nArea := Select()
oTipCli:SetOrder(1)
oTipCli:DbGoTop()
if ! oTipCli:Seek( ctipo )
oTipCli:GoTop()
endif
return oTipCli:imgclior load an array atipo( 2 size )
Functio cercatipo(atipo,cTipo)
Local nAt:= ascan(aTipo,{ |a| alltrim(a[ 1 ][1]) ==alltrim(ctipo) } )
return atipo[nat][2] //imgbut not run ok
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
