Chip 2001 September/Chip_2001-09_cd1.bin/zkuste/delphi/kolekce/d12345/CHEMPLOT.ZIP/TPlot/Ptedit.dfm/Ptedit.txt

Text File | 2001-05-28 | 8KB | 293 lines

object PointEditorForm: TPointEditorForm
  Left = 242
  Top = 250
  Width = 300
  Height = 304
  HelpContext = 4020
  HorzScrollBar.Range = 283
  VertScrollBar.Range = 256
  AutoScroll = False
  Caption = 'Point Editor'
  Font.Color = clWindowText
  Font.Height = 12
  Font.Name = 'MS Sans Serif'
  Font.Pitch = fpVariable
  Font.Style = []
  PixelsPerInch = 120
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  TextHeight = 16
  object DetailsLabel: TLabel
    Left = 8
    Top = 8
    Width = 76
    Height = 16
    AutoSize = False
    Caption = 'DetailsLabel'
  end
  object Label5: TLabel
    Left = 8
    Top = 32
    Width = 129
    Height = 16
    AutoSize = False
    Caption = 'The index of the point:'
  end
  object PointSlideBar: TSlideBar
    Left = 8
    Top = 48
    Width = 200
    Height = 40
    Hint =
      'Left-click � 1, Right-click � 10, Double-click to leap, or Click' +
      '-n-Drag'
    AutoSlider = False
    BevelInner = bvNone
    BevelOuter = bvRaised
    BevelWidth = 1
    BorderWidth = 1
    Color = clBtnFace
    Font.Color = clWindowText
    Font.Height = 13
    Font.Name = 'Arial'
    Font.Style = []
    Frequency = 20
    Max = 100
    Min = 0
    PageSize = 10
    Position = 50
    ShowText = True
    ShowUnits = True
    SliderWidth = 6
    SliderHeight = 16
    Ticks = 5
    SlideColor = clBtnFace
    OnChange = PointSlideBarChange
  end
  object HelpBitBtn: TBitBtn
    Left = 192
    Top = 208
    Width = 75
    Height = 25
    TabOrder = 4
    Kind = bkHelp
  end
  object CancelBitBtn: TBitBtn
    Left = 112
    Top = 240
    Width = 75
    Height = 25
    TabOrder = 5
    OnClick = CancelBitBtnClick
    Kind = bkCancel
  end
  object OKBitBtn: TBitBtn
    Left = 16
    Top = 240
    Width = 75
    Height = 25
    TabOrder = 7
    Kind = bkOK
  end
  object DeleteBitBtn: TBitBtn
    Left = 104
    Top = 208
    Width = 75
    Height = 25
    HelpContext = 6560
    Cancel = True
    Caption = 'Delete'
    ModalResult = 7
    TabOrder = 3
    Glyph.Data = {
      66010000424D6601000000000000760000002800000014000000140000000100
      040000000000F000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
      FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
      FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
      0000FFFFFFFFFFFFFFFFFFFF0000F11111111111111111110000000000000000
      0000000100000999999999999999990100000999999999999999990100000999
      9999999999999901000009999999999999999901000009999999999999999901
      00000000000000000000000F0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
      FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
      FFFFFFFFFFFFFFFF0000}
  end
  object AddBitBtn: TBitBtn
    Left = 8
    Top = 208
    Width = 75
    Height = 25
    HelpContext = 6470
    Caption = 'Add'
    Default = True
    ModalResult = 6
    TabOrder = 2
    Glyph.Data = {
      66010000424D6601000000000000760000002800000014000000140000000100
      040000000000F000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
      FFFFFFFF0000FFFFFFF222222FFFFFFF0000FFFFFF0000002FFFFFFF0000FFFF
      FF0AAAA02FFFFFFF0000FFFFFF0AAAA02FFFFFFF0000FFFFFF0AAAA02FFFFFFF
      0000FFFFFF0AAAA02FFFFFFF0000F222220AAAA02222222F00000000000AAAA0
      0000002F00000AAAAAAAAAAAAAAAA02F00000AAAAAAAAAAAAAAAA02F00000AAA
      AAAAAAAAAAAAA02F00000AAAAAAAAAAAAAAAA02F00000000000AAAA0000000FF
      0000FFFFFF0AAAA02FFFFFFF0000FFFFFF0AAAA02FFFFFFF0000FFFFFF0AAAA0
      2FFFFFFF0000FFFFFF0AAAA02FFFFFFF0000FFFFFF0AAAA02FFFFFFF0000FFFF
      FF000000FFFFFFFF0000}
  end
  object DataGroupBox: TGroupBox
    Left = 8
    Top = 96
    Width = 129
    Height = 105
    Caption = 'Data'
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 27
      Width = 8
      Height = 16
      AutoSize = False
      Caption = 'X'
    end
    object YDataLabel: TLabel
      Left = 8
      Top = 75
      Width = 9
      Height = 16
      AutoSize = False
      Caption = 'Y'
    end
    object XStringDataEdit: TEdit
      Left = 40
      Top = 48
      Width = 81
      Height = 24
      HelpContext = 6340
      AutoSelect = False
      MaxLength = 32767
      TabOrder = 0
      OnKeyPress = XDataNEditKeyPress
    end
    object XDataNEdit: TNEdit
      Left = 40
      Top = 24
      Width = 80
      Height = 24
      HelpContext = 6270
      DataType = dtSingle
      Min = -3.4E38
      Max = 3.4E38
      NumericType = ntScientific
      AutoSelect = False
      MaxLength = 32767
      TabOrder = 1
      Text = '0'
      OnKeyPress = XDataNEditKeyPress
    end
    object YDataNEdit: TNEdit
      Left = 40
      Top = 72
      Width = 80
      Height = 24
      HelpContext = 6390
      DataType = dtSingle
      Min = -3.4E38
      Max = 3.4E38
      NumericType = ntScientific
      AutoSelect = False
      MaxLength = 32767
      TabOrder = 2
      Text = '0'
      OnKeyPress = XDataNEditKeyPress
    end
  end
  object ScreenGroupBox: TGroupBox
    Left = 152
    Top = 96
    Width = 129
    Height = 105
    Caption = 'Screen'
    TabOrder = 1
    object Label3: TLabel
      Left = 8
      Top = 27
      Width = 8
      Height = 16
      AutoSize = False
      Caption = 'X'
    end
    object YScreenLabel: TLabel
      Left = 8
      Top = 75
      Width = 9
      Height = 16
      AutoSize = False
      Caption = 'Y'
    end
    object XScreenNEdit: TNEdit
      Left = 40
      Top = 24
      Width = 80
      Height = 24
      HelpContext = 4500
      DataType = dtSmallint
      Min = -32768.000000000000000000
      Max = 32767.000000000000000000
      NumericType = ntInteger
      AutoSelect = False
      MaxLength = 32767
      TabOrder = 0
      Text = '0'
      OnKeyPress = XScreenNEditKeyPress
    end
    object YScreenNEdit: TNEdit
      Left = 40
      Top = 72
      Width = 80
      Height = 24
      HelpContext = 4520
      DataType = dtSmallint
      Min = -32768.000000000000000000
      Max = 32767.000000000000000000
      NumericType = ntInteger
      AutoSelect = False
      MaxLength = 32767
      TabOrder = 1
      Text = '0'
      OnKeyPress = XScreenNEditKeyPress
    end
  end
  object ApplyBitBtn: TBitBtn
    Left = 208
    Top = 240
    Width = 75
    Height = 25
    HelpContext = 6520
    Caption = '&Apply'
    TabOrder = 6
    OnClick = ApplyBitBtnClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
      33333333333F8888883F33330000324334222222443333388F3833333388F333
      000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
      F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
      223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
      3338888300003AAAAAAA33333333333888888833333333330000333333333333
      333333333333333333FFFFFF000033333333333344444433FFFF333333888888
      00003A444333333A22222438888F333338F3333800003A2243333333A2222438
      F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
      22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
      33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
end