形同陌路 发表于 2015-4-21 21:36:56

哪位朋友有17课源码啊

本帖最后由 形同陌路 于 2015-6-13 21:01 编辑

已经解决了 。。。。

请教下,这个是十七课,鱼老师说的小程序。
定义一个字符串数组 分别赋值,按钮点一下,赋值一次并加入表格中。但是下面代码有问题,帮忙看下好吗 ,谢谢啊。
i: integer;
x: integer= 0;
y: integer =1;
begin
      str_a:= Edit1.Text;//姓名
      str_a:= Edit2.Text;//语文
      str_a:= Edit3.Text; //数学
      str_a:= Edit4.Text; //英语

       for i:=0 to 3 do
       begin
         Table1.Cells:= str_a[ i ];
         x:= x + 1;
      end;   
       y:= y + 1;
      x:=0;


end;
//输入了3 次, 就现在这样,谢谢了




visen 发表于 2015-6-9 23:27:18

一个数组存储一个edit的数据,用4个数组存储4个edit的值
页: [1]
查看完整版本: 哪位朋友有17课源码啊