object Form1: TForm1 Left = 218 Top = 105 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'InfoDial 1.1' ClientHeight = 402 ClientWidth = 575 Color = 13089467 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Button1: TButton Left = 360 Top = 8 Width = 41 Height = 25 Caption = 'Zobraz ��ty' TabOrder = 0 Visible = False OnClick = Button1Click end object Button2: TButton Left = 320 Top = 40 Width = 82 Height = 25 Caption = 'Vyto�it' TabOrder = 1 Visible = False OnClick = Button2Click end object Button3: TButton Left = 320 Top = 72 Width = 82 Height = 25 Caption = 'Zav�sit' TabOrder = 2 Visible = False OnClick = Button3Click end object Panel1: TPanel Left = 8 Top = 8 Width = 382 Height = 195 Caption = 'Panel1' Color = 10329501 TabOrder = 3 object Label11: TLabel Left = 16 Top = 6 Width = 87 Height = 13 Caption = 'Telefonn� ��ty:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object ListBox1: TListBox Left = 14 Top = 24 Width = 353 Height = 129 ItemHeight = 13 TabOrder = 0 OnClick = ListBox1Click end object Button4: TButton Left = 14 Top = 160 Width = 84 Height = 25 Caption = 'Vytvo�it ��et' TabOrder = 1 OnClick = Button4Click end object Button5: TButton Left = 102 Top = 160 Width = 84 Height = 25 Caption = 'Editovat ��et' TabOrder = 2 OnClick = Button5Click end object Button6: TButton Left = 190 Top = 160 Width = 84 Height = 25 Caption = 'P�ejmenovat' TabOrder = 3 OnClick = Button6Click end object Button7: TButton Left = 278 Top = 160 Width = 84 Height = 25 Caption = 'Smazat' TabOrder = 4 OnClick = Button7Click end end object Panel2: TPanel Left = 344 Top = 280 Width = 217 Height = 30 BevelInner = bvLowered Caption = ' ' Color = clWhite TabOrder = 4 object Stav: TLabel Left = 95 Top = 8 Width = 40 Height = 13 Caption = 'Ne�inn�' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Label2: TLabel Left = 7 Top = 8 Width = 81 Height = 13 Caption = 'Stav modemu:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end end object Button9: TButton Left = 408 Top = 176 Width = 97 Height = 30 Caption = 'Stav CPU v okn�' TabOrder = 5 OnClick = Button9Click end object Panel3: TPanel Left = 8 Top = 280 Width = 329 Height = 30 BevelInner = bvLowered Caption = 'Panel3' Color = clWhite TabOrder = 6 object Label4: TLabel Left = 11 Top = 8 Width = 60 Height = 13 Caption = 'Stav CPU:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object zCPU: ProgressBar3D Left = 81 Top = 5 Width = 241 Height = 21 Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] BarColor = clGray BackColor = clSilver BorderColor = clSilver ParentFont = False end end object Panel4: TPanel Left = 8 Top = 216 Width = 169 Height = 57 BevelInner = bvRaised BevelOuter = bvLowered Caption = ' ' Color = 10329501 TabOrder = 7 object Label1: TLabel Left = 16 Top = 20 Width = 68 Height = 13 Caption = 'minimum CPU:' end object Label9: TLabel Left = 143 Top = 20 Width = 8 Height = 13 Caption = '%' end object sMinCPUx: TSpinEdit Left = 88 Top = 16 Width = 49 Height = 22 MaxValue = 0 MinValue = 0 TabOrder = 0 Value = 35 end end object Panel5: TPanel Left = 192 Top = 216 Width = 305 Height = 58 BevelInner = bvRaised BevelOuter = bvLowered Caption = ' ' Color = 10329501 TabOrder = 8 object Label5: TLabel Left = 24 Top = 11 Width = 126 Height = 13 Caption = 'Po�et sekund minima CPU' end object Label10: TLabel Left = 214 Top = 10 Width = 20 Height = 13 Caption = 'sek.' end object vMinCPUx: TSpinEdit Left = 160 Top = 7 Width = 49 Height = 22 MaxValue = 0 MinValue = 0 TabOrder = 0 Value = 11 end object vMin: TProgressBar Left = 22 Top = 34 Width = 265 Height = 16 Min = 0 Max = 100 TabOrder = 1 end end object Panel6: TPanel Left = 8 Top = 320 Width = 233 Height = 73 BevelInner = bvLowered Color = 8684472 TabOrder = 9 object Label12: TLabel Left = 24 Top = 28 Width = 134 Height = 13 Caption = 'Monitorovat stav a vyzv�n�t' end object Zap: TRxSwitch Left = 176 Top = 14 Width = 27 Height = 43 Caption = 'Zap' TabOrder = 0 OnOn = ZapOn OnOff = ZapOff end end object Panel7: TPanel Left = 408 Top = 8 Width = 153 Height = 153 Color = 10329501 TabOrder = 10 object Label3: TLabel Left = 96 Top = 67 Width = 35 Height = 13 Caption = 'sekund' end object Label6: TLabel Left = 17 Top = 96 Width = 72 Height = 13 Caption = 'Po�et zvon�n�:' end object Label7: TLabel Left = 17 Top = 48 Width = 72 Height = 13 Caption = 'D�lka zvon�n�:' end object Label8: TLabel Left = 95 Top = 115 Width = 18 Height = 13 Caption = 'kr�t' end object AutoDial: TButton Left = 15 Top = 16 Width = 122 Height = 25 Caption = 'Test vyto�en�' TabOrder = 0 OnClick = AutoDialClick end object ZavesPo: TSpinEdit Left = 32 Top = 63 Width = 57 Height = 22 MaxValue = 0 MinValue = 0 TabOrder = 1 Value = 11 end object Opak: TSpinEdit Left = 32 Top = 112 Width = 57 Height = 22 MaxValue = 0 MinValue = 0 TabOrder = 2 Value = 3 end end object Button8: TButton Left = 512 Top = 176 Width = 49 Height = 29 Caption = 'Zav��t' TabOrder = 11 OnClick = Button8Click end object Button10: TButton Left = 256 Top = 341 Width = 97 Height = 33 Caption = 'Minimalizovat' TabOrder = 12 OnClick = Button10Click end object Panel8: TPanel Left = 368 Top = 327 Width = 193 Height = 60 Caption = ' ' Color = 11118738 TabOrder = 13 object Label13: TLabel Left = 11 Top = 8 Width = 45 Height = 13 Caption = 'Author by' end object Label14: TLabel Left = 67 Top = 8 Width = 76 Height = 13 Caption = 'Radek Szurman' end object Label15: TLabel Left = 67 Top = 24 Width = 83 Height = 13 Caption = 'Software SURAD' end object Label16: TLabel Left = 67 Top = 40 Width = 39 Height = 13 Caption = '(c) 2002' end end object Button11: TButton Left = 504 Top = 216 Width = 49 Height = 25 Caption = 'Profil 1' TabOrder = 14 OnClick = Button11Click end object Button12: TButton Left = 505 Top = 246 Width = 48 Height = 25 Caption = 'Profil 2' TabOrder = 15 OnClick = Button12Click end object Button13: TButton Left = 554 Top = 246 Width = 15 Height = 25 Caption = 'U' TabOrder = 16 OnClick = Button13Click end object Button14: TButton Left = 554 Top = 216 Width = 15 Height = 25 Caption = 'U' TabOrder = 17 OnClick = Button14Click end object DialUp: TDialUp DialMode = dmAsync Language = ralgCzech OnEntryGet = DialUpEntryGet Left = 40 Top = 48 end object StavPortu: TTimer Interval = 100 OnTimer = StavPortuTimer Left = 72 Top = 48 end object Zaves: TTimer Enabled = False Interval = 7000 OnTimer = ZavesTimer Left = 568 Top = 16 end object INISet: TAHMRegEntry Area = '\Software\SURAD\InfoDial' Section = 'InfoDial' Left = 104 Top = 48 end object vMinCPU: TTimer Enabled = False OnTimer = vMinCPUTimer Left = 336 Top = 224 end object StavCPUt: TTimer Interval = 500 OnTimer = StavCPUtTimer Left = 179 Top = 280 end object sMinCPU: TTimer Enabled = False Interval = 50 OnTimer = sMinCPUTimer Left = 104 Top = 224 end object TrayIco: TRxTrayIcon Hint = 'Info Dial 1.1' Icon.Data = {} Icons.Icons = { 01000000FE0200000000010001002020040000000000E8020000160000002800 0000200000004000000001000400000000000002000000000000000000000000 0000000000000000000000008000008000000080800080000000800080008080 0000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF 0000FFFFFF000000000088000000000000880000000000000000800022222222 000800000000000000880002AAAAAAAA200088000000000000000022AAAAAAAA 2200000000000000000002AAAAAAAAAAAA20000000000000000002AAAAAAAAAA AA20000000000000000002AAAAAAAAAAAA20000000000000000002AAAAAAAAAA AA20000000000000000002AA77AAAAAAAA20000000000000000002AA777AAAAA AA20000000000000000002AA7FF7AAAAAA200000000000000000002A7777AAAA A20000000000000000000002AAAAAAAA20000000000000000000000022222222 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000001111111100000000000000000000000011111111 0000000000000000000000111111111111000000000000000000001111111111 1100000000000000000000111111111111000000000000000000001111111111 1100000000000000000000111111111111000000000000000000001111111111 1100000000000000000000118811111111000000000000000000001877111111 1100000000000000000000018811111110000000000000000088000011111111 0000880000000000000080000000000000080000000000000000880000000000 008800000000FF0000FFFF0000FFFC00003FFC00003FFC00003FFC00003FFC00 003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00 003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00 003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFC00003FFF00 00FFFF0000FF} PopupMenu = RxPopupMenu1 Left = 280 Top = 328 end object RxPopupMenu1: TRxPopupMenu Left = 256 Top = 328 object Zobrazit1: TMenuItem Caption = 'Zobrazit' Default = True OnClick = Zobrazit1Click end end object ikona: TTimer Interval = 100 OnTimer = ikonaTimer Left = 136 Top = 344 end end