forked from layerfsd/Roomer-PMS-1
-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathuFrmPostInvoices.dfm
137 lines (137 loc) · 2.72 KB
/
uFrmPostInvoices.dfm
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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
object FrmPostInvoices: TFrmPostInvoices
Left = 0
Top = 0
Caption = 'Post Invoices'
ClientHeight = 314
ClientWidth = 554
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
Scaled = False
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object sLabel1: TsLabel
Left = 72
Top = 32
Width = 101
Height = 13
Alignment = taRightJustify
Caption = 'From Invoice number'
end
object sLabel2: TsLabel
Left = 83
Top = 59
Width = 90
Height = 13
Alignment = taRightJustify
Caption = 'To Invoice Number'
end
object sLabel4: TsLabel
Left = 133
Top = 86
Width = 40
Height = 13
Alignment = taRightJustify
Caption = 'Invoices'
end
object edtFrom: TsEdit
Left = 216
Top = 29
Width = 57
Height = 21
Alignment = taRightJustify
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
NumbersOnly = True
ParentFont = False
TabOrder = 0
Text = '1000'
SkinData.SkinSection = 'EDIT'
end
object edtTo: TsEdit
Left = 216
Top = 56
Width = 57
Height = 21
Alignment = taRightJustify
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
NumbersOnly = True
ParentFont = False
TabOrder = 1
Text = '1000'
SkinData.SkinSection = 'EDIT'
end
object btnProcess: TsButton
Left = 216
Top = 147
Width = 137
Height = 25
Caption = 'Process'
TabOrder = 2
OnClick = btnProcessClick
SkinData.SkinSection = 'BUTTON'
end
object pnlProcess: TsPanel
Left = 0
Top = 215
Width = 554
Height = 99
Align = alBottom
BevelOuter = bvNone
TabOrder = 3
Visible = False
SkinData.SkinSection = 'PANEL'
object sLabel3: TsLabel
Left = 16
Top = 6
Width = 55
Height = 13
Caption = 'Processing:'
end
object lblInvoice: TsLabel
Left = 83
Top = 38
Width = 12
Height = 13
Caption = '...'
end
end
object edtInvoiceList: TsEdit
Left = 216
Top = 83
Width = 313
Height = 21
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
NumbersOnly = True
ParentFont = False
TabOrder = 4
SkinData.SkinSection = 'EDIT'
end
object dlgSave: TSaveDialog
DefaultExt = '.CSV'
FileName = 'Invoices.CSV'
Left = 472
Top = 152
end
end