Hi all,
I have a multidimensional array like:
aArray:=array(0,2)
aadd(1,"Marc")
aadd(2,"Luca")
aadd(3,"Jannette")
aadd(4,"Francis")
and I would make a combobox with only the second element list (the names).
Is there a quick way to make this directly into the REDEFINE COMBOBOX command line ?
Thank you in advance
#include "FiveWin.ch"
function Main()
local aArray := {}
local oDlg, cName := "Marc"
AAdd( aArray, { 1, "Marc" } )
AAdd( aArray, { 2, "Luca" } )
AAdd( aArray, { 3, "Jannette" } )
AAdd( aArray, { 4, "Francis" } )
DEFINE DIALOG oDlg
@ 1, 1 COMBOBOX cName ITEMS ArrTranspose( aArray )[ 2 ]
ACTIVATE DIALOG oDlg CENTERED
return nilHi Antonio,
it runs. Thank you.
I have just a problem trying to use the ArrTranspose() into the command syntax,
essentially I have to replace the <aItems> with ArrTranspose(<aItems>)[2] but it doesn't runs, sure for a syntax problem. Any ideas ?
Thank you.
[ <items: PROMPTS, ITEMS> <aItems> ] ;
[ ID <nId> ] ;
[ <dlg:OF,WINDOW,DIALOG> <oWnd> ] ;
[ <help:HELPID, HELP ID> <nHelpId> ] ;
[ ON CHANGE <uChange> ] ;
[ VALID <uValid> ] ;
[ <color: COLOR,COLORS> <nClrText> [,<nClrBack>] ] ;
[ <update: UPDATE> ] ;
[ MESSAGE <cMsg> ] ;
[ WHEN <uWhen> ] ;
[ BITMAPS <acBitmaps> ] ;
[ ON DRAWITEM <uBmpSelect> ] ;
[ STYLE <nStyle> ] ;
[ <pict: PICT, PICTURE> <cPicture> ];
[ ON EDIT CHANGE <uEChange> ] ;
=> ;
[ <oCbx> := ] TComboBox():ReDefine( <nId>, bSETGET(<cVar>),;
ArrTranspose(<aItems>)[2], <oWnd>, <nHelpId>, <{uValid}>, [{|Self|<uChange>}],;
<nClrText>, <nClrBack>, <cMsg>, <.update.>, <{uWhen}>,;
<acBitmaps>, [{|nItem|<uBmpSelect>}], <nStyle>, <cPicture>,;
[<{uEChange}>] )
Marco,
Please try this:
ArrTranspose(<aItems>)[2]
Great !! Thank you Antonio.
Marco
I think the solution is:
viewtopic.php?f=3t=25496start=0hilit=arrtranspose
Sorry,
It's a joke
&&&