2020-01-07 13:08:59 +00:00
|
|
|
unit JvPascalInterpreterReg;
|
|
|
|
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
|
|
|
|
interface
|
|
|
|
|
|
|
|
uses
|
|
|
|
Classes, SysUtils;
|
|
|
|
|
|
|
|
procedure Register;
|
|
|
|
|
|
|
|
implementation
|
|
|
|
|
2020-08-02 16:28:28 +00:00
|
|
|
{$IFDEF CPU64}
|
|
|
|
procedure Register;
|
|
|
|
begin
|
|
|
|
end;
|
|
|
|
{$ELSE}
|
|
|
|
|
2020-01-07 13:08:59 +00:00
|
|
|
{$R ..\..\resource\jvpascalinterpreterreg.res}
|
|
|
|
|
|
|
|
uses
|
|
|
|
JvDsgnConsts, JvInterpreter;
|
|
|
|
|
|
|
|
procedure Register;
|
|
|
|
begin
|
2020-08-02 16:28:28 +00:00
|
|
|
RegisterComponents(RsPaletteJvclNonVisual, [TJvInterpreterProgram]);
|
2020-01-07 13:08:59 +00:00
|
|
|
end;
|
2020-08-02 16:28:28 +00:00
|
|
|
{$ENDIF}
|
2020-01-07 13:08:59 +00:00
|
|
|
|
|
|
|
end.
|
|
|
|
|