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