object Form1: TForm1 Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False AutoScroll = False Caption = 'Form1' ClientHeight = 582 ClientWidth = 692 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Menu = menu OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object panel_all: TPanel Left = 0 Top = 100 Width = 692 Height = 300 BevelOuter = bvNone TabOrder = 0 object Splitter2: TSplitter Left = 360 Top = 0 Width = 8 Height = 300 AutoSnap = False Beveled = True MinSize = 360 end object panel_left: TPanel Left = 0 Top = 0 Width = 360 Height = 300 Cursor = crDrag Align = alLeft BevelOuter = bvNone TabOrder = 0 object Splitter1: TSplitter Left = 0 Top = 241 Width = 360 Height = 8 Cursor = crVSplit Align = alTop AutoSnap = False Beveled = True MinSize = 75 OnMoved = Splitter1Moved end object panel_files: TPanel Left = 0 Top = 0 Width = 360 Height = 241 Align = alTop BevelOuter = bvNone TabOrder = 0 object btn_extractconvert: TButton Left = 1 Top = 220 Width = 358 Height = 20 Caption = 'Convert and extract file' Enabled = False TabOrder = 0 WordWrap = True OnClick = btn_extractconvertClick end object list_files: TListBox Left = 0 Top = 0 Width = 360 Height = 218 Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Fixedsys' Font.Style = [] ItemHeight = 15 ParentFont = False TabOrder = 1 OnClick = list_filesDblClick OnDblClick = list_filesDblClick end end object list_extensions: TListBox Left = 0 Top = 249 Width = 360 Height = 51 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Fixedsys' Font.Style = [] ItemHeight = 15 ParentFont = False Sorted = True TabOrder = 1 OnClick = list_extensionsClick OnDblClick = list_extensionsClick end end object panel_file: TPanel Left = 368 Top = 0 Width = 324 Height = 300 Align = alClient BevelOuter = bvNone TabOrder = 1 object lbl_fileinfo: TLabel Left = 0 Top = 0 Width = 324 Height = 49 Align = alTop AutoSize = False end object edit_data: TMemo Left = 0 Top = 49 Width = 324 Height = 251 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Fixedsys' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 0 WordWrap = False end end end object group_progress: TGroupBox Left = 296 Top = 480 Width = 297 Height = 57 Caption = 'Extracting...' TabOrder = 1 Visible = False object lbl_progress: TLabel Left = 10 Top = 36 Width = 279 Height = 18 AutoSize = False end object progress: TProgressBar Left = 8 Top = 16 Width = 217 Height = 17 Step = 1 TabOrder = 0 end object btn_extractcancel: TButton Left = 232 Top = 16 Width = 57 Height = 33 Caption = 'Cancel' TabOrder = 1 OnClick = btn_extractcancelClick end end object statbar: TStatusBar Left = 0 Top = 565 Width = 692 Height = 17 BiDiMode = bdLeftToRight Panels = < item Text = 'Current .dat: -' Width = 500 end item Text = 'Files: -' Width = 90 end item Text = 'Extensions: -' Width = 100 end> ParentBiDiMode = False end object fopen: TOpenDialog Filter = 'Oni-Dat-Files|*.dat|Oni-Sep-Files (MAC)|*.sep' Left = 64 Top = 120 end object menu: TMainMenu AutoHotkeys = maManual Left = 224 object menu_main: TMenuItem Caption = '&Main' object menu_loaddat: TMenuItem Caption = '&Select .dat-file ...' OnClick = menu_loaddatClick end object menu_sep1: TMenuItem Caption = '-' end object menu_exit: TMenuItem Caption = '&Exit' OnClick = menu_exitClick end end object menu_extract: TMenuItem Caption = '&Extract/Convert' Enabled = False object menu_extractfile: TMenuItem Caption = 'Convert and extract current &file' OnClick = menu_extractfileClick end object menu_extractlist: TMenuItem Caption = 'Convert and extract all files currently in &list' OnClick = menu_extractlistClick end object menu_extractall: TMenuItem Caption = 'Convert and extract &all files' OnClick = menu_extractallClick end end object menu_tools: TMenuItem Caption = '&Tools' Enabled = False object menu_preview: TMenuItem Caption = '&Preview Window ...' OnClick = menu_previewClick end object menu_binedit: TMenuItem Caption = '&Binary .dat editor ...' Enabled = False OnClick = menu_bineditClick end object menu_txmpreplace: TMenuItem Caption = '&TXMP replacer ...' OnClick = menu_txmpreplaceClick end end end end