Chip 1999 June/Chip_1999-06_cd.bin/tema/Diadema/Demo/setup.exe/Pantheon.csy/RCDATA/TINFOMAPAMODULEFORM/TINFOMAPAMODULEFORM.txt

Text File | 1999-04-22 | 19.6 KB | 589 lines

object InfoMapaModuleForm: TInfoMapaModuleForm
  Left = 195
  Top = 110
  Width = 594
  Height = 428
  Caption = 'InfoMapaModuleForm'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MapMainMenu
  PixelsPerInch = 96
  TextHeight = 13
  object DummyPageControl: TPageControl
    Left = 4
    Top = 8
    Width = 573
    Height = 361
    ActivePage = MapTS
    TabOrder = 0
    object MapTS: TTabSheet
      Caption = 'InfoMapa'
      object MapCoolBar: TCoolBar
        Left = 0
        Top = 0
        Width = 565
        Height = 26
        Bands = <
          item
            Control = MapToolBar
            ImageIndex = -1
            MinHeight = 22
            Width = 561
          end>
        object MapToolBar: TToolBar
          Left = 0
          Top = 0
          Width = 557
          Height = 22
          EdgeBorders = []
          EdgeInner = esNone
          EdgeOuter = esNone
          Flat = True
          HotImages = PomocneDM.BtnHotImages
          Images = PomocneDM.BtnImages
          TabOrder = 0
          object LaunchBtn: TToolButton
            Left = 0
            Top = 0
            Width = 23
            Height = 22
            Hint = 'Spustit InfoMapu'
            Caption = 'Spustit'
            Enabled = False
            ImageIndex = 35
            ParentShowHint = False
            ShowHint = True
            OnClick = LaunchBtnClick
          end
          object ToolButton2: TToolButton
            Left = 23
            Top = 0
            Width = 8
            Height = 22
            Caption = 'ToolButton2'
            ImageIndex = 36
            Style = tbsSeparator
          end
          object TransferBtn: TToolButton
            Left = 31
            Top = 0
            Width = 23
            Height = 22
            Hint = 'P�en�st mapu do datab�ze'
            Caption = 'P�en�st'
            Enabled = False
            ImageIndex = 36
            ParentShowHint = False
            ShowHint = True
            OnClick = TransferBtnClick
          end
          object BarvyBtn: TToolButton
            Left = 54
            Top = 0
            Width = 23
            Height = 22
            Hint = 'Nastavit po�et barev'
            Caption = 'Barvy'
            DropdownMenu = BarvyMenu
            Enabled = False
            ImageIndex = 34
            ParentShowHint = False
            ShowHint = True
            Style = tbsDropDown
          end
          object SaveBtn: TToolButton
            Left = 77
            Top = 0
            Width = 23
            Height = 22
            Hint = 'Exporovat mapu'
            Caption = 'Export'
            Enabled = False
            ImageIndex = 9
            ParentShowHint = False
            ShowHint = True
            OnClick = SaveBtnClick
          end
        end
      end
      object MapMainPanel: TPanel
        Left = 0
        Top = 26
        Width = 565
        Height = 295
        Align = alTop
        BevelOuter = bvNone
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 1
        Visible = False
        object IMNotInstalledPanel: TPanel
          Left = 124
          Top = 46
          Width = 317
          Height = 202
          Color = clRed
          TabOrder = 0
          object Label6: TLabel
            Left = 8
            Top = 8
            Width = 70
            Height = 13
            Caption = 'Upozorn�n�:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clYellow
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label7: TLabel
            Left = 48
            Top = 32
            Width = 265
            Height = 41
            AutoSize = False
            Caption =
              'Aplikace InfoMapa nen� na va�em po��ta�i instalov�na nebo je ins' +
              'talov�na nespr�vn�. Nen� tedy mo�n� pou��vat funkce pro spolupr�' +
              'ci s aplikac� InfoMapa.'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWhite
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            WordWrap = True
          end
          object Label8: TLabel
            Left = 8
            Top = 80
            Width = 305
            Height = 97
            Alignment = taCenter
            AutoSize = False
            Caption =
              'Aplikaci InfoMapa si m��ete objednat u spole�nosti'#10#10'PJsoft �'#10'Slu' +
              '�sk� 27'#10'Praha 8'#10'tel./fax: [phone]'#10'e-mail: pjsoft@pjsoft.c' +
              'z'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWhite
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            WordWrap = True
          end
          object PJSoftLbl: TLabel
            Left = 112
            Top = 176
            Width = 97
            Height = 13
            Cursor = crHandPoint
            Caption = 'http://www.pjsoft.cz'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clYellow
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsUnderline]
            ParentFont = False
            OnClick = PJSoftLblClick
          end
          object Image8: TImage
            Left = 10
            Top = 33
            Width = 32
            Height = 32
            AutoSize = True
            Picture.Data = {<image000.ico>}
            Transparent = True
          end
        end
        object IMPC: TPageControl
          Left = 3
          Top = 8
          Width = 558
          Height = 273
          ActivePage = SearchTS
          TabOrder = 1
          object SearchTS: TTabSheet
            Caption = 'Vyhled�n� m�sta v map�'
            object AtlasyLbl: TLabel
              Left = 8
              Top = 0
              Width = 71
              Height = 13
              Caption = 'V�b�r &atlasu'
              FocusControl = AtlasyCB
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object VrstvyLbl: TLabel
              Left = 8
              Top = 48
              Width = 114
              Height = 13
              Caption = 'V�b�r datov� &vrstvy'
              FocusControl = VrstvyCB
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object FieldLbl: TLabel
              Left = 8
              Top = 96
              Width = 126
              Height = 13
              Caption = 'V�b�r &sloupce tabulky'
              FocusControl = FieldCB
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object DataGrid: TDBGrid
              Left = 152
              Top = 56
              Width = 393
              Height = 181
              DataSource = MapDS
              Enabled = False
              Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
              ReadOnly = True
              TabOrder = 0
              TitleFont.Charset = DEFAULT_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -11
              TitleFont.Name = 'MS Sans Serif'
              TitleFont.Style = []
              OnDblClick = LaunchBtnClick
            end
            object SearchGBox: TGroupBox
              Left = 152
              Top = 0
              Width = 393
              Height = 49
              Caption = '&Hledan� text'
              Enabled = False
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 1
              object SeachBtn: TSpeedButton
                Left = 312
                Top = 15
                Width = 73
                Height = 25
                Caption = 'Vyhl&edat'
                Flat = True
                Font.Charset = DEFAULT_CHARSET
                Font.Color = clWindowText
                Font.Height = -11
                Font.Name = 'MS Sans Serif'
                Font.Style = []
                Glyph.Data = {
                  36060000424D3606000000000000360000002800000020000000100000000100
                  1800000000000006000000000000000000000000000000000000C0C0C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800000
                  800000800000800000800000808080C0C0C0C0C0C0C0C0C0C0C0C08000008000
                  00800000800000800000C0C0C0808080808080808080808080808080C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0808080808080808080808080808080C0C0C0800000
                  FFFFFFC0C0C0808080800000808080C0C0C0C0C0C0C0C0C0C0C0C0800000FFFF
                  FFC0C0C0808080800000C0C0C0808080FFFFFFC0C0C0808080808080C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0808080FFFFFFC0C0C0808080808080C0C0C0800000
                  800000800000800000800000808080C0C0C0C0C0C0C0C0C0C0C0C08000008000
                  00800000800000800000C0C0C0808080808080808080808080808080C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0808080808080808080808080808080C0C0C0800000
                  FFFFFFC0C0C0C0C0C0800000808080C0C0C0C0C0C0C0C0C0C0C0C0800000FFFF
                  FFC0C0C0C0C0C0800000C0C0C0808080FFFFFFC0C0C0C0C0C0808080C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0808080FFFFFFC0C0C0C0C0C0808080C0C0C0800000
                  FFFFFFC0C0C0C0C0C0800000808080C0C0C0808080808080808080800000FFFF
                  FFC0C0C0C0C0C0800000C0C0C0808080FFFFFFC0C0C0C0C0C0808080C0C0C0C0
                  C0C0808080808080808080808080FFFFFFC0C0C0C0C0C0808080C0C0C0800000
                  FFFFFFC0C0C0808080800000808080C0C0C0800000800000C0C0C08000008080
                  80C0C0C0C0C0C0800000C0C0C0808080FFFFFFC0C0C0808080808080C0C0C0C0
                  C0C0808080808080C0C0C0808080808080C0C0C0C0C0C0808080C0C0C0800000
                  C0C0C0808080800000800000800000FFFFFFC0C0C08080808000008000008000
                  00808080C0C0C0800000C0C0C0808080FFFFFF808080808080808080808080FF
                  FFFFC0C0C0808080808080808080808080808080C0C0C0808080C0C0C0800000
                  FFFFFFFFFFFFFFFFFFC0C0C0808080800000800000000000808080C0C0C0FFFF
                  FFC0C0C0C0C0C0800000C0C0C0808080FFFFFFC0C0C0C0C0C0C0C0C080808080
                  8080808080808080808080C0C0C0FFFFFFC0C0C0C0C0C0808080C0C0C0800000
                  FFFFFFFFFFFFC0C0C0C0C0C0808080FFFFFFC0C0C0800000808080C0C0C0FFFF
                  FFC0C0C0C0C0C0800000C0C0C0808080FFFFFFC0C0C0C0C0C0C0C0C0808080FF
                  FFFFC0C0C0808080808080C0C0C0FFFFFFC0C0C0C0C0C0808080C0C0C0808080
                  C0C0C0FFFFFFFFFFFFC0C0C0808080C0C0C0808080800000808080C0C0C0FFFF
                  FFFFFFFFC0C0C0808080C0C0C0808080C0C0C0FFFFFFFFFFFFC0C0C0808080C0
                  C0C0808080808080808080C0C0C0FFFFFFFFFFFFC0C0C0808080C0C0C0C0C0C0
                  8080808000008000008000008000008080808000008080808000008000008000
                  00800000808080808080C0C0C0C0C0C080808080808080808080808080808080
                  8080808080808080808080808080808080808080808080808080C0C0C0C0C0C0
                  C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFC0C0C0808080800000C0C0C0C0C0C08080
                  80808080808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFFC0
                  C0C0808080808080C0C0C0C0C0C0808080808080808080C0C0C0C0C0C0C0C0C0
                  C0C0C0C0C0C0808080800000800000808080C0C0C0C0C0C08080808000008000
                  00808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C080808080808080808080
                  8080C0C0C0C0C0C0808080808080808080808080C0C0C0C0C0C0C0C0C0C0C0C0
                  C0C0C0C0C0C0FFFFFF808080000000808080C0C0C0C0C0C0FFFFFF8080800000
                  00808080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FFFFFF80808080808080
                  8080C0C0C0C0C0C0FFFFFF808080808080808080C0C0C0C0C0C0C0C0C0C0C0C0
                  C0C0C0C0C0C0C0C0C0808080800000C0C0C0C0C0C0C0C0C0C0C0C08080808000
                  00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0808080808080C0
                  C0C0C0C0C0C0C0C0C0C0C0808080808080C0C0C0C0C0C0C0C0C0}
                NumGlyphs = 2
                ParentFont = False
                OnClick = SearchBtnClick
              end
              object CritRBStart: TRadioButton
                Left = 8
                Top = 20
                Width = 73
                Height = 17
                Caption = '&Za��n� na'
                Checked = True
                Font.Charset = DEFAULT_CHARSET
                Font.Color = clWindowText
                Font.Height = -11
                Font.Name = 'MS Sans Serif'
                Font.Style = []
                ParentFont = False
                TabOrder = 0
                TabStop = True
              end
              object CritRBCont: TRadioButton
                Left = 80
                Top = 20
                Width = 73
                Height = 17
                Caption = '&Obsahuje'
                Font.Charset = DEFAULT_CHARSET
                Font.Color = clWindowText
                Font.Height = -11
                Font.Name = 'MS Sans Serif'
                Font.Style = []
                ParentFont = False
                TabOrder = 1
              end
              object SearchCriteriaEdit: TEdit
                Left = 152
                Top = 16
                Width = 153
                Height = 21
                Font.Charset = DEFAULT_CHARSET
                Font.Color = clWindowText
                Font.Height = -11
                Font.Name = 'MS Sans Serif'
                Font.Style = []
                ParentFont = False
                TabOrder = 2
                OnKeyPress = SearchCriteriaEditKeyPress
              end
            end
            object AtlasyCB: TComboBox
              Left = 8
              Top = 16
              Width = 137
              Height = 21
              Hint = 'Zde vyberte jeden z nainstalovan�ch'#13#10'atlas� InfoMapy'
              Style = csDropDownList
              Enabled = False
              ItemHeight = 13
              ParentShowHint = False
              ShowHint = True
              Sorted = True
              TabOrder = 2
              OnChange = AtlasyCBChange
            end
            object VrstvyCB: TComboBox
              Left = 8
              Top = 64
              Width = 137
              Height = 21
              Hint =
                'Zde vyberte jednu z datov�ch'#13#10'vrstev p��slu�ej�c�ch k vybran�mu'#13 +
                #10'atlasu'
              Style = csDropDownList
              Enabled = False
              ItemHeight = 13
              ParentShowHint = False
              ShowHint = True
              Sorted = True
              TabOrder = 3
              OnChange = VrstvyCBChange
            end
            object FieldCB: TComboBox
              Left = 8
              Top = 112
              Width = 137
              Height = 21
              Hint =
                'Zde vyberte sloupec tabulky'#13#10'vybran� datov� vrstvy, podle'#13#10'kter�' +
                'ho budete vyhled�vat'#13#10'�daje'
              Style = csDropDownList
              Enabled = False
              ItemHeight = 13
              ParentShowHint = False
              ShowHint = True
              Sorted = True
              TabOrder = 4
              OnChange = FieldCBChange
            end
          end
          object ResultTS: TTabSheet
            Caption = 'P�enesen� mapa'
            object TechInfoLbl: TLabel
              Left = 8
              Top = 224
              Width = 83
              Height = 13
              Caption = 'Technick� �daje:'
            end
            object BitmapInfoLabel: TLabel
              Left = 96
              Top = 224
              Width = 233
              Height = 13
              AutoSize = False
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
            end
            object MapBox: TScrollBox
              Left = 8
              Top = 8
              Width = 537
              Height = 209
              HorzScrollBar.Tracking = True
              VertScrollBar.Tracking = True
              Ctl3D = True
              ParentCtl3D = False
              TabOrder = 0
              object OutImage: TImage
                Left = 0
                Top = 0
                Width = 41
                Height = 41
                AutoSize = True
              end
            end
          end
        end
      end
    end
  end
  object MapMainMenu: TMainMenu
    Left = 552
    object MapMnI: TMenuItem
      Caption = 'Info&Mapa'
      Enabled = False
      GroupIndex = 130
      object LaunchMnI: TMenuItem
        Caption = '&Spustit InfoMapu'
        Enabled = False
        ShortCut = 16461
        OnClick = LaunchBtnClick
      end
      object N1: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object TransferMnI: TMenuItem
        Caption = '&P�en�st mapu do datab�ze'
        Enabled = False
        ShortCut = 16464
        OnClick = TransferBtnClick
      end
      object SaveMnI: TMenuItem
        Caption = 'E&xportovat mapu'
        Enabled = False
        OnClick = SaveBtnClick
      end
      object BarvyMnI: TMenuItem
        Caption = 'Nastavit po�et &barev'
        Enabled = False
        object Barev16MMni1: TMenuItem
          Caption = '16M barev'
          OnClick = Barev16MMniClick
        end
        object Barev65536MnI1: TMenuItem
          Caption = '65536 barev'
          OnClick = Barev65536MnIClick
        end
        object Barev256MnI1: TMenuItem
          Caption = '256 barev'
          OnClick = Barev256MnIClick
        end
        object Barev16MnI1: TMenuItem
          Caption = '16 barev'
          OnClick = Barev16MnIClick
        end
        object TMenuItem
        end
      end
    end
  end
  object MapQuery: TQuery
    Left = 400
  end
  object MapDS: TDataSource
    DataSet = MapQuery
    Left = 464
  end
  object TableItems: TTableItems
    Left = 328
  end
  object Web: TGoToWeb
    URL = 'http://www.pjsoft.cz'
    Left = 264
  end
  object BarvyMenu: TPopupMenu
    Left = 202
    Top = 2
    object Barev16MMni: TMenuItem
      Caption = '16M barev'
      OnClick = Barev16MMniClick
    end
    object Barev65536MnI: TMenuItem
      Caption = '65536 barev'
      OnClick = Barev65536MnIClick
    end
    object Barev256MnI: TMenuItem
      Caption = '256 barev'
      OnClick = Barev256MnIClick
    end
    object Barev16MnI: TMenuItem
      Caption = '16 barev'
      OnClick = Barev16MnIClick
    end
  end
  object SavePictureDialog: TSavePictureDialog
    DefaultExt = '*.bmp'
    Filter = 'Rastrov� obr�zky|*.bmp'
    Left = 120
  end
  object PomMapTable: TTable
    Left = 402
    Top = 50
  end
end