香
香水雨落
Unregistered / Unconfirmed
GUEST, unregistred user!
在unit1单元中，area 是我定义的全局变量，string 类型。我在unit2中是这样写的：
uses unit1
...
procedure TForm3.FormShow(Sender: TObject);
begin
case area of //可是到这行就出错，信息在下面
'长春地区':
with query1 do
begin
...
end;
end;
end;
错误信息如下：
[Error] Unit3.pas(316): Ordinal type required
[Error] Unit3.pas(317): Incompatible types: 'Integer' and 'String'
请问各位是为什么呀？
uses unit1
...
procedure TForm3.FormShow(Sender: TObject);
begin
case area of //可是到这行就出错，信息在下面
'长春地区':
with query1 do
begin
...
end;
end;
end;
错误信息如下：
[Error] Unit3.pas(316): Ordinal type required
[Error] Unit3.pas(317): Incompatible types: 'Integer' and 'String'
请问各位是为什么呀？
]