-
Notifications
You must be signed in to change notification settings - Fork 0
/
FFUN.dfm
142 lines (142 loc) · 3.32 KB
/
FFUN.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
138
139
140
141
142
object Form7: TForm7
Left = 0
Top = 0
Caption = 'Form7'
ClientHeight = 335
ClientWidth = 809
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 809
Height = 41
Align = alTop
Color = clTeal
ParentBackground = False
TabOrder = 0
ExplicitWidth = 671
end
object Panel2: TPanel
Left = 0
Top = 41
Width = 185
Height = 294
Align = alLeft
Color = clTeal
ParentBackground = False
TabOrder = 1
object SELECT: TSpeedButton
Left = 32
Top = 120
Width = 113
Height = 49
Caption = 'SELECT'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Tempus Sans ITC'
Font.Style = [fsBold]
ParentFont = False
OnClick = SELECTClick
end
end
object Panel3: TPanel
Left = 185
Top = 41
Width = 624
Height = 294
Align = alClient
TabOrder = 2
ExplicitWidth = 486
object DBGrid1: TDBGrid
Left = 1
Top = 1
Width = 200
Height = 292
Align = alLeft
DataSource = DM.DSQFUN
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'NAME'
Title.Caption = 'FUNCTION'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -11
Title.Font.Name = 'Tempus Sans ITC'
Title.Font.Style = [fsBold]
Width = 187
Visible = True
end>
end
object DBGrid2: TDBGrid
Left = 201
Top = 1
Width = 200
Height = 292
Align = alLeft
DataSource = DM.DSQDEP
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'NAME'
Title.Caption = 'DEPARTMENT'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -11
Title.Font.Name = 'Tempus Sans ITC'
Title.Font.Style = [fsBold]
Width = 186
Visible = True
end>
end
object DBGrid3: TDBGrid
Left = 401
Top = 1
Width = 222
Height = 292
Align = alClient
DataSource = DM.DSQACC
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ACCESS_TYPE'
Title.Caption = 'ACCESS TYPE'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -11
Title.Font.Name = 'Tempus Sans ITC'
Title.Font.Style = [fsBold]
Width = 121
Visible = True
end>
end
end
end