为什么我的德尔福不接受任何私人声明?

Hei*_*ein 1 delphi delphi-7

我是学生,Delphi并不是我编程的主要环境.我知道它是如何工作的,我完全熟悉它的布局.我最近收到一个任务,我必须使用数组,以便通过整数和字符串在列表框中列出它们.这个想法很简单,程序本身很容易制作.

当我尝试在私有或公共声明下声明一个常量时,问题就出现了,并且错误消息指出"'END'预期但是'CONST'找到了".我已经使用公共和私有变量和常量了一段时间,但我不确定发生了什么.

代码如下:

type
  TForm1 = class(TForm)
    edtDateTime: TEdit;
    lstListArrayValues: TListBox;
    gbpIntegerArrayOptions: TGroupBox;
    gbpStringArrayOptions: TGroupBox;
    gbpListBoxOptions: TGroupBox;
    btnInitializeIntArray: TButton;
    btnAssignIntArray: TButton;
    btnDoubleIntArray: TButton;
    btnInitializeStrArray: TButton;
    btnAssignStrArray: TButton;
    btnCapitalStrArray: TButton;
    btnDisplayArray: TButton;
    btnClearListbox: TButton;
    btnDeleteSelected: TButton;
    XPManifest1: TXPManifest;
    procedure FormCreate(Sender: TObject);
    procedure btnInitializeIntArrayClick(Sender: TObject);

    private
    {Private Declarations}
      Const
        nItems = 5;
      var
        nBasicsIntArray : array [0..(nItems - 1)] of integer;
        nBasicsStrArray : array [0..(nItems - 1)] of string;
    public
      { Public declarations }
  end;
Run Code Online (Sandbox Code Playgroud)

当我运行应用程序时,它会说''END'预期,但'CONST'找到了".我使用的是Windows 7和Delphi 7,之前我没有遇到过这个问题.

老实说,我错过了一些愚蠢的东西,但我忽视了一切,我似乎无法找到问题的原因.

Dav*_*nan 9

Delphi 7不支持在类中声明常量的能力.该语言功能在以后的版本中添加.

在课堂外声明你的常数.

您使用的情况也是如此var.Delphi 7不支持该语法.您只需var从类声明中删除该关键字即可.

  • 另外,`var`关键字也不属于Delphi 7中的类声明,因为没有`class var`支持. (3认同)