| 1 |  | inherited Form_Preview: TForm_Preview | 
 
 
 
 
 
 
 
 
 
 
 | 2 | < | Caption = 'Preview' | 
 
 
 
 
 
 
 
 
 | 2 | > | Caption = 'Form_Preview' | 
 
 
 
 
 
 
 
 
 
 
 | 3 |  | OnCreate = FormCreate | 
 
 
 
 
 
 
 
 
 | 4 | – | ExplicitWidth = 500 | 
 
 
 
 
 
 
 
 
 | 5 | – | ExplicitHeight = 450 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 4 |  | PixelsPerInch = 96 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 5 |  | TextHeight = 13 | 
 
 
 
 
 
 
 
 
 
 
 | 6 | < | inherited Splitter1: TSplitter | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 7 | < | OnMoved = Splitter1Moved | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 8 | < | end | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 11 | < | inherited content: TPanel | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 12 | < | object lbl_notpossible: TLabel | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 13 | < | Left = 16 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 14 | < | Top = 56 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 15 | < | Width = 97 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 16 | < | Height = 65 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 17 | < | AutoSize = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 18 | < | Caption = 'No preview possible for this filetype' | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 19 | < | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 20 | < | Font.Color = clWindowText | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 21 | < | Font.Height = -16 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 22 | < | Font.Name = 'Tahoma' | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 23 | < | Font.Style = [] | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 24 | < | ParentFont = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 25 | < | Visible = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 26 | < | WordWrap = True | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 27 | < | end | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 28 | < | object img: TImage | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 29 | < | AlignWithMargins = True | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 30 | < | Left = 3 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 31 | < | Top = 23 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 32 | < | Width = 277 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 33 | < | Height = 397 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 34 | < | Align = alClient | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 35 | < | ExplicitLeft = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 36 | < | ExplicitTop = 20 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 37 | < | ExplicitWidth = 313 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 38 | < | ExplicitHeight = 453 | 
 
 
 
 
 
 
 
 
 | 6 | > | inherited panel_basecontent: TPanel | 
 
 
 
 
 | 7 | > | inherited splitter_content: TSplitter | 
 
 
 
 
 | 8 | > | OnMoved = Splitter1Moved | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 9 |  | end | 
 
 
 
 
 
 
 
 
 
 
 | 10 | < | object panel_buttons: TPanel | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 11 | < | Left = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 12 | < | Top = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 13 | < | Width = 283 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 14 | < | Height = 20 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 15 | < | Align = alTop | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 16 | < | BevelOuter = bvNone | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 17 | < | TabOrder = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 18 | < | Visible = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 19 | < | OnResize = panel_buttonsResize | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 20 | < | object btn_dec: TButton | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 21 | < | Left = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 52 | < | Top = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 53 | < | Width = 20 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 54 | < | Height = 20 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 55 | < | Caption = '-' | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 56 | < | Enabled = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 57 | < | TabOrder = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 58 | < | OnClick = btn_decClick | 
 
 
 
 
 
 
 
 
 | 10 | > | inherited panel_content: TPanel | 
 
 
 
 
 | 11 | > | object img: TImage | 
 
 
 
 
 | 12 | > | AlignWithMargins = True | 
 
 
 
 
 | 13 | > | Left = 3 | 
 
 
 
 
 | 14 | > | Top = 23 | 
 
 
 
 
 | 15 | > | Width = 384 | 
 
 
 
 
 | 16 | > | Height = 506 | 
 
 
 
 
 | 17 | > | Align = alClient | 
 
 
 
 
 | 18 | > | ExplicitLeft = 0 | 
 
 
 
 
 | 19 | > | ExplicitTop = 20 | 
 
 
 
 
 | 20 | > | ExplicitWidth = 313 | 
 
 
 
 
 | 21 | > | ExplicitHeight = 453 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 22 |  | end | 
 
 
 
 
 
 
 
 
 
 
 | 23 | < | object btn_startstop: TButton | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 24 | < | Left = 21 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 25 | < | Top = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 26 | < | Width = 80 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 27 | < | Height = 20 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 28 | < | Caption = 'Stop automatic' | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 29 | < | TabOrder = 1 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 30 | < | OnClick = btn_startstopClick | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 23 | > | object lbl_notpossible: TLabel | 
 
 
 
 
 | 24 | > | Left = 16 | 
 
 
 
 
 | 25 | > | Top = 56 | 
 
 
 
 
 | 26 | > | Width = 97 | 
 
 
 
 
 | 27 | > | Height = 65 | 
 
 
 
 
 | 28 | > | AutoSize = False | 
 
 
 
 
 | 29 | > | Caption = 'No preview possible for this filetype' | 
 
 
 
 
 | 30 | > | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 31 | > | Font.Color = clWindowText | 
 
 
 
 
 | 32 | > | Font.Height = -16 | 
 
 
 
 
 | 33 | > | Font.Name = 'Tahoma' | 
 
 
 
 
 | 34 | > | Font.Style = [] | 
 
 
 
 
 | 35 | > | ParentFont = False | 
 
 
 
 
 | 36 | > | Visible = False | 
 
 
 
 
 | 37 | > | WordWrap = True | 
 
 
 
 
 
 
 
 
 
 
 | 38 |  | end | 
 
 
 
 
 
 
 
 
 
 
 | 39 | < | object btn_inc: TButton | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 40 | < | Left = 102 | 
 
 
 
 
 
 
 
 
 | 39 | > | object panel_buttons: TPanel | 
 
 
 
 
 | 40 | > | Left = 0 | 
 
 
 
 
 
 
 
 
 
 
 | 41 |  | Top = 0 | 
 
 
 
 
 
 
 
 
 
 
 | 42 | < | Width = 20 | 
 
 
 
 
 
 
 
 
 | 42 | > | Width = 390 | 
 
 
 
 
 
 
 
 
 
 
 | 43 |  | Height = 20 | 
 
 
 
 
 
 
 
 
 
 
 | 44 | < | Caption = '+' | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 45 | < | Enabled = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 46 | < | TabOrder = 2 | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 47 | < | OnClick = btn_incClick | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 44 | > | Align = alTop | 
 
 
 
 
 | 45 | > | BevelOuter = bvNone | 
 
 
 
 
 | 46 | > | TabOrder = 0 | 
 
 
 
 
 | 47 | > | Visible = False | 
 
 
 
 
 | 48 | > | OnResize = panel_buttonsResize | 
 
 
 
 
 | 49 | > | ExplicitWidth = 283 | 
 
 
 
 
 | 50 | > | object btn_dec: TButton | 
 
 
 
 
 | 51 | > | Left = 0 | 
 
 
 
 
 | 52 | > | Top = 0 | 
 
 
 
 
 | 53 | > | Width = 20 | 
 
 
 
 
 | 54 | > | Height = 20 | 
 
 
 
 
 | 55 | > | Caption = '-' | 
 
 
 
 
 | 56 | > | Enabled = False | 
 
 
 
 
 | 57 | > | TabOrder = 0 | 
 
 
 
 
 | 58 | > | OnClick = btn_decClick | 
 
 
 
 
 | 59 | > | end | 
 
 
 
 
 | 60 | > | object btn_startstop: TButton | 
 
 
 
 
 | 61 | > | Left = 21 | 
 
 
 
 
 | 62 | > | Top = 0 | 
 
 
 
 
 | 63 | > | Width = 80 | 
 
 
 
 
 | 64 | > | Height = 20 | 
 
 
 
 
 | 65 | > | Caption = 'Stop automatic' | 
 
 
 
 
 | 66 | > | TabOrder = 1 | 
 
 
 
 
 | 67 | > | OnClick = btn_startstopClick | 
 
 
 
 
 | 68 | > | end | 
 
 
 
 
 | 69 | > | object btn_inc: TButton | 
 
 
 
 
 | 70 | > | Left = 102 | 
 
 
 
 
 | 71 | > | Top = 0 | 
 
 
 
 
 | 72 | > | Width = 20 | 
 
 
 
 
 | 73 | > | Height = 20 | 
 
 
 
 
 | 74 | > | Caption = '+' | 
 
 
 
 
 | 75 | > | Enabled = False | 
 
 
 
 
 | 76 | > | TabOrder = 2 | 
 
 
 
 
 | 77 | > | OnClick = btn_incClick | 
 
 
 
 
 | 78 | > | end | 
 
 
 
 
 
 
 
 
 
 
 | 79 |  | end | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 80 |  | end | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 81 |  | end | 
 
 
 
 
 
 
 
 
 
 
 | 82 | < | object timer: TTimer [3] | 
 
 
 
 
 
 
 
 
 | 82 | > | object timer: TTimer | 
 
 
 
 
 
 
 
 
 
 
 | 83 |  | Enabled = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 84 |  | OnTimer = timerTimer | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 85 |  | Left = 400 |