Files
LOVATO-plugin/frmUnit12.dfm
2026-04-07 18:23:56 +02:00

93 lines
2.4 KiB
Plaintext

object frmRozdelMat: TfrmRozdelMat
Left = 0
Top = 0
Caption = ' Rozd'#283'len'#237' materi'#225'lu'
ClientHeight = 440
ClientWidth = 1030
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Position = poMainFormCenter
OnResize = FormResize
OnShow = FormShow
TextHeight = 13
object btnQuit: TButton
Left = 929
Top = 398
Width = 90
Height = 25
Caption = 'Storno'
Default = True
ModalResult = 2
TabOrder = 0
OnClick = btnQuitClick
end
object btnPrevod: TButton
Left = 767
Top = 398
Width = 101
Height = 25
Caption = 'Generuj p'#345'evodky'
ModalResult = 1
TabOrder = 1
end
object gRozpad2: TJvDBGrid
Left = 2
Top = 6
Width = 1020
Height = 375
DataSource = dsRozpad2
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
OnDrawColumnCell = gRozpad2DrawColumnCell
OnKeyUp = gRozpad2KeyUp
OnMouseMove = gRozpad2MouseMove
OnEditChange = gRozpad2EditChange
SelectColumnsDialogStrings.Caption = 'Select columns'
SelectColumnsDialogStrings.OK = '&OK'
SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
EditControls = <>
RowsHeight = 17
TitleRowHeight = 17
end
object dsRozpad: TDataSource
DataSet = tabRozpad
Left = 598
Top = 380
end
object tabRozpad: TFDMemTable
FetchOptions.AssignedValues = [evMode]
FetchOptions.Mode = fmAll
ResourceOptions.AssignedValues = [rvSilentMode]
ResourceOptions.SilentMode = True
UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
UpdateOptions.CheckRequired = False
UpdateOptions.AutoCommitUpdates = True
Left = 524
Top = 380
end
object dsRozpad2: TDataSource
DataSet = tabRozpad2
Left = 286
Top = 376
end
object tabRozpad2: TFDMemTable
FetchOptions.AssignedValues = [evMode]
FetchOptions.Mode = fmAll
ResourceOptions.AssignedValues = [rvSilentMode]
ResourceOptions.SilentMode = True
UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
UpdateOptions.CheckRequired = False
UpdateOptions.AutoCommitUpdates = True
Left = 206
Top = 378
end
end