Can anybody give me any advice on how I can merge 4 list into one ie:

ListA: ["A", "B", "C"]
ListB: ["D", "E", "F"]
ListC: ["G", "H", "I"]
ListD: ["J", "K", "L"]

result= ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L"]



Many thanks

How about?

Merge := [ "ListA", "ListB", "ListC", "ListD"]
newList := []

repeat with i := 1 to ListCount( Merge )
repeat with m := 1 to ListCount( Eval(Merge[i]) )
AddLinear( newList, Eval( Merge[i]^"["^m^"]") )
end repeat
end repeat

Andrew Poulos

Walter Khom wrote:

> Doesn't look simple, it but works...
> -------------
> NewList:=[]
> repeat with x:=1 to ListCount(ListA)
> NewList[x]:=ListA[x]
> end repeat
> repeat with x:=1 to ListCount(ListB)
> NewList[x+ListCount(ListA)]:=ListB[x]
> end repeat
> repeat with x:=1 to ListCount(ListC)
> NewList[x+ListCount(ListA)+ListCount(ListB)]:=ListC[x]
> end repeat
> repeat with x:=1 to ListCount(ListD)
> NewList[x+ListCount(ListA)+ListCount(ListB)+ListCount(ListC)]:=ListD[x]
> end repeat

Neat solution, simpler than mine, but it should be (so that 'result' is a
new list):

result := List( Replace( "][", "," , String(ListA) ^
String(ListB)^String(ListC)^ String(ListD) ) )

Andrew Poulos

Dave Burnett wrote:

> result := Replace("][", "," , String(ListA) ^ String(ListB)^String(ListC)^
> String(ListD))
>
> Dave
>
> Bert wrote:
>
> > Can anybody give me any advice on how I can merge 4 list into one ie:
> >
> > ListA: ["A", "B", "C"]
> > ListB: ["D", "E", "F"]
> > ListC: ["G", "H", "I"]
> > ListD: ["J", "K", "L"]
> >
> > result= ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L"]

合并表
推荐的方法是第四种，pretty good!