Subversion Repositories spacemission

Rev

Rev 4 | Blame | Compare with Previous | Last modification | View Log | RSS feed

object MainForm: TMainForm
  Left = 268
  Top = 153
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'SpaceMission Levelconverter'
  ClientHeight = 201
  ClientWidth = 345
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 136
    Width = 329
    Height = 2
    Shape = bsBottomLine
  end
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 301
    Height = 26
    Caption = 
      'Der SpaceMission Levelconverter wandelt die Levels Ihrer alten'#13#10 +
      'SpaceMission-Version in die aktuelle Version 1.0 / 1.1 um.'
    Transparent = True
  end
  object Label2: TLabel
    Left = 8
    Top = 184
    Width = 322
    Height = 13
    Caption = 
      'Die korrekte Umschreibung der Levels kann nicht garantiert werde' +
      'n!'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Run: TButton
    Left = 176
    Top = 96
    Width = 161
    Height = 25
    Caption = 'Converter starten'
    Default = True
    TabOrder = 0
    OnClick = RunClick
  end
  object Button1: TButton
    Left = 8
    Top = 152
    Width = 105
    Height = 25
    Caption = 'Eingabeordner'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 120
    Top = 152
    Width = 105
    Height = 25
    Caption = 'Ausgabeordner'
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 232
    Top = 152
    Width = 105
    Height = 25
    Caption = 'Levelordner'
    TabOrder = 3
    OnClick = Button3Click
  end
  object comb: TComboBox
    Left = 8
    Top = 96
    Width = 161
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 4
    Items.Strings = (
      'Version 0.2 --> Version 0.3'
      'Version 0.2 --> Version 0.4'
      'Version 0.3 --> Version 0.4'
      'Version 0.4 --> Version 1.0'
      'Version 0.2 --> Version 1.0'
      'Version 0.3 --> Version 1.0')
  end
  object gauge: TProgressBar
    Left = 8
    Top = 48
    Width = 329
    Height = 33
    Smooth = True
    TabOrder = 5
  end
end