| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100 |
- object Form1: TForm1
- Left = 457
- Height = 573
- Top = 245
- Width = 817
- ActiveControl = EditSearch
- Caption = 'myBookShelf'
- ClientHeight = 573
- ClientWidth = 817
- OnClose = FormClose
- OnCreate = FormCreate
- OnKeyDown = FormKeyDown
- LCLVersion = '1.6.4.0'
- object ImageToolBar: TImage
- Left = 0
- Height = 56
- Top = 0
- Width = 817
- Align = alTop
- Stretch = True
- end
- object ButtonAdd: TImage
- Left = 16
- Height = 42
- Top = 8
- Width = 42
- OnClick = ButtonAddClick
- OnMouseEnter = ButtonAddMouseEnter
- OnMouseLeave = ButtonAddMouseLeave
- Stretch = True
- end
- object PanelBackground: TScrollBox
- Left = 0
- Height = 517
- Top = 56
- Width = 817
- HorzScrollBar.Page = 1
- HorzScrollBar.Visible = False
- VertScrollBar.Increment = 1
- VertScrollBar.Page = 1
- VertScrollBar.Smooth = True
- Align = alClient
- TabOrder = 0
- OnClick = PanelBackgroundClick
- OnDragDrop = PanelBackgroundDragDrop
- OnDragOver = PanelBackgroundDragOver
- OnResize = PanelBackgroundResize
- OnPaint = PanelBackgroundPaint
- end
- object EditSearch: TEdit
- Left = 608
- Height = 21
- Top = 16
- Width = 176
- AutoSelect = False
- BorderStyle = bsNone
- OnChange = EditSearchChange
- OnEnter = EditSearchEnter
- OnExit = EditSearchExit
- OnKeyPress = EditSearchKeyPress
- ParentShowHint = False
- TabStop = False
- TabOrder = 1
- Text = 'Search...'
- TextHintFontColor = clBtnText
- end
- object ComboSort: TComboBox
- Left = 400
- Height = 23
- Top = 15
- Width = 192
- ItemHeight = 15
- Style = csDropDownList
- OnChange = ComboSortChange
- TabOrder = 2
- Items.Strings = (
- 'Recently Added'
- 'Title'
- 'Author'
- )
- ItemIndex = 0
- Text = 'Recently Added'
- end
- object ButtonSettings: TImage
- Left = 80
- Height = 42
- Top = 8
- Width = 42
- OnClick = ButtonSettingsClick
- OnMouseEnter = ButtonSettingsMouseEnter
- OnMouseLeave = ButtonSettingsMouseLeave
- end
- object OpenDialog1: TOpenDialog
- DefaultExt = '.pdf'
- Filter = 'PDF Books|*.pdf|DJVU Books|*.djvu|EPUB Books|*.epub'
- Options = [ofAllowMultiSelect, ofEnableSizing, ofViewDetail]
- left = 257
- top = 184
- end
- end
|