就这么简单。。。。。。。

Question

[Error] password01.pas(50): Record, object or class type required
这哪有什么错呀？？？？
我的天，这么简单的东西都弄不清楚，哎！

Answer 1

有好多条一样的错，点了后，光标都停在J.len和J.ch[i]这样的地方
在声明的地方，我去掉了[1..10]，setLength()是没问题的。

Answer 2

var
  i,j:byte;  //-----> 这里ｊ跟全局的Ｊ命名冲突了，（Ｄｅｌｐｈｉ中不区分大小写的）
begin
  if k=1 then
       for i:=1 to J.Len do
       begin
          a[k]:=J.ch[i];
         // 输出；
        end
  else for j:=1 to J.len do
          begin
             a[k]:=J.ch[j];
             try1(k-1);
          end
end;