218 lines
5.7 KiB
Plaintext
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
|