{*******************************************************} { } { ManagerConfig } { } { Copyright (C) 2022 kku } { } {*******************************************************} unit ManagerConfig; interface uses Tocsg.Obj, System.SysUtils, System.Classes; type TRemember = record MacUsing: String; end; TManagerConfig = class(TTgObject) public Remember: TRemember; Constructor Create; Destructor Destroy; override; procedure Save; procedure Load; end; implementation { TManagerConfig } Constructor TManagerConfig.Create; begin Inherited Create; end; Destructor TManagerConfig.Destroy; begin Inherited; end; procedure TManagerConfig.Save; begin end; procedure TManagerConfig.Load; begin end; end.