155 lines
3.4 KiB
Plaintext
155 lines
3.4 KiB
Plaintext
object formVyberPL: TformVyberPL
|
|
Left = 0
|
|
Top = 0
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSingle
|
|
Caption = ' Vyberte paletov'#253' list'
|
|
ClientHeight = 506
|
|
ClientWidth = 585
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Segoe UI'
|
|
Font.Style = []
|
|
Position = poOwnerFormCenter
|
|
TextHeight = 25
|
|
object GridPanel1: TGridPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 585
|
|
Height = 506
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = GridPanel2
|
|
Row = 2
|
|
end
|
|
item
|
|
Column = 0
|
|
Control = grdPaletListy
|
|
Row = 1
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 10.000000000000000000
|
|
end
|
|
item
|
|
Value = 80.000000000000000000
|
|
end
|
|
item
|
|
Value = 10.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
ExplicitLeft = 186
|
|
ExplicitTop = 128
|
|
ExplicitWidth = 185
|
|
ExplicitHeight = 41
|
|
object GridPanel2: TGridPanel
|
|
Left = 1
|
|
Top = 455
|
|
Width = 583
|
|
Height = 50
|
|
Align = alClient
|
|
ColumnCollection = <
|
|
item
|
|
Value = 50.000000000000000000
|
|
end
|
|
item
|
|
Value = 50.000000000000000000
|
|
end>
|
|
ControlCollection = <
|
|
item
|
|
Column = 0
|
|
Control = btnOK
|
|
Row = 0
|
|
end
|
|
item
|
|
Column = 1
|
|
Control = btnZrusit
|
|
Row = 0
|
|
end>
|
|
RowCollection = <
|
|
item
|
|
Value = 100.000000000000000000
|
|
end>
|
|
TabOrder = 0
|
|
ExplicitLeft = 230
|
|
ExplicitTop = 98
|
|
ExplicitWidth = 185
|
|
ExplicitHeight = 41
|
|
DesignSize = (
|
|
583
|
|
50)
|
|
object btnOK: TButton
|
|
Left = 76
|
|
Top = 5
|
|
Width = 140
|
|
Height = 40
|
|
Anchors = []
|
|
Caption = 'OK'
|
|
TabOrder = 0
|
|
OnClick = btnOKClick
|
|
ExplicitLeft = 50
|
|
end
|
|
object btnZrusit: TButton
|
|
Left = 366
|
|
Top = 5
|
|
Width = 140
|
|
Height = 40
|
|
Anchors = []
|
|
Caption = 'Zru'#353'it'
|
|
TabOrder = 1
|
|
OnClick = btnZrusitClick
|
|
ExplicitLeft = 339
|
|
end
|
|
end
|
|
object grdPaletListy: TDBGrid
|
|
Left = 1
|
|
Top = 51
|
|
Width = 583
|
|
Height = 404
|
|
Align = alClient
|
|
DataSource = dm.dsPaletListy
|
|
TabOrder = 1
|
|
TitleFont.Charset = DEFAULT_CHARSET
|
|
TitleFont.Color = clWindowText
|
|
TitleFont.Height = -19
|
|
TitleFont.Name = 'Segoe UI'
|
|
TitleFont.Style = []
|
|
Columns = <
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colPaletList'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = #268#237'slo PL'
|
|
Width = 175
|
|
Visible = True
|
|
end
|
|
item
|
|
Alignment = taCenter
|
|
Expanded = False
|
|
FieldName = 'colDatPorizeni'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Datum po'#345#237'zen'#237
|
|
Width = 150
|
|
Visible = True
|
|
end
|
|
item
|
|
Expanded = False
|
|
FieldName = 'colPoznamka'
|
|
Title.Alignment = taCenter
|
|
Title.Caption = 'Pozn'#225'mka'
|
|
Width = 213
|
|
Visible = True
|
|
end>
|
|
end
|
|
end
|
|
end
|