home *** CD-ROM | disk | FTP | other *** search
- object FullViewForm: TFullViewForm
- Left = 231
- Top = 117
- Width = 320
- Height = 239
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poDefault
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 13
- object ScrollBox: TScrollBox
- Left = 0
- Top = 26
- Width = 312
- Height = 186
- Align = alClient
- BorderStyle = bsNone
- TabOrder = 0
- object Image: TImage
- Left = 0
- Top = 0
- Width = 312
- Height = 186
- Align = alClient
- Center = True
- IncrementalDisplay = True
- Stretch = True
- end
- end
- object FullViewCoolBar: TCoolBar
- Left = 0
- Top = 0
- Width = 312
- Height = 26
- Bands = <
- item
- Control = ToolBar1
- ImageIndex = -1
- MinHeight = 22
- Width = 308
- end>
- object ToolBar1: TToolBar
- Left = 12
- Top = 0
- Width = 292
- Height = 22
- EdgeBorders = []
- EdgeInner = esNone
- EdgeOuter = esNone
- Flat = True
- HotImages = PomocneDM.BtnHotImages
- Images = PomocneDM.BtnImages
- TabOrder = 0
- object PropCheckBox: TCheckBox
- Left = 0
- Top = 0
- Width = 121
- Height = 22
- Caption = 'Optim�ln� zobrazen�'
- TabOrder = 0
- OnClick = PropCheckBoxClick
- end
- object ZoomPanel: TPanel
- Left = 121
- Top = 0
- Width = 144
- Height = 22
- BevelOuter = bvNone
- TabOrder = 1
- object Label1: TLabel
- Left = 1
- Top = 4
- Width = 36
- Height = 13
- Caption = 'Zoom : '
- Layout = tlCenter
- end
- object RozliseniCBox: TComboBox
- Left = 39
- Top = 0
- Width = 98
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Velikost 200%'
- 'Velikost 150%'
- 'Velikost 100%'
- 'Velikost 75%'
- 'Velikost 50%'
- 'Velikost 25%')
- TabOrder = 0
- OnChange = RozliseniCBoxChange
- end
- end
- end
- end
- end
-