Chip 2003 February/Chip_2003-02_cd1.bin/tema/siggis/siGGis.exe/0/RCDATA/TPROPR/TPROPR.txt

Text File | 2001-12-03 | 23KB | 962 lines

object Propr: TPropr
  Left = 357
  Top = 156
  BorderStyle = bsDialog
  Caption = 'Properties'
  ClientHeight = 341
  ClientWidth = 399
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 304
    Width = 399
    Height = 37
    Align = alBottom
    TabOrder = 1
    object BOk: TButton
      Left = 120
      Top = 6
      Width = 75
      Height = 25
      Caption = 'OK'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = BOkClick
    end
    object Cancel: TButton
      Left = 208
      Top = 6
      Width = 75
      Height = 25
      Caption = 'Cancel'
      TabOrder = 1
      OnClick = CancelClick
    end
  end
  object PC1: TPageControl
    Left = 0
    Top = 0
    Width = 399
    Height = 304
    ActivePage = TSEv
    Align = alClient
    TabOrder = 0
    OnChange = PC1Change
    object TS1: TTabSheet
      Caption = 'General'
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 377
        Height = 137
        Caption = ' Save on exit '
        TabOrder = 0
        object Label1: TLabel
          Left = 8
          Top = 40
          Width = 121
          Height = 13
          Caption = 'Project path:'
        end
        object Label2: TLabel
          Left = 8
          Top = 64
          Width = 121
          Height = 13
          Caption = 'Vector path:'
        end
        object Label3: TLabel
          Left = 8
          Top = 88
          Width = 121
          Height = 13
          Caption = 'Data table path:'
        end
        object Label25: TLabel
          Left = 8
          Top = 112
          Width = 104
          Height = 13
          Caption = 'Temp directory (NET):'
        end
        object CBIni: TCheckBox
          Left = 8
          Top = 16
          Width = 145
          Height = 17
          Alignment = taLeftJustify
          Caption = 'Update INI file'
          State = cbChecked
          TabOrder = 0
          OnClick = CBIniClick
        end
        object EProject: TEdit
          Left = 140
          Top = 36
          Width = 229
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnDblClick = EProjectDblClick
        end
        object EVector: TEdit
          Left = 140
          Top = 60
          Width = 229
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnDblClick = EVectorDblClick
        end
        object EData: TEdit
          Left = 140
          Top = 84
          Width = 229
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnDblClick = EDataDblClick
        end
        object ETemp: TEdit
          Left = 140
          Top = 108
          Width = 229
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnDblClick = EDataDblClick
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 152
        Width = 377
        Height = 121
        Caption = ' Redefine HelpKey (e.g.:run program with help file) '
        TabOrder = 1
        object Label4: TLabel
          Left = 8
          Top = 43
          Width = 73
          Height = 13
          Caption = 'F1:'
        end
        object Label5: TLabel
          Left = 8
          Top = 66
          Width = 73
          Height = 13
          Caption = 'F1+[shift]:'
        end
        object Label6: TLabel
          Left = 8
          Top = 91
          Width = 73
          Height = 13
          Caption = 'F1+[Ctrl]:'
        end
        object Label12: TLabel
          Left = 80
          Top = 24
          Width = 122
          Height = 13
          Caption = 'Run program - path\name'
        end
        object Label13: TLabel
          Left = 224
          Top = 24
          Width = 48
          Height = 13
          Caption = 'Parameter'
        end
        object EF1: TEdit
          Left = 80
          Top = 40
          Width = 129
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = EF1Click
        end
        object EF2: TEdit
          Left = 80
          Top = 64
          Width = 129
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnDblClick = EF2DblClick
        end
        object EF3: TEdit
          Left = 80
          Top = 88
          Width = 129
          Height = 21
          Hint = 'DblClick - dialog open'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnDblClick = EF3DblClick
        end
        object EP1: TEdit
          Left = 216
          Top = 40
          Width = 153
          Height = 21
          TabOrder = 3
        end
        object EP2: TEdit
          Left = 216
          Top = 64
          Width = 153
          Height = 21
          TabOrder = 4
        end
        object EP3: TEdit
          Left = 216
          Top = 88
          Width = 153
          Height = 21
          TabOrder = 5
        end
      end
    end
    object TS2: TTabSheet
      Caption = 'Czech language'
      object RadioGroup1: TRadioGroup
        Left = 8
        Top = 0
        Width = 185
        Height = 201
        Caption = ' CP program - datab�ze (zdroj) '
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemIndex = 0
        Items.Strings = (
          'implicitn� (set��d�no IBM)'
          '�e�tina Windows page 1250'
          '�e�tina Windows 3.1 CE'
          '�e�tina Kamenick�ch'
          'kodov�n� Latin 1'
          'kodov�n� Latin 2'
          'kodov�n� ECMA ansi'
          'Ansi - �esky jen dle gener�toru'
          'Ibm  - bez vsech hacku a carek'
          'Sem - ibm bez jakekoliv grafiky'
          'kodovan� pro macI')
        ParentFont = False
        TabOrder = 0
      end
      object RadioGroup2: TRadioGroup
        Left = 200
        Top = 0
        Width = 185
        Height = 201
        Caption = 'Datab�ze (c�l) - pro konverzi '
        ItemIndex = 0
        Items.Strings = (
          '�e�tina Windows page 1250'
          '�e�tina Windows 3.1 CE'
          '�e�tina Kamenick�ch'
          'kodov�n� Latin 1'
          'kodov�n� Latin 2'
          'kodov�n� ECMA ansi'
          'Ansi - �esky jen dle gener�toru'
          'IBM  - bez vsech hacku a carek'
          'Sem - ibm bez jakekoliv grafiky'
          'kodovan� pro macI')
        TabOrder = 1
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 206
        Width = 377
        Height = 68
        Caption = ' Konverze soubor� podle nastaven� (zdroj - c�l) '
        TabOrder = 2
        object Label7: TLabel
          Left = 10
          Top = 18
          Width = 135
          Height = 13
          Caption = 'Soubor ke konverzi (zdroj):'
        end
        object Label8: TLabel
          Left = 10
          Top = 43
          Width = 126
          Height = 13
          Caption = 'Konverzovan� soubor (c�l):'
        end
        object ESource: TEdit
          Left = 144
          Top = 16
          Width = 169
          Height = 21
          TabOrder = 0
        end
        object Edest: TEdit
          Left = 144
          Top = 40
          Width = 169
          Height = 21
          TabOrder = 1
        end
        object Button1: TButton
          Left = 320
          Top = 16
          Width = 51
          Height = 22
          Caption = 'Vyber'
          TabOrder = 2
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 320
          Top = 40
          Width = 51
          Height = 22
          Caption = 'Prove�'
          TabOrder = 3
          OnClick = Button2Click
        end
      end
    end
    object TSEv: TTabSheet
      Caption = 'Event setting'
      object Bevel4: TBevel
        Left = 0
        Top = 0
        Width = 391
        Height = 276
        Align = alClient
      end
      object Label14: TLabel
        Left = 8
        Top = 10
        Width = 113
        Height = 13
        Caption = 'EventFile path:'
      end
      object Label15: TLabel
        Left = 8
        Top = 35
        Width = 113
        Height = 13
        Caption = 'Interval / second:'
      end
      object Label16: TLabel
        Left = 176
        Top = 35
        Width = 97
        Height = 13
        Caption = 'EventFile name:'
      end
      object E1: TEdit
        Left = 128
        Top = 8
        Width = 257
        Height = 21
        Hint = 'DblClick - dialog open '
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnChange = E1Change
        OnDblClick = E1DblClick
        OnExit = E1Exit
      end
      object E2: TEdit
        Left = 280
        Top = 32
        Width = 73
        Height = 21
        TabOrder = 1
        Text = 'event.mon'
        OnChange = E2Change
      end
      object GB4: TGroupBox
        Left = 8
        Top = 54
        Width = 377
        Height = 67
        Caption = 'Event process: event.mon'
        TabOrder = 2
        object RB1: TRadioButton
          Left = 16
          Top = 19
          Width = 113
          Height = 17
          Caption = 'single file'
          TabOrder = 0
          OnClick = RB1Click
        end
        object RB2: TRadioButton
          Left = 16
          Top = 40
          Width = 113
          Height = 17
          Caption = 'multiple files'
          Checked = True
          TabOrder = 1
          TabStop = True
          OnClick = RB2Click
        end
        object Panel5: TPanel
          Left = 157
          Top = 8
          Width = 201
          Height = 53
          BevelOuter = bvNone
          TabOrder = 2
          object LEv: TLabel
            Left = 18
            Top = 7
            Width = 77
            Height = 13
            Caption = 'EventFile count:'
            Font.Color = clGray
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object ChBRep: TCheckBox
            Left = 16
            Top = 25
            Width = 141
            Height = 13
            Alignment = taLeftJustify
            Caption = 'Repeat '
            Enabled = False
            TabOrder = 0
          end
          object ChBPrj: TCheckBox
            Left = 16
            Top = 41
            Width = 141
            Height = 13
            Alignment = taLeftJustify
            Caption = 'Reload project:'
            Enabled = False
            TabOrder = 1
          end
          object ME2: TEdit
            Left = 144
            Top = 2
            Width = 41
            Height = 21
            MaxLength = 4
            TabOrder = 2
            Text = '10'
            OnChange = ME2Change
            OnKeyUp = ME2KeyUp
          end
        end
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 122
        Width = 377
        Height = 148
        Caption = '                               applet configuration: '
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        object Label20: TLabel
          Left = 8
          Top = 16
          Width = 102
          Height = 13
          Caption = 'URL - EventFile path:'
        end
        object Label22: TLabel
          Left = 8
          Top = 32
          Width = 197
          Height = 13
          Caption = 'Interval / second: 3 ,  multiple files: ( 50 )  '
        end
        object Label21: TLabel
          Left = 259
          Top = 92
          Width = 88
          Height = 13
          Caption = 'Max.EvList/rows:  '
        end
        object Panel8: TPanel
          Left = 8
          Top = -2
          Width = 89
          Height = 17
          BevelOuter = bvNone
          Caption = 'siGGisEvent'
          Font.Color = clRed
          Font.Height = -12
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
        end
        object CheckBox1: TCheckBox
          Left = 258
          Top = 56
          Width = 115
          Height = 17
          Alignment = taLeftJustify
          Caption = 'Run process '
          State = cbChecked
          TabOrder = 1
        end
        object SG1: TStringGrid
          Left = 4
          Top = 54
          Width = 253
          Height = 80
          DefaultColWidth = 80
          DefaultRowHeight = 18
          Enabled = False
          RowCount = 7
          Font.Color = clGray
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsItalic]
          Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
          ParentFont = False
          ScrollBars = ssVertical
          TabOrder = 2
          ColWidths = (
            80
            37
            37
            37
            37)
        end
        object CheckBox2: TCheckBox
          Left = 258
          Top = 72
          Width = 115
          Height = 17
          Alignment = taLeftJustify
          Caption = 'Default window'
          State = cbChecked
          TabOrder = 3
          OnClick = CheckBox2Click
        end
        object Edit1: TEdit
          Left = 346
          Top = 90
          Width = 28
          Height = 21
          TabOrder = 4
          Text = '100'
        end
      end
      object ME1: TEdit
        Left = 128
        Top = 32
        Width = 33
        Height = 21
        MaxLength = 4
        TabOrder = 4
        Text = '5'
        OnChange = ME1Change
        OnKeyUp = ME1KeyUp
      end
      object Button6: TButton
        Left = 360
        Top = 32
        Width = 25
        Height = 22
        Caption = '�'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Webdings'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        OnClick = Button6Click
      end
    end
    object TSApp: TTabSheet
      Caption = 'Export '
      object Label17: TLabel
        Left = 8
        Top = 42
        Width = 121
        Height = 13
        Caption = 'Export directory:'
      end
      object EWPath: TEdit
        Left = 136
        Top = 40
        Width = 249
        Height = 21
        Hint = 'DblClick - dialog open'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Text = 'Applet\'
        OnDblClick = EWPathDblClick
        OnExit = EWPathExit
      end
      object GBA: TGroupBox
        Left = 4
        Top = 64
        Width = 189
        Height = 81
        Caption = ' Into siGGis files   '
        TabOrder = 1
        object RBClk: TRadioButton
          Left = 8
          Top = 24
          Width = 161
          Height = 17
          Caption = 'All geoObjects'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RBsOb: TRadioButton
          Left = 8
          Top = 48
          Width = 153
          Height = 17
          Caption = 'Only selected geoObjects'
          TabOrder = 1
        end
      end
      object Button3: TButton
        Left = 160
        Top = 248
        Width = 75
        Height = 25
        Caption = 'Make All'
        TabOrder = 2
        OnClick = Button3Click
      end
      object GBD: TGroupBox
        Left = 200
        Top = 64
        Width = 185
        Height = 80
        Caption = '  Into database files '
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        object Label23: TLabel
          Left = 10
          Top = 56
          Width = 121
          Height = 13
          Caption = 'FontSize(plus/minus):'
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object RBClk2: TRadioButton
          Left = 8
          Top = 16
          Width = 169
          Height = 17
          Caption = 'All database fields '
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RBSel: TRadioButton
          Left = 8
          Top = 37
          Width = 169
          Height = 17
          Caption = 'Only selected fields'
          TabOrder = 1
        end
        object MaE: TEdit
          Left = 136
          Top = 54
          Width = 41
          Height = 21
          TabOrder = 2
          Text = '+12'
          OnExit = MaEExit
        end
      end
      object GBAp: TGroupBox
        Left = 4
        Top = 144
        Width = 381
        Height = 65
        Caption = ' Applet setting '
        TabOrder = 4
        object Label19: TLabel
          Left = 8
          Top = 16
          Width = 80
          Height = 13
          Caption = 'Config FileName:'
        end
        object Label18: TLabel
          Left = 8
          Top = 40
          Width = 105
          Height = 13
          Caption = 'Data path:'
        end
        object EFname: TEdit
          Left = 144
          Top = 12
          Width = 105
          Height = 21
          TabOrder = 0
          Text = 'siggapp.cfg'
          OnChange = EFnameChange
        end
        object Edit2: TEdit
          Left = 144
          Top = 36
          Width = 225
          Height = 21
          TabOrder = 1
          Text = 'Data'
        end
        object ChBZip: TCheckBox
          Left = 256
          Top = 16
          Width = 113
          Height = 17
          Alignment = taLeftJustify
          Caption = 'siggapp.zip'
          State = cbChecked
          TabOrder = 2
        end
      end
      object RGApplet: TRadioGroup
        Left = 4
        Top = 0
        Width = 381
        Height = 33
        Caption = ' Select applet: '
        Columns = 2
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ItemIndex = 0
        Items.Strings = (
          'Applet siGGis'
          'siGGisEvent')
        ParentFont = False
        TabOrder = 5
      end
      object Button5: TButton
        Left = 48
        Top = 216
        Width = 145
        Height = 25
        Caption = 'Rename files'
        TabOrder = 6
        OnClick = Button5Click
      end
      object Button4: TButton
        Left = 208
        Top = 216
        Width = 145
        Height = 25
        Caption = 'Dbf Action...'
        TabOrder = 7
        OnClick = Button4Click
      end
      object ChBRun: TCheckBox
        Left = 48
        Top = 253
        Width = 97
        Height = 17
        Alignment = taLeftJustify
        Caption = 'Run Applet'
        TabOrder = 8
      end
    end
    object TSCop: TTabSheet
      Caption = 'About program...'
      OnMouseMove = TSCopMouseMove
      object Bevel1: TBevel
        Left = 16
        Top = 16
        Width = 361
        Height = 249
      end
      object Bevel2: TBevel
        Left = 40
        Top = 40
        Width = 273
        Height = 41
      end
      object Bevel3: TBevel
        Left = 152
        Top = 104
        Width = 129
        Height = 89
      end
      object Label11: TLabel
        Left = 32
        Top = 240
        Width = 177
        Height = 13
        Alignment = taCenter
        Caption = 'H.a.R ware '
        OnMouseMove = Label11MouseMove
      end
      object Label24: TLabel
        Left = 208
        Top = 240
        Width = 46
        Height = 13
        Caption = 'Label24'
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
        OnDblClick = Label24DblClick
        OnMouseMove = Label24MouseMove
      end
      object Panel3: TPanel
        Left = 144
        Top = 96
        Width = 129
        Height = 89
        Caption = 'GIS  viewer'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial Black'
        Font.Style = [fsBold, fsItalic]
        ParentFont = False
        TabOrder = 0
        object Label9: TLabel
          Left = 9
          Top = 10
          Width = 106
          Height = 23
          Caption = 'GIS viewer'
          Font.Color = clGray
          Font.Height = -16
          Font.Name = 'Arial Black'
          Font.Style = [fsBold, fsItalic]
          ParentFont = False
        end
        object Label10: TLabel
          Left = 26
          Top = 56
          Width = 77
          Height = 16
          Caption = 'GIS viewer'
          Font.Color = clTeal
          Font.Height = -11
          Font.Name = 'Arial Black'
          Font.Style = [fsBold, fsItalic]
          ParentFont = False
        end
      end
      object Panel4: TPanel
        Left = 32
        Top = 208
        Width = 329
        Height = 25
        Caption = 'Panel4'
        TabOrder = 1
        OnMouseMove = Panel4MouseMove
      end
      object Panel7: TPanel
        Left = 48
        Top = 32
        Width = 273
        Height = 41
        Caption = 'siGGis'
        Color = clWhite
        Font.Color = clRed
        Font.Height = -21
        Font.Name = 'Arial Black'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        object Panel6: TPanel
          Left = 3
          Top = 3
          Width = 70
          Height = 22
          BevelOuter = bvNone
          Caption = '....'
          Color = clNone
          Font.Color = clTeal
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          ParentFont = False
          TabOrder = 0
        end
        object Panel2: TPanel
          Left = 203
          Top = 16
          Width = 65
          Height = 22
          BevelOuter = bvNone
          Caption = 'Monitor'
          Color = clNone
          Font.Color = clTeal
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          ParentFont = False
          TabOrder = 1
        end
      end
    end
  end
  object OD: TOpenDialog
    FileEditStyle = fsEdit
    Left = 364
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer1Timer
    Left = 340
    Top = 24
  end
end