object MainForm: TMainForm Left = 261 Top = 36 BorderIcons = [] BorderStyle = bsNone Caption = 'MainForm' ClientHeight = 806 ClientWidth = 456 Color = clHighlightText Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = True OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object FileList1: TODFileList Left = 5 Top = 32 Width = 444 Height = 113 OnDblClick = FileList1DblClick ReadOnly = True Items.Data = { 220400002500000004000000FFFFFFFFFFFFFFFF01000000000000000434444F 530004000000FFFFFFFFFFFFFFFF0100000000000000084163726F6261743300 04000000FFFFFFFFFFFFFFFF010000000000000004415350490004000000FFFF FFFFFFFFFFFF0100000000000000036174690004000000FFFFFFFFFFFFFFFF01 00000000000000064241434B55500004000000FFFFFFFFFFFFFFFF0100000000 0000000842436865636B65720004000000FFFFFFFFFFFFFFFF01000000000000 0007426F726C616E640004000000FFFFFFFFFFFFFFFF01000000000000000344 4C410004000000FFFFFFFFFFFFFFFF010000000000000003444F530004000000 FFFFFFFFFFFFFFFF0100000000000000034452560004000000FFFFFFFFFFFFFF FF0100000000000000086C697465737465700004000000FFFFFFFFFFFFFFFF01 00000000000000084C4F4749544543480004000000FFFFFFFFFFFFFFFF010000 00000000000B4D6963726F616E67656C6F0004000000FFFFFFFFFFFFFFFF0100 000000000000054D4F5649450004000000FFFFFFFFFFFFFFFF01000000000000 00054D534445560004000000FFFFFFFFFFFFFFFF0100000000000000074D7369 6E7075740004000000FFFFFFFFFFFFFFFF01000000000000000C4D7920446F63 756D656E74730004000000FFFFFFFFFFFFFFFF0100000000000000024E430004 000000FFFFFFFFFFFFFFFF0100000000000000024E550004000000FFFFFFFFFF FFFFFF0100000000000000064E574C4954450004000000FFFFFFFFFFFFFFFF01 00000000000000074F50454E444F530004000000FFFFFFFFFFFFFFFF01000000 000000000D50726F6772616D2046696C65730004000000FFFFFFFFFFFFFFFF01 000000000000000451454D4D0004000000FFFFFFFFFFFFFFFF01000000000000 00045265616C0004000000FFFFFFFFFFFFFFFF01000000000000000253430004 000000FFFFFFFFFFFFFFFF0100000000000000075343414E4E45520004000000 FFFFFFFFFFFFFFFF010000000000000008736572656E6164650004000000FFFF FFFFFFFFFFFF01000000000000000853594D414E5445430004000000FFFFFFFF FFFFFFFF01000000000000000753594D42494F530004000000FFFFFFFFFFFFFF FF01000000000000000654656C6E65740004000000FFFFFFFFFFFFFFFF010000 00000000000454454D500004000000FFFFFFFFFFFFFFFF010000000000000003 544D500004000000FFFFFFFFFFFFFFFF010000000000000007554C5452413938 0004000000FFFFFFFFFFFFFFFF010000000000000008554C545241504E500004 000000FFFFFFFFFFFFFFFF010000000000000008554C54524157494E00040000 00FFFFFFFFFFFFFFFF01000000000000000757494E444F5753000A000000FFFF FFFFFFFFFFFF0100000000000000086C6F676F2E626D700A2020202031323930 3738} OnChange = FileList1Change OnMouseDown = FileList1MouseDown OnMouseMove = FileList1MouseMove ShowColumnHeaders = False TabOrder = 0 ViewStyle = vsReport OnKeyPress = FormKeyPress AcceptFiles = False Directory = 'c:\' FileTypes = [ftArchive, ftReadonly] DisplayParentDir = False Mask = '*.bmp;*.exe;*.jpg;*.zip' ViewColumns = [fiName] OnCustomDraw = FileList1CustomDraw OnDrawItem = FileList1DrawItem end object MediaPlayer1: TMediaPlayer Left = 368 Top = 0 Width = 85 Height = 25 EnabledButtons = [btPlay, btPause, btStop] VisibleButtons = [btPlay, btPause, btStop] Visible = False TabOrder = 1 end object Panel1: TPanel Left = 6 Top = 148 Width = 443 Height = 650 BevelOuter = bvNone TabOrder = 2 object Memo1: TMemo Left = 248 Top = 224 Width = 185 Height = 89 Lines.Strings = ( 'Memo1') TabOrder = 0 Visible = False end object Panel2: TPanel Left = 0 Top = 0 Width = 443 Height = 650 Align = alClient BevelOuter = bvNone TabOrder = 1 object PadImage: TImage Left = 0 Top = 0 Width = 441 Height = 189 Stretch = True OnDblClick = PadImageDblClick end object Label1: TLabel Left = 0 Top = 13 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label2: TLabel Left = 0 Top = 26 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label3: TLabel Left = 0 Top = 39 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label4: TLabel Left = 0 Top = 52 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label5: TLabel Left = 0 Top = 65 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label6: TLabel Left = 0 Top = 78 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label7: TLabel Left = 0 Top = 91 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label8: TLabel Left = 0 Top = 104 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label9: TLabel Left = 0 Top = 117 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label10: TLabel Left = 0 Top = 130 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label11: TLabel Left = 0 Top = 143 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label12: TLabel Left = 0 Top = 156 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label13: TLabel Left = 0 Top = 169 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label14: TLabel Left = 0 Top = 182 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label15: TLabel Left = 0 Top = 195 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label16: TLabel Left = 0 Top = 208 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label17: TLabel Left = 0 Top = 221 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label18: TLabel Left = 0 Top = 234 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label19: TLabel Left = 0 Top = 247 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label20: TLabel Left = 0 Top = 260 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label21: TLabel Left = 0 Top = 273 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label22: TLabel Left = 0 Top = 286 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label23: TLabel Left = 0 Top = 299 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label24: TLabel Left = 0 Top = 312 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label25: TLabel Left = 0 Top = 325 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label26: TLabel Left = 0 Top = 338 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label27: TLabel Left = 0 Top = 351 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label28: TLabel Left = 0 Top = 364 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label29: TLabel Left = 0 Top = 377 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label30: TLabel Left = 0 Top = 390 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label31: TLabel Left = 0 Top = 403 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label32: TLabel Left = 0 Top = 416 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label33: TLabel Left = 0 Top = 429 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label34: TLabel Left = 0 Top = 442 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label35: TLabel Left = 0 Top = 455 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label36: TLabel Left = 0 Top = 468 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label37: TLabel Left = 0 Top = 481 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label38: TLabel Left = 0 Top = 494 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label39: TLabel Left = 0 Top = 507 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label40: TLabel Left = 0 Top = 520 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label41: TLabel Left = 0 Top = 533 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label42: TLabel Left = 0 Top = 546 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label43: TLabel Left = 0 Top = 559 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label44: TLabel Left = 0 Top = 572 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label45: TLabel Left = 0 Top = 585 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label46: TLabel Left = 0 Top = 598 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label47: TLabel Left = 0 Top = 611 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label48: TLabel Left = 0 Top = 624 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label49: TLabel Left = 0 Top = 637 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True end object Label0: TLabel Left = 0 Top = 0 Width = 443 Height = 13 Align = alTop AutoSize = False Transparent = True OnDblClick = Label0DblClick end end object ScrollBar1: TScrollBar Left = 427 Top = 0 Width = 16 Height = 650 Kind = sbVertical PageSize = 0 TabOrder = 2 Visible = False OnChange = ScrollBar1Change end end object ChiefUnzip1: TChiefUnzip ZipFileName = #0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 + #0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 TargetDirectory = #0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 + #0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 FilesToExtract = '*.*'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 + #0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 DontRecurse = False end object SaveDialog1: TSaveDialog Options = [ofOverwritePrompt, ofHideReadOnly, ofExtensionDifferent, ofPathMustExist] Title = 'Copier...' Left = 28 end object PopupMenu1: TPopupMenu Left = 84 object Etirerlimage1: TMenuItem Caption = '&Etirer l'#39'image' Checked = True RadioItem = True OnClick = Etirerlimage1Click end object Taillenormale1: TMenuItem Caption = '&Taille normale' RadioItem = True OnClick = Taillenormale1Click end object N1: TMenuItem Caption = '-' end object Mettreenpapierpeint1: TMenuItem Caption = '&Mettre en papier peint' GroupIndex = 1 OnClick = Mettreenpapierpeint1Click end end object ImageList1: TImageList Left = 112 end object DropFileSource1: TDropFileSource Dragtypes = [dtCopy] ImageIndex = 0 ShowImage = False ImageHotSpotX = 16 ImageHotSpotY = 16 Left = 140 end object CopyFile1: TCopyFile Filter = '*.*' Progress = True ShowFileNames = False Movefile = False TransferTimeDate = True Left = 56 end object BrowseFolder1: TBrowseFolder Title = 'Unziper vers :' Flags = [bfFileSysDirsOnly, bfStatusText] ShowPathInStatusArea = True CustomButtonVisible = True CustomButtonEnabled = False CustomButtonCaption = 'Nouveau' SyncCustomButton = True OnCustomButtonClick = BrowseFolder1CustomButtonClick Left = 168 end end