Looks horrible. I thought that's why class-helpers were introduced?
But I'd go with a function.

thanks,
Dmitry


On Mon, Nov 18, 2013 at 1:38 AM, Xiangrong Fang <xrf...@gmail.com> wrote:

> Hi All,
>
> Is it possible to optionally use a unit? e.g.
>
> unit myunit;
> uses {$ifexists persist.pas}persist,{$endif} Classes;
>
> type
>   TMyClass = class
>   public
>     {$ifexists persist.pas}
>     procedure SaveToStream(s: TStream);
>     {$endif}
>   end;
>
> Thanks,
> Xiangrong
>
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to