type
TCObject = object
P1: Double;
end;
var
MyCObject: TCObject;
begin
MyCObject.P1 := 0;
end.
This code should world although I haven't tested it.
But there is no easy(without some nasty hacking) way to have a class instance as a constant object.
2006/5/2, Michael Müller <[EMAIL PROTECTED]>:
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
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
--
Geno Roupsky
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal