26 lines
717 B
ObjectPascal
26 lines
717 B
ObjectPascal
unit uIEditorSubFamilias;
|
|
|
|
interface
|
|
|
|
uses
|
|
uEditorDBBase, uBizSubFamilias, uSubFamiliasController, uGUIBase;
|
|
|
|
type
|
|
IEditorSubFamilias = interface(ICustomEditor)
|
|
['{F4D0EEEA-D5D4-488E-B495-33ADA54135BF}']
|
|
function ShowModal : Integer;
|
|
procedure Show;
|
|
|
|
function GetSubFamilias: IBizSubFamilia;
|
|
procedure SetSubFamilias(const Value: IBizSubFamilia);
|
|
property SubFamilias: IBizSubFamilia read GetSubFamilias write SetSubFamilias;
|
|
|
|
function GetController : ISubFamiliasController;
|
|
procedure SetController (const Value : ISubFamiliasController);
|
|
property Controller : ISubFamiliasController read GetController write SetController;
|
|
end;
|
|
|
|
implementation
|
|
|
|
end.
|