[fpc-pascal] Constant object

[Michael Müller]

How can I declare a constant object?

var
  MyTest: TObject;
begin
  MyTest := TObject.Create;
end.

works (for sure).

How can I declare 'const'?

Thanks

Michael