home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-04-22 | 32.0 KB | 1,298 lines |
- object TiskKlientuQReport: TTiskKlientuQReport
- Left = 0
- Top = 0
- Width = 794
- Height = 1123
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- DataSet = ZakazniciTbl
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- Options = [FirstPageHeader, LastPageFooter]
- Page.Columns = 1
- Page.Orientation = poPortrait
- Page.PaperSize = A4
- Page.Values = (
- 100.000000000000000000
- 2970.000000000000000000
- 100.000000000000000000
- 2100.000000000000000000
- 100.000000000000000000
- 100.000000000000000000
- 0.000000000000000000)
- PrintIfEmpty = False
- PrinterSettings.Copies = 1
- PrinterSettings.Duplex = False
- PrinterSettings.FirstPage = 0
- PrinterSettings.LastPage = 0
- PrinterSettings.OutputBin = First
- ReportTitle = 'P�ehled klient�'
- SnapToGrid = True
- Units = MM
- Zoom = 100
- object QRBand2: TQRBand
- Left = 38
- Top = 380
- Width = 718
- Height = 40
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 105.833333333333300000
- 1899.708333333332000000)
- BandType = rbPageFooter
- object QRSysData1: TQRSysData
- Left = 0
- Top = 16
- Width = 718
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 0.000000000000000000
- 42.333333333333340000
- 1899.708333333332000000)
- Alignment = taCenter
- AlignToBand = False
- AutoSize = False
- Color = clWhite
- Data = qrsPageNumber
- Transparent = False
- FontSize = 10
- end
- end
- object JmenoDetailBand: TQRBand
- Left = 38
- Top = 78
- Width = 718
- Height = 27
- Frame.Color = clBlack
- Frame.DrawTop = True
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = JmenoDetailBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 71.437500000000000000
- 1899.708333333332000000)
- BandType = rbDetail
- object QRDBText1: TQRDBText
- Left = 0
- Top = 8
- Width = 720
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 0.000000000000000000
- 21.166666666666670000
- 1905.000000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'CeleJmeno'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object QRBand1: TQRBand
- Left = 38
- Top = 38
- Width = 718
- Height = 40
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 105.833333333333300000
- 1899.708333333332000000)
- BandType = rbPageHeader
- object QRLabel1: TQRLabel
- Left = 0
- Top = 0
- Width = 717
- Height = 30
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 79.375000000000000000
- 0.000000000000000000
- 0.000000000000000000
- 1897.062500000000000000)
- Alignment = taCenter
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Caption = 'P�ehled klient�'
- Color = clWhite
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -24
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 18
- end
- end
- object AdresaChildBand: TQRChildBand
- Left = 38
- Top = 105
- Width = 718
- Height = 24
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = AdresaChildBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 63.500000000000000000
- 1899.708333333332000000)
- ParentBand = JmenoDetailBand
- object QRDBText2: TQRDBText
- Left = 0
- Top = 5
- Width = 720
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 0.000000000000000000
- 13.229166666666670000
- 1905.000000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'CelaAdresa'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object PoznakmaChildBand: TQRChildBand
- Left = 38
- Top = 342
- Width = 718
- Height = 38
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = PoznakmaChildBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 100.541666666666700000
- 1899.708333333332000000)
- ParentBand = InternetChildBand
- object QRDBRichText1: TQRDBRichText
- Left = 120
- Top = 0
- Width = 600
- Height = 33
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 87.312500000000000000
- 317.500000000000000000
- 0.000000000000000000
- 1587.500000000000000000)
- Alignment = taLeftJustify
- AutoStretch = False
- Color = clWindow
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- DataField = 'Poznamka'
- DataSet = ZakazniciTbl
- end
- object QRLabel16: TQRLabel
- Left = 16
- Top = 0
- Width = 68
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 0.000000000000000000
- 179.916666666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Pozn�mka:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object KontaktChildBand: TQRChildBand
- Left = 38
- Top = 129
- Width = 718
- Height = 57
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = KontaktChildBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 150.812500000000000000
- 1899.708333333332000000)
- ParentBand = AdresaChildBand
- object QRDBText3: TQRDBText
- Left = 120
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'TelefonMobil'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText4: TQRDBText
- Left = 120
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'TelefonPrace'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText5: TQRDBText
- Left = 487
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1288.520833333333000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'TelefonPrivat'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText6: TQRDBText
- Left = 487
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1288.520833333333000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'Fax'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel2: TQRLabel
- Left = 16
- Top = 8
- Width = 36
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 21.166666666666670000
- 95.250000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Mobil:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel3: TQRLabel
- Left = 16
- Top = 32
- Width = 102
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 84.666666666666670000
- 269.875000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Telefon do pr�ce:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel4: TQRLabel
- Left = 383
- Top = 8
- Width = 91
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1013.354166666667000000
- 21.166666666666670000
- 240.770833333333400000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Priv�tn� telefon:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel5: TQRLabel
- Left = 383
- Top = 32
- Width = 26
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1013.354166666667000000
- 84.666666666666670000
- 68.791666666666670000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Fax:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object ObchodniUdajeChildBand: TQRChildBand
- Left = 38
- Top = 186
- Width = 718
- Height = 57
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = ObchodniUdajeChildBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 150.812500000000000000
- 1899.708333333332000000)
- ParentBand = KontaktChildBand
- object QRDBText7: TQRDBText
- Left = 120
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'ICO'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText8: TQRDBText
- Left = 120
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'DIC'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText9: TQRDBText
- Left = 488
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1291.166666666667000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'Banka'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText10: TQRDBText
- Left = 488
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1291.166666666667000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'Ucet'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel6: TQRLabel
- Left = 16
- Top = 8
- Width = 28
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 21.166666666666670000
- 74.083333333333320000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'I�O:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel7: TQRLabel
- Left = 16
- Top = 32
- Width = 27
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 84.666666666666670000
- 71.437500000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'DI�:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel8: TQRLabel
- Left = 384
- Top = 8
- Width = 43
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1016.000000000000000000
- 21.166666666666670000
- 113.770833333333300000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Banka:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel9: TQRLabel
- Left = 384
- Top = 32
- Width = 32
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1016.000000000000000000
- 84.666666666666670000
- 84.666666666666670000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = '��et:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object OsobniUdajeChildband: TQRChildBand
- Left = 38
- Top = 243
- Width = 718
- Height = 59
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = OsobniUdajeChildbandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 156.104166666666700000
- 1899.708333333332000000)
- ParentBand = ObchodniUdajeChildBand
- object QRDBText11: TQRDBText
- Left = 120
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'RodneCislo'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText12: TQRDBText
- Left = 120
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'CisloOP'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText13: TQRDBText
- Left = 488
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1291.166666666667000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'Zastupce'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText14: TQRDBText
- Left = 488
- Top = 32
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1291.166666666667000000
- 84.666666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'KontaktniOsoba'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel10: TQRLabel
- Left = 16
- Top = 8
- Width = 73
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 21.166666666666670000
- 193.145833333333300000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Rodn� ��slo:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel11: TQRLabel
- Left = 16
- Top = 32
- Width = 57
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 84.666666666666670000
- 150.812500000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = '��slo OP:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel12: TQRLabel
- Left = 384
- Top = 8
- Width = 98
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1016.000000000000000000
- 21.166666666666670000
- 259.291666666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Pr�vn� z�stupce:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel13: TQRLabel
- Left = 384
- Top = 32
- Width = 101
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1016.000000000000000000
- 84.666666666666670000
- 267.229166666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'Kontaktn� osoba:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object InternetChildBand: TQRChildBand
- Left = 38
- Top = 302
- Width = 718
- Height = 40
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- AlignToBottom = False
- BeforePrint = InternetChildBandBeforePrint
- Color = clWhite
- ForceNewColumn = False
- ForceNewPage = False
- Size.Values = (
- 105.833333333333300000
- 1899.708333333332000000)
- ParentBand = OsobniUdajeChildband
- object QRDBText15: TQRDBText
- Left = 120
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 317.500000000000000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'EMail'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRDBText16: TQRDBText
- Left = 488
- Top = 8
- Width = 230
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1291.166666666667000000
- 21.166666666666670000
- 608.541666666666600000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = False
- AutoStretch = False
- Color = clWhite
- DataSet = ZakazniciTbl
- DataField = 'URL'
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel14: TQRLabel
- Left = 16
- Top = 8
- Width = 42
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 42.333333333333340000
- 21.166666666666670000
- 111.125000000000000000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'E-mail:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- object QRLabel15: TQRLabel
- Left = 384
- Top = 8
- Width = 44
- Height = 17
- Frame.Color = clBlack
- Frame.DrawTop = False
- Frame.DrawBottom = False
- Frame.DrawLeft = False
- Frame.DrawRight = False
- Size.Values = (
- 44.979166666666650000
- 1016.000000000000000000
- 21.166666666666670000
- 116.416666666666700000)
- Alignment = taLeftJustify
- AlignToBand = False
- AutoSize = True
- AutoStretch = False
- Caption = 'WWW:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsItalic]
- ParentFont = False
- Transparent = False
- WordWrap = True
- FontSize = 10
- end
- end
- object ZakazniciTbl: TTable
- Active = True
- OnCalcFields = ZakazniciTblCalcFields
- DatabaseName = 'RealityDB'
- TableName = 'Zakaznic.DB'
- Left = 32
- Top = 24
- object ZakazniciTblCeleJmeno: TStringField
- FieldName = 'CeleJmeno'
- Size = 300
- Calculated = True
- end
- object ZakazniciTblCisloZakaznika: TStringField
- FieldName = 'CisloZakaznika'
- Required = True
- Size = 10
- end
- object ZakazniciTblTitulPred: TStringField
- FieldName = 'TitulPred'
- end
- object ZakazniciTblJmeno: TStringField
- FieldName = 'Jmeno'
- Required = True
- Size = 60
- end
- object ZakazniciTblTitulZa: TStringField
- FieldName = 'TitulZa'
- end
- object ZakazniciTblRodneCislo: TStringField
- FieldName = 'RodneCislo'
- Size = 15
- end
- object ZakazniciTblCisloOP: TStringField
- FieldName = 'CisloOP'
- end
- object ZakazniciTblUlice: TStringField
- FieldName = 'Ulice'
- Size = 60
- end
- object ZakazniciTblObec: TStringField
- FieldName = 'Obec'
- Size = 60
- end
- object ZakazniciTblPSC: TStringField
- FieldName = 'PSC'
- Size = 6
- end
- object ZakazniciTblStat: TStringField
- FieldName = 'Stat'
- end
- object ZakazniciTblTelefonPrivat: TStringField
- FieldName = 'TelefonPrivat'
- Size = 30
- end
- object ZakazniciTblTelefonPrace: TStringField
- FieldName = 'TelefonPrace'
- Size = 30
- end
- object ZakazniciTblTelefonMobil: TStringField
- FieldName = 'TelefonMobil'
- Size = 30
- end
- object ZakazniciTblFax: TStringField
- FieldName = 'Fax'
- Size = 30
- end
- object ZakazniciTblEMail: TStringField
- FieldName = 'EMail'
- Size = 60
- end
- object ZakazniciTblURL: TStringField
- FieldName = 'URL'
- Size = 60
- end
- object ZakazniciTblICO: TStringField
- FieldName = 'ICO'
- end
- object ZakazniciTblDIC: TStringField
- FieldName = 'DIC'
- end
- object ZakazniciTblZastupce: TStringField
- FieldName = 'Zastupce'
- Size = 60
- end
- object ZakazniciTblKontaktniOsoba: TStringField
- FieldName = 'KontaktniOsoba'
- Size = 60
- end
- object ZakazniciTblBanka: TStringField
- FieldName = 'Banka'
- Size = 60
- end
- object ZakazniciTblUcet: TStringField
- FieldName = 'Ucet'
- Size = 60
- end
- object ZakazniciTblPoznamka: TMemoField
- FieldName = 'Poznamka'
- BlobType = ftMemo
- Size = 240
- end
- object ZakazniciTblCelaAdresa: TStringField
- FieldName = 'CelaAdresa'
- Size = 300
- Calculated = True
- end
- end
- end
-