Chip 1999 December/Chip_1999-12_cd.bin/ctenari/Masat/INSTALL.DAT/~Dat4/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1999-08-08 | 15.7 KB | 523 lines

object MainForm: TMainForm
  Left = 292
  Top = 188
  BorderIcons = []
  BorderStyle = bsToolWindow
  Caption = 'CaShow'
  ClientHeight = 149
  ClientWidth = 305
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel6: TBevel
    Left = 133
    Top = 41
    Width = 172
    Height = 60
    Shape = bsFrame
  end
  object Bevel7: TBevel
    Left = 133
    Top = 0
    Width = 172
    Height = 41
    Shape = bsFrame
  end
  object Bevel4: TBevel
    Left = 136
    Top = 2
    Width = 85
    Height = 37
    Shape = bsFrame
  end
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 133
    Height = 101
    Shape = bsFrame
  end
  object BevPohlavi: TBevel
    Left = 220
    Top = 3
    Width = 83
    Height = 18
    Shape = bsFrame
    Style = bsRaised
  end
  object Label3: TLabel
    Left = 135
    Top = 45
    Width = 50
    Height = 13
    Caption = 'Tel. dom�:'
  end
  object Bevel5: TBevel
    Left = 198
    Top = 44
    Width = 103
    Height = 17
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 135
    Top = 64
    Width = 60
    Height = 13
    Caption = 'Tel. do firmy:'
  end
  object Label2: TLabel
    Left = 135
    Top = 82
    Width = 28
    Height = 13
    Caption = 'Mobil:'
  end
  object LabPhoneHome: TLabel
    Left = 200
    Top = 46
    Width = 99
    Height = 13
    AutoSize = False
    Caption = 'LabPhoneHome'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    OnClick = LabPhoneHomeClick
  end
  object Bevel8: TBevel
    Left = 198
    Top = 62
    Width = 103
    Height = 17
    Shape = bsFrame
  end
  object LabPhoneFirm: TLabel
    Left = 200
    Top = 64
    Width = 99
    Height = 13
    AutoSize = False
    Caption = 'Label4'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    OnClick = LabPhoneFirmClick
  end
  object Bevel2: TBevel
    Left = 198
    Top = 80
    Width = 103
    Height = 17
    Shape = bsFrame
  end
  object LabPhoneMobil: TLabel
    Left = 200
    Top = 82
    Width = 99
    Height = 13
    AutoSize = False
    Caption = 'Label4'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    OnClick = LabPhoneMobilClick
  end
  object ButMenuF: TSpeedButton
    Left = 222
    Top = 4
    Width = 79
    Height = 15
    Hint = 'Otev�i jinou "obl�benou" kartot�ku ...'
    Caption = 'Kartot�ka'
    Flat = True
    Glyph.Data = {
      DE000000424DDE0000000000000076000000280000000D0000000D0000000100
      0400000000006800000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7000777777777777700077777707777770007777706077777000777706660777
      7000777066666077700077066666660770007000066600007000777706660777
      7000777706660777700077770666077770007777000007777000777777777777
      7000}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButMenuFClick
  end
  object Buthide: TSpeedButton
    Left = 244
    Top = 21
    Width = 59
    Height = 18
    Hint = 'Minimalizuj'
    Flat = True
    Glyph.Data = {
      42010000424D4201000000000000760000002800000012000000110000000100
      040000000000CC00000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007777F7778888
      87777700000077FF777777778887770000007777FF00000FF0088700000070FF
      F00F0000FF0088000000700FF0FF0000FF00000000007700F00F000000000000
      00007F000000000000000800000077F000000000000888000000707F00000000
      0888870000007000FFFF777888888700000077F00FFF7778888777000000F77F
      00778888887777000000F777F0077777777770000000F7777F00777777770000
      0000FF7777F000777700080000008FF7777FF00000088800000078FF77777778
      888888000000}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButhideClick
  end
  object ButRunCa: TSpeedButton
    Left = 222
    Top = 21
    Width = 21
    Height = 18
    Hint = 'Spustit Contact Administr�tor'
    Flat = True
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      18000000000000030000120B0000120B00000000000000000000BFBFBF202020
      00003FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000020205F00003FBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBF00007F3F3F3F7F7F7F7F7F7F7F7F7F7F7F7F7F
      7F7F3F3F3F00007F00003F00003FBFBFBFBFBFBFBFBFBFBFBFBF0000007F7F7F
      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FBFBFBF7F7F7F00003F00000000003F0000
      3FBFBFBFBFBFBFBFBFBF000000DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFFFFFFF7F
      7F7F7F7F7FFFFFFF3F3F3F00000000003F000000BFBFBFBFBFBFBFBFBF7F7F7F
      BFBFBFDFDFDFDFDFDFDFDFDFDFDFDF7F7F7F7F7F7FBFBFBF3F3F3F0000000000
      00BFBFBFBFBFBFBFBFBF0000003F3F7FDFDFDF6F6F6FFFFFFF8F8F8FBFBFBFBF
      BFBF00003F3F003FBFBFBF3F3F3FBFBFBFBFBFBFBFBFBFBFBFBF00007F3F3F3F
      5050506F6F6F4040403030308F8F8F20202000007F7F00FF0000000000000000
      00BFBFBFBFBFBFBFBFBF00000000003F5F5F5F6F6F6F7F7F7F202020AFAFAF7F
      7F7F00003F00003F3F3F3FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000
      FFFFFFAFAFAFFFFFFFEFEFEFBFBFBFFFFFFF7F7F7F3F3F3F7F7F7F0000000000
      00000000000000000000BFBFBF000000DFDFDFBFBFBFBFBFBFBFBFBFDFDFDFBF
      BFBF7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBF000000
      DFDFDFBFBFBFBFBFBFDFDFDFFFFFFF7F7F7F3F3F3F5F5F5FFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFBFBFBF000000DFDFDFBFBFBFBFBFBFBFBFBFFFFFFF7F
      7F7F5F5F5F5F5F5FFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F000000BFBFBFBFBFBF
      000000000000000000000000000000000000BFBFBFBFBFBF7F7F7FBFBFBFFFFF
      FF7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF3F
      3F3F7F7F7FBFBFBF7F7F7F7F7F7FBFBFBF000000BFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000003F3F3F7F7F7F3F3F3F3F3F
      3FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBF3F3F3F3F3F3F0000003F3F3FBFBFBFBFBFBFBFBFBFBFBFBF}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButRunCaClick
  end
  object Bevel3: TBevel
    Left = 0
    Top = 100
    Width = 306
    Height = 50
    Shape = bsFrame
    Style = bsRaised
  end
  object ButChangeWwwStav: TSpeedButton
    Left = 4
    Top = 104
    Width = 20
    Height = 20
    Hint = 'P�epni mezi osobn�/firemn� WWW'
    Flat = True
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777777777777777777777777777777777777777777777
      7777777487777777777777847777744444777747777777444477774777777774
      4477774777777747447777847777447774777778444477777777777777777777
      7777777777777777777777777777777777777777777777777777}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButChangeWwwStavClick
  end
  object ButChangeEmailStav: TSpeedButton
    Left = 4
    Top = 124
    Width = 20
    Height = 20
    Hint = 'P�epni mezi osobn�/firemn� E-mail'
    Flat = True
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777777777777777777777777777777777777777777777
      7777777487777777777777847777744444777747777777444477774777777774
      4477774777777747447777847777447774777778444477777777777777777777
      7777777777777777777777777777777777777777777777777777}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButChangeEmailStavClick
  end
  object wwwLab: TLabel
    Left = 28
    Top = 108
    Width = 65
    Height = 13
    Caption = 'www osobn� :'
  end
  object EmailLab: TLabel
    Left = 28
    Top = 128
    Width = 65
    Height = 13
    Caption = 'E-mail firemn�:'
  end
  object Bevel9: TBevel
    Left = 98
    Top = 106
    Width = 179
    Height = 17
    Shape = bsFrame
  end
  object Bevel10: TBevel
    Left = 98
    Top = 126
    Width = 179
    Height = 17
    Shape = bsFrame
  end
  object ButSendEmail: TSpeedButton
    Left = 280
    Top = 124
    Width = 20
    Height = 20
    Hint = 'Po�li po�tu'
    Flat = True
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      1800000000000003000000000000000000000000000000000000BFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000BFBFBFBFBFBF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F000000BFBFBFBFBFBF7F7F7F
      00FFFFBFBFBF00FFFFBFBFBF00FFFFBFBFBF00FFFFBFBFBF00FFFFBFBFBF00FF
      FF7F7F7F000000BFBFBFBFBFBF7F7F7F00000000FFFFBFBFBF00FFFFBFBFBF00
      FFFFBFBFBF00FFFFBFBFBF00FFFF0000007F7F7F000000BFBFBFBFBFBF7F7F7F
      00FFFF00000000FFFFBFBFBF00FFFF00000000FFFFBFBFBF00FFFF00000000FF
      FF7F7F7F000000BFBFBFBFBFBF7F7F7FFFFFFF00FFFF00000000FFFF00000000
      FFFF00000000FFFF00000000FFFFBFBFBF7F7F7F000000BFBFBFBFBFBF7F7F7F
      00FFFFBFBFBF00FFFF00000000FFFFBFBFBF00FFFF00000000FFFFBFBFBF00FF
      FF7F7F7F000000BFBFBFBFBFBF7F7F7FFFFFFF00FFFF00000000FFFFBFBFBF00
      FFFFBFBFBF00FFFF00000000FFFFBFBFBF7F7F7F000000BFBFBFBFBFBF7F7F7F
      00FFFF00000000FFFFBFBFBF00FFFFBFBFBF00FFFFBFBFBF00FFFF00000000FF
      FF7F7F7F000000BFBFBFBFBFBF7F7F7F00000000FFFFFFFFFF00FFFFFFFFFF00
      FFFFFFFFFF00FFFFFFFFFF00FFFF0000007F7F7F000000BFBFBFBFBFBF7F7F7F
      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F
      7F7F7F7FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButSendEmailClick
  end
  object ButShowWww: TSpeedButton
    Left = 280
    Top = 104
    Width = 20
    Height = 20
    Hint = 'Prohl�dni str�nku'
    Flat = True
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      1800000000000003000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000000BFBF
      BFBFBFBF000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFF000000BFBFBF000000000000000000000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000007F7F
      7F000000000000BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
      00007F7F7FBFBFBFBFBFBF7F7F7F0000007F7F7FBFBFBFBFBFBF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFF0000007F7F7FBFBFBFBFBFBFFFFF007F7F7F7F7F
      7F000000BFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BF
      BFBFBFBFBFBFBFBFBFBFBF7F7F7FBFBFBF000000BFBFBFBFBFBF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFFFFF00BFBFBFBFBFBF7F7F7FBFBF
      BF000000BFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000007F
      7F7FFFFF00FFFF00BFBFBF7F7F7F7F7F7F000000BFBFBFBFBFBF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000007F7F7FBFBFBFBFBFBF7F7F7F0000
      00BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBF
      BFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBF000000BFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000
      000000000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
      BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF}
    ParentShowHint = False
    ShowHint = True
    OnClick = ButShowWwwClick
  end
  object Labwww: TLabel
    Left = 100
    Top = 108
    Width = 173
    Height = 13
    AutoSize = False
    Caption = 'LabPhoneHome'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    OnClick = LabwwwClick
  end
  object LabEmail: TLabel
    Left = 100
    Top = 128
    Width = 173
    Height = 13
    AutoSize = False
    Caption = 'LabPhoneHome'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    OnClick = LabEmailClick
  end
  object ItemBox: TListBox
    Left = 4
    Top = 4
    Width = 127
    Height = 93
    BorderStyle = bsNone
    Color = clBtnFace
    ItemHeight = 13
    TabOrder = 0
    OnClick = ItemBoxClick
  end
  object RadName: TRadioButton
    Left = 140
    Top = 4
    Width = 73
    Height = 17
    Hint = 'Seznam je set��d�n podle jm�na'
    Caption = '&Jm�no'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = RadNameClick
  end
  object RadSurName: TRadioButton
    Left = 140
    Top = 18
    Width = 73
    Height = 17
    Hint = 'Seznam je set��d�n podle p��jmen�'
    Caption = '&P��jmen�'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    OnClick = RadSurNameClick
  end
  object PomBox: TListBox
    Left = 172
    Top = 20
    Width = 17
    Height = 69
    ItemHeight = 13
    TabOrder = 3
    Visible = False
  end
  object PomEdit: TEdit
    Left = 4
    Top = 4
    Width = 185
    Height = 21
    TabOrder = 4
    Visible = False
  end
  object TrayIcon: TTrayIcon
    Active = True
    ShowDesigning = False
    Icon.Data = {<image000.ico>}
    ShowApp = False
    ToolTip = 'CaShow'
    OnClick = TrayIconClick
    OnRightClick = TrayIconRightClick
    Left = 104
    Top = 4
  end
  object MenKarta: TPopupMenu
    Left = 188
    Top = 4
  end
  object Timer: TTimer
    Interval = 20
    OnTimer = TimerTimer
    Left = 160
    Top = 4
  end
  object JustOne321: TJustOne32
    Left = 76
    Top = 4
  end
  object MenuRight: TPopupMenu
    Left = 48
    Top = 4
    object MenMax: TMenuItem
      Caption = '&Maximalizuj'
      OnClick = MenMaxClick
    end
    object MenMin: TMenuItem
      Caption = 'M&inimalizuj'
      OnClick = MenMinClick
    end
    object MenShowInt: TMenuItem
      Caption = 'Zobrazovat "internetov�" panel'
      OnClick = MenShowIntClick
    end
    object MenRunAtStart: TMenuItem
      Caption = '&Spustit po startu po��ta�e'
      OnClick = MenRunAtStartClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object MRunCa: TMenuItem
      Caption = 'Spustit Contact Administrator'
      OnClick = MRunCaClick
    end
    object MenClose: TMenuItem
      Caption = '&Ukon�i program'
      OnClick = MenCloseClick
    end
  end
end