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

Text File | 2001-12-03 | 15KB | 626 lines

object Generator: TGenerator
  Left = 140
  Top = 220
  BorderStyle = bsDialog
  Caption = 'EventFile Generator'
  ClientHeight = 368
  ClientWidth = 458
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 458
    Height = 21
    Align = alTop
    Caption = 'Panel1'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 0
    Top = 21
    Width = 458
    Height = 347
    Align = alClient
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 85
      Height = 13
      Caption = 'Path (destination):'
    end
    object Label4: TLabel
      Left = 8
      Top = 132
      Width = 42
      Height = 13
      Caption = 'Mask file'
    end
    object Panel3: TPanel
      Left = 248
      Top = 0
      Width = 209
      Height = 347
      TabOrder = 5
      object CBLoad: TCheckBox
        Left = 8
        Top = 8
        Width = 97
        Height = 17
        Hint = 'URL_fileName.* (applet),  path_fileName.hg*'
        Caption = 'Load cfg.file'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = CBLoadClick
      end
      object CBLoadJPG: TCheckBox
        Left = 8
        Top = 24
        Width = 97
        Height = 17
        Hint = 'URL_fileName.jpg (applet),  path_fileName.jpg'
        Caption = 'Load JPG file'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object CBSave: TCheckBox
        Left = 8
        Top = 40
        Width = 97
        Height = 17
        Hint = 'Path_fileName.emf(wmf)'
        Caption = 'Save metaFile'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object CBInt: TCheckBox
        Left = 8
        Top = 56
        Width = 97
        Height = 17
        Hint = 'Integer: 1..1000 sec.'
        Caption = 'Interval sec.'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
      object CBevC: TCheckBox
        Left = 8
        Top = 72
        Width = 97
        Height = 17
        Hint = 'Integer: 1.. x'
        Caption = 'Count event'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 4
        OnClick = CBevCClick
      end
      object CBZoom: TCheckBox
        Left = 104
        Top = 8
        Width = 97
        Height = 17
        Hint = 'Integer/float: e.g.: 2/0.5'
        Caption = 'Zoom'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object CBresM: TCheckBox
        Left = 104
        Top = 24
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Reset map'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
      end
      object CBresAll: TCheckBox
        Left = 104
        Top = 40
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Reset all object'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
        OnClick = CBresAllClick
      end
      object CBMess: TCheckBox
        Left = 104
        Top = 56
        Width = 97
        Height = 17
        Hint = 'Text'
        Caption = 'Message'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 8
      end
      object CBrefr: TCheckBox
        Left = 104
        Top = 72
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Refresh'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 9
      end
      object CBLay: TCheckBox
        Left = 8
        Top = 112
        Width = 89
        Height = 17
        Hint = 'Integer: layer Number (0 .. layerCount-1)'
        Caption = 'Layer'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 10
        OnClick = CBLayClick
      end
      object CBObj: TCheckBox
        Left = 8
        Top = 128
        Width = 97
        Height = 17
        Hint = 'Integer: object Number (0 .. objectCount-1)'
        Caption = 'Object '
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 11
        OnClick = CBObjClick
      end
      object CBObjT: TCheckBox
        Left = 8
        Top = 144
        Width = 97
        Height = 17
        Hint = 'Integer: set type '
        Caption = 'Object type'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 12
        OnClick = CBObjTClick
      end
      object CBObjS: TCheckBox
        Left = 8
        Top = 160
        Width = 97
        Height = 17
        Hint = 'Integer: 1 .. 25 (only pointObject)'
        Caption = 'Object size'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 13
        OnClick = CBObjSClick
      end
      object CBRange: TCheckBox
        Left = 8
        Top = 176
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Range color'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 14
        OnClick = CBRangeClick
      end
      object CBfill: TCheckBox
        Left = 8
        Top = 192
        Width = 97
        Height = 17
        Hint = 'Text: e.g.: aqua/0:255:255  (R:G:B)'
        Caption = 'Fill color'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 15
        OnClick = CBfillClick
      end
      object CBOutLC: TCheckBox
        Left = 8
        Top = 208
        Width = 97
        Height = 17
        Hint = 'Text: e.g.: aqua/0:255:255  (R:G:B)'
        Caption = 'OutLine color'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 16
        OnClick = CBOutLCClick
      end
      object CBDbl: TCheckBox
        Left = 8
        Top = 224
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - single/double line'
        Caption = 'Double outLine'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 17
        OnClick = CBDblClick
      end
      object CBCen: TCheckBox
        Left = 8
        Top = 240
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Centre object'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 18
        OnClick = CBCenClick
      end
      object CBCenZ: TCheckBox
        Left = 8
        Top = 256
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Centre zoom...'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 19
        OnClick = CBCenZClick
      end
      object CBblink: TCheckBox
        Left = 8
        Top = 272
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Blink object'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 20
        OnClick = CBblinkClick
      end
      object CBResO: TCheckBox
        Left = 8
        Top = 288
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Reset object'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 21
        OnClick = CBResOClick
      end
      object CBbeep: TCheckBox
        Left = 8
        Top = 304
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Beep'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 22
        OnClick = CBbeepClick
      end
      object CBhide: TCheckBox
        Left = 104
        Top = 192
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - no/yes'
        Caption = 'Hide object'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 23
        OnClick = CBhideClick
      end
      object CBMovx: TCheckBox
        Left = 104
        Top = 112
        Width = 97
        Height = 17
        Hint = 'Double: e.g.: �1234.1234'
        Caption = 'Move object X'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 24
        OnClick = CBMovxClick
      end
      object CBMovy: TCheckBox
        Left = 104
        Top = 128
        Width = 97
        Height = 17
        Hint = 'Double: e.g.: �1234.1234'
        Caption = 'Move object Y'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 25
        OnClick = CBMovyClick
      end
      object CBMovxy: TCheckBox
        Left = 104
        Top = 144
        Width = 97
        Height = 17
        Hint = 'Double: e.g.: �1234.1234separator�1234.1234'
        Caption = 'Move object XY'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 26
        OnClick = CBMovxyClick
      end
      object CBMessO: TCheckBox
        Left = 104
        Top = 160
        Width = 97
        Height = 17
        Hint = 'Text'
        Caption = 'Message object'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 27
        OnClick = CBMessOClick
      end
      object CBLab: TCheckBox
        Left = 104
        Top = 176
        Width = 97
        Height = 17
        Hint = 'Text'
        Caption = 'Label set'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 28
        OnClick = CBLabClick
      end
      object Button3: TButton
        Left = 48
        Top = 324
        Width = 113
        Height = 20
        Caption = 'Make mask file'
        TabOrder = 29
        OnClick = Button3Click
      end
      object CBLoop: TCheckBox
        Left = 8
        Top = 88
        Width = 97
        Height = 17
        Hint = 'Integer: 0 .. eventFile count-1'
        Caption = 'Loop'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 30
      end
      object CBmovAll: TCheckBox
        Left = 104
        Top = 88
        Width = 97
        Height = 17
        Hint = 'Integer: 0/1 - ignore/yes'
        Caption = 'Move all objects'
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 31
        OnClick = CBmovAllClick
      end
    end
    object Edit1: TEdit
      Left = 96
      Top = 6
      Width = 145
      Height = 21
      TabOrder = 0
    end
    object RadioGroup1: TRadioGroup
      Left = 0
      Top = 89
      Width = 241
      Height = 40
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'edit mask file'
        'source file')
      TabOrder = 1
      OnClick = RadioGroup1Click
    end
    object GroupBox1: TGroupBox
      Left = 0
      Top = 27
      Width = 243
      Height = 62
      TabOrder = 2
      object Label2: TLabel
        Left = 16
        Top = 15
        Width = 53
        Height = 13
        Caption = 'Source file:'
        Font.Color = clGray
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 16
        Top = 40
        Width = 49
        Height = 13
        Caption = 'Separator:'
        Font.Color = clGray
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Edit2: TEdit
        Left = 96
        Top = 12
        Width = 144
        Height = 21
        Font.Color = clGray
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnDblClick = Edit2DblClick
      end
      object Edit3: TEdit
        Left = 96
        Top = 37
        Width = 33
        Height = 21
        Font.Color = clGray
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Text = '#'
      end
    end
    object Button1: TButton
      Left = 40
      Top = 319
      Width = 75
      Height = 22
      Caption = 'Generate'
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 128
      Top = 319
      Width = 75
      Height = 22
      Caption = 'Close'
      TabOrder = 4
      OnClick = Button2Click
    end
    object Memo1: TMemo
      Left = 1
      Top = 144
      Width = 240
      Height = 169
      Lines.Strings = (
        '[Static]'
        'countEvent=1'
        'eMessage = [text]'
        ''
        'eLayer1 = [integer]'
        'eObject1 = [integer]'
        'eOutLineColor1='
        'eFillColor1='
        'eDblOutLine1 = 1'
        'eMessage1 = [text]'
        'eLabelSet1 = [text]'
        'eCentreZoom1 = 1'
        'eBlink1 = 1'
        '')
      ScrollBars = ssBoth
      TabOrder = 6
    end
  end
  object OD: TOpenDialog
    FileEditStyle = fsEdit
    Left = 416
    Top = 8
  end
end