|
|
发表于 2011-11-14 10:30:07
|
显示全部楼层
我的方法有点笨。。 , R) J5 Z1 U: M7 t) Q m( ]8 P, `
is d) Y3 |4 T8 w& N0 r7 P
i:integer;
: }7 M) a4 `. S7 Z! }3 ] j:string;
/ ^- \6 ^% O) ~5 t, V! j$ G7 Q m1:object;
+ L( j( [8 N' @3 U* ?4 mdo
" t) |7 t& O4 c$ j$ v- G+ \# L( `( k j := num_to_str(i);
2 E- c& Y& s& a' ]: K7 B" s m1 := str_to_obj(incl(singleproc,j,11));4 S- | z+ j( ^& K
end; |
|