pas2js_unitalias.lpr 330 B

123456789101112131415161718192021
  1. program pas2js_unitalias;
  2. uses
  3. {$IFDEF FPC}
  4. {$IFDEF unix}
  5. cmem, cwstring,
  6. {$ENDIF}
  7. DynLibs,
  8. {$ENDIF}
  9. SysUtils, LibPas2jsIntf, Pas2jsCompilerProxy;
  10. begin
  11. LoadPas2JsLibrary(ExtractFilePath(ParamStr(0))+libpas2js);
  12. With TPas2JSCompilerProxy.Create do
  13. try
  14. Execute;
  15. finally
  16. Free;
  17. end;
  18. end.