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

Reply via email to