有一个棘手问题，看哪位delphi高手能解决 樓主的"第一列中选择了1,2,第二列中选择了1,第三列中选择了1，第四列中选择了1，则生成的数据有1111,2111" 這段話沒能看懂...是一次生成還是逐一稱成呢? 又每列為何是 1,2,3,4,5..0...而非 8bit 或 16bit之類呢? 解决方案 » 免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货 是作业，一次生成的。再比如：第一列：12，第二列：3，第三列，34，第四列，5。则生成的数据是：1335，1345，2335，2345，用delph7程序编写。因为我们学这门课程。谢谢你们了。 思路如下：首先把挨个把四列数放在四个数据组里，选择的就添写实际数，没选的就写空格或其它字符以便跳过。再用循环嵌套生成即可。for i:=1 to 10 do for j:=1 to 10 do for h:=1 to 10 do for l:=1 to 10 do if (A(i)<>'')and(B(j)<>'')and(C(h)<>'')and(D(l)<>'') then memo1.lines.add(A(i)+B(j)+C(h)+D(l)) 请问如何将一个结构的内容保存到DAT文件中？ delphi postURL串并接收结果 ODAC组件中如何调用带参数的存储过程(急，在线等） 一个小问题,请各位出招! 用dll wizard与用Activex Library生成的dll文件有什么区别吗 clientdataset控件问题 在Delphi中如何使用SQL('like'语句) 如何在tquery中添加计算字段？ 会pascal的请过来-我这个建立并输出二叉树的程序错在哪里？ 如何在delphi中用语句实现启动unix机器下的shell程序 Delphi 如何引用DCU文件，老师提示没有PAS 简化代码
首先把挨个把四列数放在四个数据组里，选择的就添写实际数，没选的就写空格或其它字符以便跳过。再用循环嵌套生成即可。
for i:=1 to 10 do for j:=1 to 10 do for h:=1 to 10 do for l:=1 to 10 do if (A(i)<>'')and(B(j)<>'')and(C(h)<>'')and(D(l)<>'') then memo1.lines.add(A(i)+B(j)+C(h)+D(l))