s2.tools.is2viewdict.pas

来自「轉載的程序應用框架」· PAS 代码 · 共 17 行

unit S2.Tools.IS2ViewDict;

interface

uses
  S2.Model.TS2Model, S2.View.TS2View;

type
  IS2ViewDict = interface
    function Find(ModelClass: TS2ModelClass): TS2ViewClass;
    procedure Add(ModelClass: TS2ModelClass; ViewClass: TS2ViewClass);
  end;

implementation

end.