UI 및 데이타셋 추가

This commit is contained in:
LKJ
2024-12-01 11:28:11 +09:00
parent 8815050795
commit 0bec8b45e7
7 changed files with 1421 additions and 6 deletions
+161 -3
View File
@@ -1,9 +1,9 @@
object Form1: TForm1
object frmMain: TfrmMain
Left = 0
Top = 0
Caption = #47700#51064#54268
ClientHeight = 932
ClientWidth = 1048
ClientHeight = 985
ClientWidth = 1194
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
@@ -11,4 +11,162 @@ object Form1: TForm1
Font.Name = 'Segoe UI'
Font.Style = []
TextHeight = 15
object lcMain: TdxLayoutControl
Left = 0
Top = 0
Width = 1194
Height = 985
Align = alClient
TabOrder = 0
ExplicitLeft = 360
ExplicitTop = 256
ExplicitWidth = 300
ExplicitHeight = 250
object btnAdd: TcxButton
Left = 765
Top = 33
Width = 75
Height = 40
Caption = 'btnAdd'
TabOrder = 0
end
object btnSave: TcxButton
Left = 847
Top = 33
Width = 75
Height = 40
TabOrder = 1
end
object btnDelete: TcxButton
Left = 929
Top = 33
Width = 75
Height = 40
Caption = 'btnDelete'
TabOrder = 2
end
object btnCancel: TcxButton
Left = 1011
Top = 33
Width = 75
Height = 40
Caption = 'btnCancel'
TabOrder = 3
end
object cxButton5: TcxButton
Left = 1093
Top = 33
Width = 75
Height = 40
Caption = 'cxButton5'
TabOrder = 4
end
object grdEmployee: TcxGrid
Left = 26
Top = 157
Width = 1142
Height = 200
TabOrder = 5
object dbtvEmployee: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsView.GroupByBox = False
end
object grdEmployeeLevel1: TcxGridLevel
GridView = dbtvEmployee
end
end
object lgRoot: TdxLayoutGroup
AlignHorz = ahParentManaged
AlignVert = avParentManaged
Hidden = True
ItemIndex = 2
ShowBorder = False
Index = -1
end
object lgToolbar: TdxLayoutGroup
Parent = lgRoot
CaptionOptions.Text = 'New Group'
LayoutDirection = ldHorizontal
Index = 0
end
object dxLayoutGroup2: TdxLayoutGroup
Parent = lgRoot
CaptionOptions.Text = 'New Group'
Index = 1
end
object lgGrid: TdxLayoutGroup
Parent = lgRoot
CaptionOptions.Text = 'New Group'
Index = 2
end
object liAdd: TdxLayoutItem
Parent = lgToolbar
AlignHorz = ahRight
CaptionOptions.Text = 'cxButton1'
CaptionOptions.Visible = False
Control = btnAdd
ControlOptions.OriginalHeight = 40
ControlOptions.OriginalWidth = 75
ControlOptions.ShowBorder = False
Index = 0
end
object liCancel: TdxLayoutItem
Parent = lgToolbar
AlignHorz = ahRight
CaptionOptions.Text = 'cxButton2'
CaptionOptions.Visible = False
Control = btnSave
ControlOptions.OriginalHeight = 40
ControlOptions.OriginalWidth = 75
ControlOptions.ShowBorder = False
Index = 1
end
object liDelete: TdxLayoutItem
Parent = lgToolbar
AlignHorz = ahRight
CaptionOptions.Text = 'cxButton3'
CaptionOptions.Visible = False
Control = btnDelete
ControlOptions.OriginalHeight = 40
ControlOptions.OriginalWidth = 75
ControlOptions.ShowBorder = False
Index = 2
end
object liSave: TdxLayoutItem
Parent = lgToolbar
AlignHorz = ahRight
CaptionOptions.Text = 'cxButton4'
CaptionOptions.Visible = False
Control = btnCancel
ControlOptions.OriginalHeight = 40
ControlOptions.OriginalWidth = 75
ControlOptions.ShowBorder = False
Index = 3
end
object dxLayoutItem5: TdxLayoutItem
Parent = lgToolbar
AlignHorz = ahRight
CaptionOptions.Text = 'cxButton5'
CaptionOptions.Visible = False
Control = cxButton5
ControlOptions.OriginalHeight = 40
ControlOptions.OriginalWidth = 75
ControlOptions.ShowBorder = False
Index = 4
end
object liGrid: TdxLayoutItem
Parent = lgGrid
CaptionOptions.Text = 'cxGrid1'
CaptionOptions.Visible = False
Control = grdEmployee
ControlOptions.OriginalHeight = 200
ControlOptions.OriginalWidth = 250
ControlOptions.ShowBorder = False
Index = 0
end
end
end