ئhG}F

dControlsZkf TControlClass8BfTControl1;cdClassesZkfTListDGg.TListh-b3g TList.Growykg TList.Error ykg TList.Getykg TList.Destroyykg TList.Addykg TList.Delete ykcdSysUtilsZkcdSysInitZkcdSystemZkfString8f AnsiString8fBooleanNcfLongint|ofInteger|ogTObject.SafeCallException݋RgTObject.AfterConstruction݋RgTObject.BeforeDestruction݋RgTObject.Dispatch݋RgTObject.DefaultHandler݋RgTObject.NewInstance݋RgTObject.FreeInstance݋RgTObject.Create݋Rg @ClassCreateX,Tdg@AfterConstructionX,TdgDisposeg@FreeMemX,Tdg@BeforeDestructionX,Tdg @ClassDestroyX,TdgNewg@GetMemX,Tdg @LStrToStringX,Tdg @PStrNCpyX,TdgTObject.InheritsFrom݋RgExitgFalse1ogTObject.ClassType݋RgTObject.ClassInfo݋RgTrue1og@LStrFromString|g@LStrClrg@HandleFinallyX,Tdg TObject.Free݋RceComCtrlsZkf TProgressBar4 g .TProgressBarceGaugesZkfTGaugem@ g.TGauge)ceTypInfoZkf PPropInfoړ\Jg GetPropInfoЫf TTypeKind9CZg tkIntegergtkFloatg tkVariantg SetOrdProp9c .1f%ppMax %ppMin % ppProgress * TProgressProp* PProgressData* TProgressData &.TProgressList"* TProgressList$(TProgressList.Createa&!Self$!.(c(TProgressList.Destroy&!Self$ !.( Ic(TProgressList.Add&!Self$ !AClassf! MaxPropNameb ! MinPropName" !ProgressPropName"  NewRec .*c(TProgressList.FindClassr !Self$ !AClass Result Pc(TProgressList.Remove&!Self$ !AClass I Pc( TProgressList.SetControlProperty !Self$!Control!Propf!Value& Resultf PropInfo I PropNamef c' ProgressListf$ (GetProgressList@$ Result$c(SupportsProgressControlDmJ !Control Result c(RegisterProgressControl2XL&!AClass! MaxPropName ! MinPropName !ProgressPropName" c(UnRegisterProgressControl:-),&!AClassc(SetProgressMaxi0&!Control!MaxValuec(SetProgressMini0&!Control!MinValuec(SetProgressValuei0&!Control! ProgressValuec( FinalizationX,Tdt! &c(RxPrgrss!&cDCn?E M, ControlClass, MaxProperty,, MinProperty.,ProgressProperty0cG$FP .Create/Destroy-Add- FindClass-Remove-SetControlPropertyc@A(?E&K24K64K84D:?>B4>D:?>D:?>D>lI TProgressPropppMaxppMin ppProgressLT TProgressList TProgressListLRxPrgrssSVtڋ3ҋhxhhhƄtd ^[MinPositionMaxMinValueProgressMaxValueSVWUڋoM|E3֋FMuӀ~]_^[USVWMUދEUC?U CD?U?֋_^[]SVWU_K|Ӌu Ku]_^[SVWU_K|3ӋՋtӋKu]_^[USVW3ۉ]Mڋ3Uhd0d EЋE,rt,׋PE-׋PDE׋EUt%t tuMЋE3ZYYdhEE_^[YY]=uS؅tPZ[3[USVWWEP΋_^[]=t СSVV3ɋ^[SVV^[SVV^[U3Uh1d0d u 3ZYYdh8]Ã-m86@ *,.0246$& ":8    f    l< B0@ D4H8J L&J L&J&L,N0,N @22T<ZZZVrJ|"\ ^$    T  $  ~ ` ^~ )$8f D. ( FFL     F$,,.2H4 4&*   p)  $   `0$$` !p( @DMqq  "8R^^^  "8j pFFЂ ]]Ι-- @Bp >>>@*`0  **`0  **`0  **  a