我是一名学生,Delphi并不是我主要的编程环境。我知道它的工作原理,并且完全熟悉它的布局。最近我收到了一个任务,需要使用数组通过整数和字符串将它们列在listbox中。这个想法非常简单,程序本身也很容易制作。
问题出现在当我尝试在private或public下声明一个常量时,它只显示一个错误消息,指出“'END' expected but 'CONST' found”。我已经使用公共和私有变量和常量工作了一段时间,但我真的不确定发生了什么。
代码如下:
当我运行应用程序时,它显示“'END' 期望但找到了 'CONST'”。我正在使用Windows 7和Delphi 7,之前没有遇到过这个问题。
说实话,可能是我忽略了一些愚蠢的东西,但我已经检查了一切,似乎找不到问题的原因。
问题出现在当我尝试在private或public下声明一个常量时,它只显示一个错误消息,指出“'END' expected but 'CONST' found”。我已经使用公共和私有变量和常量工作了一段时间,但我真的不确定发生了什么。
代码如下:
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;
当我运行应用程序时,它显示“'END' 期望但找到了 'CONST'”。我正在使用Windows 7和Delphi 7,之前没有遇到过这个问题。
说实话,可能是我忽略了一些愚蠢的东西,但我已经检查了一切,似乎找不到问题的原因。