| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152 |
- object BookEditDialog: TBookEditDialog
- Left = 545
- Height = 347
- Top = 356
- Width = 806
- ActiveControl = EditTitle
- BorderStyle = bsDialog
- Caption = 'Edit Book Info'
- ClientHeight = 347
- ClientWidth = 806
- FormStyle = fsStayOnTop
- OnCreate = FormCreate
- LCLVersion = '1.6.4.0'
- object EditTitle: TEdit
- Left = 329
- Height = 29
- Top = 33
- Width = 463
- TabOrder = 0
- Text = 'Title'
- end
- object EditAuthors: TEdit
- Left = 329
- Height = 29
- Top = 80
- Width = 463
- TabOrder = 1
- Text = 'Authors'
- end
- object EditISBN: TEdit
- Left = 329
- Height = 29
- Top = 128
- Width = 400
- TabOrder = 2
- Text = 'ISBN'
- end
- object EditFilePath: TEdit
- Left = 329
- Height = 29
- Top = 176
- Width = 463
- OnChange = EditFilePathChange
- TabOrder = 3
- Text = 'File Path'
- end
- object ButtonSave: TBitBtn
- Left = 636
- Height = 30
- Top = 296
- Width = 75
- Caption = '&Save'
- OnClick = ButtonSaveClick
- Anchors = [akRight, akBottom]
- TabOrder = 4
- end
- object ButtonCancel: TBitBtn
- Left = 716
- Height = 30
- Top = 296
- Width = 75
- Caption = '&Cancel'
- OnClick = ButtonCancelClick
- Anchors = [akRight, akBottom]
- TabOrder = 5
- end
- object Panel1: TPanel
- Left = 24
- Height = 220
- Top = 33
- Width = 182
- BorderWidth = 2
- BorderStyle = bsSingle
- ClientHeight = 218
- ClientWidth = 180
- TabOrder = 6
- object ImageBookCover: TImage
- Left = 0
- Height = 224
- Top = 0
- Width = 182
- OnClick = ImageBookCoverClick
- Cursor = crHandPoint
- ShowHint = True
- Hint = 'Click to change cover'
- Stretch = True
- end
- end
- object ButtonChangeCover: TButton
- Left = 24
- Height = 28
- Top = 264
- Width = 182
- Caption = 'Change Cover...'
- OnClick = ImageBookCoverClick
- TabOrder = 8
- end
- object EditImagePath: TEdit
- Left = 329
- Height = 29
- Top = 224
- Width = 463
- OnChange = EditFilePathChange
- TabOrder = 7
- Text = 'Image Path'
- end
- object Label1: TLabel
- Left = 271
- Height = 17
- Top = 45
- Width = 30
- Caption = 'Title'
- ParentColor = False
- end
- object Label2: TLabel
- Left = 235
- Height = 17
- Top = 92
- Width = 66
- Caption = 'Author(s)'
- ParentColor = False
- end
- object Label3: TLabel
- Left = 268
- Height = 17
- Top = 140
- Width = 33
- Caption = 'ISBN'
- ParentColor = False
- end
- object Label4: TLabel
- Left = 242
- Height = 17
- Top = 188
- Width = 59
- Caption = 'File Path'
- ParentColor = False
- end
- object Label5: TLabel
- Left = 224
- Height = 17
- Top = 236
- Width = 77
- Caption = 'Image Path'
- ParentColor = False
- end
- object OpenDialog1: TOpenDialog
- Filter = 'JPEG|*.jpg;*.jpeg|PNG|*.png'
- left = 104
- top = 272
- end
- end
|