object MDIChild: TMDIChild Left = 461 Top = 163 Width = 512 Height = 288 Caption = 'Untergeordnetes MDI' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsMDIChild Menu = MainMenu1 Position = poDefault Visible = True OnClose = FormClose OnCreate = FormCreate OnPaint = FormPaint OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object ListView1: TListView Left = 0 Top = 0 Width = 504 Height = 242 HelpContext = 105 Align = alClient OnDblClick = ListView1DblClick Columns = <> ReadOnly = True MultiSelect = True RowSelect = True OnChange = ListView1Change OnColumnClick = ListView1ColumnClick OnCompare = ListView1Compare OnEdited = ListView1Edited OnMouseDown = ListView1MouseDown OnMouseMove = ListView1MouseMove OnMouseUp = ListView1MouseUp PopupMenu = PopupMenu1 TabOrder = 0 ViewStyle = vsReport end object PopupMenu1: TPopupMenu OnPopup = PopupMenu1Popup Left = 12 Top = 16 object Auspacken1: TMenuItem Caption = '&Auspacken' OnClick = Auspacken1Click end object HinzuFgen1: TMenuItem Caption = '&Hinzuf�gen' OnClick = HinzuFgen1Click end object Einpacken1: TMenuItem Caption = '-' end object Lschen1: TMenuItem Caption = '&L�schen' OnClick = Lschen1Click end object N1: TMenuItem Caption = '-' end object Einsehen1: TMenuItem Caption = '&Einsehen' OnClick = Einsehen1Click end end object MainMenu1: TMainMenu Left = 80 Top = 16 object Datei1: TMenuItem Caption = '&Datei' OnClick = Datei1Click object Neu1: TMenuItem Caption = '&Neu...' HelpContext = 101 OnClick = Neu1Click end object ffnen1: TMenuItem Caption = '�&ffnen...' HelpContext = 102 OnClick = ffnen1Click end object MAuspaken: TMenuItem Caption = '&Auspacken...' HelpContext = 106 Hint = 'Extrahieren' OnClick = MAuspakenClick end object N2: TMenuItem Caption = '-' end object Schlieen1: TMenuItem Caption = 'S&chlie�en' HelpContext = 103 OnClick = Schlieen1Click end object N3: TMenuItem Caption = '-' end object Beenden1: TMenuItem Caption = '&Beenden' OnClick = Beenden1Click end end object Edit1: TMenuItem Caption = 'B&earbeiten' GroupIndex = 1 OnClick = Edit1Click object AddItem1: TMenuItem Caption = '&zum Archiv &Hinzuf�gen' HelpContext = 105 Hint = 'Hinzuf�gen' ShortCut = 16456 OnClick = AddItem1Click end object ausArchivEntpacken1: TMenuItem Caption = 'aus Archiv &Extrahieren' HelpContext = 106 Hint = 'Extrahieren' ShortCut = 16449 OnClick = ausArchivEntpacken1Click end object Deleteitem: TMenuItem Caption = 'aus Archiv &L�schen' Hint = 'L�schen' ShortCut = 46 OnClick = DeleteitemClick end object DateiEinsehen1: TMenuItem Caption = '&Datei Einsehen' HelpContext = 107 Hint = 'Datei Anzeigen' ShortCut = 16470 OnClick = DateiEinsehen1Click end object N4: TMenuItem Caption = '-' end object SelbstentpackendeDateierzeugen1: TMenuItem Caption = 'Selbstentpackende Datei erzeugen' HelpContext = 108 Hint = 'Selbstextrahierende Datei erzeugen' ShortCut = 16467 OnClick = SelbstentpackendeDateierzeugen1Click end end object Ansicht1: TMenuItem Caption = '&Ansicht' GroupIndex = 2 HelpContext = 109 object Detailliert1: TMenuItem Caption = '&Detailliert' Checked = True GroupIndex = 1 HelpContext = 109 RadioItem = True ShortCut = 16452 OnClick = Detailliert1Click end object Liste1: TMenuItem Caption = '&Liste' GroupIndex = 1 HelpContext = 109 RadioItem = True ShortCut = 16460 OnClick = Liste1Click end object Icon1: TMenuItem Caption = '&Icon' GroupIndex = 1 HelpContext = 109 RadioItem = True ShortCut = 16457 OnClick = Icon1Click end end end object DragDrop1: TDragDrop DropEffect = deMOVE Left = 44 Top = 16 end object ZipTV1: TZipTV About = '(MCS)' FileSpec = '*.*' ZipCmntBufSize = 0 OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnError = ZipTV1Error OnRead = ZipTV1Read OnTotals = ZipTV1Totals Left = 116 Top = 16 end object UnZIP1: TUnZIP About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' ZipCmntBufSize = 0 OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnGetPassword = UnZIP1GetPassword OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 292 Top = 208 end object UnARC1: TUnARC About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 196 Top = 208 end object UnARJ1: TUnARJ About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 228 Top = 208 end object UnLHA1: TUnLHA About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 260 Top = 208 end object UnZOO1: TUnZOO About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 324 Top = 208 end object UnCAB1: TUnCAB About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnNextCabinet = UnCAB1NextCabinet OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 356 Top = 208 end object UnBH1: TUnBH About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnGetPassword = UnZIP1GetPassword OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 388 Top = 208 end object UnTAR1: TUnTAR About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 420 Top = 208 end object UnGZIP1: TUnGZIP About = '(MCS)' UseStoredDirs = False FileSpec = '*.*' OnActivate = ZipTV1Activate OnDeactivate = ZipTV1Deactivate OnProgress = UnZIP1Progress OnGetPassword = UnZIP1GetPassword OnEnd = UnZIP1End OnFileExists = UnZIP1FileExists OnError = ZipTV1Error Left = 452 Top = 208 end object BlakHole1: TBlakHole About = '(MCS)' DefaultDir = 'C:\' DefaultExt = 'BH' RecurseDirs = False StoreDirs = False Switch = swAdd OnEnd = BlakHole1End OnProgress = UnZIP1Progress Left = 12 Top = 56 end end