Hi.
This is possible in Lazarus/FPC?:
type
TFoo = record
Value: string;
function AsBoolean: Boolean;
end;
function TFoo.AsBoolean: Boolean;
begin
Result := StrToBoolDef(Value, False);
end;In Delphi:
http://edn.embarcadero.com/article/34324
or:
http://delphi.about.com/od/adptips2006/qt/newdelphirecord.htm
or more:
Thanks.
