[nixon232]

Можно сделать так:

Код:

Type
SomeClass = class(TTestForm)
  end;

А как можно сделать такой класс

Код:

Type
  #32770= class(TTestForm)
  end;

[dcc32 Error] uTest.pas(53): E2029 Identifier expected but string constant found