romeditorunit.lfm

object RomEditorForm: TRomEditorForm
  Left = 1191
  Height = 222
  Top = 350
  Width = 320
  Caption = 'ROM Editor'
  ClientHeight = 202
  ClientWidth = 320
  Color = 7354424
  Menu = MainMenu1
  OnCreate = FormCreate
  LCLVersion = '2.2.2.0'
  object StringGrid1: TStringGrid
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = propOkShape
    Left = 5
    Height = 149
    Top = 5
    Width = 310
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Left = 5
    BorderSpacing.Top = 5
    BorderSpacing.Right = 5
    BorderSpacing.Bottom = 5
    Color = 8405056
    ColCount = 4
    Columns = <    
      item
        Alignment = taRightJustify
        MinSize = 8
        MaxSize = 160
        Title.Caption = 'bin'
      end    
      item
        Alignment = taRightJustify
        MinSize = 8
        MaxSize = 160
        Title.Caption = 'dec'
      end    
      item
        Alignment = taRightJustify
        MinSize = 8
        MaxSize = 160
        Title.Caption = '2cmp'
      end>
    FixedColor = 6303792
    Flat = True
    Font.Color = clWhite
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goDblClickAutoSize, goSmoothScroll]
    ParentFont = False
    TabOrder = 0
    OnValidateEntry = StringGrid1ValidateEntry
    Cells = (
      2
      0
      0
      'Adresse'
      1
      0
      'Daten (bin)'
    )
  end
  object propOkShape: TShape
    AnchorSideLeft.Control = propAddDataShape
    AnchorSideLeft.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 91
    Height = 38
    Top = 159
    Width = 224
    Anchors = [akLeft, akRight, akBottom]
    BorderSpacing.Left = 5
    BorderSpacing.Right = 5
    BorderSpacing.Bottom = 5
    Brush.Color = 6303792
    OnMouseDown = propOkShapeMouseDown
    Shape = stRoundRect
  end
  object propOkLabel: TLabel
    AnchorSideLeft.Control = propOkShape
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = propOkShape
    AnchorSideTop.Side = asrCenter
    Left = 158
    Height = 21
    Top = 168
    Width = 91
    Caption = 'Übernehmen'
    Font.CharSet = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
    OnMouseDown = propOkShapeMouseDown
  end
  object propAddDataShape: TShape
    AnchorSideLeft.Control = propRemDataShape
    AnchorSideLeft.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 48
    Height = 38
    Top = 159
    Width = 38
    Anchors = [akLeft, akBottom]
    BorderSpacing.Left = 5
    BorderSpacing.Bottom = 5
    Brush.Color = 6303792
    OnMouseDown = propAddDataShapeMouseDown
    Shape = stRoundRect
  end
  object propAddDataLabel: TLabel
    AnchorSideLeft.Control = propAddDataShape
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = propAddDataShape
    AnchorSideTop.Side = asrCenter
    Left = 62
    Height = 21
    Top = 168
    Width = 11
    Caption = '+'
    Font.CharSet = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
    OnMouseDown = propAddDataShapeMouseDown
  end
  object propRemDataShape: TShape
    AnchorSideLeft.Control = Owner
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 5
    Height = 38
    Top = 159
    Width = 38
    Anchors = [akLeft, akBottom]
    BorderSpacing.Left = 5
    BorderSpacing.Bottom = 5
    Brush.Color = 6303792
    OnMouseDown = propRemDataShapeMouseDown
    Shape = stRoundRect
  end
  object propRemDataLabel: TLabel
    AnchorSideLeft.Control = propRemDataShape
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = propRemDataShape
    AnchorSideTop.Side = asrCenter
    Left = 21
    Height = 21
    Top = 168
    Width = 6
    Caption = '-'
    Font.CharSet = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    ParentColor = False
    ParentFont = False
    OnMouseDown = propRemDataShapeMouseDown
  end
  object MainMenu1: TMainMenu
    Left = 82
    Top = 112
    object miImport: TMenuItem
      Caption = '&Importieren'
      OnClick = miImportClick
    end
    object miExport: TMenuItem
      Caption = '&Exportieren'
      object miExportToCsv: TMenuItem
        Caption = '&Datei (csv)...'
        OnClick = miExportClick
      end
      object miExportToClipboard: TMenuItem
        Caption = '&Zwischenablage'
        OnClick = miExportToClipboardClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = '.csv'
    Filter = 'CSV|*.csv'
    FilterIndex = 0
    Options = [ofPathMustExist, ofEnableSizing, ofViewDetail]
    Left = 98
    Top = 50
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.csv'
    Filter = 'CSV|*.csv'
    FilterIndex = 0
    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing, ofViewDetail]
    Left = 175
    Top = 66
  end
end