You've already forked lazarus-ccr
24 lines
228 B
ObjectPascal
24 lines
228 B
ObjectPascal
|
unit TDIReg ;
|
||
|
|
|
||
|
|
{$mode objfpc}{$H+}
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
Classes, SysUtils, LResources ;
|
||
|
|
|
||
|
|
procedure Register;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
Uses TDIClass ;
|
||
|
|
|
||
|
|
procedure Register;
|
||
|
|
begin
|
||
|
|
RegisterComponents('TDI', [ TTDINoteBook ]);
|
||
|
|
end ;
|
||
|
|
|
||
|
|
|
||
|
|
end.
|
||
|
|
|