home *** CD-ROM | disk | FTP | other *** search
Text File | 2000-08-20 | 44.3 KB | 1,455 lines |
- object fNastavenie: TfNastavenie
- Left = 180
- Top = 83
- BorderStyle = bsDialog
- Caption = 'Nastavenie'
- ClientHeight = 460
- ClientWidth = 584
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poDesktopCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 426
- Width = 585
- Height = 34
- TabOrder = 1
- object sbZavriet: TSpeedButton
- Left = 302
- Top = 7
- Width = 81
- Height = 22
- Caption = ' Zavrie�'
- Flat = True
- Glyph.Data = {
- 26040000424D2604000000000000360000002800000012000000120000000100
- 180000000000F0030000C40E0000C40E00000000000000000000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBF0000000000FF000000BFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBF0000000000FF000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- 0000000000FF0000FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBF0000000000
- FF0000FF0000FF000000BFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF0000000000
- FF0000FF0000FF000000BFBFBFBFBFBF0000000000FF0000FF0000FF000000BF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBF0000000000FF0000FF00
- 00FF0000000000000000FF0000FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000FF0000FF0000FF0000FF
- 0000FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBF0000000000FF0000FF0000FF0000FF000000BFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBF0000000000FF0000FF0000FF0000FF000000BFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000FF00
- 00FF0000FF0000FF0000FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBF0000000000FF0000FF0000FF000000000000
- 0000FF0000FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBF0000000000FF0000FF0000FF000000BFBFBFBFBFBF0000000000FF0000
- FF0000FF000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF0000000000FF0000
- FF0000FF000000BFBFBFBFBFBFBFBFBFBFBFBF0000000000FF0000FF0000FF00
- 0000BFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF0000000000FF000000BFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000FF000000BFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000}
- OnClick = sbZavrietClick
- end
- object sbOK: TSpeedButton
- Left = 184
- Top = 7
- Width = 81
- Height = 22
- Caption = ' OK'
- Flat = True
- Glyph.Data = {
- 26040000424D2604000000000000360000002800000012000000120000000100
- 180000000000F0030000C40E0000C40E00000000000000000000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7F7F7F
- 7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF7F7F7F0000007F7F7F7F7F7FBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBFBFBFBF7F7F7F00000000FFFF0000007F7F7F7F7F7FBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF7F7F7F0000
- 0000FFFF00FFFF00FFFF0000007F7F7F7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBF7F7F7F00000000FFFF00FFFF00FFFF00
- FFFF00FFFF0000007F7F7F7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBF00000000FFFF00FFFF00FFFF00000000FFFF00FFFF00FFFF
- 0000007F7F7F7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBF000000
- 00FFFF00FFFF00FFFF000000BFBFBF00000000FFFF00FFFF00FFFF0000007F7F
- 7F7F7F7FBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF00000000FFFF0000
- 00BFBFBFBFBFBFBFBFBF00000000FFFF00FFFF00FFFF0000007F7F7F7F7F7FBF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBF00000000FFFF00FFFF00FFFF0000007F7F7F7F7F7FBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- 00000000FFFF00FFFF00FFFF000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000FF
- FF00FFFF00FFFF000000BFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000FFFF000000BF
- BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBF
- 0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
- BFBFBFBFBFBFBFBF0000}
- OnClick = sbOKClick
- end
- end
- object PageControl1: TPageControl
- Left = 0
- Top = 17
- Width = 585
- Height = 409
- ActivePage = TabSheet1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- HotTrack = True
- MultiLine = True
- ParentFont = False
- TabOrder = 0
- object TabSheet1: TTabSheet
- Caption = 'Tarify'
- object GroupBox1: TGroupBox
- Left = 17
- Top = 94
- Width = 544
- Height = 271
- Caption = ' Nastavenie tarifik�cie '
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object bNovePasmo: TSpeedButton
- Left = 248
- Top = 224
- Width = 97
- Height = 22
- Caption = 'Nov� p�smo'
- Enabled = False
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33338F3333F83BB3888BB8888BB3388FFFF88FFFF88333B000000000
- 0B3333888888888888333330FFFFFFFF08333338F33333338F333330FFFFFFFF
- 08333338F33333338F333330FFFFFFFF08333338F33333338F333330FFFFFFFF
- 08333FF8F33333338FFFBBB0FFFFFFFF0BB38888F3333333888F3BB0FFFFFFFF
- 0BBB3888F3333FFF88883330FFFF000003333338F333888883333330FFFF0FF0
- 33333338F3338F38F3333330FFFF0F0B33333338F3338F88FF333330FFFF003B
- B3333338FFFF88388FF333B000000333BB33338888888F3388FF3BB3333BB333
- 3BB33883333883333883B333333B3333333B8333333833333338}
- NumGlyphs = 2
- ParentFont = False
- OnClick = bNovePasmoClick
- end
- object bZmazatPasmo: TSpeedButton
- Left = 368
- Top = 224
- Width = 113
- Height = 22
- Caption = 'Zmaza� p�smo'
- Enabled = False
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555558888F888555F55500000000555055558888888855F85555005500055055
- 555588F5888F58555555005550055555555588FF588F5FF55555500550050055
- 5555588FF88588FF555555005050110555555588F858888FF555555505099910
- 555555FF85888888FF555005550999910555588F5F88888885F5500505509990
- 3055588F85F88888585F55005055090B030555885855888585855555555550B0
- B03055555F555858585855550555550B0B335555855555858555555555555550
- BBB35555F55555585F555550555555550BBB55585555555585F5555555555555
- 50BB555555555555585F555555555555550B5555555555555585}
- NumGlyphs = 2
- ParentFont = False
- OnClick = bZmazatPasmoClick
- end
- object Label1: TLabel
- Left = 215
- Top = 29
- Width = 70
- Height = 13
- Caption = 'Popis tarify :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 217
- Top = 89
- Width = 96
- Height = 13
- Caption = 'Za�iatok p�sma :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 217
- Top = 112
- Width = 84
- Height = 13
- Caption = 'Koniec p�sma :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 384
- Top = 89
- Width = 84
- Height = 13
- Caption = 'D�ka impulzu :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 384
- Top = 113
- Width = 90
- Height = 13
- Caption = 'Cena za impulz :'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 515
- Top = 114
- Width = 11
- Height = 13
- Caption = 'Sk'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object Label7: TLabel
- Left = 19
- Top = 27
- Width = 149
- Height = 13
- Caption = 'Zoznam tarifn�ch p�siem :'
- end
- object Label12: TLabel
- Left = 516
- Top = 90
- Width = 17
- Height = 13
- Caption = 'm:s'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- end
- object PopisTarify: TEdit
- Left = 215
- Top = 45
- Width = 306
- Height = 21
- Color = 14737632
- TabOrder = 0
- OnChange = PopisTarifyExit
- OnExit = PopisTarifyExit
- end
- object zacPasma: TMaskEdit
- Left = 319
- Top = 89
- Width = 50
- Height = 15
- AutoSelect = False
- BorderStyle = bsNone
- Color = 14737632
- Ctl3D = True
- Enabled = False
- EditMask = '99:99:99;1;0'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = 12155904
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- MaxLength = 8
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 1
- Text = ' : : '
- OnChange = zacPasmaChange
- OnKeyPress = zacPasmaKeyPress
- end
- object dlzkaImp: TMaskEdit
- Left = 477
- Top = 89
- Width = 32
- Height = 15
- AutoSelect = False
- BorderStyle = bsNone
- Color = 14737632
- Ctl3D = True
- Enabled = False
- EditMask = '99:99;1;0'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = 12155904
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- MaxLength = 5
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 2
- Text = ' : '
- OnChange = dlzkaImpChange
- OnKeyPress = dlzkaImpKeyPress
- end
- object cenaImp: TMaskEdit
- Left = 477
- Top = 113
- Width = 32
- Height = 15
- AutoSelect = False
- BorderStyle = bsNone
- Color = 14737632
- Ctl3D = True
- Enabled = False
- EditMask = '99,99;1;0'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = 12155904
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- MaxLength = 5
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 4
- Text = ' , '
- OnChange = cenaImpChange
- end
- object konPasma: TMaskEdit
- Left = 319
- Top = 112
- Width = 50
- Height = 15
- AutoSelect = False
- BorderStyle = bsNone
- Color = 14737632
- Ctl3D = True
- Enabled = False
- EditMask = '99:99:99;1;0'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = 12155904
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- MaxLength = 8
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 3
- Text = ' : : '
- OnChange = konPasmaChange
- OnKeyPress = zacPasmaKeyPress
- end
- object RadioGroup2: TRadioGroup
- Left = 216
- Top = 136
- Width = 305
- Height = 65
- Enabled = False
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Items.Strings = (
- 'Plat� cez pracovn� dni'
- 'Plat� cez v�kendy a �t�tne sviatky')
- ParentFont = False
- TabOrder = 5
- OnClick = RadioGroup2Click
- OnEnter = RadioGroup2Enter
- end
- end
- object lbPasma: TListBox
- Left = 32
- Top = 138
- Width = 185
- Height = 210
- Color = 14737632
- ItemHeight = 13
- TabOrder = 1
- OnClick = lbPasmaClick
- end
- object GroupBox2: TGroupBox
- Left = 16
- Top = 22
- Width = 537
- Height = 57
- Caption = ' S�bor s tarifou '
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object bNovaTarifa: TSpeedButton
- Left = 40
- Top = 24
- Width = 97
- Height = 22
- Caption = 'Nov� tarifa'
- Enabled = False
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
- 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
- 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- ParentFont = False
- OnClick = bNovaTarifaClick
- end
- object bZmazatTarifu: TSpeedButton
- Left = 416
- Top = 24
- Width = 105
- Height = 22
- Caption = 'Zmaza� tarifu'
- Enabled = False
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B5555555555555575}
- NumGlyphs = 2
- ParentFont = False
- OnClick = bZmazatTarifuClick
- end
- object cbTarifa: TComboBox
- Left = 168
- Top = 24
- Width = 217
- Height = 21
- ItemHeight = 13
- TabOrder = 0
- OnChange = cbTarifaChange
- OnDropDown = cbTarifaDropDown
- OnKeyDown = cbTarifaKeyDown
- end
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Sviatky'
- ImageIndex = 2
- object GroupBox3: TGroupBox
- Left = 8
- Top = 16
- Width = 569
- Height = 345
- Caption = ' Zoznam sviatkov '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Label21: TLabel
- Left = 295
- Top = 23
- Width = 90
- Height = 13
- Caption = 'N�zov sviatku :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object bPridatSviatok: TSpeedButton
- Left = 314
- Top = 291
- Width = 97
- Height = 22
- Caption = 'Prida� sviatok'
- Enabled = False
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
- 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
- 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- NumGlyphs = 2
- ParentFont = False
- OnClick = bPridatSviatokClick
- end
- object SpeedButton9: TSpeedButton
- Left = 431
- Top = 291
- Width = 105
- Height = 22
- Caption = 'Zmaza� sviatok'
- Flat = True
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B5555555555555575}
- NumGlyphs = 2
- ParentFont = False
- OnClick = SpeedButton9Click
- end
- object Label22: TLabel
- Left = 325
- Top = 86
- Width = 90
- Height = 13
- Caption = 'D�tum sviatku :'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object MonthCalendar1: TMonthCalendar
- Left = 325
- Top = 108
- Width = 190
- Height = 153
- CalColors.TitleBackColor = clMaroon
- CalColors.MonthBackColor = 14221311
- Date = 36667.000000000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ShowTodayCircle = False
- TabOrder = 2
- TabStop = True
- end
- object lbSviatky: TListBox
- Left = 16
- Top = 24
- Width = 265
- Height = 305
- Color = 14737632
- ExtendedSelect = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- end
- object eSviatok: TEdit
- Left = 294
- Top = 42
- Width = 259
- Height = 21
- Color = 14737632
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 49
- ParentFont = False
- TabOrder = 1
- OnChange = eSviatokChange
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Vzh�ad'
- ImageIndex = 2
- object Bevel1: TBevel
- Left = 4
- Top = 6
- Width = 561
- Height = 365
- Shape = bsFrame
- end
- object Label9: TLabel
- Left = 218
- Top = 88
- Width = 10
- Height = 13
- Caption = 'X:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label10: TLabel
- Left = 218
- Top = 123
- Width = 28
- Height = 13
- Caption = '��rka:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object lTop: TLabel
- Left = 313
- Top = 88
- Width = 10
- Height = 13
- Caption = 'Y:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object lDole: TLabel
- Left = 313
- Top = 123
- Width = 32
- Height = 13
- Caption = 'V��ka:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object SpeedButton6: TSpeedButton
- Left = 394
- Top = 264
- Width = 113
- Height = 22
- Caption = '�tandartn� hodnoty'
- Flat = True
- OnClick = SpeedButton6Click
- end
- object StretchHandle1: TStretchHandle
- Left = 64
- Top = 16
- Width = 24
- Height = 24
- GridX = 1
- GridY = 1
- Enabled = False
- Visible = False
- OnClick = StretchHandle1Click
- OnMouseMove = StretchHandle1MouseMove
- OnMouseUp = StretchHandle1MouseUp
- OnKeyDown = StretchHandle1KeyDown
- OnMoved = StretchHandle1Moved
- end
- object eLeft: TEdit
- Left = 248
- Top = 85
- Width = 40
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 1
- OnExit = eLeftExit
- end
- object eWidth: TEdit
- Left = 248
- Top = 120
- Width = 40
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 2
- OnExit = eLeftExit
- end
- object eTop: TEdit
- Left = 351
- Top = 85
- Width = 40
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 3
- OnExit = eLeftExit
- end
- object eHeight: TEdit
- Left = 351
- Top = 120
- Width = 40
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 4
- OnExit = eLeftExit
- end
- object ElPanel1: TElPanel
- Tag = 1
- Left = 34
- Top = 82
- Width = 162
- Height = 64
- AlwaysPaintBackground = False
- BackgroundType = bgtColorFill
- GradientEndColor = clBlack
- GradientStartColor = clBlack
- GradientSteps = 200
- Layout = tlCenter
- OwnerDraw = False
- TopGrabHandle.Enabled = False
- TopGrabHandle.Size = 0
- TopGrabHandle.Kind = ghkNone
- TopGrabHandle.BevelKind = bvNone
- TopGrabHandle.Visible = False
- RightGrabHandle.Enabled = False
- RightGrabHandle.Size = 0
- RightGrabHandle.Kind = ghkNone
- RightGrabHandle.BevelKind = bvNone
- RightGrabHandle.Visible = False
- LeftGrabHandle.Enabled = False
- LeftGrabHandle.Size = 0
- LeftGrabHandle.Kind = ghkNone
- LeftGrabHandle.BevelKind = bvNone
- LeftGrabHandle.Visible = False
- BottomGrabHandle.Enabled = False
- BottomGrabHandle.Size = 0
- BottomGrabHandle.Kind = ghkNone
- BottomGrabHandle.BevelKind = bvNone
- BottomGrabHandle.Visible = False
- Resizable = False
- Movable = False
- Align = alNone
- BevelOuter = bvNone
- Color = 9484456
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MouseCapture = False
- ParentFont = False
- TabStop = True
- Transparent = False
- OnClick = ElPanel1Click
- OnMouseDown = ElPanel1MouseDown
- DockOrientation = doNoOrient
- DoubleBuffered = False
- object Image1: TImage
- Tag = 1
- Left = 147
- Top = 5
- Width = 13
- Height = 11
- Picture.Data = {<image000.bmp>}
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Image2: TImage
- Tag = 1
- Left = 147
- Top = 16
- Width = 13
- Height = 10
- Picture.Data = {<image001.bmp>}
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Impulzy: TLabel
- Tag = 1
- Left = 136
- Top = 17
- Width = 5
- Height = 10
- Hint = 'Impulzy'
- Caption = '0'
- Color = 9484456
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -8
- Font.Name = 'MS Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Odoslane: TLabel
- Tag = 1
- Left = 23
- Top = 32
- Width = 36
- Height = 13
- Hint = 'Odoslan�'
- Caption = '12,3 kB'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object lOdoslane: TLabel
- Tag = 1
- Left = 8
- Top = 32
- Width = 12
- Height = 13
- Hint = 'Odoslan�'
- Caption = 'O:'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object lPrijate: TLabel
- Tag = 1
- Left = 9
- Top = 46
- Width = 10
- Height = 13
- Hint = 'Prijat�'
- Caption = 'P:'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Prijate: TLabel
- Tag = 1
- Left = 23
- Top = 46
- Width = 42
- Height = 13
- Hint = 'Prijat�'
- Caption = '123,4 kB'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object lTarifa: TLabel
- Tag = 1
- Left = 115
- Top = 32
- Width = 40
- Height = 13
- Hint = 'Aktu�lna tarifa'
- Caption = '019xy A'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Speed: TLabel
- Tag = 1
- Left = 125
- Top = 46
- Width = 30
- Height = 13
- Hint = 'R�chlos� spojenia'
- Caption = '33600'
- Color = 9484456
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object Shape1: TElBiProgressBar
- Tag = 1
- Left = 8
- Top = 20
- Width = 116
- Height = 4
- LightColor = clTeal
- LightValue = 40
- DarkValue = 0
- Additive = False
- ProgressShowMode = psmAllFull
- LightTextFullLine = False
- DarkTextFullLine = False
- DarkTextColor = clBlack
- LightTextColor = clBlack
- BorderStyle = ebsNone
- LightButtonStyle = False
- DarkButtonStyle = False
- Transparent = False
- Color = 8958104
- OnMouseDown = ElPanel1MouseDown
- DockOrientation = doNoOrient
- end
- object Shape2: TShape
- Left = 0
- Top = 0
- Width = 162
- Height = 2
- Align = alTop
- Brush.Style = bsClear
- end
- object Shape3: TShape
- Left = 0
- Top = 62
- Width = 162
- Height = 2
- Align = alBottom
- Brush.Style = bsClear
- end
- object Shape4: TShape
- Left = 0
- Top = 2
- Width = 1
- Height = 60
- Align = alLeft
- Brush.Style = bsClear
- end
- object Shape5: TShape
- Left = 161
- Top = 2
- Width = 1
- Height = 60
- Align = alRight
- Brush.Style = bsClear
- end
- object Shape6: TShape
- Left = 0
- Top = 28
- Width = 165
- Height = 1
- Brush.Style = bsClear
- end
- object Shape7: TShape
- Left = 0
- Top = 3
- Width = 165
- Height = 1
- Brush.Style = bsClear
- end
- object lCasImpulzu: TLabel
- Tag = 1
- Left = 7
- Top = 6
- Width = 27
- Height = 13
- Hint = '�as do konca impulzu '
- Caption = '00:00'
- Color = 9484456
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object lCena: TLabel
- Tag = 1
- Left = 53
- Top = 5
- Width = 36
- Height = 13
- Hint = 'Cena'
- Caption = '0,00 Sk'
- Color = 9484456
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- object lCasSpojenia: TLabel
- Tag = 1
- Left = 98
- Top = 5
- Width = 44
- Height = 13
- Hint = 'Celkovy �as'
- Caption = '00:00:00'
- Color = 9484456
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- Transparent = True
- OnMouseDown = ElPanel1MouseDown
- end
- end
- object RadioGroup1: TRadioGroup
- Left = 34
- Top = 192
- Width = 265
- Height = 157
- Caption = ' Pozadie okna '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemIndex = 0
- Items.Strings = (
- 'Jedna farba'
- 'Prechod farieb'
- 'Obr�zok pozadia')
- ParentFont = False
- TabOrder = 5
- OnClick = RadioGroup1Click
- end
- object FilenameEdit1: TFilenameEdit
- Left = 149
- Top = 310
- Width = 139
- Height = 21
- Filter = 'BMP s�bory (*.BMP)|*.bmp'
- DialogTitle = 'Vlo�i� obr�zok'
- DirectInput = False
- Enabled = False
- NumGlyphs = 1
- TabOrder = 6
- OnChange = FilenameEdit1Change
- end
- object elColorStart: TElColorCombo
- Left = 149
- Top = 264
- Width = 40
- Height = 20
- TabStop = True
- TabOrder = 7
- SelectedColor = clYellow
- Transparent = False
- OnChange = RadioGroup1Click
- DockOrientation = doNoOrient
- end
- object elColorEnd: TElColorCombo
- Left = 197
- Top = 264
- Width = 40
- Height = 20
- TabStop = True
- TabOrder = 8
- SelectedColor = clRed
- Transparent = False
- OnChange = RadioGroup1Click
- DockOrientation = doNoOrient
- end
- object elColor1: TElColorCombo
- Left = 149
- Top = 218
- Width = 40
- Height = 20
- TabStop = True
- TabOrder = 9
- SelectedColor = 9484456
- Transparent = False
- OnChange = RadioGroup1Click
- DockOrientation = doNoOrient
- end
- object StaticText1: TStaticText
- Left = 162
- Top = 48
- Width = 50
- Height = 17
- Caption = '� � � �'
- Font.Charset = SYMBOL_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Symbol'
- Font.Style = []
- ParentFont = False
- TabOrder = 11
- end
- object StaticText2: TStaticText
- Left = 33
- Top = 48
- Width = 126
- Height = 17
- Caption = 'ESC, font - prav� tla��tko,'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 12
- end
- object ElColorCombo1: TElColorCombo
- Left = 253
- Top = 160
- Width = 40
- Height = 20
- TabStop = True
- TabOrder = 13
- SelectedColor = clTeal
- Transparent = False
- OnChange = ElColorCombo1Change
- DockOrientation = doNoOrient
- end
- object ElColorCombo2: TElColorCombo
- Left = 314
- Top = 160
- Width = 40
- Height = 20
- TabStop = True
- TabOrder = 14
- SelectedColor = 8958104
- Transparent = False
- OnChange = ElColorCombo1Change
- DockOrientation = doNoOrient
- end
- object ElCheckBox1: TElCheckBox
- Left = 414
- Top = 104
- Width = 89
- Height = 17
- State = cbChecked
- AllowGrayed = False
- UseCustomGlyphs = False
- Alignment = taRightJustify
- Checked = True
- TextDrawType = tdtNormal
- Transparent = False
- Flat = True
- Caption = ' zobrazova�'
- TabOrder = 15
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Visible = False
- OnClick = ElCheckBox1Click
- DockOrientation = doNoOrient
- DoubleBuffered = False
- end
- object CheckBoxVH: TCheckBox
- Left = 245
- Top = 264
- Width = 41
- Height = 17
- Caption = 'H/V'
- TabOrder = 16
- Visible = False
- OnClick = CheckBoxVHClick
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'Ostatn�'
- ImageIndex = 3
- object Label23: TLabel
- Left = 31
- Top = 32
- Width = 101
- Height = 13
- Caption = 'Korekcia prihlasenia :'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label24: TLabel
- Left = 191
- Top = 32
- Width = 38
- Height = 13
- Caption = 'sek�nd.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object GroupBox4: TGroupBox
- Left = 29
- Top = 134
- Width = 305
- Height = 131
- Caption = ' S�bor ktor� sa prehr� pred skon�en�m impulzu '
- TabOrder = 3
- object MediaPlayer1: TMediaPlayer
- Left = 104
- Top = 80
- Width = 57
- Height = 25
- ColoredButtons = [btPlay, btStop]
- EnabledButtons = [btPlay, btStop]
- VisibleButtons = [btPlay, btStop]
- AutoEnable = False
- AutoRewind = False
- DeviceType = dtWaveAudio
- TabOrder = 0
- OnClick = MediaPlayer1Click
- end
- end
- object RxZdrzanie: TRxSpinEdit
- Left = 137
- Top = 30
- Width = 45
- Height = 20
- MaxValue = 99.000000000000000000
- Color = 14737632
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 12615680
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- MaxLength = 2
- ParentFont = False
- TabOrder = 0
- OnChange = RxZdrzanieChange
- end
- object cbSpustPoStarte: TCheckBox
- Left = 31
- Top = 79
- Width = 210
- Height = 17
- Caption = 'Spusti� DialUp Meter po �tarte Windows'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object FilenameEdit2: TFilenameEdit
- Left = 51
- Top = 180
- Width = 260
- Height = 21
- Filter = 's�bory (*.wav)|*.wav'
- DialogTitle = 'Vlo�i� obr�zok'
- DirectInput = False
- NumGlyphs = 1
- TabOrder = 2
- end
- object cbKontrola: TCheckBox
- Left = 33
- Top = 296
- Width = 256
- Height = 17
- Caption = 'Zapn�� kontrolu nameran�ch hodn�t (pri grafoch)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = cbKontrolaClick
- end
- end
- end
- object PopupMenu1: TPopupMenu
- Left = 484
- Top = 1
- object font1: TMenuItem
- Caption = '&Font'
- OnClick = font1Click
- end
- end
- object FontDialog1: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 444
- Top = 1
- end
- end
-