求助，出现错误，不懂怎么改~~~

红街咖啡 · 发表于 2013-4-21 19:46:52

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

procedure TForm1.FormCreate(Sender: TObject);
  function ReadSign: Char;
  const
  Sign: array[0..3] of Char = ('+', '-', '*', '/');

begin
  Randomize;
  Label1.Caption := Sign[Random(4)];

end;
随机产生四则运算符的编码，老是不能通过，求好心人帮助~~~

红街咖啡 · 发表于 2013-4-21 19:48:37

这是显示的错误信息，看不懂
求帮助
怎么改~~

云深 · 发表于 2013-4-21 21:20:43

form1.label1.caption

云深 · 发表于 2013-4-21 21:22:20

另外函数需要单独写

滥杀无辜 · 发表于 2013-4-24 17:00:28

delphi的数组是从1开始的，c语言之类的数组是0开始的。
多看看基础教程！

红街咖啡 · 发表于 2013-4-24 17:46:47

滥杀无辜发表于 2013-4-24 17:00

登录/注册后可看大图

delphi的数组是从1开始的，c语言之类的数组是0开始的。
多看看基础教程！

3Q 可能看的还不够仔细~~

账号		自动登录	找回密码
密码			立即注册