我的方法有点笨。。% `* m! ^ K+ n% j: M
is ' ?0 C3 l+ g9 R0 D6 N7 l i:integer;' j) }* E S" g3 E0 Y# @
j:string;6 q5 `0 b, i& y) C
m1:object;+ G6 P' R- }' n# {
do 4 k! b _3 N" K( `+ Z- A' r j := num_to_str(i); + A% C; a( r% A m1 := str_to_obj(incl(singleproc,j,11));! O u2 y' _# g
end;