CodeForge.com

Unit1.pas in pedump192(2).zip

			
//   
//      -'`"_         -'`" \
//     /     \       /      "
//    /     /\\__   /  ___   \    ADDRESS:
//   |      | \  -"`.-(   \   |     143 mailbox XI'AN Science and Technology University
//   |      |  |     | \"  |  |   ZIP CODE:
//   |     /  /  "-"  \  \    |     710054
//    \___/  /  (o o)  \  (__/    NAME:
//         __| _     _ |__          ZHONG WAN
//        (      ( )      )       EMAIL: 
//         \_\.-.___.-./_/          mantousoft@sina.com
//           __  | |  __          HOMEPAGE: 
//          |  \.| |./  |           http://www.delphibox.com
//          | '#.   .#' |         OICQ:
//          |__/ '"" \__|           6036742
//        -/             \-
//

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Grids, ComCtrls, Buttons, ExtCtrls, Menus, ShellAPI, jpeg,
  ShlObj, ActiveX, ComObj ;

type
  TForm1 = class(TForm)
    OpenDialog1: TOpenDialog;
    Panel1: TPanel;
    StatusBar1: TStatusBar;
    btn_DumpFile: TBitBtn;
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    TabSheet2: TTabSheet;
    TabSheet3: TTabSheet;
    TabSheet4: TTabSheet;
    TabSheet5: TTabSheet;
    TabSheet6: TTabSheet;
    Edit_FileName: TEdit;
    Panel_Header: TPanel;
    Panel_OptionalHeader: TPanel;
    lv_Directory: TListView;
    Panel6: TPanel;
    TreeView1: TTreeView;
    StaticText_1: TStaticText;
    StaticText_2: TStaticText;
    StaticText_3: TStaticText;
    StaticText_4: TStaticText;
    StaticText_5: TStaticText;
    Bevel1: TBevel;
    Bevel2: TBevel;
    StaticText_6: TStaticText;
    StaticText_7: TStaticText;
    StaticText_8: TStaticText;
    Bevel4: TBevel;
    Edit_1: TEdit;
    Edit_2: TEdit;
    Edit_3: TEdit;
    Edit_4: TEdit;
    Edit_5: TEdit;
    Edit_6: TEdit;
    Edit_7: TEdit;
    Edit_8: TEdit;
    GroupBox1: TGroupBox;
    StaticText_9: TStaticText;
    Edit_9: TEdit;
    Bevel6: TBevel;
    StaticText10: TStaticText;
    cb_file_1:			

			...
			...
			... to be continued.

  This is a preview. To get the complete source file, 
  please click here to download the whole source code package.