Files
Polanskych-plgPolanskych/datModPrij.dfm
2025-09-05 12:22:48 +02:00

218 lines
5.7 KiB
Plaintext

object dmPrij: TdmPrij
Height = 240
Width = 640
PixelsPerInch = 96
object vTabPrij: TMemTableEh
Params = <>
Options = [mtoPersistentStructEh]
OnFilterRecord = vTabFilterRecord
Left = 27
Top = 17
object vTabPoradiSort: TSingleField
FieldName = 'PoradiSort'
Visible = False
end
object vTabPoradi: TSmallintField
DisplayLabel = 'Po'#345'ad'#237
FieldName = 'Poradi'
DisplayFormat = '#0'
end
object vTabRegCis: TStringField
DisplayLabel = #268#237'slo'
FieldName = 'RegCis'
Required = True
Size = 30
end
object vTabNazev1: TStringField
DisplayLabel = 'N'#225'zev'
FieldName = 'Nazev1'
Size = 100
end
object vTabMnozstvi: TFloatField
DisplayLabel = 'Mno'#382'stv'#237
FieldName = 'Mnozstvi'
OnValidate = vTabMnozstviValidate
DisplayFormat = '##0.##'
end
object vTabSkupZbo: TStringField
FieldName = 'SkupZbo'
Visible = False
Size = 3
end
object vTabIDZboSklad: TIntegerField
FieldName = 'IDZboSklad'
Required = True
Visible = False
end
object vTabIDPohybZboziObj: TIntegerField
FieldName = 'IDPohybZboziObj'
Required = True
Visible = False
end
object vTabSortiment: TStringField
FieldName = 'Sortiment'
Size = 100
end
object vTabK2: TStringField
FieldName = 'K2'
Size = 10
end
object vTabK1: TStringField
FieldName = 'K1'
Size = 10
end
object vTabTypZavozu: TStringField
FieldName = 'TypZavozu'
Visible = False
Size = 1
end
object vTabPoradiExt: TSingleField
FieldName = 'PoradiExt'
Visible = False
end
object vTabK1K2: TStringField
FieldName = 'K1K2'
Visible = False
Size = 15
end
object vTabPoradiSortNazev: TStringField
FieldName = 'PoradiSortNazev'
Size = 100
end
object vTabJCbezDaniKc: TSingleField
FieldName = 'JCbezDaniKc'
end
object MemTableData: TMemTableDataEh
object DataStruct: TMTDataStructEh
object JCbezDaniKc: TMTNumericDataFieldEh
FieldName = 'JCbezDaniKc'
NumericDataType = fdtSingleEh
AutoIncrement = False
DisplayWidth = 20
currency = False
Precision = 15
end
object PoradiSortNazev: TMTStringDataFieldEh
FieldName = 'PoradiSortNazev'
StringDataType = fdtStringEh
DisplayWidth = 100
Size = 100
end
object PoradiExt: TMTNumericDataFieldEh
FieldName = 'PoradiExt'
NumericDataType = fdtSingleEh
AutoIncrement = False
DisplayWidth = 20
currency = False
Precision = 15
end
object PoradiSort: TMTNumericDataFieldEh
FieldName = 'PoradiSort'
NumericDataType = fdtSingleEh
AutoIncrement = False
DisplayWidth = 20
currency = False
Precision = 15
end
object Poradi: TMTNumericDataFieldEh
FieldName = 'Poradi'
NumericDataType = fdtSmallintEh
AutoIncrement = False
DisplayWidth = 20
currency = False
Precision = 15
end
object TypZavozu: TMTStringDataFieldEh
FieldName = 'TypZavozu'
StringDataType = fdtStringEh
DisplayWidth = 1
Size = 1
end
object Sortiment: TMTStringDataFieldEh
FieldName = 'Sortiment'
StringDataType = fdtStringEh
DisplayWidth = 100
Size = 100
end
object K2: TMTStringDataFieldEh
FieldName = 'K2'
StringDataType = fdtStringEh
DisplayWidth = 10
Visible = False
Size = 10
end
object K1: TMTStringDataFieldEh
FieldName = 'K1'
StringDataType = fdtStringEh
DisplayWidth = 10
Visible = False
Size = 10
end
object Nazev1: TMTStringDataFieldEh
FieldName = 'Nazev1'
StringDataType = fdtStringEh
DisplayWidth = 100
Size = 100
end
object RegCis: TMTStringDataFieldEh
FieldName = 'RegCis'
StringDataType = fdtStringEh
DisplayWidth = 30
Required = True
Size = 30
end
object SkupZbo: TMTStringDataFieldEh
FieldName = 'SkupZbo'
StringDataType = fdtStringEh
DisplayWidth = 3
Visible = False
Size = 3
end
object IDZboSklad: TMTNumericDataFieldEh
FieldName = 'IDZboSklad'
NumericDataType = fdtIntegerEh
AutoIncrement = False
DisplayWidth = 20
Required = True
Visible = False
currency = False
Precision = 15
end
object Mnozstvi: TMTNumericDataFieldEh
FieldName = 'Mnozstvi'
NumericDataType = fdtFloatEh
AutoIncrement = False
DisplayLabel = '0'
DisplayWidth = 20
DisplayFormat = '##0.##'
currency = False
Precision = 15
end
object K1K2: TMTStringDataFieldEh
FieldName = 'K1K2'
StringDataType = fdtStringEh
DisplayWidth = 20
Visible = False
end
object IDPohybZboziObj: TMTNumericDataFieldEh
FieldName = 'IDPohybZboziObj'
NumericDataType = fdtIntegerEh
AutoIncrement = False
DisplayWidth = 20
Required = True
Visible = False
currency = False
Precision = 15
end
end
object RecordsList: TRecordsListEh
end
end
end
object dsPrij: TDataSource
DataSet = vTabPrij
Left = 100
Top = 18
end
end