blob: 6b4a2aafc15fc7be19e4e0bd0ffc1139b5d9e744 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
object Form1: TForm1
Left = 199
Top = 280
Width = 541
Height = 308
Caption = 'Test SQLite 3'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 104
Width = 28
Height = 13
Caption = 'Notes'
end
object Label2: TLabel
Left = 24
Top = 44
Width = 28
Height = 13
Caption = 'Name'
end
object Label3: TLabel
Left = 24
Top = 72
Width = 40
Height = 13
Caption = 'Number:'
end
object Label4: TLabel
Left = 24
Top = 12
Width = 11
Height = 13
Caption = 'ID'
end
object Image1: TImage
Left = 272
Top = 12
Width = 241
Height = 165
Proportional = True
Stretch = True
end
object btnTest: TButton
Left = 24
Top = 224
Width = 161
Height = 37
Caption = 'Test SQLite 3'
TabOrder = 0
OnClick = btnTestClick
end
object memNotes: TMemo
Left = 24
Top = 124
Width = 185
Height = 89
Lines.Strings = (
'')
ScrollBars = ssVertical
TabOrder = 1
end
object ebName: TEdit
Left = 72
Top = 40
Width = 173
Height = 21
TabOrder = 2
end
object ebNumber: TEdit
Left = 72
Top = 68
Width = 173
Height = 21
TabOrder = 3
end
object ebID: TEdit
Left = 72
Top = 12
Width = 173
Height = 21
TabOrder = 4
end
object btnLoadImage: TButton
Left = 192
Top = 224
Width = 157
Height = 37
Caption = 'Load image'
TabOrder = 5
OnClick = btnLoadImageClick
end
object btnDisplayImage: TButton
Left = 360
Top = 224
Width = 157
Height = 37
Caption = 'Display image'
TabOrder = 6
OnClick = btnDisplayImageClick
end
end
|