Changeset 73 for trunk/Compiler/Modules/Delphi/UModuleDelphi.pas
- Timestamp:
- May 2, 2013, 10:11:15 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Compiler/Modules/Delphi/UModuleDelphi.pas
r72 r73 19 19 20 20 TModuleDelphi = class(TModule) 21 constructor Create ; override;22 procedure Install; override;23 procedure Uninstall; override;21 constructor Create(AOwner: TComponent); override; 22 procedure DoInstall; override; 23 procedure DoUninstall; override; 24 24 end; 25 25 … … 35 35 { TModuleDelphi } 36 36 37 constructor TModuleDelphi.Create ;37 constructor TModuleDelphi.Create(AOwner: TComponent); 38 38 begin 39 inherited Create;39 inherited; 40 40 Name := 'Delphi'; 41 41 Title := SDelphi; 42 42 end; 43 43 44 procedure TModuleDelphi. Install;44 procedure TModuleDelphi.DoInstall; 45 45 begin 46 46 TCompilerAPI(API).RegisterConvertor(TProducerPascal); 47 inherited Install;47 inherited; 48 48 end; 49 49 50 procedure TModuleDelphi. Uninstall;50 procedure TModuleDelphi.DoUninstall; 51 51 begin 52 52 TCompilerAPI(API).UnregisterConvertor(TProducerPascal); 53 inherited Uninstall;53 inherited; 54 54 end; 55 55
Note:
See TracChangeset
for help on using the changeset viewer.