diff --git a/Source/RuntimeBuilder.Types.pas b/Source/RuntimeBuilder.Types.pas index 46b07b2..7f8783d 100644 --- a/Source/RuntimeBuilder.Types.pas +++ b/Source/RuntimeBuilder.Types.pas @@ -21,16 +21,6 @@ type TRTBCallType=CRTBCallTypeNil..CRTBCallTypeDefault; - TRTBSource=class abstract - private - Compliter:TRTBCompliter; - function GetText:string;virtual;abstract; - procedure SetText(S:string);virtual;abstract; - public - procedure Complete();virtual;abstract; - property Text:string read GetText write SetText; - end; - TRTBFunc=class abstract public function Call(args:array of const;CallType:TRTBCallType=CRTBCallTypeDefault):Variant;virtual;abstract; @@ -43,6 +33,17 @@ type property Funtion[Name:string]:TRTBFunc read GetFuntion; end; + TRTBSource=class abstract + private + Compliter:TRTBCompliter; + function GetText:string;virtual;abstract; + procedure SetText(S:string);virtual;abstract; + public + procedure CompleteAsLib:TRTBLib;virtual;abstract; + procedure CompleteAsFunc:TRTBLib;virtual;abstract; + property Text:string read GetText write SetText; + end; + TRTBCompliter=class abstract public function LoadLib(Name:string):TRTBLib;virtual;abstract;