请DX帮忙(100分)

  • 主题发起人 阿拉善盟
  • 开始时间

阿拉善盟

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么实现1和2比较结果为3?
1) 3-3-3-3-3-3
2) 310-10-31-0-30-10
 
什么意思
 
樓主是不是要做足彩對獎啊

把上面的兩組放在兩個stringlist中,然後用一個循環依次用上面的結果去pos下面的投注結果,能pos到就加1,
最後中大獎了不要忘了通知我一下。
 
能否具体点?
写个事例
 
提问的技巧差了一点
 
大概這個意思。

n := 0;
for i:= 0 to 12 do
begin
if pos(stringlist1.string(i),stringlist2.string(i)) <> 0 then
inc(n);
end;

最後出來的n就是中獎場數了。
n=13發大財。
 

Similar threads

回复
0
查看
853
不得闲
D
回复
0
查看
757
DelphiTeacher的专栏
D
D
回复
0
查看
813
DelphiTeacher的专栏
D
D
回复
0
查看
727
DelphiTeacher的专栏
D
顶部