TomBuzin/Rootvin-pluginHDCRTN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Prvni verze

Browse Source
This commit is contained in:
TomBuz
2025-05-21 21:06:33 +02:00
parent a976e7392e
commit fedc940ac4
189 changed files with 72374 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

294
_plgPlan/frmKmen.dfm Normal file
View File

@ -0,0 +1,294 @@
object formKmen: TformKmen
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
Caption = ' Vyberte polo'#382'ku do pl'#225'nu'
ClientHeight = 800
ClientWidth = 1203
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
Position = poOwnerFormCenter
OnClose = FormClose
OnShow = FormShow
TextHeight = 21
object grd1: TGridPanel
Left = 0
Top = 0
Width = 1203
Height = 800
Align = alClient
Caption = 'grd1'
ColumnCollection = <
item
Value = 100.000000000000000000
end>
ControlCollection = <
item
Column = 0
Control = Panel1
Row = 1
end
item
Column = 0
Control = grd2
Row = 0
end>
RowCollection = <
item
Value = 5.000000000000000000
end
item
Value = 95.000000000000000000
end>
TabOrder = 0
object Panel1: TPanel
Left = 1
Top = 41
Width = 1201
Height = 758
Align = alClient
Anchors = []
TabOrder = 0
object grdKmen: TJvDBGrid
Left = 1
Top = 1
Width = 1199
Height = 756
Align = alClient
DataSource = dm2.dsKmen
DrawingStyle = gdsClassic
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -16
TitleFont.Name = 'Segoe UI'
TitleFont.Style = []
OnDrawColumnCell = grdKmenDrawColumnCell
OnDblClick = grdKmenDblClick
ScrollBars = ssVertical
SelectColumnsDialogStrings.Caption = 'Vyberte sloupce'
SelectColumnsDialogStrings.OK = '&OK'
SelectColumnsDialogStrings.NoSelectionWarning = 'Mus'#237' b'#253't viditeln'#253' aspo'#328' jeden sloupec !'
CanDelete = False
EditControls = <>
RowsHeight = 25
TitleRowHeight = 25
Columns = <
item
Expanded = False
FieldName = 'colID'
Visible = False
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colSZ'
Title.Alignment = taCenter
Title.Caption = 'SK'
Width = 35
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colRegCis'
Title.Alignment = taCenter
Title.Caption = 'Reg. '#269#237'slo'
Width = 109
Visible = True
end
item
Expanded = False
FieldName = 'colNazev1'
Title.Alignment = taCenter
Title.Caption = 'N'#225'zev'
Width = 352
Visible = True
end
item
Expanded = False
FieldName = 'colZaklad'
Title.Alignment = taCenter
Title.Caption = 'Z'#225'klad'
Width = 232
Visible = True
end
item
Expanded = False
FieldName = 'colZakModif'
Title.Alignment = taCenter
Title.Caption = 'Stroj'
Width = 135
Visible = True
end
item
Expanded = False
FieldName = 'colKSvKA'
Title.Alignment = taCenter
Title.Caption = 'Ks v KA'
Width = 74
Visible = True
end
item
Expanded = False
FieldName = 'colKAnaPAL'
Title.Alignment = taCenter
Title.Caption = 'KA na Pal'
Width = 76
Visible = True
end
item
Expanded = False
FieldName = 'colKSnaPAL'
Title.Alignment = taCenter
Title.Caption = 'KS na Pal'
Width = 83
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'colMJEvid'
Title.Alignment = taCenter
Title.Caption = 'bal'
Width = 54
Visible = True
end>
end
end
object grd2: TGridPanel
AlignWithMargins = True
Left = 4
Top = 4
Width = 1195
Height = 34
Align = alClient
ColumnCollection = <
item
Value = 4.000000000000000000
end
item
Value = 9.199999999999999000
end
item
Value = 29.400000000000000000
end
item
Value = 19.700000000000000000
end
item
Value = 11.200000000000000000
end
item
Value = 26.500000000000000000
end>
ControlCollection = <
item
Column = 0
Control = btnClear
Row = 0
end
item
Column = 1
Control = edtRegCis
Row = 0
end
item
Column = 2
Control = edtNazev
Row = 0
end
item
Column = 3
Control = edtZaklad
Row = 0
end
item
Column = 4
Control = edtStroj
Row = 0
end>
RowCollection = <
item
Value = 100.000000000000000000
end>
TabOrder = 1
object btnClear: TBitBtn
AlignWithMargins = True
Left = 4
Top = 4
Width = 42
Height = 26
Align = alClient
ImageIndex = 3
ImageName = 'Item4'
Images = dm2.imgList
TabOrder = 0
OnClick = btnClearClick
end
object edtRegCis: TRzEdit
AlignWithMargins = True
Left = 52
Top = 4
Width = 103
Height = 26
Text = ''
Align = alClient
Color = clSkyBlue
MaxLength = 30
TabOrder = 1
OnChange = edtRegCisChange
OnKeyPress = edtRegCisKeyPress
ExplicitHeight = 29
end
object edtNazev: TRzEdit
AlignWithMargins = True
Left = 161
Top = 4
Width = 345
Height = 26
Text = ''
Align = alClient
Color = clSkyBlue
MaxLength = 100
TabOrder = 2
OnChange = edtNazevChange
ExplicitHeight = 29
end
object edtZaklad: TRzEdit
AlignWithMargins = True
Left = 512
Top = 4
Width = 229
Height = 26
Text = ''
Align = alClient
Color = clSkyBlue
MaxLength = 100
TabOrder = 3
OnChange = edtZakladChange
ExplicitHeight = 29
end
object edtStroj: TRzEdit
AlignWithMargins = True
Left = 747
Top = 4
Width = 128
Height = 26
Text = ''
Align = alClient
Color = clSkyBlue
MaxLength = 50
TabOrder = 4
OnChange = edtStrojChange
ExplicitHeight = 29
end
end
end
end