403 lines
7.6 KiB
Plaintext
403 lines
7.6 KiB
Plaintext
object FrmServidor: TFrmServidor
|
|
Left = 93
|
|
Top = 85
|
|
Width = 801
|
|
Height = 598
|
|
Caption = 'mORMot + MongoDB'
|
|
Color = clCaptionText
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Label1: TLabel
|
|
Left = 0
|
|
Top = 536
|
|
Width = 793
|
|
Height = 35
|
|
Align = alBottom
|
|
Alignment = taCenter
|
|
Color = clBtnHighlight
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clRed
|
|
Font.Height = -29
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object bmp1: TImage
|
|
Left = 6
|
|
Top = 8
|
|
Width = 781
|
|
Height = 526
|
|
Stretch = True
|
|
end
|
|
object title: TLabel
|
|
Left = 228
|
|
Top = 11
|
|
Width = 503
|
|
Height = 52
|
|
Caption = 'mORMot WINE CELLAR'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clMaroon
|
|
Font.Height = -43
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object txtItems: TLabel
|
|
Left = 207
|
|
Top = 456
|
|
Width = 3
|
|
Height = 13
|
|
Visible = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 452
|
|
Top = 306
|
|
Width = 31
|
|
Height = 13
|
|
Caption = 'Label2'
|
|
end
|
|
object status: TLabel
|
|
Left = 23
|
|
Top = 62
|
|
Width = 3
|
|
Height = 13
|
|
end
|
|
object bmp2: TImage
|
|
Left = 151
|
|
Top = 25
|
|
Width = 32
|
|
Height = 32
|
|
AutoSize = True
|
|
OnClick = btnSearchClick
|
|
end
|
|
object L1: TLabel
|
|
Left = 461
|
|
Top = 323
|
|
Width = 23
|
|
Height = 13
|
|
Caption = 'NEW'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 510
|
|
Top = 323
|
|
Width = 25
|
|
Height = 13
|
|
Caption = 'SAVE'
|
|
end
|
|
object Label4: TLabel
|
|
Left = 556
|
|
Top = 321
|
|
Width = 36
|
|
Height = 13
|
|
Caption = 'DELETE'
|
|
end
|
|
object Label5: TLabel
|
|
Left = 609
|
|
Top = 322
|
|
Width = 25
|
|
Height = 13
|
|
Caption = 'PREV'
|
|
end
|
|
object Label6: TLabel
|
|
Left = 706
|
|
Top = 322
|
|
Width = 25
|
|
Height = 13
|
|
Caption = 'NEXT'
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 580
|
|
Top = 81
|
|
Width = 169
|
|
Height = 155
|
|
BevelInner = bvSpace
|
|
BevelOuter = bvLowered
|
|
TabOrder = 14
|
|
object photo: TImage
|
|
Left = 2
|
|
Top = 2
|
|
Width = 165
|
|
Height = 151
|
|
Align = alTop
|
|
Stretch = True
|
|
OnClick = photoClick
|
|
end
|
|
end
|
|
object txtID: TLabeledEdit
|
|
Left = 196
|
|
Top = 46
|
|
Width = 183
|
|
Height = 24
|
|
EditLabel.Width = 11
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'ID'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 8
|
|
Visible = False
|
|
end
|
|
object txtname: TLabeledEdit
|
|
Left = 196
|
|
Top = 86
|
|
Width = 266
|
|
Height = 22
|
|
EditLabel.Width = 27
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Name'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clMaroon
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
end
|
|
object txtgrapes: TLabeledEdit
|
|
Left = 196
|
|
Top = 124
|
|
Width = 132
|
|
Height = 22
|
|
EditLabel.Width = 34
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Grapes'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
end
|
|
object txtcountry: TLabeledEdit
|
|
Left = 330
|
|
Top = 124
|
|
Width = 114
|
|
Height = 22
|
|
EditLabel.Width = 39
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Country'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 5
|
|
end
|
|
object txtregion: TLabeledEdit
|
|
Left = 450
|
|
Top = 125
|
|
Width = 106
|
|
Height = 22
|
|
EditLabel.Width = 33
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Region'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 6
|
|
end
|
|
object txtyear: TLabeledEdit
|
|
Left = 468
|
|
Top = 85
|
|
Width = 87
|
|
Height = 22
|
|
EditLabel.Width = 22
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Year'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
object txtphoto: TLabeledEdit
|
|
Left = 580
|
|
Top = 251
|
|
Width = 169
|
|
Height = 21
|
|
EditLabel.Width = 28
|
|
EditLabel.Height = 13
|
|
EditLabel.Caption = 'Photo'
|
|
TabOrder = 9
|
|
Visible = False
|
|
end
|
|
object txtdescription: TMemo
|
|
Left = 196
|
|
Top = 164
|
|
Width = 361
|
|
Height = 62
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clNavy
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 7
|
|
end
|
|
object txtitem1: TEdit
|
|
Left = 364
|
|
Top = 338
|
|
Width = 85
|
|
Height = 21
|
|
TabOrder = 10
|
|
end
|
|
object txtitem2: TEdit
|
|
Left = 453
|
|
Top = 338
|
|
Width = 121
|
|
Height = 21
|
|
TabOrder = 11
|
|
end
|
|
object txtitem3: TEdit
|
|
Left = 581
|
|
Top = 338
|
|
Width = 121
|
|
Height = 21
|
|
TabOrder = 12
|
|
end
|
|
object StringGrid1: TStringGrid
|
|
Left = 194
|
|
Top = 229
|
|
Width = 252
|
|
Height = 77
|
|
BorderStyle = bsNone
|
|
Color = clCaptionText
|
|
ColCount = 1
|
|
FixedCols = 0
|
|
RowCount = 1
|
|
FixedRows = 0
|
|
Options = []
|
|
TabOrder = 13
|
|
end
|
|
object Memo1: TMemo
|
|
Left = 200
|
|
Top = 336
|
|
Width = 543
|
|
Height = 108
|
|
TabOrder = 1
|
|
end
|
|
object txtsearch: TEdit
|
|
Left = 19
|
|
Top = 25
|
|
Width = 131
|
|
Height = 33
|
|
AutoSize = False
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clMaroon
|
|
Font.Height = -13
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object ToolBar1: TToolBar
|
|
Left = 448
|
|
Top = 278
|
|
Width = 296
|
|
Height = 45
|
|
Align = alCustom
|
|
ButtonHeight = 43
|
|
ButtonWidth = 30
|
|
EdgeBorders = []
|
|
EdgeInner = esNone
|
|
EdgeOuter = esNone
|
|
Flat = True
|
|
Indent = 1
|
|
TabOrder = 15
|
|
object btnClear: TBitBtn
|
|
Left = 1
|
|
Top = 0
|
|
Width = 50
|
|
Height = 43
|
|
TabOrder = 0
|
|
OnClick = btnClearClick
|
|
end
|
|
object btnSave: TBitBtn
|
|
Left = 51
|
|
Top = 0
|
|
Width = 50
|
|
Height = 43
|
|
TabOrder = 1
|
|
OnClick = btnSaveClick
|
|
end
|
|
object btnDelete: TBitBtn
|
|
Left = 101
|
|
Top = 0
|
|
Width = 50
|
|
Height = 43
|
|
TabOrder = 2
|
|
OnClick = btnDeleteClick
|
|
end
|
|
object btnPrev: TBitBtn
|
|
Left = 151
|
|
Top = 0
|
|
Width = 50
|
|
Height = 43
|
|
TabOrder = 3
|
|
OnClick = btnPrevClick
|
|
Layout = blGlyphTop
|
|
end
|
|
object pag: TLabel
|
|
Left = 201
|
|
Top = 0
|
|
Width = 44
|
|
Height = 43
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = ' '
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clMaroon
|
|
Font.Height = -19
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object btnNext: TBitBtn
|
|
Left = 245
|
|
Top = 0
|
|
Width = 50
|
|
Height = 43
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clMaroon
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
OnClick = btnNextClick
|
|
Margin = 0
|
|
end
|
|
end
|
|
object btnItems: TBitBtn
|
|
Left = 420
|
|
Top = 232
|
|
Width = 25
|
|
Height = 21
|
|
TabOrder = 16
|
|
OnClick = btnItemsClick
|
|
end
|
|
object OpenPictureDialog1: TOpenPictureDialog
|
|
FileName = 'warley.jpg'
|
|
Left = 685
|
|
Top = 228
|
|
end
|
|
end
|