Цитата:
|
Сообщение от angvelem
И в case переменные можно использовать и всегда используются.
|
И это странно. Попробовал на D7 такой код:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
a, n: Integer;
begin
case a of
1, n: Beep;
else ;
end;
end; Компилятор ругается:
PHP код:
[Error] Unit1.pas(31): Constant expression expected
Попробовал этот же код на DXE2 - то же самое:
PHP код:
[DCC Error] Unit1.pas(31): E2026 Constant expression expected