| 1 | inherited Form_Preview: TForm_Preview | 
 
 
 
 
 | 2 | Caption = 'Preview' | 
 
 
 
 
 | 3 | OnCreate = FormCreate | 
 
 
 
 
 | 4 | ExplicitWidth = 500 | 
 
 
 
 
 | 5 | ExplicitHeight = 450 | 
 
 
 
 
 | 6 | PixelsPerInch = 96 | 
 
 
 
 
 | 7 | TextHeight = 13 | 
 
 
 
 
 | 8 | inherited Splitter1: TSplitter | 
 
 
 
 
 | 9 | OnMoved = Splitter1Moved | 
 
 
 
 
 | 10 | 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 | Left = 0 | 
 
 
 
 
 | 30 | Top = 20 | 
 
 
 
 
 | 31 | Width = 283 | 
 
 
 
 
 | 32 | Height = 403 | 
 
 
 
 
 | 33 | Align = alClient | 
 
 
 
 
 | 34 | ExplicitWidth = 313 | 
 
 
 
 
 | 35 | ExplicitHeight = 453 | 
 
 
 
 
 | 36 | end | 
 
 
 
 
 | 37 | object panel_buttons: TPanel | 
 
 
 
 
 | 38 | Left = 0 | 
 
 
 
 
 | 39 | Top = 0 | 
 
 
 
 
 | 40 | Width = 283 | 
 
 
 
 
 | 41 | Height = 20 | 
 
 
 
 
 | 42 | Align = alTop | 
 
 
 
 
 | 43 | BevelOuter = bvNone | 
 
 
 
 
 | 44 | TabOrder = 0 | 
 
 
 
 
 | 45 | Visible = False | 
 
 
 
 
 | 46 | OnResize = panel_buttonsResize | 
 
 
 
 
 | 47 | object btn_dec: TButton | 
 
 
 
 
 | 48 | Left = 0 | 
 
 
 
 
 | 49 | Top = 0 | 
 
 
 
 
 | 50 | Width = 20 | 
 
 
 
 
 | 51 | Height = 20 | 
 
 
 
 
 | 52 | Caption = '-' | 
 
 
 
 
 | 53 | Enabled = False | 
 
 
 
 
 | 54 | TabOrder = 0 | 
 
 
 
 
 | 55 | OnClick = btn_decClick | 
 
 
 
 
 | 56 | end | 
 
 
 
 
 | 57 | object btn_startstop: TButton | 
 
 
 
 
 | 58 | Left = 21 | 
 
 
 
 
 | 59 | Top = 0 | 
 
 
 
 
 | 60 | Width = 80 | 
 
 
 
 
 | 61 | Height = 20 | 
 
 
 
 
 | 62 | Caption = 'Stop automatic' | 
 
 
 
 
 | 63 | TabOrder = 1 | 
 
 
 
 
 | 64 | OnClick = btn_startstopClick | 
 
 
 
 
 | 65 | end | 
 
 
 
 
 | 66 | object btn_inc: TButton | 
 
 
 
 
 | 67 | Left = 102 | 
 
 
 
 
 | 68 | Top = 0 | 
 
 
 
 
 | 69 | Width = 20 | 
 
 
 
 
 | 70 | Height = 20 | 
 
 
 
 
 | 71 | Caption = '+' | 
 
 
 
 
 | 72 | Enabled = False | 
 
 
 
 
 | 73 | TabOrder = 2 | 
 
 
 
 
 | 74 | OnClick = btn_incClick | 
 
 
 
 
 | 75 | end | 
 
 
 
 
 | 76 | end | 
 
 
 
 
 | 77 | end | 
 
 
 
 
 | 78 | object timer: TTimer [3] | 
 
 
 
 
 | 79 | Enabled = False | 
 
 
 
 
 | 80 | OnTimer = timerTimer | 
 
 
 
 
 | 81 | Left = 400 | 
 
 
 
 
 | 82 | Top = 120 | 
 
 
 
 
 | 83 | end | 
 
 
 
 
 | 84 | end |