Chip Hitware 6 A/CHIP_HITWARE6_A.iso/edukacja/LOTR/LOTRMAP.exe/0/RCDATA/TFORM3/TFORM3.txt

Text File | 1998-11-26 | 4.0 KB | 206 lines

object Form3: TForm3
  Left = 281
  Top = 214
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsSingle
  Caption = 'Edit'
  ClientHeight = 200
  ClientWidth = 360
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 14
    Top = 32
    Width = 31
    Height = 13
    Caption = 'Name:'
  end
  object Label3: TLabel
    Left = 214
    Top = 32
    Width = 10
    Height = 13
    Caption = 'X:'
  end
  object Label4: TLabel
    Left = 254
    Top = 32
    Width = 10
    Height = 13
    Caption = 'Y:'
  end
  object Label5: TLabel
    Left = 14
    Top = 12
    Width = 51
    Height = 13
    Caption = 'Language:'
  end
  object Bevel1: TBevel
    Left = 208
    Top = 127
    Width = 145
    Height = 2
  end
  object ListBox1: TListBox
    Left = 8
    Top = 72
    Width = 193
    Height = 123
    HelpContext = 304
    ItemHeight = 13
    PopupMenu = Form1.PopupMenu1
    TabOrder = 8
    OnClick = ListBox1Click
  end
  object Button1: TButton
    Left = 296
    Top = 8
    Width = 57
    Height = 25
    Hint = 'Create a new location.'
    HelpContext = 305
    Caption = '&New'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 4
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 8
    Top = 48
    Width = 193
    Height = 21
    HelpContext = 302
    PopupMenu = Form1.PopupMenu1
    TabOrder = 1
    OnChange = Edit1Change
  end
  object Edit2: TEdit
    Left = 208
    Top = 48
    Width = 41
    Height = 21
    HelpContext = 303
    PopupMenu = Form1.PopupMenu1
    TabOrder = 2
    OnChange = Edit2Change
    OnEnter = Edit2Enter
    OnExit = Edit2Exit
  end
  object Edit3: TEdit
    Left = 248
    Top = 48
    Width = 41
    Height = 21
    HelpContext = 303
    PopupMenu = Form1.PopupMenu1
    TabOrder = 3
    OnChange = Edit2Change
    OnEnter = Edit2Enter
    OnExit = Edit2Exit
  end
  object Button2: TButton
    Left = 296
    Top = 96
    Width = 57
    Height = 25
    Hint = 'Delete the selected location.'
    HelpContext = 308
    Caption = '&Delete'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 7
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 296
    Top = 67
    Width = 57
    Height = 25
    Hint = 'Add this location.'
    HelpContext = 307
    Caption = '&Add'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 6
    OnClick = Button3Click
  end
  object Edit4: TEdit
    Left = 68
    Top = 8
    Width = 133
    Height = 21
    HelpContext = 301
    PopupMenu = Form1.PopupMenu1
    TabOrder = 0
    Text = 'English'
  end
  object BitBtn1: TBitBtn
    Left = 280
    Top = 138
    Width = 75
    Height = 25
    Hint = 'Quit and save.'
    HelpContext = 309
    Caption = 'Do&ne'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 9
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 280
    Top = 170
    Width = 75
    Height = 25
    Hint = 'Quit and don'#39't save.'
    HelpContext = 310
    Caption = '&Cancel'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 10
    OnClick = BitBtn2Click
  end
  object Button4: TButton
    Left = 296
    Top = 37
    Width = 57
    Height = 25
    Hint = 'Apply changes.'
    HelpContext = 306
    Caption = 'A&pply'
    PopupMenu = Form1.PopupMenu1
    TabOrder = 5
    OnClick = Button4Click
  end
  object SaveDialog1: TSaveDialog
    Filter = 'Data files (*.dat)|*.dat|All files (*.*)|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofNoChangeDir]
    Left = 48
    Top = 56
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 16
    Top = 56
    object NewLoc1: TMenuItem
      Caption = 'NewLoc'
    end
    object Editing1: TMenuItem
      Caption = 'Editing'
    end
    object Changed1: TMenuItem
      Caption = 'Changed'
    end
    object Itemindex1: TMenuItem
      Caption = 'Itemindex'
    end
  end
end