| 3 |  | uses | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 4 |  | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 5 |  | Dialogs, Template, StdCtrls, ExtCtrls, | 
 
 
 
 
 
 
 
 
 
 
 | 6 | < | Functions, Data, OniImgClass, Menus, Buttons; | 
 
 
 
 
 
 
 
 
 | 6 | > | Functions, Data, OniImgClass, Menus, Buttons, TypeDefs; | 
 
 
 
 
 
 
 
 
 
 
 | 7 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 8 |  | type | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 9 |  | TForm_TxmpReplace = class(TForm_ToolTemplate) | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 40 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 41 |  | implementation | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 42 |  | {$R *.dfm} | 
 
 
 
 
 
 
 
 
 
 
 | 43 | < | uses Main, OniDataClass; | 
 
 
 
 
 
 
 
 
 | 43 | > | uses Main, ConnectionManager; | 
 
 
 
 
 
 
 
 
 
 
 | 44 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 45 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 46 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 47 |  | procedure TForm_TxmpReplace.SelectFile(fileinfo: TFileInfo); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 48 |  | var | 
 
 
 
 
 
 
 
 
 
 
 | 49 | < | Data: Tdata; | 
 
 
 
 
 
 
 
 
 | 49 | > | Data: TByteData; | 
 
 
 
 
 
 
 
 
 
 
 | 50 |  | mem:  TMemoryStream; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 51 |  | fadingbyte, depthbyte, storebyte: Byte; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 52 |  | begin |