unit U_SelExportField;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TfrmSelExportField=class(TForm)
    Button1: TButton;
    Button2: TButton;
    ExportDataSource: TDataSource;
    ExpGrid: TcxGridDBTableView;
    cxGrid1Level1: TcxGridLevel;
    cxGrid1: TcxGrid;
    Panel2: TScrollBox;
    Label4: TLabel;
    CheckBox1: TCheckBox;
    CheckBox2: TCheckBox;
    procedure Button1Click(Sender : TObject);
    procedure FormClose(Sender : TObject);
    procedure FormDestroy(Sender : TObject);
    procedure FormShow(Sender : TObject);
    procedure Button2Click(Sender : TObject);
    procedure CheckBox1Click(Sender : TObject);
    procedure CheckBox2Click(Sender : TObject);
    procedure _PROC_007B3B2C(Sender : TObject);
    procedure _PROC_007B3C08(Sender : TObject);
    procedure _PROC_007B3D08(Sender : TObject);
    procedure _PROC_007B3E29(Sender : TObject);
    procedure _PROC_007B3F1D(Sender : TObject);
    procedure _PROC_007B405D(Sender : TObject);
    procedure _PROC_007B42C9(Sender : TObject);
    procedure _PROC_007B42F8(Sender : TObject);
    procedure _PROC_007B4300(Sender : TObject);
    procedure _PROC_007B4330(Sender : TObject);
    procedure _PROC_007B4338(Sender : TObject);
    procedure _PROC_007B4368(Sender : TObject);
    procedure _PROC_007B4370(Sender : TObject);
    procedure _PROC_007B43A0(Sender : TObject);
    procedure _PROC_007B43A8(Sender : TObject);
    procedure _PROC_007B46E5(Sender : TObject);
    procedure _PROC_007B4989(Sender : TObject);
    procedure _PROC_007B4ADD(Sender : TObject);
    procedure _PROC_007B4BD1(Sender : TObject);
    procedure _PROC_007B4D25(Sender : TObject);
    procedure _PROC_007B581D(Sender : TObject);
    procedure _PROC_007B60B1(Sender : TObject);
    procedure _PROC_007B6CC9(Sender : TObject);
    procedure _PROC_007B6D90(Sender : TObject);
    procedure _PROC_007B6E91(Sender : TObject);
    procedure _PROC_007B7019(Sender : TObject);
    procedure _PROC_007B7249(Sender : TObject);
    procedure _PROC_007B7365(Sender : TObject);
    procedure _PROC_007B752C(Sender : TObject);
    procedure _PROC_007B7708(Sender : TObject);
    procedure _PROC_007B79A5(Sender : TObject);
    procedure _PROC_007B7AA5(Sender : TObject);
    procedure _PROC_007B7BA1(Sender : TObject);
    procedure _PROC_007B7CBD(Sender : TObject);
    procedure _PROC_007B7DD9(Sender : TObject);
    procedure _PROC_007B8045(Sender : TObject);
    procedure _PROC_007B8231(Sender : TObject);
    procedure _PROC_007B84A4(Sender : TObject);
    procedure _PROC_007B87F1(Sender : TObject);
    procedure _PROC_007B8874(Sender : TObject);
    procedure _PROC_007B887C(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  frmSelExportField: TfrmSelExportField;

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

implementation

{$R *.DFM}

procedure TfrmSelExportField.Button1Click(Sender : TObject);
begin
(*
007B3AC4   53                     push    ebx
007B3AC5   8BD8                   mov     ebx, eax
007B3AC7   8BC3                   mov     eax, ebx

* Reference to : TfrmSelExportField._PROC_007B3C08()
|
007B3AC9   E83A010000             call    007B3C08
007B3ACE   8BC3                   mov     eax, ebx

|
007B3AD0   E853030000             call    007B3E28

* Reference to field TfrmSelExportField.OFFS_0324
|
007B3AD5   8B9324030000           mov     edx, [ebx+$0324]
007B3ADB   8BC3                   mov     eax, ebx

|
007B3ADD   E87A050000             call    007B405C
007B3AE2   3C01                   cmp     al, $01
007B3AE4   750B                   jnz     007B3AF1

* Reference to field TfrmSelExportField.OFFS_0324
|
007B3AE6   8B8324030000           mov     eax, [ebx+$0324]

* Reference to: Grids.TInplaceEdit.Visible(TInplaceEdit):Boolean;
|           or: SysUtils.DeleteFile(AnsiString):Boolean;
|           or: SysUtils.SetCurrentDir(AnsiString):Boolean;
|           or: SysUtils.RemoveDir(AnsiString):Boolean;
|
007B3AEC   E85B7CC5FF             call    0040B74C

* Reference to field TfrmSelExportField.OFFS_0324
|
007B3AF1   8B9324030000           mov     edx, [ebx+$0324]
007B3AF7   8BC3                   mov     eax, ebx

|
007B3AF9   E81E040000             call    007B3F1C
007B3AFE   5B                     pop     ebx
007B3AFF   C3                     ret

*)
end;

procedure TfrmSelExportField.FormClose(Sender : TObject);
begin
(*
007B3B00   C60102                 mov     byte ptr [ecx], $02
007B3B03   C3                     ret

*)
end;

procedure TfrmSelExportField.FormDestroy(Sender : TObject);
begin
(*
007B3B04   33C0                   xor     eax, eax

* Reference to GlobalVar_00893BD8
|
007B3B06   A3D83B8900             mov     dword ptr [$00893BD8], eax
007B3B0B   C3                     ret

*)
end;

procedure TfrmSelExportField.FormShow(Sender : TObject);
begin
(*
007B3B0C   53                     push    ebx
007B3B0D   8BD8                   mov     ebx, eax
007B3B0F   8BC3                   mov     eax, ebx

|
007B3B11   E842FEFFFF             call    007B3958

* Reference to field TfrmSelExportField.OFFS_0324
|
007B3B16   8B9324030000           mov     edx, [ebx+$0324]
007B3B1C   8BC3                   mov     eax, ebx

* Reference to : TfrmSelExportField._PROC_007B3D08()
|
007B3B1E   E8E5010000             call    007B3D08
007B3B23   8BC3                   mov     eax, ebx

* Reference to : TfrmSelExportField._PROC_007B3B2C()
|
007B3B25   E802000000             call    007B3B2C
007B3B2A   5B                     pop     ebx
007B3B2B   C3                     ret

*)
end;

procedure TfrmSelExportField.Button2Click(Sender : TObject);
begin
(*

* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
007B3D00   E89322CFFF             call    004A5F98
007B3D05   C3                     ret

*)
end;

procedure TfrmSelExportField.CheckBox1Click(Sender : TObject);
begin
(*
007B4128   53                     push    ebx
007B4129   56                     push    esi
007B412A   57                     push    edi
007B412B   8BD8                   mov     ebx, eax

* Reference to control TfrmSelExportField.CheckBox1 : TCheckBox
|
007B412D   8B8318030000           mov     eax, [ebx+$0318]
007B4133   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B4135   FF92C8000000           call    dword ptr [edx+$00C8]
007B413B   84C0                   test    al, al
007B413D   0F8488000000           jz      007B41CB

* Reference to control TfrmSelExportField.CheckBox2 : TCheckBox
|
007B4143   8B831C030000           mov     eax, [ebx+$031C]
007B4149   33D2                   xor     edx, edx
007B414B   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetChecked(Boolean)
|
007B414D   FF91CC000000           call    dword ptr [ecx+$00CC]

* Reference to control TfrmSelExportField.Panel2 : TScrollBox
|
007B4153   8BBB10030000           mov     edi, [ebx+$0310]
007B4159   8BF7                   mov     esi, edi
007B415B   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B415D   E84E7BCDFF             call    0048BCB0
007B4162   48                     dec     eax
007B4163   85C0                   test    eax, eax
007B4165   7C64                   jl      007B41CB
007B4167   40                     inc     eax
007B4168   89C7                   mov     edi, eax
007B416A   33DB                   xor     ebx, ebx
007B416C   8BD3                   mov     edx, ebx
007B416E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4170   E8FF7ACDFF             call    0048BC74

* Reference to class TCheckBox
|
007B4175   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B417B   E86403C5FF             call    004044E4
007B4180   84C0                   test    al, al
007B4182   7443                   jz      007B41C7
007B4184   8BD3                   mov     edx, ebx
007B4186   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4188   E8E77ACDFF             call    0048BC74

* Reference to field TScrollBox.Name : TComponentName
|
007B418D   8B4008                 mov     eax, [eax+$08]

* Possible String Reference to: 'CheckBox1'
|
007B4190   BAD8417B00             mov     edx, $007B41D8

* Reference to: System.@LStrCmp;
|
007B4195   E8A615C5FF             call    00405740
007B419A   742B                   jz      007B41C7
007B419C   8BD3                   mov     edx, ebx
007B419E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B41A0   E8CF7ACDFF             call    0048BC74

* Reference to field TScrollBox.Name : TComponentName
|
007B41A5   8B4008                 mov     eax, [eax+$08]

* Possible String Reference to: 'CheckBox2'
|
007B41A8   BAEC417B00             mov     edx, $007B41EC

* Reference to: System.@LStrCmp;
|
007B41AD   E88E15C5FF             call    00405740
007B41B2   7413                   jz      007B41C7
007B41B4   8BD3                   mov     edx, ebx
007B41B6   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B41B8   E8B77ACDFF             call    0048BC74
007B41BD   B201                   mov     dl, $01
007B41BF   8B08                   mov     ecx, [eax]

* Reference to method TScrollBox.AutoScrollInView(TControl)
|
007B41C1   FF91CC000000           call    dword ptr [ecx+$00CC]
007B41C7   43                     inc     ebx
007B41C8   4F                     dec     edi
007B41C9   75A1                   jnz     007B416C
007B41CB   5F                     pop     edi
007B41CC   5E                     pop     esi
007B41CD   5B                     pop     ebx
007B41CE   C3                     ret

*)
end;

procedure TfrmSelExportField.CheckBox2Click(Sender : TObject);
begin
(*
007B41F8   53                     push    ebx
007B41F9   56                     push    esi
007B41FA   57                     push    edi
007B41FB   8BD8                   mov     ebx, eax

* Reference to control TfrmSelExportField.CheckBox2 : TCheckBox
|
007B41FD   8B831C030000           mov     eax, [ebx+$031C]
007B4203   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B4205   FF92C8000000           call    dword ptr [edx+$00C8]
007B420B   84C0                   test    al, al
007B420D   0F8488000000           jz      007B429B

* Reference to control TfrmSelExportField.CheckBox1 : TCheckBox
|
007B4213   8B8318030000           mov     eax, [ebx+$0318]
007B4219   33D2                   xor     edx, edx
007B421B   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetChecked(Boolean)
|
007B421D   FF91CC000000           call    dword ptr [ecx+$00CC]

* Reference to control TfrmSelExportField.Panel2 : TScrollBox
|
007B4223   8BBB10030000           mov     edi, [ebx+$0310]
007B4229   8BF7                   mov     esi, edi
007B422B   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B422D   E87E7ACDFF             call    0048BCB0
007B4232   48                     dec     eax
007B4233   85C0                   test    eax, eax
007B4235   7C64                   jl      007B429B
007B4237   40                     inc     eax
007B4238   89C7                   mov     edi, eax
007B423A   33DB                   xor     ebx, ebx
007B423C   8BD3                   mov     edx, ebx
007B423E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4240   E82F7ACDFF             call    0048BC74

* Reference to class TCheckBox
|
007B4245   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B424B   E89402C5FF             call    004044E4
007B4250   84C0                   test    al, al
007B4252   7443                   jz      007B4297
007B4254   8BD3                   mov     edx, ebx
007B4256   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4258   E8177ACDFF             call    0048BC74

* Reference to field TScrollBox.Name : TComponentName
|
007B425D   8B4008                 mov     eax, [eax+$08]

* Possible String Reference to: 'CheckBox1'
|
007B4260   BAA8427B00             mov     edx, $007B42A8

* Reference to: System.@LStrCmp;
|
007B4265   E8D614C5FF             call    00405740
007B426A   742B                   jz      007B4297
007B426C   8BD3                   mov     edx, ebx
007B426E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4270   E8FF79CDFF             call    0048BC74

* Reference to field TScrollBox.Name : TComponentName
|
007B4275   8B4008                 mov     eax, [eax+$08]

* Possible String Reference to: 'CheckBox2'
|
007B4278   BABC427B00             mov     edx, $007B42BC

* Reference to: System.@LStrCmp;
|
007B427D   E8BE14C5FF             call    00405740
007B4282   7413                   jz      007B4297
007B4284   8BD3                   mov     edx, ebx
007B4286   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B4288   E8E779CDFF             call    0048BC74
007B428D   33D2                   xor     edx, edx
007B428F   8B08                   mov     ecx, [eax]

* Reference to method TScrollBox.AutoScrollInView(TControl)
|
007B4291   FF91CC000000           call    dword ptr [ecx+$00CC]
007B4297   43                     inc     ebx
007B4298   4F                     dec     edi
007B4299   75A1                   jnz     007B423C
007B429B   5F                     pop     edi
007B429C   5E                     pop     esi
007B429D   5B                     pop     ebx
007B429E   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B3B2C(Sender : TObject);
begin
(*
007B3B2C   55                     push    ebp
007B3B2D   8BEC                   mov     ebp, esp
007B3B2F   6A00                   push    $00
007B3B31   6A00                   push    $00
007B3B33   6A00                   push    $00
007B3B35   53                     push    ebx
007B3B36   56                     push    esi
007B3B37   57                     push    edi
007B3B38   8945FC                 mov     [ebp-$04], eax
007B3B3B   33C0                   xor     eax, eax
007B3B3D   55                     push    ebp
007B3B3E   68F83B7B00             push    $007B3BF8

***** TRY
|
007B3B43   64FF30                 push    dword ptr fs:[eax]
007B3B46   648920                 mov     fs:[eax], esp
007B3B49   8B45FC                 mov     eax, [ebp-$04]

* Reference to control TfrmSelExportField.Panel2 : TScrollBox
|
007B3B4C   8B9810030000           mov     ebx, [eax+$0310]
007B3B52   8BFB                   mov     edi, ebx
007B3B54   8BC3                   mov     eax, ebx

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B3B56   E85581CDFF             call    0048BCB0
007B3B5B   8BF0                   mov     esi, eax
007B3B5D   4E                     dec     esi
007B3B5E   85F6                   test    esi, esi
007B3B60   7C78                   jl      007B3BDA
007B3B62   46                     inc     esi
007B3B63   33DB                   xor     ebx, ebx
007B3B65   8BD3                   mov     edx, ebx
007B3B67   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3B69   E80681CDFF             call    0048BC74

* Reference to class TCheckBox
|
007B3B6E   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B3B74   E86B09C5FF             call    004044E4
007B3B79   84C0                   test    al, al
007B3B7B   7459                   jz      007B3BD6
007B3B7D   8BD3                   mov     edx, ebx
007B3B7F   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3B81   E8EE80CDFF             call    0048BC74
007B3B86   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B3B89   E8624ACDFF             call    004885F0
007B3B8E   8B45F4                 mov     eax, [ebp-$0C]
007B3B91   8D55F8                 lea     edx, [ebp-$08]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B3B94   E8536DC5FF             call    0040A8EC
007B3B99   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TfrmSelExportField.OFFS_0320
|
007B3B9C   8B9020030000           mov     edx, [eax+$0320]
007B3BA2   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrPos;
|
007B3BA5   E88E1DC5FF             call    00405938
007B3BAA   85C0                   test    eax, eax
007B3BAC   7E15                   jle     007B3BC3
007B3BAE   8BD3                   mov     edx, ebx
007B3BB0   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3BB2   E8BD80CDFF             call    0048BC74
007B3BB7   B201                   mov     dl, $01
007B3BB9   8B08                   mov     ecx, [eax]

* Reference to method TScrollBox.AutoScrollInView(TControl)
|
007B3BBB   FF91CC000000           call    dword ptr [ecx+$00CC]
007B3BC1   EB13                   jmp     007B3BD6
007B3BC3   8BD3                   mov     edx, ebx
007B3BC5   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3BC7   E8A880CDFF             call    0048BC74
007B3BCC   33D2                   xor     edx, edx
007B3BCE   8B08                   mov     ecx, [eax]

* Reference to method TScrollBox.AutoScrollInView(TControl)
|
007B3BD0   FF91CC000000           call    dword ptr [ecx+$00CC]
007B3BD6   43                     inc     ebx
007B3BD7   4E                     dec     esi
007B3BD8   758B                   jnz     007B3B65
007B3BDA   33C0                   xor     eax, eax
007B3BDC   5A                     pop     edx
007B3BDD   59                     pop     ecx
007B3BDE   59                     pop     ecx
007B3BDF   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã‹ÀU‹ìƒÄøSVW3Ò‰Uø‰Eü3ÀUhð<{'
|
007B3BE2   68FF3B7B00             push    $007B3BFF
007B3BE7   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: System.@LStrClr(void;void);
|
007B3BEA   E83517C5FF             call    00405324
007B3BEF   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B3BF2   E82D17C5FF             call    00405324
007B3BF7   C3                     ret


* Reference to: System.@HandleFinally;
|
007B3BF8   E9F70EC5FF             jmp     00404AF4
007B3BFD   EBE8                   jmp     007B3BE7

****** END
|
007B3BFF   5F                     pop     edi
007B3C00   5E                     pop     esi
007B3C01   5B                     pop     ebx
007B3C02   8BE5                   mov     esp, ebp
007B3C04   5D                     pop     ebp
007B3C05   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B3C08(Sender : TObject);
begin
(*
007B3C08   55                     push    ebp
007B3C09   8BEC                   mov     ebp, esp
007B3C0B   83C4F8                 add     esp, -$08
007B3C0E   53                     push    ebx
007B3C0F   56                     push    esi
007B3C10   57                     push    edi
007B3C11   33D2                   xor     edx, edx
007B3C13   8955F8                 mov     [ebp-$08], edx
007B3C16   8945FC                 mov     [ebp-$04], eax
007B3C19   33C0                   xor     eax, eax
007B3C1B   55                     push    ebp
007B3C1C   68F03C7B00             push    $007B3CF0

***** TRY
|
007B3C21   64FF30                 push    dword ptr fs:[eax]
007B3C24   648920                 mov     fs:[eax], esp
007B3C27   8B45FC                 mov     eax, [ebp-$04]

* Reference to control TfrmSelExportField.Panel2 : TScrollBox
|
007B3C2A   8B9810030000           mov     ebx, [eax+$0310]
007B3C30   8BFB                   mov     edi, ebx
007B3C32   8BC3                   mov     eax, ebx

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B3C34   E87780CDFF             call    0048BCB0
007B3C39   8BF0                   mov     esi, eax
007B3C3B   4E                     dec     esi
007B3C3C   85F6                   test    esi, esi
007B3C3E   7C78                   jl      007B3CB8
007B3C40   46                     inc     esi
007B3C41   33DB                   xor     ebx, ebx
007B3C43   8BD3                   mov     edx, ebx
007B3C45   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3C47   E82880CDFF             call    0048BC74

* Reference to class TCheckBox
|
007B3C4C   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B3C52   E88D08C5FF             call    004044E4
007B3C57   84C0                   test    al, al
007B3C59   7459                   jz      007B3CB4
007B3C5B   8BD3                   mov     edx, ebx
007B3C5D   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3C5F   E81080CDFF             call    0048BC74
007B3C64   8B10                   mov     edx, [eax]

* Reference to method TScrollBox.AutoScrollEnabled()
|
007B3C66   FF92C8000000           call    dword ptr [edx+$00C8]
007B3C6C   3C01                   cmp     al, $01
007B3C6E   7523                   jnz     007B3C93
007B3C70   8BD3                   mov     edx, ebx
007B3C72   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3C74   E8FB7FCDFF             call    0048BC74

* Reference to field TScrollBox.Tag : Longint
|
007B3C79   8B500C                 mov     edx, [eax+$0C]
007B3C7C   8B45FC                 mov     eax, [ebp-$04]

* Reference to control TfrmSelExportField.ExpGrid : TcxGridDBTableView
|
007B3C7F   8B8004030000           mov     eax, [eax+$0304]

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B3C85   E8467DEBFF             call    0066B9D0
007B3C8A   B201                   mov     dl, $01

* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
007B3C8C   E8335FE7FF             call    00629BC4
007B3C91   EB21                   jmp     007B3CB4
007B3C93   8BD3                   mov     edx, ebx
007B3C95   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3C97   E8D87FCDFF             call    0048BC74

* Reference to field TScrollBox.Tag : Longint
|
007B3C9C   8B500C                 mov     edx, [eax+$0C]
007B3C9F   8B45FC                 mov     eax, [ebp-$04]

* Reference to control TfrmSelExportField.ExpGrid : TcxGridDBTableView
|
007B3CA2   8B8004030000           mov     eax, [eax+$0304]

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B3CA8   E8237DEBFF             call    0066B9D0
007B3CAD   33D2                   xor     edx, edx

* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
007B3CAF   E8105FE7FF             call    00629BC4
007B3CB4   43                     inc     ebx
007B3CB5   4E                     dec     esi
007B3CB6   758B                   jnz     007B3C43
007B3CB8   8D55F8                 lea     edx, [ebp-$08]
007B3CBB   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TfrmSelExportField.OFFS_0324
|
007B3CBE   8B8024030000           mov     eax, [eax+$0324]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B3CC4   E8236CC5FF             call    0040A8EC
007B3CC9   8B45F8                 mov     eax, [ebp-$08]
007B3CCC   8B55FC                 mov     edx, [ebp-$04]

* Reference to control TfrmSelExportField.cxGrid1 : TcxGrid
|
007B3CCF   8B920C030000           mov     edx, [edx+$030C]

|
007B3CD5   E86A430000             call    007B8044
007B3CDA   33C0                   xor     eax, eax
007B3CDC   5A                     pop     edx
007B3CDD   59                     pop     ecx
007B3CDE   59                     pop     ecx
007B3CDF   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B3CE2   68F73C7B00             push    $007B3CF7
007B3CE7   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B3CEA   E83516C5FF             call    00405324
007B3CEF   C3                     ret


* Reference to: System.@HandleFinally;
|
007B3CF0   E9FF0DC5FF             jmp     00404AF4
007B3CF5   EBF0                   jmp     007B3CE7

****** END
|
007B3CF7   5F                     pop     edi
007B3CF8   5E                     pop     esi
007B3CF9   5B                     pop     ebx
007B3CFA   59                     pop     ecx
007B3CFB   59                     pop     ecx
007B3CFC   5D                     pop     ebp
007B3CFD   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B3D08(Sender : TObject);
begin
(*
007B3D08   55                     push    ebp
007B3D09   8BEC                   mov     ebp, esp
007B3D0B   33C9                   xor     ecx, ecx
007B3D0D   51                     push    ecx
007B3D0E   51                     push    ecx
007B3D0F   51                     push    ecx
007B3D10   51                     push    ecx
007B3D11   51                     push    ecx
007B3D12   51                     push    ecx
007B3D13   53                     push    ebx
007B3D14   56                     push    esi
007B3D15   57                     push    edi
007B3D16   8955FC                 mov     [ebp-$04], edx
007B3D19   8BF0                   mov     esi, eax
007B3D1B   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B3D1E   E8C11AC5FF             call    004057E4
007B3D23   33C0                   xor     eax, eax
007B3D25   55                     push    ebp
007B3D26   68CA3D7B00             push    $007B3DCA

***** TRY
|
007B3D2B   64FF30                 push    dword ptr fs:[eax]
007B3D2E   648920                 mov     fs:[eax], esp
007B3D31   8D55F0                 lea     edx, [ebp-$10]
*)
end;

procedure TfrmSelExportField._PROC_007B3E29(Sender : TObject);
begin
(*
007B3E29   8BEC                   mov     ebp, esp
007B3E2B   83C4F8                 add     esp, -$08
007B3E2E   53                     push    ebx
007B3E2F   56                     push    esi
007B3E30   57                     push    edi
007B3E31   33D2                   xor     edx, edx
007B3E33   8955F8                 mov     [ebp-$08], edx
007B3E36   8945FC                 mov     [ebp-$04], eax
007B3E39   33C0                   xor     eax, eax
007B3E3B   55                     push    ebp
007B3E3C   68F03E7B00             push    $007B3EF0

***** TRY
|
007B3E41   64FF30                 push    dword ptr fs:[eax]
007B3E44   648920                 mov     fs:[eax], esp
007B3E47   8B45FC                 mov     eax, [ebp-$04]
007B3E4A   0520030000             add     eax, +$00000320

* Possible String Reference to: 'Begin'
|
007B3E4F   BA083F7B00             mov     edx, $007B3F08

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B3E54   E81F15C5FF             call    00405378
007B3E59   8B45FC                 mov     eax, [ebp-$04]

* Reference to control TfrmSelExportField.Panel2 : TScrollBox
|
007B3E5C   8B9810030000           mov     ebx, [eax+$0310]
007B3E62   8BFB                   mov     edi, ebx
007B3E64   8BC3                   mov     eax, ebx

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B3E66   E8457ECDFF             call    0048BCB0
007B3E6B   8BF0                   mov     esi, eax
007B3E6D   4E                     dec     esi
007B3E6E   85F6                   test    esi, esi
007B3E70   7C68                   jl      007B3EDA
007B3E72   46                     inc     esi
007B3E73   33DB                   xor     ebx, ebx
007B3E75   8BD3                   mov     edx, ebx
007B3E77   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3E79   E8F67DCDFF             call    0048BC74

* Reference to class TCheckBox
|
007B3E7E   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B3E84   E85B06C5FF             call    004044E4
007B3E89   84C0                   test    al, al
007B3E8B   7449                   jz      007B3ED6
007B3E8D   8BD3                   mov     edx, ebx
007B3E8F   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3E91   E8DE7DCDFF             call    0048BC74
007B3E96   8B10                   mov     edx, [eax]

* Reference to method TScrollBox.AutoScrollEnabled()
|
007B3E98   FF92C8000000           call    dword ptr [edx+$00C8]
007B3E9E   84C0                   test    al, al
007B3EA0   7434                   jz      007B3ED6
007B3EA2   8B45FC                 mov     eax, [ebp-$04]
007B3EA5   FFB020030000           push    dword ptr [eax+$0320]
007B3EAB   68183F7B00             push    $007B3F18
007B3EB0   8BD3                   mov     edx, ebx
007B3EB2   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B3EB4   E8BB7DCDFF             call    0048BC74
007B3EB9   8D55F8                 lea     edx, [ebp-$08]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B3EBC   E82F47CDFF             call    004885F0
007B3EC1   FF75F8                 push    dword ptr [ebp-$08]
007B3EC4   8B45FC                 mov     eax, [ebp-$04]
007B3EC7   0520030000             add     eax, +$00000320
007B3ECC   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B3ED1   E8DE17C5FF             call    004056B4
007B3ED6   43                     inc     ebx
007B3ED7   4E                     dec     esi
007B3ED8   759B                   jnz     007B3E75
007B3EDA   33C0                   xor     eax, eax
007B3EDC   5A                     pop     edx
007B3EDD   59                     pop     ecx
007B3EDE   59                     pop     ecx
007B3EDF   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[YY]Ã'
|
007B3EE2   68F73E7B00             push    $007B3EF7
007B3EE7   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B3EEA   E83514C5FF             call    00405324
007B3EEF   C3                     ret


* Reference to: System.@HandleFinally;
|
007B3EF0   E9FF0BC5FF             jmp     00404AF4
007B3EF5   EBF0                   jmp     007B3EE7

****** END
|
007B3EF7   5F                     pop     edi
007B3EF8   5E                     pop     esi
007B3EF9   5B                     pop     ebx
007B3EFA   59                     pop     ecx
007B3EFB   59                     pop     ecx
007B3EFC   5D                     pop     ebp
007B3EFD   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B3F1D(Sender : TObject);
begin
(*
007B3F1D   8BEC                   mov     ebp, esp
007B3F1F   33C9                   xor     ecx, ecx
007B3F21   51                     push    ecx
007B3F22   51                     push    ecx
007B3F23   51                     push    ecx
007B3F24   51                     push    ecx
007B3F25   51                     push    ecx
007B3F26   51                     push    ecx
007B3F27   51                     push    ecx
007B3F28   53                     push    ebx
007B3F29   56                     push    esi
007B3F2A   8955FC                 mov     [ebp-$04], edx
007B3F2D   8BF0                   mov     esi, eax
007B3F2F   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B3F32   E8AD18C5FF             call    004057E4
007B3F37   33C0                   xor     eax, eax
007B3F39   55                     push    ebp

* Possible String Reference to: 'éóÅÿëë^[‹å]Ã'
|
007B3F3A   68FC3F7B00             push    $007B3FFC

***** TRY
|
007B3F3F   64FF30                 push    dword ptr fs:[eax]
007B3F42   648920                 mov     fs:[eax], esp
007B3F45   8D55F0                 lea     edx, [ebp-$10]
*)
end;

procedure TfrmSelExportField._PROC_007B405D(Sender : TObject);
begin
(*
007B405D   8BEC                   mov     ebp, esp
007B405F   33C9                   xor     ecx, ecx
007B4061   51                     push    ecx
007B4062   51                     push    ecx
007B4063   51                     push    ecx
007B4064   51                     push    ecx
007B4065   51                     push    ecx
007B4066   53                     push    ebx
007B4067   8955FC                 mov     [ebp-$04], edx
007B406A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B406D   E87217C5FF             call    004057E4
007B4072   33C0                   xor     eax, eax
007B4074   55                     push    ebp
007B4075   68EF407B00             push    $007B40EF

***** TRY
|
007B407A   64FF30                 push    dword ptr fs:[eax]
007B407D   648920                 mov     fs:[eax], esp
007B4080   8D55F0                 lea     edx, [ebp-$10]
*)
end;

procedure TfrmSelExportField._PROC_007B42C9(Sender : TObject);
begin
(*
007B42C9   8BEC                   mov     ebp, esp
007B42CB   33C0                   xor     eax, eax
007B42CD   55                     push    ebp
007B42CE   68ED427B00             push    $007B42ED

***** TRY
|
007B42D3   64FF30                 push    dword ptr fs:[eax]
007B42D6   648920                 mov     fs:[eax], esp
007B42D9   FF05DC3B8900           inc     dword ptr [$00893BDC]
007B42DF   33C0                   xor     eax, eax
007B42E1   5A                     pop     edx
007B42E2   59                     pop     ecx
007B42E3   59                     pop     ecx
007B42E4   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ã‹Àƒ-Ü;‰'
|
007B42E7   68F4427B00             push    $007B42F4
007B42EC   C3                     ret


* Reference to: System.@HandleFinally;
|
007B42ED   E90208C5FF             jmp     00404AF4
007B42F2   EBF8                   jmp     007B42EC

****** END
|
007B42F4   5D                     pop     ebp
007B42F5   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B42F8(Sender : TObject);
begin
(*
007B42F8   832DDC3B890001         sub     dword ptr [$00893BDC], +$01
007B42FF   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B4300(Sender : TObject);
begin
(*
007B4300   55                     push    ebp
007B4301   8BEC                   mov     ebp, esp
007B4303   33C0                   xor     eax, eax
007B4305   55                     push    ebp
007B4306   6825437B00             push    $007B4325

***** TRY
|
007B430B   64FF30                 push    dword ptr fs:[eax]
007B430E   648920                 mov     fs:[eax], esp
007B4311   FF05E03B8900           inc     dword ptr [$00893BE0]
007B4317   33C0                   xor     eax, eax
007B4319   5A                     pop     edx
007B431A   59                     pop     ecx
007B431B   59                     pop     ecx
007B431C   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ã‹Àƒ-à;‰'
|
007B431F   682C437B00             push    $007B432C
007B4324   C3                     ret


* Reference to: System.@HandleFinally;
|
007B4325   E9CA07C5FF             jmp     00404AF4
007B432A   EBF8                   jmp     007B4324

****** END
|
007B432C   5D                     pop     ebp
007B432D   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B4330(Sender : TObject);
begin
(*
007B4330   832DE03B890001         sub     dword ptr [$00893BE0], +$01
007B4337   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B4338(Sender : TObject);
begin
(*
007B4338   55                     push    ebp
007B4339   8BEC                   mov     ebp, esp
007B433B   33C0                   xor     eax, eax
007B433D   55                     push    ebp
007B433E   685D437B00             push    $007B435D

***** TRY
|
007B4343   64FF30                 push    dword ptr fs:[eax]
007B4346   648920                 mov     fs:[eax], esp
007B4349   FF05E43B8900           inc     dword ptr [$00893BE4]
007B434F   33C0                   xor     eax, eax
007B4351   5A                     pop     edx
007B4352   59                     pop     ecx
007B4353   59                     pop     ecx
007B4354   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ã‹Àƒ-ä;‰'
|
007B4357   6864437B00             push    $007B4364
007B435C   C3                     ret


* Reference to: System.@HandleFinally;
|
007B435D   E99207C5FF             jmp     00404AF4
007B4362   EBF8                   jmp     007B435C

****** END
|
007B4364   5D                     pop     ebp
007B4365   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B4368(Sender : TObject);
begin
(*
007B4368   832DE43B890001         sub     dword ptr [$00893BE4], +$01
007B436F   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B4370(Sender : TObject);
begin
(*
007B4370   55                     push    ebp
007B4371   8BEC                   mov     ebp, esp
007B4373   33C0                   xor     eax, eax
007B4375   55                     push    ebp
007B4376   6895437B00             push    $007B4395

***** TRY
|
007B437B   64FF30                 push    dword ptr fs:[eax]
007B437E   648920                 mov     fs:[eax], esp
007B4381   FF05E83B8900           inc     dword ptr [$00893BE8]
007B4387   33C0                   xor     eax, eax
007B4389   5A                     pop     edx
007B438A   59                     pop     ecx
007B438B   59                     pop     ecx
007B438C   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ã‹Àƒ-è;‰'
|
007B438F   689C437B00             push    $007B439C
007B4394   C3                     ret


* Reference to: System.@HandleFinally;
|
007B4395   E95A07C5FF             jmp     00404AF4
007B439A   EBF8                   jmp     007B4394

****** END
|
007B439C   5D                     pop     ebp
007B439D   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B43A0(Sender : TObject);
begin
(*
007B43A0   832DE83B890001         sub     dword ptr [$00893BE8], +$01
007B43A7   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B43A8(Sender : TObject);
begin
(*
007B43A8   55                     push    ebp
007B43A9   8BEC                   mov     ebp, esp
007B43AB   51                     push    ecx
007B43AC   B90E000000             mov     ecx, $0000000E
007B43B1   6A00                   push    $00
007B43B3   6A00                   push    $00
007B43B5   49                     dec     ecx
007B43B6   75F9                   jnz     007B43B1
007B43B8   51                     push    ecx
007B43B9   874DFC                 xchg    [ebp-$04], ecx
007B43BC   53                     push    ebx
007B43BD   56                     push    esi
007B43BE   57                     push    edi
007B43BF   894DF8                 mov     [ebp-$08], ecx
007B43C2   8BF2                   mov     esi, edx
007B43C4   8945FC                 mov     [ebp-$04], eax
007B43C7   8B450C                 mov     eax, [ebp+$0C]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B43CA   E81514C5FF             call    004057E4
007B43CF   33C0                   xor     eax, eax
007B43D1   55                     push    ebp
007B43D2   68A4467B00             push    $007B46A4

***** TRY
|
007B43D7   64FF30                 push    dword ptr fs:[eax]
007B43DA   648920                 mov     fs:[eax], esp
007B43DD   33C0                   xor     eax, eax
007B43DF   55                     push    ebp
007B43E0   681E467B00             push    $007B461E

***** TRY
|
007B43E5   64FF30                 push    dword ptr fs:[eax]
007B43E8   648920                 mov     fs:[eax], esp
007B43EB   8BC6                   mov     eax, esi

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B43ED   E8527FEAFF             call    0065C344
007B43F2   48                     dec     eax
007B43F3   85C0                   test    eax, eax
007B43F5   0F8C17020000           jl      007B4612
007B43FB   40                     inc     eax
007B43FC   8945F4                 mov     [ebp-$0C], eax
007B43FF   33DB                   xor     ebx, ebx
007B4401   8BD3                   mov     edx, ebx
007B4403   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4405   E8C675EBFF             call    0066B9D0

* Reference to : TcxCustomGridTableView._PROC_00629594()
|
007B440A   E88551E7FF             call    00629594
007B440F   3B4508                 cmp     eax, [ebp+$08]
007B4412   0F85F0010000           jnz     007B4608
007B4418   8BD3                   mov     edx, ebx
007B441A   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B441C   E8AF75EBFF             call    0066B9D0
007B4421   8B10                   mov     edx, [eax]
007B4423   FF92D0000000           call    dword ptr [edx+$00D0]
007B4429   3C01                   cmp     al, $01
007B442B   0F85D7010000           jnz     007B4608
007B4431   8BD3                   mov     edx, ebx
007B4433   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4435   E89675EBFF             call    0066B9D0
007B443A   8B801C010000           mov     eax, [eax+$011C]
007B4440   8D4DEC                 lea     ecx, [ebp-$14]
007B4443   BA01000000             mov     edx, $00000001

|
007B4448   E8A35AEAFF             call    00659EF0
007B444D   8B45EC                 mov     eax, [ebp-$14]
007B4450   8D55F0                 lea     edx, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4453   E89464C5FF             call    0040A8EC
007B4458   8B45F0                 mov     eax, [ebp-$10]
007B445B   BAC0467B00             mov     edx, $007B46C0

* Reference to: System.@LStrCmp;
|
007B4460   E8DB12C5FF             call    00405740
007B4465   0F84C9000000           jz      007B4534
007B446B   8BD3                   mov     edx, ebx
007B446D   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B446F   E85C75EBFF             call    0066B9D0

|
007B4474   E8A773EBFF             call    0066B820
007B4479   8D55E0                 lea     edx, [ebp-$20]

|
007B447C   E84769EBFF             call    0066ADC8
007B4481   8B55E0                 mov     edx, [ebp-$20]
007B4484   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4487   E82827D1FF             call    004C6BB4
007B448C   8D55E4                 lea     edx, [ebp-$1C]
007B448F   8B08                   mov     ecx, [eax]
007B4491   FF5160                 call    dword ptr [ecx+$60]
007B4494   8B45E4                 mov     eax, [ebp-$1C]
007B4497   8D55E8                 lea     edx, [ebp-$18]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B449A   E84D64C5FF             call    0040A8EC
007B449F   837DE800               cmp     dword ptr [ebp-$18], +$00
007B44A3   7459                   jz      007B44FE
007B44A5   8BD3                   mov     edx, ebx
007B44A7   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B44A9   E82275EBFF             call    0066B9D0

|
007B44AE   E86D73EBFF             call    0066B820
007B44B3   8D55CC                 lea     edx, [ebp-$34]

|
007B44B6   E80D69EBFF             call    0066ADC8
007B44BB   8B55CC                 mov     edx, [ebp-$34]
007B44BE   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B44C1   E8EE26D1FF             call    004C6BB4
007B44C6   8D55D0                 lea     edx, [ebp-$30]
007B44C9   8B08                   mov     ecx, [eax]
007B44CB   FF5164                 call    dword ptr [ecx+$64]
007B44CE   8D45D0                 lea     eax, [ebp-$30]
007B44D1   50                     push    eax
007B44D2   8BD3                   mov     edx, ebx
007B44D4   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B44D6   E8F574EBFF             call    0066B9D0

|
007B44DB   E84073EBFF             call    0066B820
007B44E0   8D55C8                 lea     edx, [ebp-$38]

|
007B44E3   E8E068EBFF             call    0066ADC8
007B44E8   8B55C8                 mov     edx, [ebp-$38]
007B44EB   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B44EE   E8C126D1FF             call    004C6BB4
007B44F3   5A                     pop     edx
007B44F4   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B44F6   FF91B4000000           call    dword ptr [ecx+$00B4]
007B44FC   EB36                   jmp     007B4534
007B44FE   8BD3                   mov     edx, ebx
007B4500   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4502   E8C974EBFF             call    0066B9D0

|
007B4507   E81473EBFF             call    0066B820
007B450C   8D55C4                 lea     edx, [ebp-$3C]

|
007B450F   E8B468EBFF             call    0066ADC8
007B4514   8B55C4                 mov     edx, [ebp-$3C]
007B4517   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B451A   E89526D1FF             call    004C6BB4
007B451F   50                     push    eax
007B4520   8D45B4                 lea     eax, [ebp-$4C]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B4523   E8388EC6FF             call    0041D360
007B4528   8D55B4                 lea     edx, [ebp-$4C]
007B452B   58                     pop     eax
007B452C   8B08                   mov     ecx, [eax]
007B452E   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4534   8BD3                   mov     edx, ebx
007B4536   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4538   E89374EBFF             call    0066B9D0
007B453D   8B801C010000           mov     eax, [eax+$011C]
007B4543   8D4DAC                 lea     ecx, [ebp-$54]
007B4546   BA02000000             mov     edx, $00000002

|
007B454B   E8A059EAFF             call    00659EF0
007B4550   8B45AC                 mov     eax, [ebp-$54]
007B4553   8D55B0                 lea     edx, [ebp-$50]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4556   E89163C5FF             call    0040A8EC
007B455B   837DB000               cmp     dword ptr [ebp-$50], +$00
007B455F   0F84A3000000           jz      007B4608
007B4565   8BD3                   mov     edx, ebx
007B4567   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4569   E86274EBFF             call    0066B9D0
007B456E   8B801C010000           mov     eax, [eax+$011C]
007B4574   8D4DA0                 lea     ecx, [ebp-$60]
007B4577   BA02000000             mov     edx, $00000002

|
007B457C   E86F59EAFF             call    00659EF0
007B4581   8B55A0                 mov     edx, [ebp-$60]
007B4584   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4587   E82826D1FF             call    004C6BB4
007B458C   8D55A4                 lea     edx, [ebp-$5C]
007B458F   8B08                   mov     ecx, [eax]
007B4591   FF5160                 call    dword ptr [ecx+$60]
007B4594   8B45A4                 mov     eax, [ebp-$5C]
007B4597   8D55A8                 lea     edx, [ebp-$58]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B459A   E84D63C5FF             call    0040A8EC
007B459F   837DA800               cmp     dword ptr [ebp-$58], +$00
007B45A3   7463                   jz      007B4608
007B45A5   8BD3                   mov     edx, ebx
007B45A7   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B45A9   E82274EBFF             call    0066B9D0
007B45AE   8B801C010000           mov     eax, [eax+$011C]
007B45B4   8D4D8C                 lea     ecx, [ebp-$74]
007B45B7   BA02000000             mov     edx, $00000002

|
007B45BC   E82F59EAFF             call    00659EF0
007B45C1   8B558C                 mov     edx, [ebp-$74]
007B45C4   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B45C7   E8E825D1FF             call    004C6BB4
007B45CC   8D5590                 lea     edx, [ebp-$70]
007B45CF   8B08                   mov     ecx, [eax]
007B45D1   FF5164                 call    dword ptr [ecx+$64]
007B45D4   8D4590                 lea     eax, [ebp-$70]
007B45D7   50                     push    eax
007B45D8   8BD3                   mov     edx, ebx
007B45DA   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B45DC   E8EF73EBFF             call    0066B9D0
007B45E1   8B801C010000           mov     eax, [eax+$011C]
007B45E7   8D4D88                 lea     ecx, [ebp-$78]
007B45EA   BA02000000             mov     edx, $00000002

|
007B45EF   E8FC58EAFF             call    00659EF0
007B45F4   8B5588                 mov     edx, [ebp-$78]
007B45F7   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B45FA   E8B525D1FF             call    004C6BB4
007B45FF   5A                     pop     edx
007B4600   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B4602   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4608   43                     inc     ebx
007B4609   FF4DF4                 dec     dword ptr [ebp-$0C]
007B460C   0F85EFFDFFFF           jnz     007B4401
007B4612   B301                   mov     bl, $01
007B4614   33C0                   xor     eax, eax
007B4616   5A                     pop     edx
007B4617   59                     pop     ecx
007B4618   59                     pop     ecx
007B4619   648910                 mov     fs:[eax], edx
007B461C   EB24                   jmp     007B4642

* Reference to: System.@HandleAnyException;
|
007B461E   E91D02C5FF             jmp     00404840
007B4623   33DB                   xor     ebx, ebx
007B4625   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾'
|
007B4627   B9C4467B00             mov     ecx, $007B46C4

* Possible String Reference to: 'ÉèÖÃCds±£´æÐÅÏ¢Ê§°Ü!'
|
007B462C   BACC467B00             mov     edx, $007B46CC
*)
end;

procedure TfrmSelExportField._PROC_007B46E5(Sender : TObject);
begin
(*
007B46E5   8BEC                   mov     ebp, esp
007B46E7   51                     push    ecx
007B46E8   B90C000000             mov     ecx, $0000000C
007B46ED   6A00                   push    $00
007B46EF   6A00                   push    $00
007B46F1   49                     dec     ecx
007B46F2   75F9                   jnz     007B46ED
007B46F4   51                     push    ecx
007B46F5   874DFC                 xchg    [ebp-$04], ecx
007B46F8   53                     push    ebx
007B46F9   56                     push    esi
007B46FA   57                     push    edi
007B46FB   894DF8                 mov     [ebp-$08], ecx
007B46FE   8BF2                   mov     esi, edx
007B4700   8945FC                 mov     [ebp-$04], eax
007B4703   8B450C                 mov     eax, [ebp+$0C]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B4706   E8D910C5FF             call    004057E4
007B470B   33C0                   xor     eax, eax
007B470D   55                     push    ebp
007B470E   6847497B00             push    $007B4947

***** TRY
|
007B4713   64FF30                 push    dword ptr fs:[eax]
007B4716   648920                 mov     fs:[eax], esp
007B4719   33C0                   xor     eax, eax
007B471B   55                     push    ebp

* Possible String Reference to: 'éhÿÄÿ3Ûj'
|
007B471C   68D3487B00             push    $007B48D3

***** TRY
|
007B4721   64FF30                 push    dword ptr fs:[eax]
007B4724   648920                 mov     fs:[eax], esp
007B4727   8BC6                   mov     eax, esi

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B4729   E8167CEAFF             call    0065C344
007B472E   48                     dec     eax
007B472F   85C0                   test    eax, eax
007B4731   0F8C90010000           jl      007B48C7
007B4737   40                     inc     eax
007B4738   8945F4                 mov     [ebp-$0C], eax
007B473B   33DB                   xor     ebx, ebx
007B473D   8BD3                   mov     edx, ebx
007B473F   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4741   E88A72EBFF             call    0066B9D0

* Reference to : TcxCustomGridTableView._PROC_00629594()
|
007B4746   E8494EE7FF             call    00629594
007B474B   3B4508                 cmp     eax, [ebp+$08]
007B474E   0F8569010000           jnz     007B48BD
007B4754   8BD3                   mov     edx, ebx
007B4756   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4758   E87372EBFF             call    0066B9D0

|
007B475D   E8BE70EBFF             call    0066B820
007B4762   8D55EC                 lea     edx, [ebp-$14]

|
007B4765   E85E66EBFF             call    0066ADC8
007B476A   8B45EC                 mov     eax, [ebp-$14]
007B476D   8D55F0                 lea     edx, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4770   E87761C5FF             call    0040A8EC
007B4775   837DF000               cmp     dword ptr [ebp-$10], +$00
007B4779   0F843E010000           jz      007B48BD
007B477F   8BD3                   mov     edx, ebx
007B4781   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4783   E84872EBFF             call    0066B9D0

|
007B4788   E89370EBFF             call    0066B820
007B478D   8D55E0                 lea     edx, [ebp-$20]

|
007B4790   E83366EBFF             call    0066ADC8
007B4795   8B55E0                 mov     edx, [ebp-$20]
007B4798   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B479B   E81424D1FF             call    004C6BB4
007B47A0   8D55E4                 lea     edx, [ebp-$1C]
007B47A3   8B08                   mov     ecx, [eax]
007B47A5   FF5160                 call    dword ptr [ecx+$60]
007B47A8   8B45E4                 mov     eax, [ebp-$1C]
007B47AB   8D55E8                 lea     edx, [ebp-$18]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B47AE   E83961C5FF             call    0040A8EC
007B47B3   837DE800               cmp     dword ptr [ebp-$18], +$00
007B47B7   745C                   jz      007B4815
007B47B9   8BD3                   mov     edx, ebx
007B47BB   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B47BD   E80E72EBFF             call    0066B9D0

|
007B47C2   E85970EBFF             call    0066B820
007B47C7   8D55CC                 lea     edx, [ebp-$34]

|
007B47CA   E8F965EBFF             call    0066ADC8
007B47CF   8B55CC                 mov     edx, [ebp-$34]
007B47D2   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B47D5   E8DA23D1FF             call    004C6BB4
007B47DA   8D55D0                 lea     edx, [ebp-$30]
007B47DD   8B08                   mov     ecx, [eax]
007B47DF   FF5164                 call    dword ptr [ecx+$64]
007B47E2   8D45D0                 lea     eax, [ebp-$30]
007B47E5   50                     push    eax
007B47E6   8BD3                   mov     edx, ebx
007B47E8   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B47EA   E8E171EBFF             call    0066B9D0

|
007B47EF   E82C70EBFF             call    0066B820
007B47F4   8D55C8                 lea     edx, [ebp-$38]

|
007B47F7   E8CC65EBFF             call    0066ADC8
007B47FC   8B55C8                 mov     edx, [ebp-$38]
007B47FF   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4802   E8AD23D1FF             call    004C6BB4
007B4807   5A                     pop     edx
007B4808   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B480A   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4810   E9A8000000             jmp     007B48BD
007B4815   8BD3                   mov     edx, ebx
007B4817   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B4819   E8B271EBFF             call    0066B9D0
007B481E   8B801C010000           mov     eax, [eax+$011C]
007B4824   8D4DC0                 lea     ecx, [ebp-$40]
007B4827   BA01000000             mov     edx, $00000001

|
007B482C   E8BF56EAFF             call    00659EF0
007B4831   8B45C0                 mov     eax, [ebp-$40]
007B4834   8D55C4                 lea     edx, [ebp-$3C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4837   E8B060C5FF             call    0040A8EC
007B483C   8B45C4                 mov     eax, [ebp-$3C]
007B483F   BA64497B00             mov     edx, $007B4964

* Reference to: System.@LStrCmp;
|
007B4844   E8F70EC5FF             call    00405740
007B4849   753C                   jnz     007B4887
007B484B   8BD3                   mov     edx, ebx
007B484D   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B484F   E87C71EBFF             call    0066B9D0

|
007B4854   E8C76FEBFF             call    0066B820
007B4859   8D55BC                 lea     edx, [ebp-$44]

|
007B485C   E86765EBFF             call    0066ADC8
007B4861   8B55BC                 mov     edx, [ebp-$44]
007B4864   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4867   E84823D1FF             call    004C6BB4
007B486C   50                     push    eax
007B486D   8D45AC                 lea     eax, [ebp-$54]
007B4870   33D2                   xor     edx, edx
007B4872   B101                   mov     cl, $01

|
007B4874   E8FB42C6FF             call    00418B74
007B4879   8D55AC                 lea     edx, [ebp-$54]
007B487C   58                     pop     eax
007B487D   8B08                   mov     ecx, [eax]
007B487F   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4885   EB36                   jmp     007B48BD
007B4887   8BD3                   mov     edx, ebx
007B4889   8BC6                   mov     eax, esi

* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
|           or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
|           or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
|           or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
|           or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
|           or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
007B488B   E84071EBFF             call    0066B9D0

|
007B4890   E88B6FEBFF             call    0066B820
007B4895   8D55A8                 lea     edx, [ebp-$58]

|
007B4898   E82B65EBFF             call    0066ADC8
007B489D   8B55A8                 mov     edx, [ebp-$58]
007B48A0   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B48A3   E80C23D1FF             call    004C6BB4
007B48A8   50                     push    eax
007B48A9   8D4598                 lea     eax, [ebp-$68]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B48AC   E8AF8AC6FF             call    0041D360
007B48B1   8D5598                 lea     edx, [ebp-$68]
007B48B4   58                     pop     eax
007B48B5   8B08                   mov     ecx, [eax]
007B48B7   FF91B4000000           call    dword ptr [ecx+$00B4]
007B48BD   43                     inc     ebx
007B48BE   FF4DF4                 dec     dword ptr [ebp-$0C]
007B48C1   0F8576FEFFFF           jnz     007B473D
007B48C7   B301                   mov     bl, $01
007B48C9   33C0                   xor     eax, eax
007B48CB   5A                     pop     edx
007B48CC   59                     pop     ecx
007B48CD   59                     pop     ecx
007B48CE   648910                 mov     fs:[eax], edx
007B48D1   EB24                   jmp     007B48F7

* Reference to: System.@HandleAnyException;
|
007B48D3   E968FFC4FF             jmp     00404840
007B48D8   33DB                   xor     ebx, ebx
007B48DA   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾'
|
007B48DC   B968497B00             mov     ecx, $007B4968

* Possible String Reference to: 'ÉèÖÃCds±£´æÐÅÏ¢Ê§°Ü!'
|
007B48E1   BA70497B00             mov     edx, $007B4970
*)
end;

procedure TfrmSelExportField._PROC_007B4989(Sender : TObject);
begin
(*
007B4989   8BEC                   mov     ebp, esp
007B498B   83C4F4                 add     esp, -$0C
007B498E   53                     push    ebx
007B498F   56                     push    esi
007B4990   57                     push    edi
007B4991   33D2                   xor     edx, edx
007B4993   8955F4                 mov     [ebp-$0C], edx
007B4996   8BF0                   mov     esi, eax
007B4998   33C0                   xor     eax, eax
007B499A   55                     push    ebp

* Possible String Reference to: 'éŠ'
|
007B499B   68654A7B00             push    $007B4A65

***** TRY
|
007B49A0   64FF30                 push    dword ptr fs:[eax]
007B49A3   648920                 mov     fs:[eax], esp
007B49A6   33C0                   xor     eax, eax
007B49A8   55                     push    ebp
007B49A9   682D4A7B00             push    $007B4A2D

***** TRY
|
007B49AE   64FF30                 push    dword ptr fs:[eax]
007B49B1   648920                 mov     fs:[eax], esp
007B49B4   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B49B6   E8190FD1FF             call    004C58D4
007B49BB   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B49BD   E8EA95D2FF             call    004DDFAC
007B49C2   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B49C4   FF5244                 call    dword ptr [edx+$44]
007B49C7   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B49C9   E8DE95D2FF             call    004DDFAC

* Possible String Reference to: 'select getDate()as dt'
|
007B49CE   BA804A7B00             mov     edx, $007B4A80
007B49D3   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B49D5   FF5138                 call    dword ptr [ecx+$38]
007B49D8   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Open(TDataSet);
|
007B49DA   E8E90ED1FF             call    004C58C8

* Possible String Reference to: 'dt'
|
007B49DF   BAA04A7B00             mov     edx, $007B4AA0
007B49E4   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B49E6   E8C921D1FF             call    004C6BB4
007B49EB   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetEnabled()
|
007B49ED   FF5250                 call    dword ptr [edx+$50]
007B49F0   83C4F8                 add     esp, -$08
007B49F3   DD1C24                 fstp    qword ptr [esp]
007B49F6   9B                     wait
007B49F7   8D55F4                 lea     edx, [ebp-$0C]

* Possible String Reference to: 'yyyy-MM-dd'
|
007B49FA   B8AC4A7B00             mov     eax, $007B4AAC

|
007B49FF   E8B8A1C5FF             call    0040EBBC
007B4A04   8B45F4                 mov     eax, [ebp-$0C]

* Reference to: SysUtils.StrToDate(AnsiString):TDateTime;overload;
|           or: SysUtils.StrToTime(AnsiString):TDateTime;overload;
|           or: SysUtils.StrToDateTime(AnsiString):TDateTime;overload;
|
007B4A07   E8BCA9C5FF             call    0040F3C8
007B4A0C   DD5DF8                 fstp    qword ptr [ebp-$08]
007B4A0F   9B                     wait
007B4A10   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B4A12   E8BD0ED1FF             call    004C58D4
007B4A17   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4A19   E88E95D2FF             call    004DDFAC
007B4A1E   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B4A20   FF5244                 call    dword ptr [edx+$44]
007B4A23   33C0                   xor     eax, eax
007B4A25   5A                     pop     edx
007B4A26   59                     pop     ecx
007B4A27   59                     pop     ecx
007B4A28   648910                 mov     fs:[eax], edx
007B4A2B   EB22                   jmp     007B4A4F

* Reference to: System.@HandleAnyException;
|
007B4A2D   E90EFEC4FF             jmp     00404840
007B4A32   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾ÐÅÏ¢'
|
007B4A34   B9B84A7B00             mov     ecx, $007B4AB8

* Possible String Reference to: '»ñÈ¡µ±Ç°ÈÕÆÚ·¢Éú´íÎó!'
|
007B4A39   BAC44A7B00             mov     edx, $007B4AC4
*)
end;

procedure TfrmSelExportField._PROC_007B4ADD(Sender : TObject);
begin
(*
007B4ADD   8BEC                   mov     ebp, esp
007B4ADF   83C4F8                 add     esp, -$08
007B4AE2   53                     push    ebx
007B4AE3   56                     push    esi
007B4AE4   57                     push    edi
007B4AE5   8BF0                   mov     esi, eax
007B4AE7   33C0                   xor     eax, eax
007B4AE9   55                     push    ebp

* Possible String Reference to: 'ééüÄÿj'
|
007B4AEA   68524B7B00             push    $007B4B52

***** TRY
|
007B4AEF   64FF30                 push    dword ptr fs:[eax]
007B4AF2   648920                 mov     fs:[eax], esp
007B4AF5   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B4AF7   E8D80DD1FF             call    004C58D4
007B4AFC   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4AFE   E8A994D2FF             call    004DDFAC
007B4B03   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B4B05   FF5244                 call    dword ptr [edx+$44]
007B4B08   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4B0A   E89D94D2FF             call    004DDFAC

* Possible String Reference to: 'select getDate()as dt'
|
007B4B0F   BA884B7B00             mov     edx, $007B4B88
007B4B14   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B4B16   FF5138                 call    dword ptr [ecx+$38]
007B4B19   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Open(TDataSet);
|
007B4B1B   E8A80DD1FF             call    004C58C8

* Possible String Reference to: 'dt'
|
007B4B20   BAA84B7B00             mov     edx, $007B4BA8
007B4B25   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4B27   E88820D1FF             call    004C6BB4
007B4B2C   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetEnabled()
|
007B4B2E   FF5250                 call    dword ptr [edx+$50]
007B4B31   DD5DF8                 fstp    qword ptr [ebp-$08]
007B4B34   9B                     wait
007B4B35   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B4B37   E8980DD1FF             call    004C58D4
007B4B3C   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4B3E   E86994D2FF             call    004DDFAC
007B4B43   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B4B45   FF5244                 call    dword ptr [edx+$44]
007B4B48   33C0                   xor     eax, eax
007B4B4A   5A                     pop     edx
007B4B4B   59                     pop     ecx
007B4B4C   59                     pop     ecx
007B4B4D   648910                 mov     fs:[eax], edx
007B4B50   EB22                   jmp     007B4B74

* Reference to: System.@HandleAnyException;
|
007B4B52   E9E9FCC4FF             jmp     00404840
007B4B57   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾ÐÅÏ¢'
|
007B4B59   B9AC4B7B00             mov     ecx, $007B4BAC

* Possible String Reference to: '»ñÈ¡µ±Ç°ÈÕÆÚ·¢Éú´íÎó!'
|
007B4B5E   BAB84B7B00             mov     edx, $007B4BB8
*)
end;

procedure TfrmSelExportField._PROC_007B4BD1(Sender : TObject);
begin
(*
007B4BD1   8BEC                   mov     ebp, esp
007B4BD3   83C4F4                 add     esp, -$0C
007B4BD6   53                     push    ebx
007B4BD7   56                     push    esi
007B4BD8   57                     push    edi
007B4BD9   33D2                   xor     edx, edx
007B4BDB   8955F4                 mov     [ebp-$0C], edx
007B4BDE   8BF0                   mov     esi, eax
007B4BE0   33C0                   xor     eax, eax
007B4BE2   55                     push    ebp

* Possible String Reference to: 'éBþÄÿëðÝEø_^[‹å]Ã'
|
007B4BE3   68AD4C7B00             push    $007B4CAD

***** TRY
|
007B4BE8   64FF30                 push    dword ptr fs:[eax]
007B4BEB   648920                 mov     fs:[eax], esp
007B4BEE   33C0                   xor     eax, eax
007B4BF0   55                     push    ebp

* Possible String Reference to: 'éÆûÄÿj'
|
007B4BF1   68754C7B00             push    $007B4C75

***** TRY
|
007B4BF6   64FF30                 push    dword ptr fs:[eax]
007B4BF9   648920                 mov     fs:[eax], esp
007B4BFC   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B4BFE   E8D10CD1FF             call    004C58D4
007B4C03   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4C05   E8A293D2FF             call    004DDFAC
007B4C0A   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B4C0C   FF5244                 call    dword ptr [edx+$44]
007B4C0F   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4C11   E89693D2FF             call    004DDFAC

* Possible String Reference to: 'select getDate()as dt'
|
007B4C16   BAC84C7B00             mov     edx, $007B4CC8
007B4C1B   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B4C1D   FF5138                 call    dword ptr [ecx+$38]
007B4C20   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Open(TDataSet);
|
007B4C22   E8A10CD1FF             call    004C58C8

* Possible String Reference to: 'dt'
|
007B4C27   BAE84C7B00             mov     edx, $007B4CE8
007B4C2C   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4C2E   E8811FD1FF             call    004C6BB4
007B4C33   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetEnabled()
|
007B4C35   FF5250                 call    dword ptr [edx+$50]
007B4C38   83C4F8                 add     esp, -$08
007B4C3B   DD1C24                 fstp    qword ptr [esp]
007B4C3E   9B                     wait
007B4C3F   8D55F4                 lea     edx, [ebp-$0C]

* Possible String Reference to: 'yyyy-MM-dd'
|
007B4C42   B8F44C7B00             mov     eax, $007B4CF4

|
007B4C47   E8709FC5FF             call    0040EBBC
007B4C4C   8B45F4                 mov     eax, [ebp-$0C]

* Reference to: SysUtils.StrToDate(AnsiString):TDateTime;overload;
|           or: SysUtils.StrToTime(AnsiString):TDateTime;overload;
|           or: SysUtils.StrToDateTime(AnsiString):TDateTime;overload;
|
007B4C4F   E874A7C5FF             call    0040F3C8
007B4C54   DD5DF8                 fstp    qword ptr [ebp-$08]
007B4C57   9B                     wait
007B4C58   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B4C5A   E8750CD1FF             call    004C58D4
007B4C5F   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B4C61   E84693D2FF             call    004DDFAC
007B4C66   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B4C68   FF5244                 call    dword ptr [edx+$44]
007B4C6B   33C0                   xor     eax, eax
007B4C6D   5A                     pop     edx
007B4C6E   59                     pop     ecx
007B4C6F   59                     pop     ecx
007B4C70   648910                 mov     fs:[eax], edx
007B4C73   EB22                   jmp     007B4C97

* Reference to: System.@HandleAnyException;
|
007B4C75   E9C6FBC4FF             jmp     00404840
007B4C7A   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾ÐÅÏ¢'
|
007B4C7C   B9004D7B00             mov     ecx, $007B4D00

* Possible String Reference to: '»ñÈ¡µ±Ç°ÈÕÆÚ·¢Éú´íÎó!'
|
007B4C81   BA0C4D7B00             mov     edx, $007B4D0C
*)
end;

procedure TfrmSelExportField._PROC_007B4D25(Sender : TObject);
begin
(*
007B4D25   8BEC                   mov     ebp, esp
007B4D27   51                     push    ecx
007B4D28   B936000000             mov     ecx, $00000036
007B4D2D   6A00                   push    $00
007B4D2F   6A00                   push    $00
007B4D31   49                     dec     ecx
007B4D32   75F9                   jnz     007B4D2D
007B4D34   51                     push    ecx
007B4D35   874DFC                 xchg    [ebp-$04], ecx
007B4D38   53                     push    ebx
007B4D39   56                     push    esi
007B4D3A   57                     push    edi
007B4D3B   8BF1                   mov     esi, ecx
007B4D3D   8945FC                 mov     [ebp-$04], eax
007B4D40   33C0                   xor     eax, eax
007B4D42   55                     push    ebp
007B4D43   68FA577B00             push    $007B57FA

***** TRY
|
007B4D48   64FF30                 push    dword ptr fs:[eax]
007B4D4B   648920                 mov     fs:[eax], esp
007B4D4E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|           or: QControls.TWidgetControl.GetControlCount(TWidgetControl):Integer;
|
007B4D50   E85B6FCDFF             call    0048BCB0
007B4D55   8BF8                   mov     edi, eax
007B4D57   4F                     dec     edi
007B4D58   85FF                   test    edi, edi
007B4D5A   0F8CD1080000           jl      007B5631
007B4D60   47                     inc     edi
007B4D61   33DB                   xor     ebx, ebx
007B4D63   8BD3                   mov     edx, ebx
007B4D65   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4D67   E8086FCDFF             call    0048BC74
007B4D6C   8B400C                 mov     eax, [eax+$0C]
007B4D6F   3B4508                 cmp     eax, [ebp+$08]
007B4D72   0F85B1080000           jnz     007B5629
007B4D78   8BD3                   mov     edx, ebx
007B4D7A   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4D7C   E8F36ECDFF             call    0048BC74

* Reference to class TEdit
|
007B4D81   8B15B8674700           mov     edx, [$004767B8]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4D87   E858F7C4FF             call    004044E4
007B4D8C   84C0                   test    al, al
007B4D8E   0F849D000000           jz      007B4E31
007B4D94   8BD3                   mov     edx, ebx
007B4D96   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4D98   E8D76ECDFF             call    0048BC74
007B4D9D   8D55F0                 lea     edx, [ebp-$10]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B4DA0   E84B38CDFF             call    004885F0
007B4DA5   8B45F0                 mov     eax, [ebp-$10]
007B4DA8   8D55F4                 lea     edx, [ebp-$0C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4DAB   E83C5BC5FF             call    0040A8EC
007B4DB0   837DF400               cmp     dword ptr [ebp-$0C], +$00
007B4DB4   744D                   jz      007B4E03
007B4DB6   8BD3                   mov     edx, ebx
007B4DB8   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4DBA   E8B56ECDFF             call    0048BC74
007B4DBF   8D55D8                 lea     edx, [ebp-$28]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B4DC2   E82938CDFF             call    004885F0
007B4DC7   8B45D8                 mov     eax, [ebp-$28]
007B4DCA   8D55DC                 lea     edx, [ebp-$24]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B4DCD   E81A5BC5FF             call    0040A8EC
007B4DD2   8B55DC                 mov     edx, [ebp-$24]
007B4DD5   8D45E0                 lea     eax, [ebp-$20]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B4DD8   E8EB3FC6FF             call    00418DC8
007B4DDD   8D45E0                 lea     eax, [ebp-$20]
007B4DE0   50                     push    eax
007B4DE1   8BD3                   mov     edx, ebx
007B4DE3   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4DE5   E88A6ECDFF             call    0048BC74
007B4DEA   8B5008                 mov     edx, [eax+$08]
007B4DED   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4DF0   E8BF1DD1FF             call    004C6BB4
007B4DF5   5A                     pop     edx
007B4DF6   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B4DF8   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4DFE   E926080000             jmp     007B5629
007B4E03   8BD3                   mov     edx, ebx
007B4E05   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4E07   E8686ECDFF             call    0048BC74
007B4E0C   8B5008                 mov     edx, [eax+$08]
007B4E0F   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4E12   E89D1DD1FF             call    004C6BB4
007B4E17   50                     push    eax
007B4E18   8D45C8                 lea     eax, [ebp-$38]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B4E1B   E84085C6FF             call    0041D360
007B4E20   8D55C8                 lea     edx, [ebp-$38]
007B4E23   58                     pop     eax
007B4E24   8B08                   mov     ecx, [eax]
007B4E26   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4E2C   E9F8070000             jmp     007B5629
007B4E31   8BD3                   mov     edx, ebx
007B4E33   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4E35   E83A6ECDFF             call    0048BC74

* Reference to class TRichEdit
|
007B4E3A   8B15F84F4500           mov     edx, [$00454FF8]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4E40   E89FF6C4FF             call    004044E4
007B4E45   84C0                   test    al, al
007B4E47   7442                   jz      007B4E8B
007B4E49   8BD3                   mov     edx, ebx
007B4E4B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4E4D   E8226ECDFF             call    0048BC74
007B4E52   8D55B4                 lea     edx, [ebp-$4C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B4E55   E89637CDFF             call    004885F0
007B4E5A   8B55B4                 mov     edx, [ebp-$4C]
007B4E5D   8D45B8                 lea     eax, [ebp-$48]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B4E60   E8633FC6FF             call    00418DC8
007B4E65   8D45B8                 lea     eax, [ebp-$48]
007B4E68   50                     push    eax
007B4E69   8BD3                   mov     edx, ebx
007B4E6B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4E6D   E8026ECDFF             call    0048BC74
007B4E72   8B5008                 mov     edx, [eax+$08]
007B4E75   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4E78   E8371DD1FF             call    004C6BB4
007B4E7D   5A                     pop     edx
007B4E7E   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B4E80   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4E86   E99E070000             jmp     007B5629
007B4E8B   8BD3                   mov     edx, ebx
007B4E8D   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4E8F   E8E06DCDFF             call    0048BC74

* Reference to class TCheckBox
|
007B4E94   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4E9A   E845F6C4FF             call    004044E4
007B4E9F   84C0                   test    al, al
007B4EA1   747C                   jz      007B4F1F
007B4EA3   8BD3                   mov     edx, ebx
007B4EA5   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4EA7   E8C86DCDFF             call    0048BC74
007B4EAC   8B10                   mov     edx, [eax]
007B4EAE   FF92C8000000           call    dword ptr [edx+$00C8]
007B4EB4   3C01                   cmp     al, $01
007B4EB6   7535                   jnz     007B4EED
007B4EB8   8BD3                   mov     edx, ebx
007B4EBA   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4EBC   E8B36DCDFF             call    0048BC74
007B4EC1   8B5008                 mov     edx, [eax+$08]
007B4EC4   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4EC7   E8E81CD1FF             call    004C6BB4
007B4ECC   50                     push    eax
007B4ECD   8D45A4                 lea     eax, [ebp-$5C]
007B4ED0   BA01000000             mov     edx, $00000001
007B4ED5   B101                   mov     cl, $01

|
007B4ED7   E8983CC6FF             call    00418B74
007B4EDC   8D55A4                 lea     edx, [ebp-$5C]
007B4EDF   58                     pop     eax
007B4EE0   8B08                   mov     ecx, [eax]
007B4EE2   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4EE8   E93C070000             jmp     007B5629
007B4EED   8BD3                   mov     edx, ebx
007B4EEF   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4EF1   E87E6DCDFF             call    0048BC74
007B4EF6   8B5008                 mov     edx, [eax+$08]
007B4EF9   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4EFC   E8B31CD1FF             call    004C6BB4
007B4F01   50                     push    eax
007B4F02   8D4594                 lea     eax, [ebp-$6C]
007B4F05   33D2                   xor     edx, edx
007B4F07   B101                   mov     cl, $01

|
007B4F09   E8663CC6FF             call    00418B74
007B4F0E   8D5594                 lea     edx, [ebp-$6C]
007B4F11   58                     pop     eax
007B4F12   8B08                   mov     ecx, [eax]
007B4F14   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4F1A   E90A070000             jmp     007B5629
007B4F1F   8BD3                   mov     edx, ebx
007B4F21   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4F23   E84C6DCDFF             call    0048BC74

* Reference to class TcxRichEdit
|
007B4F28   8B15685A6B00           mov     edx, [$006B5A68]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4F2E   E8B1F5C4FF             call    004044E4
007B4F33   84C0                   test    al, al
007B4F35   7442                   jz      007B4F79
007B4F37   8BD3                   mov     edx, ebx
007B4F39   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4F3B   E8346DCDFF             call    0048BC74
007B4F40   8D5580                 lea     edx, [ebp-$80]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B4F43   E8A836CDFF             call    004885F0
007B4F48   8B5580                 mov     edx, [ebp-$80]
007B4F4B   8D4584                 lea     eax, [ebp-$7C]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B4F4E   E8753EC6FF             call    00418DC8
007B4F53   8D4584                 lea     eax, [ebp-$7C]
007B4F56   50                     push    eax
007B4F57   8BD3                   mov     edx, ebx
007B4F59   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4F5B   E8146DCDFF             call    0048BC74
007B4F60   8B5008                 mov     edx, [eax+$08]
007B4F63   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4F66   E8491CD1FF             call    004C6BB4
007B4F6B   5A                     pop     edx
007B4F6C   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B4F6E   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4F74   E9B0060000             jmp     007B5629
007B4F79   8BD3                   mov     edx, ebx
007B4F7B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4F7D   E8F26CCDFF             call    0048BC74

* Reference to class TMemo
|
007B4F82   8B158C724700           mov     edx, [$0047728C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4F88   E857F5C4FF             call    004044E4
007B4F8D   84C0                   test    al, al
007B4F8F   744E                   jz      007B4FDF
007B4F91   8BD3                   mov     edx, ebx
007B4F93   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4F95   E8DA6CCDFF             call    0048BC74
007B4F9A   8D956CFFFFFF           lea     edx, [ebp+$FFFFFF6C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B4FA0   E84B36CDFF             call    004885F0
007B4FA5   8B956CFFFFFF           mov     edx, [ebp+$FFFFFF6C]
007B4FAB   8D8570FFFFFF           lea     eax, [ebp+$FFFFFF70]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B4FB1   E8123EC6FF             call    00418DC8
007B4FB6   8D8570FFFFFF           lea     eax, [ebp+$FFFFFF70]
007B4FBC   50                     push    eax
007B4FBD   8BD3                   mov     edx, ebx
007B4FBF   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4FC1   E8AE6CCDFF             call    0048BC74
007B4FC6   8B5008                 mov     edx, [eax+$08]
007B4FC9   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B4FCC   E8E31BD1FF             call    004C6BB4
007B4FD1   5A                     pop     edx
007B4FD2   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B4FD4   FF91B4000000           call    dword ptr [ecx+$00B4]
007B4FDA   E94A060000             jmp     007B5629
007B4FDF   8BD3                   mov     edx, ebx
007B4FE1   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4FE3   E88C6CCDFF             call    0048BC74
007B4FE8   8B15F4508800           mov     edx, [$008850F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B4FEE   E8F1F4C4FF             call    004044E4
007B4FF3   84C0                   test    al, al
007B4FF5   0F8480000000           jz      007B507B
007B4FFB   8BD3                   mov     edx, ebx
007B4FFD   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B4FFF   E8706CCDFF             call    0048BC74
007B5004   8D9568FFFFFF           lea     edx, [ebp+$FFFFFF68]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B500A   E8E135CDFF             call    004885F0
007B500F   83BD68FFFFFF00         cmp     dword ptr [ebp+$FFFFFF68], +$00
007B5016   0F840D060000           jz      007B5629
007B501C   8BD3                   mov     edx, ebx
007B501E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5020   E84F6CCDFF             call    0048BC74
007B5025   8D9550FFFFFF           lea     edx, [ebp+$FFFFFF50]

|
007B502B   E83CF2EFFF             call    006B426C
007B5030   8B8550FFFFFF           mov     eax, [ebp+$FFFFFF50]
007B5036   8D9554FFFFFF           lea     edx, [ebp+$FFFFFF54]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B503C   E8AB58C5FF             call    0040A8EC
007B5041   8B9554FFFFFF           mov     edx, [ebp+$FFFFFF54]
007B5047   8D8558FFFFFF           lea     eax, [ebp+$FFFFFF58]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B504D   E8763DC6FF             call    00418DC8
007B5052   8D8558FFFFFF           lea     eax, [ebp+$FFFFFF58]
007B5058   50                     push    eax
007B5059   8BD3                   mov     edx, ebx
007B505B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B505D   E8126CCDFF             call    0048BC74
007B5062   8B5008                 mov     edx, [eax+$08]
007B5065   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5068   E8471BD1FF             call    004C6BB4
007B506D   5A                     pop     edx
007B506E   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5070   FF91B4000000           call    dword ptr [ecx+$00B4]
007B5076   E9AE050000             jmp     007B5629
007B507B   8BD3                   mov     edx, ebx
007B507D   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B507F   E8F06BCDFF             call    0048BC74

* Reference to class TComboBox
|
007B5084   8B15F4814700           mov     edx, [$004781F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B508A   E855F4C4FF             call    004044E4
007B508F   84C0                   test    al, al
007B5091   745F                   jz      007B50F2
007B5093   8BD3                   mov     edx, ebx
007B5095   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5097   E8D86BCDFF             call    0048BC74
007B509C   8D9538FFFFFF           lea     edx, [ebp+$FFFFFF38]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B50A2   E84935CDFF             call    004885F0
007B50A7   8B8538FFFFFF           mov     eax, [ebp+$FFFFFF38]
007B50AD   8D953CFFFFFF           lea     edx, [ebp+$FFFFFF3C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B50B3   E83458C5FF             call    0040A8EC
007B50B8   8B953CFFFFFF           mov     edx, [ebp+$FFFFFF3C]
007B50BE   8D8540FFFFFF           lea     eax, [ebp+$FFFFFF40]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B50C4   E8FF3CC6FF             call    00418DC8
007B50C9   8D8540FFFFFF           lea     eax, [ebp+$FFFFFF40]
007B50CF   50                     push    eax
007B50D0   8BD3                   mov     edx, ebx
007B50D2   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B50D4   E89B6BCDFF             call    0048BC74
007B50D9   8B5008                 mov     edx, [eax+$08]
007B50DC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B50DF   E8D01AD1FF             call    004C6BB4
007B50E4   5A                     pop     edx
007B50E5   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B50E7   FF91B4000000           call    dword ptr [ecx+$00B4]
007B50ED   E937050000             jmp     007B5629
007B50F2   8BD3                   mov     edx, ebx
007B50F4   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B50F6   E8796BCDFF             call    0048BC74

* Reference to class TDateTimePicker
|
007B50FB   8B15E0A54500           mov     edx, [$0045A5E0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5101   E8DEF3C4FF             call    004044E4
007B5106   84C0                   test    al, al
007B5108   0F84E2000000           jz      007B51F0
007B510E   8BD3                   mov     edx, ebx
007B5110   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5112   E85D6BCDFF             call    0048BC74
007B5117   80B86902000000         cmp     byte ptr [eax+$0269], $00
007B511E   0F8489000000           jz      007B51AD
007B5124   8BD3                   mov     edx, ebx
007B5126   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5128   E8476BCDFF             call    0048BC74
007B512D   80B85202000000         cmp     byte ptr [eax+$0252], $00
007B5134   7443                   jz      007B5179
007B5136   8BD3                   mov     edx, ebx
007B5138   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B513A   E8356BCDFF             call    0048BC74
007B513F   DD8010020000           fld     qword ptr [eax+$0210]
007B5145   8D8528FFFFFF           lea     eax, [ebp+$FFFFFF28]

* Reference to: Variants.@VarFromTDateTime;
|
007B514B   E8503CC6FF             call    00418DA0
007B5150   8D8528FFFFFF           lea     eax, [ebp+$FFFFFF28]
007B5156   50                     push    eax
007B5157   8BD3                   mov     edx, ebx
007B5159   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B515B   E8146BCDFF             call    0048BC74
007B5160   8B5008                 mov     edx, [eax+$08]
007B5163   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5166   E8491AD1FF             call    004C6BB4
007B516B   5A                     pop     edx
007B516C   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B516E   FF91B4000000           call    dword ptr [ecx+$00B4]
007B5174   E9B0040000             jmp     007B5629
007B5179   8BD3                   mov     edx, ebx
007B517B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B517D   E8F26ACDFF             call    0048BC74
007B5182   8B5008                 mov     edx, [eax+$08]
007B5185   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5188   E8271AD1FF             call    004C6BB4
007B518D   50                     push    eax
007B518E   8D8518FFFFFF           lea     eax, [ebp+$FFFFFF18]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B5194   E8C781C6FF             call    0041D360
007B5199   8D9518FFFFFF           lea     edx, [ebp+$FFFFFF18]
007B519F   58                     pop     eax
007B51A0   8B08                   mov     ecx, [eax]
007B51A2   FF91B4000000           call    dword ptr [ecx+$00B4]
007B51A8   E97C040000             jmp     007B5629
007B51AD   8BD3                   mov     edx, ebx
007B51AF   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B51B1   E8BE6ACDFF             call    0048BC74
007B51B6   DD8010020000           fld     qword ptr [eax+$0210]
007B51BC   8D8508FFFFFF           lea     eax, [ebp+$FFFFFF08]

* Reference to: Variants.@VarFromTDateTime;
|
007B51C2   E8D93BC6FF             call    00418DA0
007B51C7   8D8508FFFFFF           lea     eax, [ebp+$FFFFFF08]
007B51CD   50                     push    eax
007B51CE   8BD3                   mov     edx, ebx
007B51D0   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B51D2   E89D6ACDFF             call    0048BC74
007B51D7   8B5008                 mov     edx, [eax+$08]
007B51DA   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B51DD   E8D219D1FF             call    004C6BB4
007B51E2   5A                     pop     edx
007B51E3   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B51E5   FF91B4000000           call    dword ptr [ecx+$00B4]
007B51EB   E939040000             jmp     007B5629
007B51F0   8BD3                   mov     edx, ebx
007B51F2   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B51F4   E87B6ACDFF             call    0048BC74

* Reference to class TBtnEditA
|
007B51F9   8B1530A24F00           mov     edx, [$004FA230]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B51FF   E8E0F2C4FF             call    004044E4
007B5204   84C0                   test    al, al
007B5206   0F84D8000000           jz      007B52E4
007B520C   8BD3                   mov     edx, ebx
007B520E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5210   E85F6ACDFF             call    0048BC74
007B5215   8D95F0FEFFFF           lea     edx, [ebp+$FFFFFEF0]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B521B   E8D033CDFF             call    004885F0
007B5220   8B85F0FEFFFF           mov     eax, [ebp+$FFFFFEF0]
007B5226   8D95F4FEFFFF           lea     edx, [ebp+$FFFFFEF4]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B522C   E8BB56C5FF             call    0040A8EC
007B5231   8B95F4FEFFFF           mov     edx, [ebp+$FFFFFEF4]
007B5237   8D85F8FEFFFF           lea     eax, [ebp+$FFFFFEF8]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B523D   E8863BC6FF             call    00418DC8
007B5242   8D85F8FEFFFF           lea     eax, [ebp+$FFFFFEF8]
007B5248   50                     push    eax
007B5249   8BD3                   mov     edx, ebx
007B524B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B524D   E8226ACDFF             call    0048BC74
007B5252   8B5008                 mov     edx, [eax+$08]
007B5255   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5258   E85719D1FF             call    004C6BB4
007B525D   5A                     pop     edx
007B525E   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5260   FF91B4000000           call    dword ptr [ecx+$00B4]
007B5266   8BD3                   mov     edx, ebx
007B5268   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B526A   E8056ACDFF             call    0048BC74
007B526F   83B88000000000         cmp     dword ptr [eax+$0080], +$00
007B5276   0F84AD030000           jz      007B5629
007B527C   8BD3                   mov     edx, ebx
007B527E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5280   E8EF69CDFF             call    0048BC74
007B5285   8B8030020000           mov     eax, [eax+$0230]
007B528B   8D95DCFEFFFF           lea     edx, [ebp+$FFFFFEDC]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5291   E85656C5FF             call    0040A8EC
007B5296   8B95DCFEFFFF           mov     edx, [ebp+$FFFFFEDC]
007B529C   8D85E0FEFFFF           lea     eax, [ebp+$FFFFFEE0]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B52A2   E8213BC6FF             call    00418DC8
007B52A7   8D85E0FEFFFF           lea     eax, [ebp+$FFFFFEE0]
007B52AD   50                     push    eax
007B52AE   8BD3                   mov     edx, ebx
007B52B0   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B52B2   E8BD69CDFF             call    0048BC74
007B52B7   8B8080000000           mov     eax, [eax+$0080]
007B52BD   8D95D8FEFFFF           lea     edx, [ebp+$FFFFFED8]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B52C3   E82456C5FF             call    0040A8EC
007B52C8   8B95D8FEFFFF           mov     edx, [ebp+$FFFFFED8]
007B52CE   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B52D1   E8DE18D1FF             call    004C6BB4
007B52D6   5A                     pop     edx
007B52D7   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B52D9   FF91B4000000           call    dword ptr [ecx+$00B4]
007B52DF   E945030000             jmp     007B5629
007B52E4   8BD3                   mov     edx, ebx
007B52E6   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B52E8   E88769CDFF             call    0048BC74

* Reference to class TBtnEditC
|
007B52ED   8B158CAB4F00           mov     edx, [$004FAB8C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B52F3   E8ECF1C4FF             call    004044E4
007B52F8   84C0                   test    al, al
007B52FA   0F84F9000000           jz      007B53F9
007B5300   8BD3                   mov     edx, ebx
007B5302   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5304   E86B69CDFF             call    0048BC74
007B5309   8D95C0FEFFFF           lea     edx, [ebp+$FFFFFEC0]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B530F   E8DC32CDFF             call    004885F0
007B5314   8B85C0FEFFFF           mov     eax, [ebp+$FFFFFEC0]
007B531A   8D95C4FEFFFF           lea     edx, [ebp+$FFFFFEC4]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5320   E8C755C5FF             call    0040A8EC
007B5325   8B95C4FEFFFF           mov     edx, [ebp+$FFFFFEC4]
007B532B   8D85C8FEFFFF           lea     eax, [ebp+$FFFFFEC8]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B5331   E8923AC6FF             call    00418DC8
007B5336   8D85C8FEFFFF           lea     eax, [ebp+$FFFFFEC8]
007B533C   50                     push    eax
007B533D   8BD3                   mov     edx, ebx
007B533F   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5341   E82E69CDFF             call    0048BC74
007B5346   8B5008                 mov     edx, [eax+$08]
007B5349   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B534C   E86318D1FF             call    004C6BB4
007B5351   5A                     pop     edx
007B5352   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5354   FF91B4000000           call    dword ptr [ecx+$00B4]
007B535A   8BD3                   mov     edx, ebx
007B535C   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B535E   E81169CDFF             call    0048BC74
007B5363   83B88000000000         cmp     dword ptr [eax+$0080], +$00
007B536A   0F84B9020000           jz      007B5629
007B5370   8BD3                   mov     edx, ebx
007B5372   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5374   E8FB68CDFF             call    0048BC74
007B5379   8B9080000000           mov     edx, [eax+$0080]
007B537F   B818587B00             mov     eax, $007B5818

* Reference to: System.@LStrPos;
|
007B5384   E8AF05C5FF             call    00405938
007B5389   85C0                   test    eax, eax
007B538B   0F8F98020000           jnle    007B5629
007B5391   8BD3                   mov     edx, ebx
007B5393   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5395   E8DA68CDFF             call    0048BC74
007B539A   8B8038020000           mov     eax, [eax+$0238]
007B53A0   8D95ACFEFFFF           lea     edx, [ebp+$FFFFFEAC]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B53A6   E84155C5FF             call    0040A8EC
007B53AB   8B95ACFEFFFF           mov     edx, [ebp+$FFFFFEAC]
007B53B1   8D85B0FEFFFF           lea     eax, [ebp+$FFFFFEB0]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B53B7   E80C3AC6FF             call    00418DC8
007B53BC   8D85B0FEFFFF           lea     eax, [ebp+$FFFFFEB0]
007B53C2   50                     push    eax
007B53C3   8BD3                   mov     edx, ebx
007B53C5   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B53C7   E8A868CDFF             call    0048BC74
007B53CC   8B8080000000           mov     eax, [eax+$0080]
007B53D2   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B53D8   E80F55C5FF             call    0040A8EC
007B53DD   8B95A8FEFFFF           mov     edx, [ebp+$FFFFFEA8]
007B53E3   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B53E6   E8C917D1FF             call    004C6BB4
007B53EB   5A                     pop     edx
007B53EC   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B53EE   FF91B4000000           call    dword ptr [ecx+$00B4]
007B53F4   E930020000             jmp     007B5629
007B53F9   8BD3                   mov     edx, ebx
007B53FB   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B53FD   E87268CDFF             call    0048BC74

* Reference to class TcxTimeEdit
|
007B5402   8B1570AB5E00           mov     edx, [$005EAB70]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5408   E8D7F0C4FF             call    004044E4
007B540D   84C0                   test    al, al
007B540F   745F                   jz      007B5470
007B5411   8BD3                   mov     edx, ebx
007B5413   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5415   E85A68CDFF             call    0048BC74
007B541A   8D9590FEFFFF           lea     edx, [ebp+$FFFFFE90]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B5420   E8CB31CDFF             call    004885F0
007B5425   8B8590FEFFFF           mov     eax, [ebp+$FFFFFE90]
007B542B   8D9594FEFFFF           lea     edx, [ebp+$FFFFFE94]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5431   E8B654C5FF             call    0040A8EC
007B5436   8B9594FEFFFF           mov     edx, [ebp+$FFFFFE94]
007B543C   8D8598FEFFFF           lea     eax, [ebp+$FFFFFE98]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B5442   E88139C6FF             call    00418DC8
007B5447   8D8598FEFFFF           lea     eax, [ebp+$FFFFFE98]
007B544D   50                     push    eax
007B544E   8BD3                   mov     edx, ebx
007B5450   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5452   E81D68CDFF             call    0048BC74
007B5457   8B5008                 mov     edx, [eax+$08]
007B545A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B545D   E85217D1FF             call    004C6BB4
007B5462   5A                     pop     edx
007B5463   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5465   FF91B4000000           call    dword ptr [ecx+$00B4]
007B546B   E9B9010000             jmp     007B5629
007B5470   8BD3                   mov     edx, ebx
007B5472   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5474   E8FB67CDFF             call    0048BC74

* Reference to class TcxCurrencyEdit
|
007B5479   8B15748E5F00           mov     edx, [$005F8E74]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B547F   E860F0C4FF             call    004044E4
007B5484   84C0                   test    al, al
007B5486   7459                   jz      007B54E1
007B5488   6A00                   push    $00
007B548A   6A00                   push    $00
007B548C   6A00                   push    $00
007B548E   8BD3                   mov     edx, ebx
007B5490   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5492   E8DD67CDFF             call    0048BC74
007B5497   8D957CFEFFFF           lea     edx, [ebp+$FFFFFE7C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B549D   E84E31CDFF             call    004885F0
007B54A2   8B857CFEFFFF           mov     eax, [ebp+$FFFFFE7C]

* Reference to: SysUtils.StrToFloatDef(AnsiString;Extended):Extended;overload;
|
007B54A8   E8BB82C5FF             call    0040D768
007B54AD   8D8580FEFFFF           lea     eax, [ebp+$FFFFFE80]

* Reference to: Variants.@VarFromReal;
|
007B54B3   E8D438C6FF             call    00418D8C
007B54B8   8D8580FEFFFF           lea     eax, [ebp+$FFFFFE80]
007B54BE   50                     push    eax
007B54BF   8BD3                   mov     edx, ebx
007B54C1   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B54C3   E8AC67CDFF             call    0048BC74
007B54C8   8B5008                 mov     edx, [eax+$08]
007B54CB   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B54CE   E8E116D1FF             call    004C6BB4
007B54D3   5A                     pop     edx
007B54D4   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B54D6   FF91B4000000           call    dword ptr [ecx+$00B4]
007B54DC   E948010000             jmp     007B5629
007B54E1   8BD3                   mov     edx, ebx
007B54E3   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B54E5   E88A67CDFF             call    0048BC74

* Reference to class TcxButtonEdit
|
007B54EA   8B15D4D25B00           mov     edx, [$005BD2D4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B54F0   E8EFEFC4FF             call    004044E4
007B54F5   84C0                   test    al, al
007B54F7   0F842C010000           jz      007B5629
007B54FD   8BD3                   mov     edx, ebx
007B54FF   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5501   E86E67CDFF             call    0048BC74

* Reference to control Label21 : N.A.
|
007B5506   80B8C003000001         cmp     byte ptr [eax+$03C0], $01
007B550D   7412                   jz      007B5521
007B550F   8BD3                   mov     edx, ebx
007B5511   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5513   E85C67CDFF             call    0048BC74
007B5518   80B89A00000001         cmp     byte ptr [eax+$009A], $01
007B551F   755A                   jnz     007B557B
007B5521   8BD3                   mov     edx, ebx
007B5523   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5525   E84A67CDFF             call    0048BC74
007B552A   8D9564FEFFFF           lea     edx, [ebp+$FFFFFE64]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B5530   E8BB30CDFF             call    004885F0
007B5535   8B8564FEFFFF           mov     eax, [ebp+$FFFFFE64]
007B553B   8D9568FEFFFF           lea     edx, [ebp+$FFFFFE68]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5541   E8A653C5FF             call    0040A8EC
007B5546   8B9568FEFFFF           mov     edx, [ebp+$FFFFFE68]
007B554C   8D856CFEFFFF           lea     eax, [ebp+$FFFFFE6C]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B5552   E87138C6FF             call    00418DC8
007B5557   8D856CFEFFFF           lea     eax, [ebp+$FFFFFE6C]
007B555D   50                     push    eax
007B555E   8BD3                   mov     edx, ebx
007B5560   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5562   E80D67CDFF             call    0048BC74
007B5567   8B5008                 mov     edx, [eax+$08]
007B556A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B556D   E84216D1FF             call    004C6BB4
007B5572   5A                     pop     edx
007B5573   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5575   FF91B4000000           call    dword ptr [ecx+$00B4]
007B557B   8BD3                   mov     edx, ebx
007B557D   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B557F   E8F066CDFF             call    0048BC74
007B5584   80B89A00000000         cmp     byte ptr [eax+$009A], $00
007B558B   0F8598000000           jnz     007B5629
007B5591   8D45F8                 lea     eax, [ebp-$08]
007B5594   50                     push    eax
007B5595   8BD3                   mov     edx, ebx
007B5597   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5599   E8D666CDFF             call    0048BC74
007B559E   8B4008                 mov     eax, [eax+$08]
007B55A1   8D9560FEFFFF           lea     edx, [ebp+$FFFFFE60]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B55A7   E84053C5FF             call    0040A8EC
007B55AC   8B8560FEFFFF           mov     eax, [ebp+$FFFFFE60]

* Reference to: System.@LStrLen(String):Integer;
|           or: System.@DynArrayLength;
|           or: System.DynArraySize(Pointer):Integer;
|           or: Variants.DynArraySize(Pointer):Integer;
|
007B55B2   E83D00C5FF             call    004055F4
007B55B7   83E804                 sub     eax, +$04
007B55BA   50                     push    eax
007B55BB   8BD3                   mov     edx, ebx
007B55BD   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B55BF   E8B066CDFF             call    0048BC74
007B55C4   8B4008                 mov     eax, [eax+$08]
007B55C7   8D955CFEFFFF           lea     edx, [ebp+$FFFFFE5C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B55CD   E81A53C5FF             call    0040A8EC
007B55D2   8B855CFEFFFF           mov     eax, [ebp+$FFFFFE5C]
007B55D8   BA01000000             mov     edx, $00000001
007B55DD   59                     pop     ecx

* Reference to: System.@LStrCopy;
|
007B55DE   E87102C5FF             call    00405854
007B55E3   8BD3                   mov     edx, ebx
007B55E5   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B55E7   E88866CDFF             call    0048BC74
007B55EC   8B8080000000           mov     eax, [eax+$0080]
007B55F2   8D9548FEFFFF           lea     edx, [ebp+$FFFFFE48]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B55F8   E8EF52C5FF             call    0040A8EC
007B55FD   8B9548FEFFFF           mov     edx, [ebp+$FFFFFE48]
007B5603   8D854CFEFFFF           lea     eax, [ebp+$FFFFFE4C]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B5609   E8BA37C6FF             call    00418DC8
007B560E   8D854CFEFFFF           lea     eax, [ebp+$FFFFFE4C]
007B5614   50                     push    eax
007B5615   8B55F8                 mov     edx, [ebp-$08]
007B5618   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B561B   E89415D1FF             call    004C6BB4
007B5620   5A                     pop     edx
007B5621   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.GetControlExtents()
|
007B5623   FF91B4000000           call    dword ptr [ecx+$00B4]
007B5629   43                     inc     ebx
007B562A   4F                     dec     edi
007B562B   0F8532F7FFFF           jnz     007B4D63
007B5631   33C0                   xor     eax, eax
007B5633   5A                     pop     edx
007B5634   59                     pop     ecx
007B5635   59                     pop     ecx
007B5636   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B5639   6804587B00             push    $007B5804
007B563E   8D8548FEFFFF           lea     eax, [ebp+$FFFFFE48]

* Reference to: System.@LStrClr(void;void);
|
007B5644   E8DBFCC4FF             call    00405324
007B5649   8D854CFEFFFF           lea     eax, [ebp+$FFFFFE4C]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B564F   E820F0C5FF             call    00414674
007B5654   8D855CFEFFFF           lea     eax, [ebp+$FFFFFE5C]
007B565A   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B565F   E8E4FCC4FF             call    00405348
007B5664   8D8564FEFFFF           lea     eax, [ebp+$FFFFFE64]

* Reference to: System.@LStrClr(void;void);
|
007B566A   E8B5FCC4FF             call    00405324
007B566F   8D8568FEFFFF           lea     eax, [ebp+$FFFFFE68]

* Reference to: System.@LStrClr(void;void);
|
007B5675   E8AAFCC4FF             call    00405324
007B567A   8D856CFEFFFF           lea     eax, [ebp+$FFFFFE6C]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B5680   E8EFEFC5FF             call    00414674
007B5685   8D857CFEFFFF           lea     eax, [ebp+$FFFFFE7C]

* Reference to: System.@LStrClr(void;void);
|
007B568B   E894FCC4FF             call    00405324
007B5690   8D8580FEFFFF           lea     eax, [ebp+$FFFFFE80]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B5696   E8D9EFC5FF             call    00414674
007B569B   8D8590FEFFFF           lea     eax, [ebp+$FFFFFE90]

* Reference to: System.@LStrClr(void;void);
|
007B56A1   E87EFCC4FF             call    00405324
007B56A6   8D8594FEFFFF           lea     eax, [ebp+$FFFFFE94]

* Reference to: System.@LStrClr(void;void);
|
007B56AC   E873FCC4FF             call    00405324
007B56B1   8D8598FEFFFF           lea     eax, [ebp+$FFFFFE98]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B56B7   E8B8EFC5FF             call    00414674
007B56BC   8D85A8FEFFFF           lea     eax, [ebp+$FFFFFEA8]
007B56C2   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B56C7   E87CFCC4FF             call    00405348
007B56CC   8D85B0FEFFFF           lea     eax, [ebp+$FFFFFEB0]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B56D2   E89DEFC5FF             call    00414674
007B56D7   8D85C0FEFFFF           lea     eax, [ebp+$FFFFFEC0]

* Reference to: System.@LStrClr(void;void);
|
007B56DD   E842FCC4FF             call    00405324
007B56E2   8D85C4FEFFFF           lea     eax, [ebp+$FFFFFEC4]

* Reference to: System.@LStrClr(void;void);
|
007B56E8   E837FCC4FF             call    00405324
007B56ED   8D85C8FEFFFF           lea     eax, [ebp+$FFFFFEC8]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B56F3   E87CEFC5FF             call    00414674
007B56F8   8D85D8FEFFFF           lea     eax, [ebp+$FFFFFED8]
007B56FE   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B5703   E840FCC4FF             call    00405348
007B5708   8D85E0FEFFFF           lea     eax, [ebp+$FFFFFEE0]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B570E   E861EFC5FF             call    00414674
007B5713   8D85F0FEFFFF           lea     eax, [ebp+$FFFFFEF0]

* Reference to: System.@LStrClr(void;void);
|
007B5719   E806FCC4FF             call    00405324
007B571E   8D85F4FEFFFF           lea     eax, [ebp+$FFFFFEF4]

* Reference to: System.@LStrClr(void;void);
|
007B5724   E8FBFBC4FF             call    00405324
007B5729   8D85F8FEFFFF           lea     eax, [ebp+$FFFFFEF8]

* Reference to object Variant
|
007B572F   8B153C114000           mov     edx, [$0040113C]
007B5735   B904000000             mov     ecx, $00000004

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B573A   E8D509C5FF             call    00406114
007B573F   8D8538FFFFFF           lea     eax, [ebp+$FFFFFF38]

* Reference to: System.@LStrClr(void;void);
|
007B5745   E8DAFBC4FF             call    00405324
007B574A   8D853CFFFFFF           lea     eax, [ebp+$FFFFFF3C]

* Reference to: System.@LStrClr(void;void);
|
007B5750   E8CFFBC4FF             call    00405324
007B5755   8D8540FFFFFF           lea     eax, [ebp+$FFFFFF40]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B575B   E814EFC5FF             call    00414674
007B5760   8D8550FFFFFF           lea     eax, [ebp+$FFFFFF50]
007B5766   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B576B   E8D8FBC4FF             call    00405348
007B5770   8D8558FFFFFF           lea     eax, [ebp+$FFFFFF58]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B5776   E8F9EEC5FF             call    00414674
007B577B   8D8568FFFFFF           lea     eax, [ebp+$FFFFFF68]
007B5781   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B5786   E8BDFBC4FF             call    00405348
007B578B   8D8570FFFFFF           lea     eax, [ebp+$FFFFFF70]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B5791   E8DEEEC5FF             call    00414674
007B5796   8D4580                 lea     eax, [ebp-$80]

* Reference to: System.@LStrClr(void;void);
|
007B5799   E886FBC4FF             call    00405324
007B579E   8D4584                 lea     eax, [ebp-$7C]

* Reference to object Variant
|
007B57A1   8B153C114000           mov     edx, [$0040113C]
007B57A7   B903000000             mov     ecx, $00000003

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B57AC   E86309C5FF             call    00406114
007B57B1   8D45B4                 lea     eax, [ebp-$4C]

* Reference to: System.@LStrClr(void;void);
|
007B57B4   E86BFBC4FF             call    00405324
007B57B9   8D45B8                 lea     eax, [ebp-$48]

* Reference to object Variant
|
007B57BC   8B153C114000           mov     edx, [$0040113C]
007B57C2   B902000000             mov     ecx, $00000002

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B57C7   E84809C5FF             call    00406114
007B57CC   8D45D8                 lea     eax, [ebp-$28]

* Reference to: System.@LStrClr(void;void);
|
007B57CF   E850FBC4FF             call    00405324
007B57D4   8D45DC                 lea     eax, [ebp-$24]

* Reference to: System.@LStrClr(void;void);
|
007B57D7   E848FBC4FF             call    00405324
007B57DC   8D45E0                 lea     eax, [ebp-$20]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B57DF   E890EEC5FF             call    00414674
007B57E4   8D45F0                 lea     eax, [ebp-$10]

* Reference to: System.@LStrClr(void;void);
|
007B57E7   E838FBC4FF             call    00405324
007B57EC   8D45F4                 lea     eax, [ebp-$0C]
007B57EF   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B57F4   E84FFBC4FF             call    00405348
007B57F9   C3                     ret


* Reference to: System.@HandleFinally;
|
007B57FA   E9F5F2C4FF             jmp     00404AF4
007B57FF   E93AFEFFFF             jmp     007B563E

****** END
|
007B5804   5F                     pop     edi
007B5805   5E                     pop     esi
007B5806   5B                     pop     ebx
007B5807   8BE5                   mov     esp, ebp
007B5809   5D                     pop     ebp
007B580A   C20400                 ret     $0004

*)
end;

procedure TfrmSelExportField._PROC_007B581D(Sender : TObject);
begin
(*
007B581D   8BEC                   mov     ebp, esp
007B581F   51                     push    ecx
007B5820   B91A000000             mov     ecx, $0000001A
007B5825   6A00                   push    $00
007B5827   6A00                   push    $00
007B5829   49                     dec     ecx
007B582A   75F9                   jnz     007B5825
007B582C   51                     push    ecx
007B582D   874DFC                 xchg    [ebp-$04], ecx
007B5830   53                     push    ebx
007B5831   56                     push    esi
007B5832   57                     push    edi
007B5833   894DF8                 mov     [ebp-$08], ecx
007B5836   8BFA                   mov     edi, edx
007B5838   8945FC                 mov     [ebp-$04], eax
007B583B   33C0                   xor     eax, eax
007B583D   55                     push    ebp
007B583E   6896607B00             push    $007B6096

***** TRY
|
007B5843   64FF30                 push    dword ptr fs:[eax]
007B5846   648920                 mov     fs:[eax], esp
007B5849   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B584C   E86F26D1FF             call    004C7EC0
007B5851   84C0                   test    al, al
007B5853   0F85EC070000           jnz     007B6045
007B5859   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|           or: QControls.TWidgetControl.GetControlCount(TWidgetControl):Integer;
|
007B585B   E85064CDFF             call    0048BCB0
007B5860   48                     dec     eax
007B5861   85C0                   test    eax, eax
007B5863   0F8CDC070000           jl      007B6045
007B5869   40                     inc     eax
007B586A   8945EC                 mov     [ebp-$14], eax
007B586D   33F6                   xor     esi, esi
007B586F   8BD6                   mov     edx, esi
007B5871   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5873   E8FC63CDFF             call    0048BC74

* Reference to class TLabel
|
007B5878   8B151C5F4700           mov     edx, [$00475F1C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B587E   E861ECC4FF             call    004044E4
007B5883   84C0                   test    al, al
007B5885   0F85B0070000           jnz     007B603B
007B588B   8BD6                   mov     edx, esi
007B588D   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B588F   E8E063CDFF             call    0048BC74
007B5894   8B400C                 mov     eax, [eax+$0C]
007B5897   3B45F8                 cmp     eax, [ebp-$08]
007B589A   0F859B070000           jnz     007B603B
007B58A0   8BD6                   mov     edx, esi
007B58A2   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B58A4   E8CB63CDFF             call    0048BC74
007B58A9   8B5008                 mov     edx, [eax+$08]
007B58AC   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: System.@LStrLAsg(void;void;void;void);
|
007B58AF   E808FBC4FF             call    004053BC
007B58B4   8BD6                   mov     edx, esi
007B58B6   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B58B8   E8B763CDFF             call    0048BC74

* Reference to class TEdit
|
007B58BD   8B15B8674700           mov     edx, [$004767B8]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B58C3   E81CECC4FF             call    004044E4
007B58C8   84C0                   test    al, al
007B58CA   746F                   jz      007B593B
007B58CC   8B55F4                 mov     edx, [ebp-$0C]
007B58CF   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B58D2   E8DD12D1FF             call    004C6BB4
007B58D7   8D55E4                 lea     edx, [ebp-$1C]
007B58DA   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B58DC   FF5160                 call    dword ptr [ecx+$60]
007B58DF   8B45E4                 mov     eax, [ebp-$1C]
007B58E2   8D55E8                 lea     edx, [ebp-$18]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B58E5   E80250C5FF             call    0040A8EC
007B58EA   837DE800               cmp     dword ptr [ebp-$18], +$00
007B58EE   7436                   jz      007B5926
007B58F0   8B55F4                 mov     edx, [ebp-$0C]
007B58F3   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B58F6   E8B912D1FF             call    004C6BB4
007B58FB   8D55DC                 lea     edx, [ebp-$24]
007B58FE   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5900   FF5160                 call    dword ptr [ecx+$60]
007B5903   8B45DC                 mov     eax, [ebp-$24]
007B5906   8D55E0                 lea     edx, [ebp-$20]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5909   E8DE4FC5FF             call    0040A8EC
007B590E   8B45E0                 mov     eax, [ebp-$20]
007B5911   50                     push    eax
007B5912   8BD6                   mov     edx, esi
007B5914   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5916   E85963CDFF             call    0048BC74
007B591B   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B591C   E8FF2CCDFF             call    00488620
007B5921   E915070000             jmp     007B603B
007B5926   8BD6                   mov     edx, esi
007B5928   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B592A   E84563CDFF             call    0048BC74
007B592F   33D2                   xor     edx, edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5931   E8EA2CCDFF             call    00488620
007B5936   E900070000             jmp     007B603B
007B593B   8BD6                   mov     edx, esi
007B593D   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B593F   E83063CDFF             call    0048BC74
007B5944   8B15F4508800           mov     edx, [$008850F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B594A   E895EBC4FF             call    004044E4
007B594F   84C0                   test    al, al
007B5951   744B                   jz      007B599E
007B5953   8B55F4                 mov     edx, [ebp-$0C]
007B5956   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5959   E85612D1FF             call    004C6BB4
007B595E   8D55D4                 lea     edx, [ebp-$2C]
007B5961   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5963   FF5160                 call    dword ptr [ecx+$60]
007B5966   8B45D4                 mov     eax, [ebp-$2C]
007B5969   8D55D8                 lea     edx, [ebp-$28]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B596C   E87B4FC5FF             call    0040A8EC
007B5971   8B45D8                 mov     eax, [ebp-$28]
007B5974   50                     push    eax
007B5975   8BD6                   mov     edx, esi
007B5977   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5979   E8F662CDFF             call    0048BC74
007B597E   5A                     pop     edx

|
007B597F   E830E9EFFF             call    006B42B4
007B5984   8BD8                   mov     ebx, eax
007B5986   8BD6                   mov     edx, esi
007B5988   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B598A   E8E562CDFF             call    0048BC74
007B598F   8BD3                   mov     edx, ebx
007B5991   8B08                   mov     ecx, [eax]
007B5993   FF91D0000000           call    dword ptr [ecx+$00D0]
007B5999   E99D060000             jmp     007B603B
007B599E   8BD6                   mov     edx, esi
007B59A0   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B59A2   E8CD62CDFF             call    0048BC74

* Reference to class TRichEdit
|
007B59A7   8B15F84F4500           mov     edx, [$00454FF8]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B59AD   E832EBC4FF             call    004044E4
007B59B2   84C0                   test    al, al
007B59B4   745E                   jz      007B5A14
007B59B6   8B55F4                 mov     edx, [ebp-$0C]
007B59B9   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B59BC   E8F311D1FF             call    004C6BB4
007B59C1   8D55CC                 lea     edx, [ebp-$34]
007B59C4   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B59C6   FF5160                 call    dword ptr [ecx+$60]
007B59C9   8B45CC                 mov     eax, [ebp-$34]
007B59CC   8D55D0                 lea     edx, [ebp-$30]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B59CF   E8184FC5FF             call    0040A8EC
007B59D4   837DD000               cmp     dword ptr [ebp-$30], +$00
007B59D8   0F845D060000           jz      007B603B
007B59DE   8B55F4                 mov     edx, [ebp-$0C]
007B59E1   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B59E4   E8CB11D1FF             call    004C6BB4
007B59E9   8D55C4                 lea     edx, [ebp-$3C]
007B59EC   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B59EE   FF5160                 call    dword ptr [ecx+$60]
007B59F1   8B45C4                 mov     eax, [ebp-$3C]
007B59F4   8D55C8                 lea     edx, [ebp-$38]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B59F7   E8F04EC5FF             call    0040A8EC
007B59FC   8B45C8                 mov     eax, [ebp-$38]
007B59FF   50                     push    eax
007B5A00   8BD6                   mov     edx, esi
007B5A02   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5A04   E86B62CDFF             call    0048BC74
007B5A09   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5A0A   E8112CCDFF             call    00488620
007B5A0F   E927060000             jmp     007B603B
007B5A14   8BD6                   mov     edx, esi
007B5A16   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5A18   E85762CDFF             call    0048BC74

* Reference to class TcxRichEdit
|
007B5A1D   8B15685A6B00           mov     edx, [$006B5A68]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5A23   E8BCEAC4FF             call    004044E4
007B5A28   84C0                   test    al, al
007B5A2A   745E                   jz      007B5A8A
007B5A2C   8B55F4                 mov     edx, [ebp-$0C]
007B5A2F   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5A32   E87D11D1FF             call    004C6BB4
007B5A37   8D55BC                 lea     edx, [ebp-$44]
007B5A3A   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5A3C   FF5160                 call    dword ptr [ecx+$60]
007B5A3F   8B45BC                 mov     eax, [ebp-$44]
007B5A42   8D55C0                 lea     edx, [ebp-$40]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5A45   E8A24EC5FF             call    0040A8EC
007B5A4A   837DC000               cmp     dword ptr [ebp-$40], +$00
007B5A4E   0F84E7050000           jz      007B603B
007B5A54   8B55F4                 mov     edx, [ebp-$0C]
007B5A57   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5A5A   E85511D1FF             call    004C6BB4
007B5A5F   8D55B4                 lea     edx, [ebp-$4C]
007B5A62   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5A64   FF5160                 call    dword ptr [ecx+$60]
007B5A67   8B45B4                 mov     eax, [ebp-$4C]
007B5A6A   8D55B8                 lea     edx, [ebp-$48]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5A6D   E87A4EC5FF             call    0040A8EC
007B5A72   8B45B8                 mov     eax, [ebp-$48]
007B5A75   50                     push    eax
007B5A76   8BD6                   mov     edx, esi
007B5A78   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5A7A   E8F561CDFF             call    0048BC74
007B5A7F   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5A80   E89B2BCDFF             call    00488620
007B5A85   E9B1050000             jmp     007B603B
007B5A8A   8BD6                   mov     edx, esi
007B5A8C   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5A8E   E8E161CDFF             call    0048BC74

* Reference to class TComboBox
|
007B5A93   8B15F4814700           mov     edx, [$004781F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5A99   E846EAC4FF             call    004044E4
007B5A9E   84C0                   test    al, al
007B5AA0   746E                   jz      007B5B10
007B5AA2   8BD6                   mov     edx, esi
007B5AA4   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5AA6   E8C961CDFF             call    0048BC74
007B5AAB   8B803C020000           mov     eax, [eax+$023C]
007B5AB1   8B10                   mov     edx, [eax]
007B5AB3   FF5214                 call    dword ptr [edx+$14]
007B5AB6   85C0                   test    eax, eax
007B5AB8   7E3B                   jle     007B5AF5
007B5ABA   8B55F4                 mov     edx, [ebp-$0C]
007B5ABD   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5AC0   E8EF10D1FF             call    004C6BB4
007B5AC5   8D55AC                 lea     edx, [ebp-$54]
007B5AC8   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5ACA   FF5160                 call    dword ptr [ecx+$60]
007B5ACD   8B45AC                 mov     eax, [ebp-$54]
007B5AD0   8D55B0                 lea     edx, [ebp-$50]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5AD3   E8144EC5FF             call    0040A8EC
007B5AD8   8B45B0                 mov     eax, [ebp-$50]
007B5ADB   50                     push    eax
007B5ADC   8BD6                   mov     edx, esi
007B5ADE   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5AE0   E88F61CDFF             call    0048BC74
007B5AE5   8B803C020000           mov     eax, [eax+$023C]
007B5AEB   5A                     pop     edx
007B5AEC   8B08                   mov     ecx, [eax]
007B5AEE   FF5154                 call    dword ptr [ecx+$54]
007B5AF1   8BD8                   mov     ebx, eax
007B5AF3   EB03                   jmp     007B5AF8
007B5AF5   83CBFF                 or      ebx, -$01
007B5AF8   8BD6                   mov     edx, esi
007B5AFA   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5AFC   E87361CDFF             call    0048BC74
007B5B01   8BD3                   mov     edx, ebx
007B5B03   8B08                   mov     ecx, [eax]
007B5B05   FF91D0000000           call    dword ptr [ecx+$00D0]
007B5B0B   E92B050000             jmp     007B603B
007B5B10   8BD6                   mov     edx, esi
007B5B12   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5B14   E85B61CDFF             call    0048BC74

* Reference to class TBtnEditA
|
007B5B19   8B1530A24F00           mov     edx, [$004FA230]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5B1F   E8C0E9C4FF             call    004044E4
007B5B24   84C0                   test    al, al
007B5B26   0F84A4000000           jz      007B5BD0
007B5B2C   8B55F4                 mov     edx, [ebp-$0C]
007B5B2F   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5B32   E87D10D1FF             call    004C6BB4
007B5B37   8D55A4                 lea     edx, [ebp-$5C]
007B5B3A   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5B3C   FF5160                 call    dword ptr [ecx+$60]
007B5B3F   8B45A4                 mov     eax, [ebp-$5C]
007B5B42   8D55A8                 lea     edx, [ebp-$58]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5B45   E8A24DC5FF             call    0040A8EC
007B5B4A   8B45A8                 mov     eax, [ebp-$58]
007B5B4D   50                     push    eax
007B5B4E   8BD6                   mov     edx, esi
007B5B50   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5B52   E81D61CDFF             call    0048BC74
007B5B57   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5B58   E8C32ACDFF             call    00488620
007B5B5D   8BD6                   mov     edx, esi
007B5B5F   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5B61   E80E61CDFF             call    0048BC74
007B5B66   8B8080000000           mov     eax, [eax+$0080]
007B5B6C   8D55A0                 lea     edx, [ebp-$60]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5B6F   E8784DC5FF             call    0040A8EC
007B5B74   837DA000               cmp     dword ptr [ebp-$60], +$00
007B5B78   0F84BD040000           jz      007B603B
007B5B7E   8BD6                   mov     edx, esi
007B5B80   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5B82   E8ED60CDFF             call    0048BC74
007B5B87   0530020000             add     eax, +$00000230
007B5B8C   50                     push    eax
007B5B8D   8BD6                   mov     edx, esi
007B5B8F   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5B91   E8DE60CDFF             call    0048BC74
007B5B96   8B8080000000           mov     eax, [eax+$0080]
007B5B9C   8D5594                 lea     edx, [ebp-$6C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5B9F   E8484DC5FF             call    0040A8EC
007B5BA4   8B5594                 mov     edx, [ebp-$6C]
007B5BA7   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5BAA   E80510D1FF             call    004C6BB4
007B5BAF   8D5598                 lea     edx, [ebp-$68]
007B5BB2   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5BB4   FF5160                 call    dword ptr [ecx+$60]
007B5BB7   8B4598                 mov     eax, [ebp-$68]
007B5BBA   8D559C                 lea     edx, [ebp-$64]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5BBD   E82A4DC5FF             call    0040A8EC
007B5BC2   8B559C                 mov     edx, [ebp-$64]
007B5BC5   58                     pop     eax

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B5BC6   E8ADF7C4FF             call    00405378
007B5BCB   E96B040000             jmp     007B603B
007B5BD0   8BD6                   mov     edx, esi
007B5BD2   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5BD4   E89B60CDFF             call    0048BC74

* Reference to class TBtnEditC
|
007B5BD9   8B158CAB4F00           mov     edx, [$004FAB8C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5BDF   E800E9C4FF             call    004044E4
007B5BE4   84C0                   test    al, al
007B5BE6   0F84CB000000           jz      007B5CB7
007B5BEC   8B55F4                 mov     edx, [ebp-$0C]
007B5BEF   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5BF2   E8BD0FD1FF             call    004C6BB4
007B5BF7   8D558C                 lea     edx, [ebp-$74]
007B5BFA   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5BFC   FF5160                 call    dword ptr [ecx+$60]
007B5BFF   8B458C                 mov     eax, [ebp-$74]
007B5C02   8D5590                 lea     edx, [ebp-$70]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5C05   E8E24CC5FF             call    0040A8EC
007B5C0A   8B4590                 mov     eax, [ebp-$70]
007B5C0D   50                     push    eax
007B5C0E   8BD6                   mov     edx, esi
007B5C10   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5C12   E85D60CDFF             call    0048BC74
007B5C17   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5C18   E8032ACDFF             call    00488620
007B5C1D   8BD6                   mov     edx, esi
007B5C1F   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5C21   E84E60CDFF             call    0048BC74
007B5C26   8B8080000000           mov     eax, [eax+$0080]
007B5C2C   8D5588                 lea     edx, [ebp-$78]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5C2F   E8B84CC5FF             call    0040A8EC
007B5C34   837D8800               cmp     dword ptr [ebp-$78], +$00
007B5C38   0F84FD030000           jz      007B603B
007B5C3E   8BD6                   mov     edx, esi
007B5C40   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5C42   E82D60CDFF             call    0048BC74
007B5C47   8B9080000000           mov     edx, [eax+$0080]
007B5C4D   B8AC607B00             mov     eax, $007B60AC

* Reference to: System.@LStrPos;
|
007B5C52   E8E1FCC4FF             call    00405938
007B5C57   85C0                   test    eax, eax
007B5C59   0F8FDC030000           jnle    007B603B
007B5C5F   8BD6                   mov     edx, esi
007B5C61   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5C63   E80C60CDFF             call    0048BC74
007B5C68   0538020000             add     eax, +$00000238
007B5C6D   50                     push    eax
007B5C6E   8BD6                   mov     edx, esi
007B5C70   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5C72   E8FD5FCDFF             call    0048BC74
007B5C77   8B8080000000           mov     eax, [eax+$0080]
007B5C7D   8D957CFFFFFF           lea     edx, [ebp+$FFFFFF7C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5C83   E8644CC5FF             call    0040A8EC
007B5C88   8B957CFFFFFF           mov     edx, [ebp+$FFFFFF7C]
007B5C8E   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5C91   E81E0FD1FF             call    004C6BB4
007B5C96   8D5580                 lea     edx, [ebp-$80]
007B5C99   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5C9B   FF5160                 call    dword ptr [ecx+$60]
007B5C9E   8B4580                 mov     eax, [ebp-$80]
007B5CA1   8D5584                 lea     edx, [ebp-$7C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5CA4   E8434CC5FF             call    0040A8EC
007B5CA9   8B5584                 mov     edx, [ebp-$7C]
007B5CAC   58                     pop     eax

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B5CAD   E8C6F6C4FF             call    00405378
007B5CB2   E984030000             jmp     007B603B
007B5CB7   8BD6                   mov     edx, esi
007B5CB9   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5CBB   E8B45FCDFF             call    0048BC74

* Reference to class TDateTimePicker
|
007B5CC0   8B15E0A54500           mov     edx, [$0045A5E0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5CC6   E819E8C4FF             call    004044E4
007B5CCB   84C0                   test    al, al
007B5CCD   746F                   jz      007B5D3E
007B5CCF   8B55F4                 mov     edx, [ebp-$0C]
007B5CD2   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5CD5   E8DA0ED1FF             call    004C6BB4
007B5CDA   8D9574FFFFFF           lea     edx, [ebp+$FFFFFF74]
007B5CE0   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5CE2   FF5160                 call    dword ptr [ecx+$60]
007B5CE5   8B8574FFFFFF           mov     eax, [ebp+$FFFFFF74]
007B5CEB   8D9578FFFFFF           lea     edx, [ebp+$FFFFFF78]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5CF1   E8F64BC5FF             call    0040A8EC
007B5CF6   83BD78FFFFFF00         cmp     dword ptr [ebp+$FFFFFF78], +$00
007B5CFD   7515                   jnz     007B5D14
007B5CFF   8BD6                   mov     edx, esi
007B5D01   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5D03   E86C5FCDFF             call    0048BC74
007B5D08   33D2                   xor     edx, edx

* Reference to: ComCtrls.TDateTimePicker.SetChecked(TDateTimePicker;Boolean);
|
007B5D0A   E87DD1CBFF             call    00472E8C
007B5D0F   E927030000             jmp     007B603B
007B5D14   8B55F4                 mov     edx, [ebp-$0C]
007B5D17   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5D1A   E8950ED1FF             call    004C6BB4
007B5D1F   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetEnabled()
|
007B5D21   FF5250                 call    dword ptr [edx+$50]
007B5D24   83C4F8                 add     esp, -$08
007B5D27   DD1C24                 fstp    qword ptr [esp]
007B5D2A   9B                     wait
007B5D2B   8BD6                   mov     edx, esi
007B5D2D   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5D2F   E8405FCDFF             call    0048BC74

* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
007B5D34   E8F3C4CBFF             call    0047222C
007B5D39   E9FD020000             jmp     007B603B
007B5D3E   8BD6                   mov     edx, esi
007B5D40   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5D42   E82D5FCDFF             call    0048BC74

* Reference to class TMemo
|
007B5D47   8B158C724700           mov     edx, [$0047728C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5D4D   E892E7C4FF             call    004044E4
007B5D52   84C0                   test    al, al
007B5D54   7442                   jz      007B5D98
007B5D56   8B55F4                 mov     edx, [ebp-$0C]
007B5D59   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5D5C   E8530ED1FF             call    004C6BB4
007B5D61   8D956CFFFFFF           lea     edx, [ebp+$FFFFFF6C]
007B5D67   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5D69   FF5160                 call    dword ptr [ecx+$60]
007B5D6C   8B856CFFFFFF           mov     eax, [ebp+$FFFFFF6C]
007B5D72   8D9570FFFFFF           lea     edx, [ebp+$FFFFFF70]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5D78   E86F4BC5FF             call    0040A8EC
007B5D7D   8B8570FFFFFF           mov     eax, [ebp+$FFFFFF70]
007B5D83   50                     push    eax
007B5D84   8BD6                   mov     edx, esi
007B5D86   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5D88   E8E75ECDFF             call    0048BC74
007B5D8D   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5D8E   E88D28CDFF             call    00488620
007B5D93   E9A3020000             jmp     007B603B
007B5D98   8BD6                   mov     edx, esi
007B5D9A   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5D9C   E8D35ECDFF             call    0048BC74

* Reference to class TcxDateEdit
|
007B5DA1   8B1580F45E00           mov     edx, [$005EF480]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5DA7   E838E7C4FF             call    004044E4
007B5DAC   84C0                   test    al, al
007B5DAE   745C                   jz      007B5E0C
007B5DB0   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B5DB3   E80821D1FF             call    004C7EC0
007B5DB8   84C0                   test    al, al
007B5DBA   0F857B020000           jnz     007B603B
007B5DC0   8B55F4                 mov     edx, [ebp-$0C]
007B5DC3   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5DC6   E8E90DD1FF             call    004C6BB4
007B5DCB   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.SetBounds(Integer,Integer,Integer,Integer)
|
007B5DCD   FF9284000000           call    dword ptr [edx+$0084]
007B5DD3   84C0                   test    al, al
007B5DD5   0F8560020000           jnz     007B603B
007B5DDB   8B55F4                 mov     edx, [ebp-$0C]
007B5DDE   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5DE1   E8CE0DD1FF             call    004C6BB4
007B5DE6   8D9568FFFFFF           lea     edx, [ebp+$FFFFFF68]
007B5DEC   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5DEE   FF5160                 call    dword ptr [ecx+$60]
007B5DF1   8B8568FFFFFF           mov     eax, [ebp+$FFFFFF68]
007B5DF7   50                     push    eax
007B5DF8   8BD6                   mov     edx, esi
007B5DFA   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5DFC   E8735ECDFF             call    0048BC74
007B5E01   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5E02   E81928CDFF             call    00488620
007B5E07   E92F020000             jmp     007B603B
007B5E0C   8BD6                   mov     edx, esi
007B5E0E   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5E10   E85F5ECDFF             call    0048BC74

* Reference to class TcxTimeEdit
|
007B5E15   8B1570AB5E00           mov     edx, [$005EAB70]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5E1B   E8C4E6C4FF             call    004044E4
007B5E20   84C0                   test    al, al
007B5E22   7464                   jz      007B5E88
007B5E24   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B5E27   E89420D1FF             call    004C7EC0
007B5E2C   84C0                   test    al, al
007B5E2E   0F8507020000           jnz     007B603B
007B5E34   8B55F4                 mov     edx, [ebp-$0C]
007B5E37   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5E3A   E8750DD1FF             call    004C6BB4
007B5E3F   8D9564FFFFFF           lea     edx, [ebp+$FFFFFF64]
007B5E45   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5E47   FF5160                 call    dword ptr [ecx+$60]
007B5E4A   83BD64FFFFFF00         cmp     dword ptr [ebp+$FFFFFF64], +$00
007B5E51   0F84E4010000           jz      007B603B
007B5E57   8B55F4                 mov     edx, [ebp-$0C]
007B5E5A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5E5D   E8520DD1FF             call    004C6BB4
007B5E62   8D9560FFFFFF           lea     edx, [ebp+$FFFFFF60]
007B5E68   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5E6A   FF5160                 call    dword ptr [ecx+$60]
007B5E6D   8B8560FFFFFF           mov     eax, [ebp+$FFFFFF60]
007B5E73   50                     push    eax
007B5E74   8BD6                   mov     edx, esi
007B5E76   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5E78   E8F75DCDFF             call    0048BC74
007B5E7D   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5E7E   E89D27CDFF             call    00488620
007B5E83   E9B3010000             jmp     007B603B
007B5E88   8BD6                   mov     edx, esi
007B5E8A   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5E8C   E8E35DCDFF             call    0048BC74

* Reference to class TcxCurrencyEdit
|
007B5E91   8B15748E5F00           mov     edx, [$005F8E74]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5E97   E848E6C4FF             call    004044E4
007B5E9C   84C0                   test    al, al
007B5E9E   7431                   jz      007B5ED1
007B5EA0   8B55F4                 mov     edx, [ebp-$0C]
007B5EA3   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5EA6   E8090DD1FF             call    004C6BB4
007B5EAB   8D955CFFFFFF           lea     edx, [ebp+$FFFFFF5C]
007B5EB1   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5EB3   FF5160                 call    dword ptr [ecx+$60]
007B5EB6   8B855CFFFFFF           mov     eax, [ebp+$FFFFFF5C]
007B5EBC   50                     push    eax
007B5EBD   8BD6                   mov     edx, esi
007B5EBF   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5EC1   E8AE5DCDFF             call    0048BC74
007B5EC6   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5EC7   E85427CDFF             call    00488620
007B5ECC   E96A010000             jmp     007B603B
007B5ED1   8BD6                   mov     edx, esi
007B5ED3   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5ED5   E89A5DCDFF             call    0048BC74

* Reference to class TCheckBox
|
007B5EDA   8B15C0964700           mov     edx, [$004796C0]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5EE0   E8FFE5C4FF             call    004044E4
007B5EE5   84C0                   test    al, al
007B5EE7   7476                   jz      007B5F5F
007B5EE9   8B55F4                 mov     edx, [ebp-$0C]
007B5EEC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5EEF   E8C00CD1FF             call    004C6BB4
007B5EF4   8D954CFFFFFF           lea     edx, [ebp+$FFFFFF4C]
007B5EFA   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetEnabled(Boolean)
|
007B5EFC   FF5164                 call    dword ptr [ecx+$64]
007B5EFF   8D854CFFFFFF           lea     eax, [ebp+$FFFFFF4C]
007B5F05   50                     push    eax
007B5F06   8D853CFFFFFF           lea     eax, [ebp+$FFFFFF3C]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B5F0C   E84F74C6FF             call    0041D360
007B5F11   8D953CFFFFFF           lea     edx, [ebp+$FFFFFF3C]
007B5F17   58                     pop     eax

* Reference to: Variants.@VarCmpEQ(TVarData;TVarData;TVarData;TVarData);
|           or: Variants.@VarCmpNE(TVarData;TVarData;TVarData;TVarData);
|           or: Variants.@VarCmpLT(TVarData;TVarData;TVarData;TVarData);
|           or: Variants.@VarCmpLE(TVarData;TVarData;TVarData;TVarData);
|           or: Variants.@VarCmpGT(TVarData;TVarData;TVarData;TVarData);
|           or: Variants.@VarCmpGE(TVarData;TVarData;TVarData;TVarData);
|
007B5F18   E8CF74C6FF             call    0041D3EC
007B5F1D   7518                   jnz     007B5F37
007B5F1F   8BD6                   mov     edx, esi
007B5F21   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5F23   E84C5DCDFF             call    0048BC74
007B5F28   33D2                   xor     edx, edx
007B5F2A   8B08                   mov     ecx, [eax]
007B5F2C   FF91CC000000           call    dword ptr [ecx+$00CC]
007B5F32   E904010000             jmp     007B603B
007B5F37   8B55F4                 mov     edx, [ebp-$0C]
007B5F3A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5F3D   E8720CD1FF             call    004C6BB4
007B5F42   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B5F44   FF5244                 call    dword ptr [edx+$44]
007B5F47   50                     push    eax
007B5F48   8BD6                   mov     edx, esi
007B5F4A   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5F4C   E8235DCDFF             call    0048BC74
007B5F51   5A                     pop     edx
007B5F52   8B08                   mov     ecx, [eax]
007B5F54   FF91CC000000           call    dword ptr [ecx+$00CC]
007B5F5A   E9DC000000             jmp     007B603B
007B5F5F   8BD6                   mov     edx, esi
007B5F61   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5F63   E80C5DCDFF             call    0048BC74

* Reference to class TcxButtonEdit
|
007B5F68   8B15D4D25B00           mov     edx, [$005BD2D4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B5F6E   E871E5C4FF             call    004044E4
007B5F73   84C0                   test    al, al
007B5F75   0F84C0000000           jz      007B603B
007B5F7B   8B55F4                 mov     edx, [ebp-$0C]
007B5F7E   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B5F81   E82E0CD1FF             call    004C6BB4
007B5F86   8D9534FFFFFF           lea     edx, [ebp+$FFFFFF34]
007B5F8C   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B5F8E   FF5160                 call    dword ptr [ecx+$60]
007B5F91   8B8534FFFFFF           mov     eax, [ebp+$FFFFFF34]
007B5F97   8D9538FFFFFF           lea     edx, [ebp+$FFFFFF38]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5F9D   E84A49C5FF             call    0040A8EC
007B5FA2   8B8538FFFFFF           mov     eax, [ebp+$FFFFFF38]
007B5FA8   50                     push    eax
007B5FA9   8BD6                   mov     edx, esi
007B5FAB   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5FAD   E8C25CCDFF             call    0048BC74
007B5FB2   5A                     pop     edx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B5FB3   E86826CDFF             call    00488620
007B5FB8   8BD6                   mov     edx, esi
007B5FBA   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5FBC   E8B35CCDFF             call    0048BC74
007B5FC1   80B89A00000000         cmp     byte ptr [eax+$009A], $00
007B5FC8   7571                   jnz     007B603B
007B5FCA   8D8530FFFFFF           lea     eax, [ebp+$FFFFFF30]
007B5FD0   50                     push    eax
007B5FD1   8B45F4                 mov     eax, [ebp-$0C]

* Reference to: System.@LStrLen(String):Integer;
|           or: System.@DynArrayLength;
|           or: System.DynArraySize(Pointer):Integer;
|           or: Variants.DynArraySize(Pointer):Integer;
|
007B5FD4   E81BF6C4FF             call    004055F4
007B5FD9   8BC8                   mov     ecx, eax
007B5FDB   83E904                 sub     ecx, +$04
007B5FDE   BA01000000             mov     edx, $00000001
007B5FE3   8B45F4                 mov     eax, [ebp-$0C]

* Reference to: System.@LStrCopy;
|
007B5FE6   E869F8C4FF             call    00405854
007B5FEB   8B8530FFFFFF           mov     eax, [ebp+$FFFFFF30]
007B5FF1   8D55F0                 lea     edx, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B5FF4   E8F348C5FF             call    0040A8EC
007B5FF9   8BD6                   mov     edx, esi
007B5FFB   8BC7                   mov     eax, edi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|           or: QControls.TWidgetControl.GetControl(TWidgetControl;Integer):TControl;
|
007B5FFD   E8725CCDFF             call    0048BC74
007B6002   0580000000             add     eax, +$00000080
007B6007   50                     push    eax
007B6008   8B55F0                 mov     edx, [ebp-$10]
007B600B   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B600E   E8A10BD1FF             call    004C6BB4
007B6013   8D9528FFFFFF           lea     edx, [ebp+$FFFFFF28]
007B6019   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B601B   FF5160                 call    dword ptr [ecx+$60]
007B601E   8B8528FFFFFF           mov     eax, [ebp+$FFFFFF28]
007B6024   8D952CFFFFFF           lea     edx, [ebp+$FFFFFF2C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B602A   E8BD48C5FF             call    0040A8EC
007B602F   8B952CFFFFFF           mov     edx, [ebp+$FFFFFF2C]
007B6035   58                     pop     eax

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B6036   E83DF3C4FF             call    00405378
007B603B   46                     inc     esi
007B603C   FF4DEC                 dec     dword ptr [ebp-$14]
007B603F   0F852AF8FFFF           jnz     007B586F
007B6045   33C0                   xor     eax, eax
007B6047   5A                     pop     edx
007B6048   59                     pop     ecx
007B6049   59                     pop     ecx
007B604A   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B604D   689D607B00             push    $007B609D
007B6052   8D8528FFFFFF           lea     eax, [ebp+$FFFFFF28]
007B6058   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B605D   E8E6F2C4FF             call    00405348
007B6062   8D853CFFFFFF           lea     eax, [ebp+$FFFFFF3C]

* Reference to object Variant
|
007B6068   8B153C114000           mov     edx, [$0040113C]
007B606E   B902000000             mov     ecx, $00000002

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B6073   E89C00C5FF             call    00406114
007B6078   8D855CFFFFFF           lea     eax, [ebp+$FFFFFF5C]
007B607E   BA24000000             mov     edx, $00000024

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6083   E8C0F2C4FF             call    00405348
007B6088   8D45F0                 lea     eax, [ebp-$10]
007B608B   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6090   E8B3F2C4FF             call    00405348
007B6095   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6096   E959EAC4FF             jmp     00404AF4
007B609B   EBB5                   jmp     007B6052

****** END
|
007B609D   5F                     pop     edi
007B609E   5E                     pop     esi
007B609F   5B                     pop     ebx
007B60A0   8BE5                   mov     esp, ebp
007B60A2   5D                     pop     ebp
007B60A3   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B60B1(Sender : TObject);
begin
(*
007B60B1   8BEC                   mov     ebp, esp
007B60B3   51                     push    ecx
007B60B4   B924000000             mov     ecx, $00000024
007B60B9   6A00                   push    $00
007B60BB   6A00                   push    $00
007B60BD   49                     dec     ecx
007B60BE   75F9                   jnz     007B60B9
007B60C0   874DFC                 xchg    [ebp-$04], ecx
007B60C3   53                     push    ebx
007B60C4   56                     push    esi
007B60C5   57                     push    edi
007B60C6   894DF8                 mov     [ebp-$08], ecx
007B60C9   8955FC                 mov     [ebp-$04], edx
007B60CC   8BF0                   mov     esi, eax
007B60CE   33C0                   xor     eax, eax
007B60D0   55                     push    ebp
007B60D1   68606C7B00             push    $007B6C60

***** TRY
|
007B60D6   64FF30                 push    dword ptr fs:[eax]
007B60D9   648920                 mov     fs:[eax], esp
007B60DC   8B4508                 mov     eax, [ebp+$08]

* Reference to: System.@LStrClr(void;void);
|
007B60DF   E840F2C4FF             call    00405324
007B60E4   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControlCount(TWinControl):Integer;
|
007B60E6   E8C55BCDFF             call    0048BCB0
007B60EB   8BF8                   mov     edi, eax
007B60ED   4F                     dec     edi
007B60EE   85FF                   test    edi, edi
007B60F0   0F8CB8090000           jl      007B6AAE
007B60F6   47                     inc     edi
007B60F7   33DB                   xor     ebx, ebx
007B60F9   8BD3                   mov     edx, ebx
007B60FB   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B60FD   E8725BCDFF             call    0048BC74

* Reference to class TLabel
|
007B6102   8B151C5F4700           mov     edx, [$00475F1C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B6108   E8D7E3C4FF             call    004044E4
007B610D   84C0                   test    al, al
007B610F   0F8591090000           jnz     007B6AA6
007B6115   8BD3                   mov     edx, ebx
007B6117   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6119   E8565BCDFF             call    0048BC74

* Reference to class TEdit
|
007B611E   8B15B8674700           mov     edx, [$004767B8]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B6124   E8BBE3C4FF             call    004044E4
007B6129   84C0                   test    al, al
007B612B   0F8478030000           jz      007B64A9
007B6131   8BD3                   mov     edx, ebx
007B6133   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6135   E83A5BCDFF             call    0048BC74
007B613A   8D55E8                 lea     edx, [ebp-$18]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B613D   E8AE24CDFF             call    004885F0
007B6142   8B45E8                 mov     eax, [ebp-$18]
007B6145   8D55EC                 lea     edx, [ebp-$14]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6148   E89F47C5FF             call    0040A8EC
007B614D   837DEC00               cmp     dword ptr [ebp-$14], +$00
007B6151   0F844F090000           jz      007B6AA6
007B6157   8BD3                   mov     edx, ebx
007B6159   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B615B   E8145BCDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6160   8B400C                 mov     eax, [eax+$0C]
007B6163   3B45FC                 cmp     eax, [ebp-$04]
007B6166   7557                   jnz     007B61BF
007B6168   8B4508                 mov     eax, [ebp+$08]
007B616B   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B616D   687C6C7B00             push    $007B6C7C
007B6172   8BD3                   mov     edx, ebx
007B6174   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6176   E8F95ACDFF             call    0048BC74
007B617B   FF7008                 push    dword ptr [eax+$08]
007B617E   688C6C7B00             push    $007B6C8C
007B6183   8BD3                   mov     edx, ebx
007B6185   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6187   E8E85ACDFF             call    0048BC74
007B618C   8D55DC                 lea     edx, [ebp-$24]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B618F   E85C24CDFF             call    004885F0
007B6194   8B45DC                 mov     eax, [ebp-$24]
007B6197   8D55E0                 lea     edx, [ebp-$20]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B619A   E84D47C5FF             call    0040A8EC
007B619F   8B45E0                 mov     eax, [ebp-$20]
007B61A2   8D55E4                 lea     edx, [ebp-$1C]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B61A5   E84A48C5FF             call    0040A9F4
007B61AA   FF75E4                 push    dword ptr [ebp-$1C]
007B61AD   8B4508                 mov     eax, [ebp+$08]
007B61B0   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B61B5   E8FAF4C4FF             call    004056B4
007B61BA   E9E7080000             jmp     007B6AA6
007B61BF   8BD3                   mov     edx, ebx
007B61C1   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B61C3   E8AC5ACDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B61C8   8B400C                 mov     eax, [eax+$0C]
007B61CB   3B45F8                 cmp     eax, [ebp-$08]
007B61CE   0F85D2080000           jnz     007B6AA6
007B61D4   8BD3                   mov     edx, ebx
007B61D6   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B61D8   E8975ACDFF             call    0048BC74
007B61DD   8D55D4                 lea     edx, [ebp-$2C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B61E0   E80B24CDFF             call    004885F0
007B61E5   8B45D4                 mov     eax, [ebp-$2C]
007B61E8   8D55D8                 lea     edx, [ebp-$28]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B61EB   E8FC46C5FF             call    0040A8EC
007B61F0   8B55D8                 mov     edx, [ebp-$28]
007B61F3   B8986C7B00             mov     eax, $007B6C98

* Reference to: System.@LStrPos;
|
007B61F8   E83BF7C4FF             call    00405938
007B61FD   8945F4                 mov     [ebp-$0C], eax
007B6200   837DF400               cmp     dword ptr [ebp-$0C], +$00
007B6204   0F8E1C020000           jle     007B6426
007B620A   8B4508                 mov     eax, [ebp+$08]
007B620D   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B620F   687C6C7B00             push    $007B6C7C
007B6214   8BD3                   mov     edx, ebx
007B6216   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6218   E8575ACDFF             call    0048BC74
007B621D   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B6220   68A46C7B00             push    $007B6CA4
007B6225   68B46C7B00             push    $007B6CB4
007B622A   8D45C8                 lea     eax, [ebp-$38]
007B622D   50                     push    eax
007B622E   8BD3                   mov     edx, ebx
007B6230   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6232   E83D5ACDFF             call    0048BC74
007B6237   8D55C0                 lea     edx, [ebp-$40]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B623A   E8B123CDFF             call    004885F0
007B623F   8B45C0                 mov     eax, [ebp-$40]
007B6242   8D55C4                 lea     edx, [ebp-$3C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6245   E8A246C5FF             call    0040A8EC
007B624A   8B45C4                 mov     eax, [ebp-$3C]
007B624D   8B4DF4                 mov     ecx, [ebp-$0C]
007B6250   49                     dec     ecx
007B6251   BA01000000             mov     edx, $00000001

* Reference to: System.@LStrCopy;
|
007B6256   E8F9F5C4FF             call    00405854
007B625B   FF75C8                 push    dword ptr [ebp-$38]
007B625E   68B46C7B00             push    $007B6CB4
007B6263   8D45CC                 lea     eax, [ebp-$34]
007B6266   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B626B   E844F4C4FF             call    004056B4
007B6270   8B45CC                 mov     eax, [ebp-$34]
007B6273   8D55D0                 lea     edx, [ebp-$30]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B6276   E87947C5FF             call    0040A9F4
007B627B   FF75D0                 push    dword ptr [ebp-$30]
007B627E   8B4508                 mov     eax, [ebp+$08]
007B6281   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6286   E829F4C4FF             call    004056B4
007B628B   8D45F0                 lea     eax, [ebp-$10]
007B628E   50                     push    eax
007B628F   8BD3                   mov     edx, ebx
007B6291   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6293   E8DC59CDFF             call    0048BC74
007B6298   8D55B8                 lea     edx, [ebp-$48]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B629B   E85023CDFF             call    004885F0
007B62A0   8B45B8                 mov     eax, [ebp-$48]
007B62A3   8D55BC                 lea     edx, [ebp-$44]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B62A6   E84146C5FF             call    0040A8EC
007B62AB   8B45BC                 mov     eax, [ebp-$44]

* Reference to: System.@LStrLen(String):Integer;
|           or: System.@DynArrayLength;
|           or: System.DynArraySize(Pointer):Integer;
|           or: Variants.DynArraySize(Pointer):Integer;
|
007B62AE   E841F3C4FF             call    004055F4
007B62B3   50                     push    eax
007B62B4   8BD3                   mov     edx, ebx
007B62B6   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B62B8   E8B759CDFF             call    0048BC74
007B62BD   8D55B0                 lea     edx, [ebp-$50]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B62C0   E82B23CDFF             call    004885F0
007B62C5   8B45B0                 mov     eax, [ebp-$50]
007B62C8   8D55B4                 lea     edx, [ebp-$4C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B62CB   E81C46C5FF             call    0040A8EC
007B62D0   8B45B4                 mov     eax, [ebp-$4C]
007B62D3   8B55F4                 mov     edx, [ebp-$0C]
007B62D6   42                     inc     edx
007B62D7   59                     pop     ecx

* Reference to: System.@LStrCopy;
|
007B62D8   E877F5C4FF             call    00405854
007B62DD   E92A010000             jmp     007B640C
007B62E2   8D55AC                 lea     edx, [ebp-$54]
007B62E5   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B62E8   E8FF45C5FF             call    0040A8EC
007B62ED   8B55AC                 mov     edx, [ebp-$54]
007B62F0   B8986C7B00             mov     eax, $007B6C98

* Reference to: System.@LStrPos;
|
007B62F5   E83EF6C4FF             call    00405938
007B62FA   8945F4                 mov     [ebp-$0C], eax
007B62FD   837DF400               cmp     dword ptr [ebp-$0C], +$00
007B6301   0F8EA2000000           jle     007B63A9
007B6307   8B4508                 mov     eax, [ebp+$08]
007B630A   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B630C   687C6C7B00             push    $007B6C7C
007B6311   8BD3                   mov     edx, ebx
007B6313   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6315   E85A59CDFF             call    0048BC74
007B631A   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B631D   68A46C7B00             push    $007B6CA4
007B6322   68B46C7B00             push    $007B6CB4
007B6327   8D45A0                 lea     eax, [ebp-$60]
007B632A   50                     push    eax
007B632B   8D559C                 lea     edx, [ebp-$64]
007B632E   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6331   E8B645C5FF             call    0040A8EC
007B6336   8B459C                 mov     eax, [ebp-$64]
007B6339   8B4DF4                 mov     ecx, [ebp-$0C]
007B633C   49                     dec     ecx
007B633D   BA01000000             mov     edx, $00000001

* Reference to: System.@LStrCopy;
|
007B6342   E80DF5C4FF             call    00405854
007B6347   FF75A0                 push    dword ptr [ebp-$60]
007B634A   68B46C7B00             push    $007B6CB4
007B634F   8D45A4                 lea     eax, [ebp-$5C]
007B6352   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B6357   E858F3C4FF             call    004056B4
007B635C   8B45A4                 mov     eax, [ebp-$5C]
007B635F   8D55A8                 lea     edx, [ebp-$58]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B6362   E88D46C5FF             call    0040A9F4
007B6367   FF75A8                 push    dword ptr [ebp-$58]
007B636A   8B4508                 mov     eax, [ebp+$08]
007B636D   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6372   E83DF3C4FF             call    004056B4
007B6377   8D45F0                 lea     eax, [ebp-$10]
007B637A   50                     push    eax
007B637B   8D5598                 lea     edx, [ebp-$68]
007B637E   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6381   E86645C5FF             call    0040A8EC
007B6386   8B4598                 mov     eax, [ebp-$68]

* Reference to: System.@LStrLen(String):Integer;
|           or: System.@DynArrayLength;
|           or: System.DynArraySize(Pointer):Integer;
|           or: Variants.DynArraySize(Pointer):Integer;
|
007B6389   E866F2C4FF             call    004055F4
007B638E   50                     push    eax
007B638F   8D5594                 lea     edx, [ebp-$6C]
007B6392   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6395   E85245C5FF             call    0040A8EC
007B639A   8B4594                 mov     eax, [ebp-$6C]
007B639D   8B55F4                 mov     edx, [ebp-$0C]
007B63A0   42                     inc     edx
007B63A1   59                     pop     ecx

* Reference to: System.@LStrCopy;
|
007B63A2   E8ADF4C4FF             call    00405854
007B63A7   EB63                   jmp     007B640C
007B63A9   8B4508                 mov     eax, [ebp+$08]
007B63AC   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B63AE   687C6C7B00             push    $007B6C7C
007B63B3   8BD3                   mov     edx, ebx
007B63B5   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B63B7   E8B858CDFF             call    0048BC74
007B63BC   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B63BF   68A46C7B00             push    $007B6CA4
007B63C4   68B46C7B00             push    $007B6CB4
007B63C9   8D5588                 lea     edx, [ebp-$78]
007B63CC   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B63CF   E81845C5FF             call    0040A8EC
007B63D4   FF7588                 push    dword ptr [ebp-$78]
007B63D7   68B46C7B00             push    $007B6CB4
007B63DC   8D458C                 lea     eax, [ebp-$74]
007B63DF   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B63E4   E8CBF2C4FF             call    004056B4
007B63E9   8B458C                 mov     eax, [ebp-$74]
007B63EC   8D5590                 lea     edx, [ebp-$70]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B63EF   E80046C5FF             call    0040A9F4
007B63F4   FF7590                 push    dword ptr [ebp-$70]
007B63F7   8B4508                 mov     eax, [ebp+$08]
007B63FA   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B63FF   E8B0F2C4FF             call    004056B4
007B6404   8D45F0                 lea     eax, [ebp-$10]

* Reference to: System.@LStrClr(void;void);
|
007B6407   E818EFC4FF             call    00405324
007B640C   8D5584                 lea     edx, [ebp-$7C]
007B640F   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6412   E8D544C5FF             call    0040A8EC
007B6417   837D8400               cmp     dword ptr [ebp-$7C], +$00
007B641B   0F85C1FEFFFF           jnz     007B62E2
007B6421   E980060000             jmp     007B6AA6
007B6426   8B4508                 mov     eax, [ebp+$08]
007B6429   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B642B   687C6C7B00             push    $007B6C7C
007B6430   8BD3                   mov     edx, ebx
007B6432   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6434   E83B58CDFF             call    0048BC74
007B6439   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B643C   68A46C7B00             push    $007B6CA4
007B6441   68B46C7B00             push    $007B6CB4
007B6446   8BD3                   mov     edx, ebx
007B6448   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B644A   E82558CDFF             call    0048BC74
007B644F   8D9574FFFFFF           lea     edx, [ebp+$FFFFFF74]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6455   E89621CDFF             call    004885F0
007B645A   8B8574FFFFFF           mov     eax, [ebp+$FFFFFF74]
007B6460   8D9578FFFFFF           lea     edx, [ebp+$FFFFFF78]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6466   E88144C5FF             call    0040A8EC
007B646B   FFB578FFFFFF           push    dword ptr [ebp+$FFFFFF78]
007B6471   68B46C7B00             push    $007B6CB4
007B6476   8D857CFFFFFF           lea     eax, [ebp+$FFFFFF7C]
007B647C   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B6481   E82EF2C4FF             call    004056B4
007B6486   8B857CFFFFFF           mov     eax, [ebp+$FFFFFF7C]
007B648C   8D5580                 lea     edx, [ebp-$80]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B648F   E86045C5FF             call    0040A9F4
007B6494   FF7580                 push    dword ptr [ebp-$80]
007B6497   8B4508                 mov     eax, [ebp+$08]
007B649A   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B649F   E810F2C4FF             call    004056B4
007B64A4   E9FD050000             jmp     007B6AA6
007B64A9   8BD3                   mov     edx, ebx
007B64AB   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B64AD   E8C257CDFF             call    0048BC74

* Reference to class TBtnEditA
|
007B64B2   8B1530A24F00           mov     edx, [$004FA230]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B64B8   E827E0C4FF             call    004044E4
007B64BD   84C0                   test    al, al
007B64BF   0F84C5010000           jz      007B668A
007B64C5   8BD3                   mov     edx, ebx
007B64C7   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B64C9   E8A657CDFF             call    0048BC74
007B64CE   8D956CFFFFFF           lea     edx, [ebp+$FFFFFF6C]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B64D4   E81721CDFF             call    004885F0
007B64D9   8B856CFFFFFF           mov     eax, [ebp+$FFFFFF6C]
007B64DF   8D9570FFFFFF           lea     edx, [ebp+$FFFFFF70]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B64E5   E80244C5FF             call    0040A8EC
007B64EA   83BD70FFFFFF00         cmp     dword ptr [ebp+$FFFFFF70], +$00
007B64F1   0F84AF050000           jz      007B6AA6
007B64F7   8BD3                   mov     edx, ebx
007B64F9   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B64FB   E87457CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6500   8B400C                 mov     eax, [eax+$0C]
007B6503   3B45FC                 cmp     eax, [ebp-$04]
007B6506   755E                   jnz     007B6566
007B6508   8B4508                 mov     eax, [ebp+$08]
007B650B   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B650D   687C6C7B00             push    $007B6C7C
007B6512   8BD3                   mov     edx, ebx
007B6514   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6516   E85957CDFF             call    0048BC74
007B651B   FF7008                 push    dword ptr [eax+$08]
007B651E   688C6C7B00             push    $007B6C8C
007B6523   8BD3                   mov     edx, ebx
007B6525   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6527   E84857CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Position : TPosition
|
007B652C   8B8030020000           mov     eax, [eax+$0230]
007B6532   8D9564FFFFFF           lea     edx, [ebp+$FFFFFF64]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6538   E8AF43C5FF             call    0040A8EC
007B653D   8B8564FFFFFF           mov     eax, [ebp+$FFFFFF64]
007B6543   8D9568FFFFFF           lea     edx, [ebp+$FFFFFF68]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B6549   E8A644C5FF             call    0040A9F4
007B654E   FFB568FFFFFF           push    dword ptr [ebp+$FFFFFF68]
007B6554   8B4508                 mov     eax, [ebp+$08]
007B6557   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B655C   E853F1C4FF             call    004056B4
007B6561   E940050000             jmp     007B6AA6
007B6566   8BD3                   mov     edx, ebx
007B6568   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B656A   E80557CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B656F   8B400C                 mov     eax, [eax+$0C]
007B6572   3B45F8                 cmp     eax, [ebp-$08]
007B6575   0F858E000000           jnz     007B6609
007B657B   8B4508                 mov     eax, [ebp+$08]
007B657E   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B6580   687C6C7B00             push    $007B6C7C
007B6585   8BD3                   mov     edx, ebx
007B6587   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6589   E8E656CDFF             call    0048BC74
007B658E   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: 'Name'
|
007B6591   68C06C7B00             push    $007B6CC0

* Possible String Reference to: ' like '
|
007B6596   68A46C7B00             push    $007B6CA4
007B659B   68B46C7B00             push    $007B6CB4
007B65A0   8BD3                   mov     edx, ebx
007B65A2   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B65A4   E8CB56CDFF             call    0048BC74
007B65A9   8D9554FFFFFF           lea     edx, [ebp+$FFFFFF54]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B65AF   E83C20CDFF             call    004885F0
007B65B4   8B8554FFFFFF           mov     eax, [ebp+$FFFFFF54]
007B65BA   8D9558FFFFFF           lea     edx, [ebp+$FFFFFF58]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B65C0   E82743C5FF             call    0040A8EC
007B65C5   FFB558FFFFFF           push    dword ptr [ebp+$FFFFFF58]
007B65CB   68B46C7B00             push    $007B6CB4
007B65D0   8D855CFFFFFF           lea     eax, [ebp+$FFFFFF5C]
007B65D6   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B65DB   E8D4F0C4FF             call    004056B4
007B65E0   8B855CFFFFFF           mov     eax, [ebp+$FFFFFF5C]
007B65E6   8D9560FFFFFF           lea     edx, [ebp+$FFFFFF60]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B65EC   E80344C5FF             call    0040A9F4
007B65F1   FFB560FFFFFF           push    dword ptr [ebp+$FFFFFF60]
007B65F7   8B4508                 mov     eax, [ebp+$08]
007B65FA   BA06000000             mov     edx, $00000006

* Reference to: System.@LStrCatN;
|
007B65FF   E8B0F0C4FF             call    004056B4
007B6604   E99D040000             jmp     007B6AA6
007B6609   8BD3                   mov     edx, ebx
007B660B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B660D   E86256CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6612   83780C63               cmp     dword ptr [eax+$0C], +$63
007B6616   0F858A040000           jnz     007B6AA6
007B661C   8B4508                 mov     eax, [ebp+$08]
007B661F   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B6621   687C6C7B00             push    $007B6C7C
007B6626   8BD3                   mov     edx, ebx
007B6628   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B662A   E84556CDFF             call    0048BC74
007B662F   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B6632   68A46C7B00             push    $007B6CA4
007B6637   8BD3                   mov     edx, ebx
007B6639   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B663B   E83456CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Position : TPosition
|
007B6640   8B8030020000           mov     eax, [eax+$0230]
007B6646   8D954CFFFFFF           lea     edx, [ebp+$FFFFFF4C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B664C   E89B42C5FF             call    0040A8EC
007B6651   8D854CFFFFFF           lea     eax, [ebp+$FFFFFF4C]
007B6657   BAB46C7B00             mov     edx, $007B6CB4

* Reference to: System.@LStrCat;
|
007B665C   E89BEFC4FF             call    004055FC
007B6661   8B854CFFFFFF           mov     eax, [ebp+$FFFFFF4C]
007B6667   8D9550FFFFFF           lea     edx, [ebp+$FFFFFF50]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B666D   E88243C5FF             call    0040A9F4
007B6672   FFB550FFFFFF           push    dword ptr [ebp+$FFFFFF50]
007B6678   8B4508                 mov     eax, [ebp+$08]
007B667B   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6680   E82FF0C4FF             call    004056B4
007B6685   E91C040000             jmp     007B6AA6
007B668A   8BD3                   mov     edx, ebx
007B668C   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B668E   E8E155CDFF             call    0048BC74

* Reference to class TBtnEditC
|
007B6693   8B158CAB4F00           mov     edx, [$004FAB8C]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B6699   E846DEC4FF             call    004044E4
007B669E   84C0                   test    al, al
007B66A0   0F8439010000           jz      007B67DF
007B66A6   8BD3                   mov     edx, ebx
007B66A8   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B66AA   E8C555CDFF             call    0048BC74

* Reference to field TfrmSelExportField.OFFS_0238
|
007B66AF   8B8038020000           mov     eax, [eax+$0238]
007B66B5   8D9548FFFFFF           lea     edx, [ebp+$FFFFFF48]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B66BB   E82C42C5FF             call    0040A8EC
007B66C0   83BD48FFFFFF00         cmp     dword ptr [ebp+$FFFFFF48], +$00
007B66C7   0F84D9030000           jz      007B6AA6
007B66CD   8BD3                   mov     edx, ebx
007B66CF   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B66D1   E89E55CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B66D6   8B400C                 mov     eax, [eax+$0C]
007B66D9   3B45FC                 cmp     eax, [ebp-$04]
007B66DC   755E                   jnz     007B673C
007B66DE   8B4508                 mov     eax, [ebp+$08]
007B66E1   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B66E3   687C6C7B00             push    $007B6C7C
007B66E8   8BD3                   mov     edx, ebx
007B66EA   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B66EC   E88355CDFF             call    0048BC74
007B66F1   FF7008                 push    dword ptr [eax+$08]
007B66F4   688C6C7B00             push    $007B6C8C
007B66F9   8BD3                   mov     edx, ebx
007B66FB   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B66FD   E87255CDFF             call    0048BC74

* Reference to field TfrmSelExportField.OFFS_0238
|
007B6702   8B8038020000           mov     eax, [eax+$0238]
007B6708   8D9540FFFFFF           lea     edx, [ebp+$FFFFFF40]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B670E   E8D941C5FF             call    0040A8EC
007B6713   8B8540FFFFFF           mov     eax, [ebp+$FFFFFF40]
007B6719   8D9544FFFFFF           lea     edx, [ebp+$FFFFFF44]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B671F   E8D042C5FF             call    0040A9F4
007B6724   FFB544FFFFFF           push    dword ptr [ebp+$FFFFFF44]
007B672A   8B4508                 mov     eax, [ebp+$08]
007B672D   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6732   E87DEFC4FF             call    004056B4
007B6737   E96A030000             jmp     007B6AA6
007B673C   8BD3                   mov     edx, ebx
007B673E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6740   E82F55CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6745   8B400C                 mov     eax, [eax+$0C]
007B6748   3B45F8                 cmp     eax, [ebp-$08]
007B674B   0F8555030000           jnz     007B6AA6
007B6751   8B4508                 mov     eax, [ebp+$08]
007B6754   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B6756   687C6C7B00             push    $007B6C7C
007B675B   8BD3                   mov     edx, ebx
007B675D   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B675F   E81055CDFF             call    0048BC74
007B6764   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: 'Name'
|
007B6767   68C06C7B00             push    $007B6CC0

* Possible String Reference to: ' like '
|
007B676C   68A46C7B00             push    $007B6CA4
007B6771   68B46C7B00             push    $007B6CB4
007B6776   8BD3                   mov     edx, ebx
007B6778   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B677A   E8F554CDFF             call    0048BC74
007B677F   8D9530FFFFFF           lea     edx, [ebp+$FFFFFF30]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6785   E8661ECDFF             call    004885F0
007B678A   8B8530FFFFFF           mov     eax, [ebp+$FFFFFF30]
007B6790   8D9534FFFFFF           lea     edx, [ebp+$FFFFFF34]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6796   E85141C5FF             call    0040A8EC
007B679B   FFB534FFFFFF           push    dword ptr [ebp+$FFFFFF34]
007B67A1   68B46C7B00             push    $007B6CB4
007B67A6   8D8538FFFFFF           lea     eax, [ebp+$FFFFFF38]
007B67AC   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B67B1   E8FEEEC4FF             call    004056B4
007B67B6   8B8538FFFFFF           mov     eax, [ebp+$FFFFFF38]
007B67BC   8D953CFFFFFF           lea     edx, [ebp+$FFFFFF3C]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B67C2   E82D42C5FF             call    0040A9F4
007B67C7   FFB53CFFFFFF           push    dword ptr [ebp+$FFFFFF3C]
007B67CD   8B4508                 mov     eax, [ebp+$08]
007B67D0   BA06000000             mov     edx, $00000006

* Reference to: System.@LStrCatN;
|
007B67D5   E8DAEEC4FF             call    004056B4
007B67DA   E9C7020000             jmp     007B6AA6
007B67DF   8BD3                   mov     edx, ebx
007B67E1   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B67E3   E88C54CDFF             call    0048BC74
007B67E8   8B15F4508800           mov     edx, [$008850F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B67EE   E8F1DCC4FF             call    004044E4
007B67F3   84C0                   test    al, al
007B67F5   0F844A010000           jz      007B6945
007B67FB   8BD3                   mov     edx, ebx
007B67FD   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B67FF   E87054CDFF             call    0048BC74
007B6804   8D9528FFFFFF           lea     edx, [ebp+$FFFFFF28]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B680A   E8E11DCDFF             call    004885F0
007B680F   8B8528FFFFFF           mov     eax, [ebp+$FFFFFF28]
007B6815   8D952CFFFFFF           lea     edx, [ebp+$FFFFFF2C]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B681B   E8CC40C5FF             call    0040A8EC
007B6820   83BD2CFFFFFF00         cmp     dword ptr [ebp+$FFFFFF2C], +$00
007B6827   0F8479020000           jz      007B6AA6
007B682D   8BD3                   mov     edx, ebx
007B682F   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6831   E83E54CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6836   8B400C                 mov     eax, [eax+$0C]
007B6839   3B45FC                 cmp     eax, [ebp-$04]
007B683C   7569                   jnz     007B68A7
007B683E   8B4508                 mov     eax, [ebp+$08]
007B6841   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B6843   687C6C7B00             push    $007B6C7C
007B6848   8BD3                   mov     edx, ebx
007B684A   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B684C   E82354CDFF             call    0048BC74
007B6851   FF7008                 push    dword ptr [eax+$08]
007B6854   688C6C7B00             push    $007B6C8C
007B6859   8BD3                   mov     edx, ebx
007B685B   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B685D   E81254CDFF             call    0048BC74
007B6862   8D951CFFFFFF           lea     edx, [ebp+$FFFFFF1C]

|
007B6868   E8FFD9EFFF             call    006B426C
007B686D   8B851CFFFFFF           mov     eax, [ebp+$FFFFFF1C]
007B6873   8D9520FFFFFF           lea     edx, [ebp+$FFFFFF20]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6879   E86E40C5FF             call    0040A8EC
007B687E   8B8520FFFFFF           mov     eax, [ebp+$FFFFFF20]
007B6884   8D9524FFFFFF           lea     edx, [ebp+$FFFFFF24]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B688A   E86541C5FF             call    0040A9F4
007B688F   FFB524FFFFFF           push    dword ptr [ebp+$FFFFFF24]
007B6895   8B4508                 mov     eax, [ebp+$08]
007B6898   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B689D   E812EEC4FF             call    004056B4
007B68A2   E9FF010000             jmp     007B6AA6
007B68A7   8BD3                   mov     edx, ebx
007B68A9   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B68AB   E8C453CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B68B0   8B400C                 mov     eax, [eax+$0C]
007B68B3   3B45F8                 cmp     eax, [ebp-$08]
007B68B6   0F85EA010000           jnz     007B6AA6
007B68BC   8B4508                 mov     eax, [ebp+$08]
007B68BF   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B68C1   687C6C7B00             push    $007B6C7C
007B68C6   8BD3                   mov     edx, ebx
007B68C8   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B68CA   E8A553CDFF             call    0048BC74
007B68CF   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B68D2   68A46C7B00             push    $007B6CA4
007B68D7   68B46C7B00             push    $007B6CB4
007B68DC   8BD3                   mov     edx, ebx
007B68DE   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B68E0   E88F53CDFF             call    0048BC74
007B68E5   8D950CFFFFFF           lea     edx, [ebp+$FFFFFF0C]

|
007B68EB   E87CD9EFFF             call    006B426C
007B68F0   8B850CFFFFFF           mov     eax, [ebp+$FFFFFF0C]
007B68F6   8D9510FFFFFF           lea     edx, [ebp+$FFFFFF10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B68FC   E8EB3FC5FF             call    0040A8EC
007B6901   FFB510FFFFFF           push    dword ptr [ebp+$FFFFFF10]
007B6907   68B46C7B00             push    $007B6CB4
007B690C   8D8514FFFFFF           lea     eax, [ebp+$FFFFFF14]
007B6912   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B6917   E898EDC4FF             call    004056B4
007B691C   8B8514FFFFFF           mov     eax, [ebp+$FFFFFF14]
007B6922   8D9518FFFFFF           lea     edx, [ebp+$FFFFFF18]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B6928   E8C740C5FF             call    0040A9F4
007B692D   FFB518FFFFFF           push    dword ptr [ebp+$FFFFFF18]
007B6933   8B4508                 mov     eax, [ebp+$08]
007B6936   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B693B   E874EDC4FF             call    004056B4
007B6940   E961010000             jmp     007B6AA6
007B6945   8BD3                   mov     edx, ebx
007B6947   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6949   E82653CDFF             call    0048BC74

* Reference to class TComboBox
|
007B694E   8B15F4814700           mov     edx, [$004781F4]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B6954   E88BDBC4FF             call    004044E4
007B6959   84C0                   test    al, al
007B695B   0F8445010000           jz      007B6AA6
007B6961   8BD3                   mov     edx, ebx
007B6963   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6965   E80A53CDFF             call    0048BC74
007B696A   8D9504FFFFFF           lea     edx, [ebp+$FFFFFF04]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6970   E87B1CCDFF             call    004885F0
007B6975   8B8504FFFFFF           mov     eax, [ebp+$FFFFFF04]
007B697B   8D9508FFFFFF           lea     edx, [ebp+$FFFFFF08]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6981   E8663FC5FF             call    0040A8EC
007B6986   83BD08FFFFFF00         cmp     dword ptr [ebp+$FFFFFF08], +$00
007B698D   0F8413010000           jz      007B6AA6
007B6993   8BD3                   mov     edx, ebx
007B6995   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6997   E8D852CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B699C   8B400C                 mov     eax, [eax+$0C]
007B699F   3B45FC                 cmp     eax, [ebp-$04]
007B69A2   7569                   jnz     007B6A0D
007B69A4   8B4508                 mov     eax, [ebp+$08]
007B69A7   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B69A9   687C6C7B00             push    $007B6C7C
007B69AE   8BD3                   mov     edx, ebx
007B69B0   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B69B2   E8BD52CDFF             call    0048BC74
007B69B7   FF7008                 push    dword ptr [eax+$08]
007B69BA   688C6C7B00             push    $007B6C8C
007B69BF   8BD3                   mov     edx, ebx
007B69C1   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B69C3   E8AC52CDFF             call    0048BC74
007B69C8   8D95F8FEFFFF           lea     edx, [ebp+$FFFFFEF8]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B69CE   E81D1CCDFF             call    004885F0
007B69D3   8B85F8FEFFFF           mov     eax, [ebp+$FFFFFEF8]
007B69D9   8D95FCFEFFFF           lea     edx, [ebp+$FFFFFEFC]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B69DF   E8083FC5FF             call    0040A8EC
007B69E4   8B85FCFEFFFF           mov     eax, [ebp+$FFFFFEFC]
007B69EA   8D9500FFFFFF           lea     edx, [ebp+$FFFFFF00]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B69F0   E8FF3FC5FF             call    0040A9F4
007B69F5   FFB500FFFFFF           push    dword ptr [ebp+$FFFFFF00]
007B69FB   8B4508                 mov     eax, [ebp+$08]
007B69FE   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6A03   E8ACECC4FF             call    004056B4
007B6A08   E999000000             jmp     007B6AA6
007B6A0D   8BD3                   mov     edx, ebx
007B6A0F   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6A11   E85E52CDFF             call    0048BC74

* Reference to field TfrmSelExportField.Tag : Longint
|
007B6A16   8B400C                 mov     eax, [eax+$0C]
007B6A19   3B45F8                 cmp     eax, [ebp-$08]
007B6A1C   0F8584000000           jnz     007B6AA6
007B6A22   8B4508                 mov     eax, [ebp+$08]
007B6A25   FF30                   push    dword ptr [eax]

* Possible String Reference to: 'and '
|
007B6A27   687C6C7B00             push    $007B6C7C
007B6A2C   8BD3                   mov     edx, ebx
007B6A2E   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6A30   E83F52CDFF             call    0048BC74
007B6A35   FF7008                 push    dword ptr [eax+$08]

* Possible String Reference to: ' like '
|
007B6A38   68A46C7B00             push    $007B6CA4
007B6A3D   68B46C7B00             push    $007B6CB4
007B6A42   8BD3                   mov     edx, ebx
007B6A44   8BC6                   mov     eax, esi

* Reference to: Controls.TWinControl.GetControl(TWinControl;Integer):TControl;
|
007B6A46   E82952CDFF             call    0048BC74
007B6A4B   8D95E8FEFFFF           lea     edx, [ebp+$FFFFFEE8]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6A51   E89A1BCDFF             call    004885F0
007B6A56   8B85E8FEFFFF           mov     eax, [ebp+$FFFFFEE8]
007B6A5C   8D95ECFEFFFF           lea     edx, [ebp+$FFFFFEEC]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6A62   E8853EC5FF             call    0040A8EC
007B6A67   FFB5ECFEFFFF           push    dword ptr [ebp+$FFFFFEEC]
007B6A6D   68B46C7B00             push    $007B6CB4
007B6A72   8D85F0FEFFFF           lea     eax, [ebp+$FFFFFEF0]
007B6A78   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B6A7D   E832ECC4FF             call    004056B4
007B6A82   8B85F0FEFFFF           mov     eax, [ebp+$FFFFFEF0]
007B6A88   8D95F4FEFFFF           lea     edx, [ebp+$FFFFFEF4]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B6A8E   E8613FC5FF             call    0040A9F4
007B6A93   FFB5F4FEFFFF           push    dword ptr [ebp+$FFFFFEF4]
007B6A99   8B4508                 mov     eax, [ebp+$08]
007B6A9C   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrCatN;
|
007B6AA1   E80EECC4FF             call    004056B4
007B6AA6   43                     inc     ebx
007B6AA7   4F                     dec     edi
007B6AA8   0F854BF6FFFF           jnz     007B60F9
007B6AAE   8D95E4FEFFFF           lea     edx, [ebp+$FFFFFEE4]
007B6AB4   8B4508                 mov     eax, [ebp+$08]
007B6AB7   8B00                   mov     eax, [eax]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6AB9   E82E3EC5FF             call    0040A8EC
007B6ABE   83BDE4FEFFFF00         cmp     dword ptr [ebp+$FFFFFEE4], +$00
007B6AC5   743E                   jz      007B6B05
007B6AC7   8B4508                 mov     eax, [ebp+$08]
007B6ACA   8B00                   mov     eax, [eax]

* Reference to: System.@LStrLen(String):Integer;
|           or: System.@DynArrayLength;
|           or: System.DynArraySize(Pointer):Integer;
|           or: Variants.DynArraySize(Pointer):Integer;
|
007B6ACC   E823EBC4FF             call    004055F4
007B6AD1   8BD0                   mov     edx, eax
007B6AD3   83EA04                 sub     edx, +$04
007B6AD6   8D8DDCFEFFFF           lea     ecx, [ebp+$FFFFFEDC]
007B6ADC   8B4508                 mov     eax, [ebp+$08]
007B6ADF   8B00                   mov     eax, [eax]

* Reference to: StrUtils.RightStr(WideString;Integer):WideString;overload;
|           or: StrUtils.RightBStr(AnsiString;Integer):AnsiString;
|
007B6AE1   E8EA22C9FF             call    00448DD0
007B6AE6   8B85DCFEFFFF           mov     eax, [ebp+$FFFFFEDC]
007B6AEC   8D95E0FEFFFF           lea     edx, [ebp+$FFFFFEE0]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6AF2   E8F53DC5FF             call    0040A8EC
007B6AF7   8B95E0FEFFFF           mov     edx, [ebp+$FFFFFEE0]
007B6AFD   8B4508                 mov     eax, [ebp+$08]

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B6B00   E873E8C4FF             call    00405378
007B6B05   33C0                   xor     eax, eax
007B6B07   5A                     pop     edx
007B6B08   59                     pop     ecx
007B6B09   59                     pop     ecx
007B6B0A   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B6B0D   686A6C7B00             push    $007B6C6A
007B6B12   8D85DCFEFFFF           lea     eax, [ebp+$FFFFFEDC]
007B6B18   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6B1D   E826E8C4FF             call    00405348
007B6B22   8D85E8FEFFFF           lea     eax, [ebp+$FFFFFEE8]

* Reference to: System.@LStrClr(void;void);
|
007B6B28   E8F7E7C4FF             call    00405324
007B6B2D   8D85ECFEFFFF           lea     eax, [ebp+$FFFFFEEC]
007B6B33   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6B38   E80BE8C4FF             call    00405348
007B6B3D   8D85F8FEFFFF           lea     eax, [ebp+$FFFFFEF8]

* Reference to: System.@LStrClr(void;void);
|
007B6B43   E8DCE7C4FF             call    00405324
007B6B48   8D85FCFEFFFF           lea     eax, [ebp+$FFFFFEFC]
007B6B4E   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6B53   E8F0E7C4FF             call    00405348
007B6B58   8D8504FFFFFF           lea     eax, [ebp+$FFFFFF04]

* Reference to: System.@LStrClr(void;void);
|
007B6B5E   E8C1E7C4FF             call    00405324
007B6B63   8D8508FFFFFF           lea     eax, [ebp+$FFFFFF08]
007B6B69   BA08000000             mov     edx, $00000008

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6B6E   E8D5E7C4FF             call    00405348
007B6B73   8D8528FFFFFF           lea     eax, [ebp+$FFFFFF28]

* Reference to: System.@LStrClr(void;void);
|
007B6B79   E8A6E7C4FF             call    00405324
007B6B7E   8D852CFFFFFF           lea     eax, [ebp+$FFFFFF2C]

* Reference to: System.@LStrClr(void;void);
|
007B6B84   E89BE7C4FF             call    00405324
007B6B89   8D8530FFFFFF           lea     eax, [ebp+$FFFFFF30]

* Reference to: System.@LStrClr(void;void);
|
007B6B8F   E890E7C4FF             call    00405324
007B6B94   8D8534FFFFFF           lea     eax, [ebp+$FFFFFF34]
007B6B9A   BA08000000             mov     edx, $00000008

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6B9F   E8A4E7C4FF             call    00405348
007B6BA4   8D8554FFFFFF           lea     eax, [ebp+$FFFFFF54]

* Reference to: System.@LStrClr(void;void);
|
007B6BAA   E875E7C4FF             call    00405324
007B6BAF   8D8558FFFFFF           lea     eax, [ebp+$FFFFFF58]
007B6BB5   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6BBA   E889E7C4FF             call    00405348
007B6BBF   8D856CFFFFFF           lea     eax, [ebp+$FFFFFF6C]

* Reference to: System.@LStrClr(void;void);
|
007B6BC5   E85AE7C4FF             call    00405324
007B6BCA   8D8570FFFFFF           lea     eax, [ebp+$FFFFFF70]

* Reference to: System.@LStrClr(void;void);
|
007B6BD0   E84FE7C4FF             call    00405324
007B6BD5   8D8574FFFFFF           lea     eax, [ebp+$FFFFFF74]

* Reference to: System.@LStrClr(void;void);
|
007B6BDB   E844E7C4FF             call    00405324
007B6BE0   8D8578FFFFFF           lea     eax, [ebp+$FFFFFF78]
007B6BE6   BA0E000000             mov     edx, $0000000E

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6BEB   E858E7C4FF             call    00405348
007B6BF0   8D45B0                 lea     eax, [ebp-$50]

* Reference to: System.@LStrClr(void;void);
|
007B6BF3   E82CE7C4FF             call    00405324
007B6BF8   8D45B4                 lea     eax, [ebp-$4C]

* Reference to: System.@LStrClr(void;void);
|
007B6BFB   E824E7C4FF             call    00405324
007B6C00   8D45B8                 lea     eax, [ebp-$48]

* Reference to: System.@LStrClr(void;void);
|
007B6C03   E81CE7C4FF             call    00405324
007B6C08   8D45BC                 lea     eax, [ebp-$44]

* Reference to: System.@LStrClr(void;void);
|
007B6C0B   E814E7C4FF             call    00405324
007B6C10   8D45C0                 lea     eax, [ebp-$40]

* Reference to: System.@LStrClr(void;void);
|
007B6C13   E80CE7C4FF             call    00405324
007B6C18   8D45C4                 lea     eax, [ebp-$3C]
007B6C1B   BA04000000             mov     edx, $00000004

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6C20   E823E7C4FF             call    00405348
007B6C25   8D45D4                 lea     eax, [ebp-$2C]

* Reference to: System.@LStrClr(void;void);
|
007B6C28   E8F7E6C4FF             call    00405324
007B6C2D   8D45D8                 lea     eax, [ebp-$28]

* Reference to: System.@LStrClr(void;void);
|
007B6C30   E8EFE6C4FF             call    00405324
007B6C35   8D45DC                 lea     eax, [ebp-$24]

* Reference to: System.@LStrClr(void;void);
|
007B6C38   E8E7E6C4FF             call    00405324
007B6C3D   8D45E0                 lea     eax, [ebp-$20]
007B6C40   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6C45   E8FEE6C4FF             call    00405348
007B6C4A   8D45E8                 lea     eax, [ebp-$18]

* Reference to: System.@LStrClr(void;void);
|
007B6C4D   E8D2E6C4FF             call    00405324
007B6C52   8D45EC                 lea     eax, [ebp-$14]
007B6C55   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6C5A   E8E9E6C4FF             call    00405348
007B6C5F   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6C60   E98FDEC4FF             jmp     00404AF4
007B6C65   E9A8FEFFFF             jmp     007B6B12

****** END
|
007B6C6A   5F                     pop     edi
007B6C6B   5E                     pop     esi
007B6C6C   5B                     pop     ebx
007B6C6D   8BE5                   mov     esp, ebp
007B6C6F   5D                     pop     ebp
007B6C70   C20400                 ret     $0004

*)
end;

procedure TfrmSelExportField._PROC_007B6CC9(Sender : TObject);
begin
(*
007B6CC9   8BEC                   mov     ebp, esp
007B6CCB   83C4F4                 add     esp, -$0C
007B6CCE   33C9                   xor     ecx, ecx
007B6CD0   894DF4                 mov     [ebp-$0C], ecx
007B6CD3   8955F8                 mov     [ebp-$08], edx
007B6CD6   8945FC                 mov     [ebp-$04], eax
007B6CD9   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B6CDC   E803EBC4FF             call    004057E4
007B6CE1   33C0                   xor     eax, eax
007B6CE3   55                     push    ebp

* Possible String Reference to: 'éjÝÄÿëë‹å]ÃU‹ì3ÉQQQQSV‹Ú‹ð3ÀUhmn{'
|
007B6CE4   68856D7B00             push    $007B6D85

***** TRY
|
007B6CE9   64FF30                 push    dword ptr fs:[eax]
007B6CEC   648920                 mov     fs:[eax], esp
007B6CEF   33C0                   xor     eax, eax
007B6CF1   55                     push    ebp
007B6CF2   68636D7B00             push    $007B6D63

***** TRY
|
007B6CF7   64FF30                 push    dword ptr fs:[eax]
007B6CFA   648920                 mov     fs:[eax], esp
007B6CFD   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
007B6D00   E84F08D1FF             call    004C7554
007B6D05   8D55F4                 lea     edx, [ebp-$0C]
007B6D08   8B45F8                 mov     eax, [ebp-$08]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6D0B   E8DC3BC5FF             call    0040A8EC
007B6D10   837DF400               cmp     dword ptr [ebp-$0C], +$00
007B6D14   750F                   jnz     007B6D25
007B6D16   33D2                   xor     edx, edx
007B6D18   8B45FC                 mov     eax, [ebp-$04]
007B6D1B   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_0190
|
007B6D1D   FF9190010000           call    dword ptr [ecx+$0190]
007B6D23   EB28                   jmp     007B6D4D
007B6D25   33D2                   xor     edx, edx
007B6D27   8B45FC                 mov     eax, [ebp-$04]
007B6D2A   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_0190
|
007B6D2C   FF9190010000           call    dword ptr [ecx+$0190]
007B6D32   8B55F8                 mov     edx, [ebp-$08]
007B6D35   8B45FC                 mov     eax, [ebp-$04]
007B6D38   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_0198
|
007B6D3A   FF9198010000           call    dword ptr [ecx+$0198]
007B6D40   B201                   mov     dl, $01
007B6D42   8B45FC                 mov     eax, [ebp-$04]
007B6D45   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_0190
|
007B6D47   FF9190010000           call    dword ptr [ecx+$0190]
007B6D4D   33C0                   xor     eax, eax
007B6D4F   5A                     pop     edx
007B6D50   59                     pop     ecx
007B6D51   59                     pop     ecx
007B6D52   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B6D55   686A6D7B00             push    $007B6D6A
007B6D5A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
007B6D5D   E81208D1FF             call    004C7574
007B6D62   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6D63   E98CDDC4FF             jmp     00404AF4
007B6D68   EBF0                   jmp     007B6D5A

****** END
|
007B6D6A   33C0                   xor     eax, eax
007B6D6C   5A                     pop     edx
007B6D6D   59                     pop     ecx
007B6D6E   59                     pop     ecx
007B6D6F   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '‹å]ÃU‹ì3ÉQQQQSV‹Ú‹ð3ÀUhmn{'
|
007B6D72   688C6D7B00             push    $007B6D8C
007B6D77   8D45F4                 lea     eax, [ebp-$0C]
007B6D7A   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B6D7F   E8C4E5C4FF             call    00405348
007B6D84   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6D85   E96ADDC4FF             jmp     00404AF4
007B6D8A   EBEB                   jmp     007B6D77

****** END
|
007B6D8C   8BE5                   mov     esp, ebp
007B6D8E   5D                     pop     ebp
007B6D8F   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B6D90(Sender : TObject);
begin
(*
007B6D90   55                     push    ebp
007B6D91   8BEC                   mov     ebp, esp
007B6D93   33C9                   xor     ecx, ecx
007B6D95   51                     push    ecx
007B6D96   51                     push    ecx
007B6D97   51                     push    ecx
007B6D98   51                     push    ecx
007B6D99   53                     push    ebx
007B6D9A   56                     push    esi
007B6D9B   8BDA                   mov     ebx, edx
007B6D9D   8BF0                   mov     esi, eax
007B6D9F   33C0                   xor     eax, eax
007B6DA1   55                     push    ebp
007B6DA2   686D6E7B00             push    $007B6E6D

***** TRY
|
007B6DA7   64FF30                 push    dword ptr fs:[eax]
007B6DAA   648920                 mov     fs:[eax], esp
007B6DAD   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B6DAF   E80C11D1FF             call    004C7EC0
007B6DB4   84C0                   test    al, al
007B6DB6   0F8583000000           jnz     007B6E3F

* Possible String Reference to: 'Ssel'
|
007B6DBC   BA846E7B00             mov     edx, $007B6E84
007B6DC1   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B6DC3   E8ECFDD0FF             call    004C6BB4
007B6DC8   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B6DCA   FF5244                 call    dword ptr [edx+$44]
007B6DCD   3C01                   cmp     al, $01
007B6DCF   7538                   jnz     007B6E09
007B6DD1   8D55F8                 lea     edx, [ebp-$08]
007B6DD4   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6DD6   E81518CDFF             call    004885F0
007B6DDB   8B45F8                 mov     eax, [ebp-$08]

* Reference to: SysUtils.StrToCurr(AnsiString):Currency;overload;
|
007B6DDE   E8356AC5FF             call    0040D818
007B6DE3   DD4508                 fld     qword ptr [ebp+$08]
007B6DE6   D80D8C6E7B00           fmul    dword ptr [$007B6E8C]
007B6DEC   DEC1                   faddp   st(1), st(0)
007B6DEE   83C4F8                 add     esp, -$08
007B6DF1   DF3C24                 fistp   qword ptr [esp]
007B6DF4   9B                     wait
007B6DF5   8D45FC                 lea     eax, [ebp-$04]

|
007B6DF8   E8DF67C5FF             call    0040D5DC
007B6DFD   8B55FC                 mov     edx, [ebp-$04]
007B6E00   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B6E02   E81918CDFF             call    00488620
007B6E07   EB36                   jmp     007B6E3F
007B6E09   8D55F0                 lea     edx, [ebp-$10]
007B6E0C   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B6E0E   E8DD17CDFF             call    004885F0
007B6E13   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.StrToCurr(AnsiString):Currency;overload;
|
007B6E16   E8FD69C5FF             call    0040D818
007B6E1B   DD4508                 fld     qword ptr [ebp+$08]
007B6E1E   D80D8C6E7B00           fmul    dword ptr [$007B6E8C]
007B6E24   DEE9                   fsubp   st(1), st(0)
007B6E26   83C4F8                 add     esp, -$08
007B6E29   DF3C24                 fistp   qword ptr [esp]
007B6E2C   9B                     wait
007B6E2D   8D45F4                 lea     eax, [ebp-$0C]

|
007B6E30   E8A767C5FF             call    0040D5DC
007B6E35   8B55F4                 mov     edx, [ebp-$0C]
007B6E38   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B6E3A   E8E117CDFF             call    00488620
007B6E3F   33C0                   xor     eax, eax
007B6E41   5A                     pop     edx
007B6E42   59                     pop     ecx
007B6E43   59                     pop     ecx
007B6E44   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B6E47   68746E7B00             push    $007B6E74
007B6E4C   8D45F0                 lea     eax, [ebp-$10]

* Reference to: System.@LStrClr(void;void);
|
007B6E4F   E8D0E4C4FF             call    00405324
007B6E54   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: System.@LStrClr(void;void);
|
007B6E57   E8C8E4C4FF             call    00405324
007B6E5C   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B6E5F   E8C0E4C4FF             call    00405324
007B6E64   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
007B6E67   E8B8E4C4FF             call    00405324
007B6E6C   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6E6D   E982DCC4FF             jmp     00404AF4
007B6E72   EBD8                   jmp     007B6E4C

****** END
|
007B6E74   5E                     pop     esi
007B6E75   5B                     pop     ebx
007B6E76   8BE5                   mov     esp, ebp
007B6E78   5D                     pop     ebp
007B6E79   C20800                 ret     $0008

*)
end;

procedure TfrmSelExportField._PROC_007B6E91(Sender : TObject);
begin
(*
007B6E91   8BEC                   mov     ebp, esp
007B6E93   83C4F4                 add     esp, -$0C
007B6E96   53                     push    ebx
007B6E97   56                     push    esi
007B6E98   57                     push    edi
007B6E99   33C9                   xor     ecx, ecx
007B6E9B   894DFC                 mov     [ebp-$04], ecx
007B6E9E   8BFA                   mov     edi, edx
007B6EA0   8BF0                   mov     esi, eax
007B6EA2   33C0                   xor     eax, eax
007B6EA4   55                     push    ebp

* Possible String Reference to: 'é,ÛÄÿëð_^[‹å]Ã'
|
007B6EA5   68C36F7B00             push    $007B6FC3

***** TRY
|
007B6EAA   64FF30                 push    dword ptr fs:[eax]
007B6EAD   648920                 mov     fs:[eax], esp
007B6EB0   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
007B6EB3   E86CE4C4FF             call    00405324
007B6EB8   8B4738                 mov     eax, [edi+$38]

* Reference to: Classes.TCollection.Clear(TCollection);
|
007B6EBB   E8B4D4C6FF             call    00424374
007B6EC0   8BC6                   mov     eax, esi

* Reference to: Classes.TWriter.AddAncestor(TWriter;TComponent);
|
007B6EC2   E8D1F7D0FF             call    004C6698
007B6EC7   48                     dec     eax
007B6EC8   85C0                   test    eax, eax
007B6ECA   0F8C83000000           jl      007B6F53
007B6ED0   40                     inc     eax
007B6ED1   8945F4                 mov     [ebp-$0C], eax
007B6ED4   33DB                   xor     ebx, ebx
007B6ED6   8BD3                   mov     edx, ebx

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B6ED8   8B4630                 mov     eax, [esi+$30]

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B6EDB   E8683DD0FF             call    004BAC48

* Reference to field TWinControl.Left : Integer
|
007B6EE0   80784001               cmp     byte ptr [eax+$40], $01
007B6EE4   751F                   jnz     007B6F05
007B6EE6   8BD3                   mov     edx, ebx

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B6EE8   8B4630                 mov     eax, [esi+$30]

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B6EEB   E8583DD0FF             call    004BAC48
007B6EF0   8B10                   mov     edx, [eax]

* Reference to method TWinControl.Update()
|
007B6EF2   FF9288000000           call    dword ptr [edx+$0088]
007B6EF8   85C0                   test    eax, eax
007B6EFA   7509                   jnz     007B6F05
007B6EFC   C745F801000000         mov     dword ptr [ebp-$08], $00000001
007B6F03   EB15                   jmp     007B6F1A
007B6F05   8BD3                   mov     edx, ebx

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B6F07   8B4630                 mov     eax, [esi+$30]

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B6F0A   E8393DD0FF             call    004BAC48
007B6F0F   8B10                   mov     edx, [eax]

* Reference to method TWinControl.Update()
|
007B6F11   FF9288000000           call    dword ptr [edx+$0088]
007B6F17   8945F8                 mov     [ebp-$08], eax
007B6F1A   8BD3                   mov     edx, ebx

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B6F1C   8B4630                 mov     eax, [esi+$30]

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B6F1F   E8243DD0FF             call    004BAC48

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B6F24   8B4038                 mov     eax, [eax+$38]
007B6F27   8D55FC                 lea     edx, [ebp-$04]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B6F2A   E8BD39C5FF             call    0040A8EC
007B6F2F   8B45F8                 mov     eax, [ebp-$08]
007B6F32   50                     push    eax
007B6F33   6A00                   push    $00
007B6F35   8BD3                   mov     edx, ebx

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B6F37   8B4630                 mov     eax, [esi+$30]

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B6F3A   E8093DD0FF             call    004BAC48

* Reference to field TWinControl.Left : Integer
|
007B6F3F   8A4840                 mov     cl, byte ptr [eax+$40]
007B6F42   8B4738                 mov     eax, [edi+$38]
007B6F45   8B55FC                 mov     edx, [ebp-$04]

* Reference to: DB.TFieldDefs.Add(TFieldDefs;AnsiString;TFieldType;Integer;Boolean);
|
007B6F48   E88732D0FF             call    004BA1D4
007B6F4D   43                     inc     ebx
007B6F4E   FF4DF4                 dec     dword ptr [ebp-$0C]
007B6F51   7583                   jnz     007B6ED6
007B6F53   6A01                   push    $01
007B6F55   6A00                   push    $00
007B6F57   8B4738                 mov     eax, [edi+$38]
007B6F5A   B101                   mov     cl, $01

* Possible String Reference to: 'Sflag'
|
007B6F5C   BADC6F7B00             mov     edx, $007B6FDC

* Reference to: DB.TFieldDefs.Add(TFieldDefs;AnsiString;TFieldType;Integer;Boolean);
|
007B6F61   E86E32D0FF             call    004BA1D4
007B6F66   6A00                   push    $00
007B6F68   6A00                   push    $00
007B6F6A   8B4738                 mov     eax, [edi+$38]
007B6F6D   B103                   mov     cl, $03

* Possible String Reference to: 'Sindex'
|
007B6F6F   BAEC6F7B00             mov     edx, $007B6FEC

* Reference to: DB.TFieldDefs.Add(TFieldDefs;AnsiString;TFieldType;Integer;Boolean);
|
007B6F74   E85B32D0FF             call    004BA1D4
007B6F79   6A00                   push    $00
007B6F7B   6A00                   push    $00
007B6F7D   8B4738                 mov     eax, [edi+$38]
007B6F80   B105                   mov     cl, $05

* Possible String Reference to: 'Ssel'
|
007B6F82   BAFC6F7B00             mov     edx, $007B6FFC

* Reference to: DB.TFieldDefs.Add(TFieldDefs;AnsiString;TFieldType;Integer;Boolean);
|
007B6F87   E84832D0FF             call    004BA1D4
007B6F8C   6A14                   push    $14
007B6F8E   6A00                   push    $00
007B6F90   8B4738                 mov     eax, [edi+$38]
007B6F93   B101                   mov     cl, $01

* Possible String Reference to: 'SDefNote'
|
007B6F95   BA0C707B00             mov     edx, $007B700C

* Reference to: DB.TFieldDefs.Add(TFieldDefs;AnsiString;TFieldType;Integer;Boolean);
|
007B6F9A   E83532D0FF             call    004BA1D4
007B6F9F   8BC7                   mov     eax, edi

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B6FA1   E82EE9D0FF             call    004C58D4
007B6FA6   8BC7                   mov     eax, edi

* Reference to: DBClient.TCustomClientDataSet.CreateDataSet(TCustomClientDataSet);
|
007B6FA8   E8F76EEFFF             call    006ADEA4
007B6FAD   33C0                   xor     eax, eax
007B6FAF   5A                     pop     edx
007B6FB0   59                     pop     ecx
007B6FB1   59                     pop     ecx
007B6FB2   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã'
|
007B6FB5   68CA6F7B00             push    $007B6FCA
007B6FBA   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
007B6FBD   E862E3C4FF             call    00405324
007B6FC2   C3                     ret


* Reference to: System.@HandleFinally;
|
007B6FC3   E92CDBC4FF             jmp     00404AF4
007B6FC8   EBF0                   jmp     007B6FBA

****** END
|
007B6FCA   5F                     pop     edi
007B6FCB   5E                     pop     esi
007B6FCC   5B                     pop     ebx
007B6FCD   8BE5                   mov     esp, ebp
007B6FCF   5D                     pop     ebp
007B6FD0   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B7019(Sender : TObject);
begin
(*
007B7019   8BEC                   mov     ebp, esp
007B701B   B909000000             mov     ecx, $00000009
007B7020   6A00                   push    $00
007B7022   6A00                   push    $00
007B7024   49                     dec     ecx
007B7025   75F9                   jnz     007B7020
007B7027   51                     push    ecx
007B7028   53                     push    ebx
007B7029   56                     push    esi
007B702A   8955F8                 mov     [ebp-$08], edx
007B702D   8945FC                 mov     [ebp-$04], eax
007B7030   33C0                   xor     eax, eax
007B7032   55                     push    ebp
007B7033   68EB717B00             push    $007B71EB

***** TRY
|
007B7038   64FF30                 push    dword ptr fs:[eax]
007B703B   648920                 mov     fs:[eax], esp
007B703E   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B7041   E87A0ED1FF             call    004C7EC0
007B7046   84C0                   test    al, al
007B7048   0F857C010000           jnz     007B71CA
007B704E   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
007B7051   E8FE04D1FF             call    004C7554
007B7056   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.First(TDataSet);
|
007B7059   E8D20FD1FF             call    004C8030
007B705E   C745F401000000         mov     dword ptr [ebp-$0C], $00000001
007B7065   33C0                   xor     eax, eax
007B7067   55                     push    ebp
007B7068   68C3717B00             push    $007B71C3

***** TRY
|
007B706D   64FF30                 push    dword ptr fs:[eax]
007B7070   648920                 mov     fs:[eax], esp
007B7073   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
007B7076   E8D904D1FF             call    004C7554
007B707B   33D2                   xor     edx, edx
007B707D   8B45F8                 mov     eax, [ebp-$08]
007B7080   8B08                   mov     ecx, [eax]
007B7082   FF9190010000           call    dword ptr [ecx+$0190]
007B7088   E9EC000000             jmp     007B7179
007B708D   8B45F8                 mov     eax, [ebp-$08]

|
007B7090   E8FB14D1FF             call    004C8590
007B7095   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Classes.TWriter.AddAncestor(TWriter;TComponent);
|
007B7098   E8FBF5D0FF             call    004C6698
007B709D   8BF0                   mov     esi, eax
007B709F   4E                     dec     esi
007B70A0   85F6                   test    esi, esi
007B70A2   7C36                   jl      007B70DA
007B70A4   46                     inc     esi
007B70A5   33DB                   xor     ebx, ebx
007B70A7   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TfrmSelExportField.Parent : TWinControl
|
007B70AA   8B4030                 mov     eax, [eax+$30]
007B70AD   8BD3                   mov     edx, ebx

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B70AF   E8943BD0FF             call    004BAC48
007B70B4   8D55E4                 lea     edx, [ebp-$1C]
007B70B7   8B08                   mov     ecx, [eax]

* Reference to method TWinControl.SetEnabled(Boolean)
|
007B70B9   FF5164                 call    dword ptr [ecx+$64]
007B70BC   8D45E4                 lea     eax, [ebp-$1C]
007B70BF   50                     push    eax
007B70C0   8B45F8                 mov     eax, [ebp-$08]
007B70C3   8B4030                 mov     eax, [eax+$30]
007B70C6   8BD3                   mov     edx, ebx

* Reference to: DB.TFields.GetField(TFields;Integer):TField;
|
007B70C8   E87B3BD0FF             call    004BAC48
007B70CD   5A                     pop     edx
007B70CE   8B08                   mov     ecx, [eax]
007B70D0   FF91B4000000           call    dword ptr [ecx+$00B4]
007B70D6   43                     inc     ebx
007B70D7   4E                     dec     esi
007B70D8   75CD                   jnz     007B70A7

* Possible String Reference to: 'Sflag'
|
007B70DA   BA00727B00             mov     edx, $007B7200
007B70DF   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B70E2   E8CDFAD0FF             call    004C6BB4
007B70E7   BA10727B00             mov     edx, $007B7210
007B70EC   8B08                   mov     ecx, [eax]
007B70EE   FF91B0000000           call    dword ptr [ecx+$00B0]

* Possible String Reference to: 'Sindex'
|
007B70F4   BA1C727B00             mov     edx, $007B721C
007B70F9   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B70FC   E8B3FAD0FF             call    004C6BB4
007B7101   50                     push    eax
007B7102   8D45D4                 lea     eax, [ebp-$2C]
007B7105   8B55F4                 mov     edx, [ebp-$0C]
007B7108   B1FC                   mov     cl, $FC

|
007B710A   E8651AC6FF             call    00418B74
007B710F   8D55D4                 lea     edx, [ebp-$2C]
007B7112   58                     pop     eax
007B7113   8B08                   mov     ecx, [eax]
007B7115   FF91B4000000           call    dword ptr [ecx+$00B4]

* Possible String Reference to: 'Ssel'
|
007B711B   BA2C727B00             mov     edx, $007B722C
007B7120   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B7123   E88CFAD0FF             call    004C6BB4
007B7128   50                     push    eax
007B7129   8D45C4                 lea     eax, [ebp-$3C]
007B712C   33D2                   xor     edx, edx

* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
007B712E   E8311CC6FF             call    00418D64
007B7133   8D55C4                 lea     edx, [ebp-$3C]
007B7136   58                     pop     eax
007B7137   8B08                   mov     ecx, [eax]
007B7139   FF91B4000000           call    dword ptr [ecx+$00B4]

* Possible String Reference to: 'SDefNote'
|
007B713F   BA3C727B00             mov     edx, $007B723C
007B7144   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B7147   E868FAD0FF             call    004C6BB4
007B714C   50                     push    eax
007B714D   8D45B4                 lea     eax, [ebp-$4C]
007B7150   33D2                   xor     edx, edx

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B7152   E8711CC6FF             call    00418DC8
007B7157   8D55B4                 lea     edx, [ebp-$4C]
007B715A   58                     pop     eax
007B715B   8B08                   mov     ecx, [eax]
007B715D   FF91B4000000           call    dword ptr [ecx+$00B4]
007B7163   FF45F4                 inc     dword ptr [ebp-$0C]
007B7166   8B45F8                 mov     eax, [ebp-$08]
007B7169   8B10                   mov     edx, [eax]
007B716B   FF924C020000           call    dword ptr [edx+$024C]
007B7171   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.Next(TDataSet);
|
007B7174   E8D311D1FF             call    004C834C
007B7179   8B45FC                 mov     eax, [ebp-$04]

* Reference to field TfrmSelExportField.OFFS_00A1
|
007B717C   80B8A100000000         cmp     byte ptr [eax+$00A1], $00
007B7183   0F8404FFFFFF           jz      007B708D
007B7189   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B718C   E82F0DD1FF             call    004C7EC0
007B7191   84C0                   test    al, al
007B7193   7508                   jnz     007B719D
007B7195   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.First(TDataSet);
|
007B7198   E8930ED1FF             call    004C8030
007B719D   33C0                   xor     eax, eax
007B719F   5A                     pop     edx
007B71A0   59                     pop     ecx
007B71A1   59                     pop     ecx
007B71A2   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B71A5   68CA717B00             push    $007B71CA
007B71AA   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.First(TDataSet);
|
007B71AD   E87E0ED1FF             call    004C8030
007B71B2   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
007B71B5   E8BA03D1FF             call    004C7574
007B71BA   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
007B71BD   E8B203D1FF             call    004C7574
007B71C2   C3                     ret


* Reference to: System.@HandleFinally;
|
007B71C3   E92CD9C4FF             jmp     00404AF4
007B71C8   EBE0                   jmp     007B71AA

****** END
|
007B71CA   33C0                   xor     eax, eax
007B71CC   5A                     pop     edx
007B71CD   59                     pop     ecx
007B71CE   59                     pop     ecx
007B71CF   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B71D2   68F2717B00             push    $007B71F2
007B71D7   8D45B4                 lea     eax, [ebp-$4C]

* Reference to object Variant
|
007B71DA   8B153C114000           mov     edx, [$0040113C]
007B71E0   B904000000             mov     ecx, $00000004

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B71E5   E82AEFC4FF             call    00406114
007B71EA   C3                     ret


* Reference to: System.@HandleFinally;
|
007B71EB   E904D9C4FF             jmp     00404AF4
007B71F0   EBE5                   jmp     007B71D7

****** END
|
007B71F2   5E                     pop     esi
007B71F3   5B                     pop     ebx
007B71F4   8BE5                   mov     esp, ebp
007B71F6   5D                     pop     ebp
007B71F7   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B7249(Sender : TObject);
begin
(*
007B7249   8BEC                   mov     ebp, esp
007B724B   6A00                   push    $00
007B724D   6A00                   push    $00
007B724F   6A00                   push    $00
007B7251   53                     push    ebx
007B7252   56                     push    esi
007B7253   884DFF                 mov     [ebp-$01], cl
007B7256   8BF2                   mov     esi, edx
007B7258   8BD8                   mov     ebx, eax
007B725A   8B4508                 mov     eax, [ebp+$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B725D   E882E5C4FF             call    004057E4
007B7262   33C0                   xor     eax, eax
007B7264   55                     push    ebp
007B7265   6844737B00             push    $007B7344

***** TRY
|
007B726A   64FF30                 push    dword ptr fs:[eax]
007B726D   648920                 mov     fs:[eax], esp
007B7270   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B7272   E85DE6D0FF             call    004C58D4
007B7277   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7279   E82E6DD2FF             call    004DDFAC
007B727E   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B7280   FF5244                 call    dword ptr [edx+$44]
007B7283   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7285   E8226DD2FF             call    004DDFAC
007B728A   8B5508                 mov     edx, [ebp+$08]
007B728D   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B728F   FF5138                 call    dword ptr [ecx+$38]
007B7292   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Open(TDataSet);
|
007B7294   E82FE6D0FF             call    004C58C8
007B7299   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B729B   E8200CD1FF             call    004C7EC0
007B72A0   84C0                   test    al, al
007B72A2   757D                   jnz     007B7321
007B72A4   8BC6                   mov     eax, esi
007B72A6   8B10                   mov     edx, [eax]
007B72A8   FF92D8000000           call    dword ptr [edx+$00D8]
007B72AE   EB34                   jmp     007B72E4

* Possible String Reference to: 'Name'
|
007B72B0   BA5C737B00             mov     edx, $007B735C
007B72B5   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B72B7   E8F8F8D0FF             call    004C6BB4
007B72BC   8D55F4                 lea     edx, [ebp-$0C]
007B72BF   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B72C1   FF5160                 call    dword ptr [ecx+$60]
007B72C4   8B45F4                 mov     eax, [ebp-$0C]
007B72C7   8D55F8                 lea     edx, [ebp-$08]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B72CA   E81D36C5FF             call    0040A8EC
007B72CF   8B55F8                 mov     edx, [ebp-$08]
007B72D2   8B863C020000           mov     eax, [esi+$023C]
007B72D8   8B08                   mov     ecx, [eax]
007B72DA   FF5138                 call    dword ptr [ecx+$38]
007B72DD   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Next(TDataSet);
|
007B72DF   E86810D1FF             call    004C834C

* Reference to field TfrmSelExportField.OFFS_00A1
|
007B72E4   80BBA100000000         cmp     byte ptr [ebx+$00A1], $00
007B72EB   74C3                   jz      007B72B0
007B72ED   807DFF00               cmp     byte ptr [ebp-$01], $00
007B72F1   750D                   jnz     007B7300
007B72F3   33D2                   xor     edx, edx
007B72F5   8B863C020000           mov     eax, [esi+$023C]
007B72FB   8B08                   mov     ecx, [eax]
007B72FD   FF5138                 call    dword ptr [ecx+$38]
007B7300   807DFF00               cmp     byte ptr [ebp-$01], $00
007B7304   741B                   jz      007B7321
007B7306   8B863C020000           mov     eax, [esi+$023C]
007B730C   8B10                   mov     edx, [eax]
007B730E   FF5214                 call    dword ptr [edx+$14]
007B7311   85C0                   test    eax, eax
007B7313   7E0C                   jle     007B7321
007B7315   33D2                   xor     edx, edx
007B7317   8BC6                   mov     eax, esi
007B7319   8B08                   mov     ecx, [eax]
007B731B   FF91D0000000           call    dword ptr [ecx+$00D0]
007B7321   33C0                   xor     eax, eax
007B7323   5A                     pop     edx
007B7324   59                     pop     ecx
007B7325   59                     pop     ecx
007B7326   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B7329   684B737B00             push    $007B734B
007B732E   8D45F4                 lea     eax, [ebp-$0C]
007B7331   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B7336   E80DE0C4FF             call    00405348
007B733B   8D4508                 lea     eax, [ebp+$08]

* Reference to: System.@LStrClr(void;void);
|
007B733E   E8E1DFC4FF             call    00405324
007B7343   C3                     ret


* Reference to: System.@HandleFinally;
|
007B7344   E9ABD7C4FF             jmp     00404AF4
007B7349   EBE3                   jmp     007B732E

****** END
|
007B734B   5E                     pop     esi
007B734C   5B                     pop     ebx
007B734D   8BE5                   mov     esp, ebp
007B734F   5D                     pop     ebp
007B7350   C20400                 ret     $0004

*)
end;

procedure TfrmSelExportField._PROC_007B7365(Sender : TObject);
begin
(*
007B7365   8BEC                   mov     ebp, esp
007B7367   81C40CFFFFFF           add     esp, $FFFFFF0C
007B736D   53                     push    ebx
007B736E   56                     push    esi
007B736F   57                     push    edi
007B7370   33C9                   xor     ecx, ecx
007B7372   898D0CFFFFFF           mov     [ebp+$FFFFFF0C], ecx
007B7378   898D10FFFFFF           mov     [ebp+$FFFFFF10], ecx
007B737E   898D14FFFFFF           mov     [ebp+$FFFFFF14], ecx
007B7384   898D18FFFFFF           mov     [ebp+$FFFFFF18], ecx
007B738A   898D1CFFFFFF           mov     [ebp+$FFFFFF1C], ecx
007B7390   898D28FFFFFF           mov     [ebp+$FFFFFF28], ecx
007B7396   898D24FFFFFF           mov     [ebp+$FFFFFF24], ecx
007B739C   898D20FFFFFF           mov     [ebp+$FFFFFF20], ecx
007B73A2   8955F8                 mov     [ebp-$08], edx
007B73A5   8945FC                 mov     [ebp-$04], eax
007B73A8   B933000000             mov     ecx, $00000033
007B73AD   8D852CFFFFFF           lea     eax, [ebp+$FFFFFF2C]

* Reference to object String
|
007B73B3   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@InitializeArray(Pointer;Pointer;Cardinal);
|
007B73B9   E86AECC4FF             call    00406028
007B73BE   33C0                   xor     eax, eax
007B73C0   55                     push    ebp

* Possible String Reference to: 'éÔÕÄÿëÇ_^[‹å]Ã�@'
|
007B73C1   681B757B00             push    $007B751B

***** TRY
|
007B73C6   64FF30                 push    dword ptr fs:[eax]
007B73C9   648920                 mov     fs:[eax], esp
007B73CC   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B73CF   E8EC0AD1FF             call    004C7EC0
007B73D4   84C0                   test    al, al
007B73D6   7418                   jz      007B73F0
007B73D8   8B45F8                 mov     eax, [ebp-$08]

|
007B73DB   E8B011D1FF             call    004C8590
007B73E0   8B45F8                 mov     eax, [ebp-$08]
007B73E3   8B10                   mov     edx, [eax]
007B73E5   FF924C020000           call    dword ptr [edx+$024C]
007B73EB   E9EC000000             jmp     007B74DC
007B73F0   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Forms.TCustomForm.WMClose(TCustomForm;TWMClose;TWMClose);
|           or: Forms.TCustomForm.CMRelease(TCustomForm;TMessage;TMessage);
|           or: QForms.TCustomForm.SetParent(TCustomForm;TWidgetControl);
|
007B73F3   E84C4FEAFF             call    0065C344
007B73F8   8BF0                   mov     esi, eax
007B73FA   4E                     dec     esi
007B73FB   85F6                   test    esi, esi
007B73FD   7C61                   jl      007B7460
007B73FF   46                     inc     esi
007B7400   33FF                   xor     edi, edi
007B7402   8D9D2CFFFFFF           lea     ebx, [ebp+$FFFFFF2C]
007B7408   8BD7                   mov     edx, edi
007B740A   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B740D   E8BE45EBFF             call    0066B9D0

|
007B7412   E80944EBFF             call    0066B820
007B7417   8D9520FFFFFF           lea     edx, [ebp+$FFFFFF20]

|
007B741D   E8A639EBFF             call    0066ADC8
007B7422   8B9520FFFFFF           mov     edx, [ebp+$FFFFFF20]
007B7428   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B742B   E884F7D0FF             call    004C6BB4
007B7430   8D9524FFFFFF           lea     edx, [ebp+$FFFFFF24]
007B7436   8B08                   mov     ecx, [eax]
007B7438   FF5160                 call    dword ptr [ecx+$60]
007B743B   8B8524FFFFFF           mov     eax, [ebp+$FFFFFF24]
007B7441   8D9528FFFFFF           lea     edx, [ebp+$FFFFFF28]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B7447   E8A034C5FF             call    0040A8EC
007B744C   8B9528FFFFFF           mov     edx, [ebp+$FFFFFF28]
007B7452   8BC3                   mov     eax, ebx

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B7454   E81FDFC4FF             call    00405378
007B7459   47                     inc     edi
007B745A   83C304                 add     ebx, +$04
007B745D   4E                     dec     esi
007B745E   75A8                   jnz     007B7408
007B7460   8B45F8                 mov     eax, [ebp-$08]

|
007B7463   E82811D1FF             call    004C8590
007B7468   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Forms.TCustomForm.WMClose(TCustomForm;TWMClose;TWMClose);
|           or: Forms.TCustomForm.CMRelease(TCustomForm;TMessage;TMessage);
|           or: QForms.TCustomForm.SetParent(TCustomForm;TWidgetControl);
|
007B746B   E8D44EEAFF             call    0065C344
007B7470   8BF0                   mov     esi, eax
007B7472   4E                     dec     esi
007B7473   85F6                   test    esi, esi
007B7475   7C5A                   jl      007B74D1
007B7477   46                     inc     esi
007B7478   33FF                   xor     edi, edi
007B747A   8D9D2CFFFFFF           lea     ebx, [ebp+$FFFFFF2C]
007B7480   833B00                 cmp     dword ptr [ebx], +$00
007B7483   7445                   jz      007B74CA
007B7485   8BD7                   mov     edx, edi
007B7487   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B748A   E84145EBFF             call    0066B9D0

|
007B748F   E88C43EBFF             call    0066B820
007B7494   8D951CFFFFFF           lea     edx, [ebp+$FFFFFF1C]

|
007B749A   E82939EBFF             call    0066ADC8
007B749F   8B951CFFFFFF           mov     edx, [ebp+$FFFFFF1C]
007B74A5   8B45F8                 mov     eax, [ebp-$08]

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B74A8   E807F7D0FF             call    004C6BB4
007B74AD   50                     push    eax
007B74AE   8D850CFFFFFF           lea     eax, [ebp+$FFFFFF0C]
007B74B4   8B13                   mov     edx, [ebx]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B74B6   E80D19C6FF             call    00418DC8
007B74BB   8D950CFFFFFF           lea     edx, [ebp+$FFFFFF0C]
007B74C1   58                     pop     eax
007B74C2   8B08                   mov     ecx, [eax]
007B74C4   FF91B4000000           call    dword ptr [ecx+$00B4]
007B74CA   47                     inc     edi
007B74CB   83C304                 add     ebx, +$04
007B74CE   4E                     dec     esi
007B74CF   75AF                   jnz     007B7480
007B74D1   8B45F8                 mov     eax, [ebp-$08]
007B74D4   8B10                   mov     edx, [eax]
007B74D6   FF924C020000           call    dword ptr [edx+$024C]
007B74DC   33C0                   xor     eax, eax
007B74DE   5A                     pop     edx
007B74DF   59                     pop     ecx
007B74E0   59                     pop     ecx
007B74E1   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã�@'
|
007B74E4   6822757B00             push    $007B7522
007B74E9   8D850CFFFFFF           lea     eax, [ebp+$FFFFFF0C]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B74EF   E880D1C5FF             call    00414674
007B74F4   8D851CFFFFFF           lea     eax, [ebp+$FFFFFF1C]
007B74FA   BA04000000             mov     edx, $00000004

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B74FF   E844DEC4FF             call    00405348
007B7504   8D852CFFFFFF           lea     eax, [ebp+$FFFFFF2C]
007B750A   B933000000             mov     ecx, $00000033

* Reference to object String
|
007B750F   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B7515   E8FAEBC4FF             call    00406114
007B751A   C3                     ret


* Reference to: System.@HandleFinally;
|
007B751B   E9D4D5C4FF             jmp     00404AF4
007B7520   EBC7                   jmp     007B74E9

****** END
|
007B7522   5F                     pop     edi
007B7523   5E                     pop     esi
007B7524   5B                     pop     ebx
007B7525   8BE5                   mov     esp, ebp
007B7527   5D                     pop     ebp
007B7528   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B752C(Sender : TObject);
begin
(*
007B752C   55                     push    ebp
007B752D   8BEC                   mov     ebp, esp
007B752F   B90C000000             mov     ecx, $0000000C
007B7534   6A00                   push    $00
007B7536   6A00                   push    $00
007B7538   49                     dec     ecx
007B7539   75F9                   jnz     007B7534
007B753B   53                     push    ebx
007B753C   56                     push    esi
007B753D   8BDA                   mov     ebx, edx
007B753F   8BF0                   mov     esi, eax
007B7541   33C0                   xor     eax, eax
007B7543   55                     push    ebp
007B7544   68FB767B00             push    $007B76FB

***** TRY
|
007B7549   64FF30                 push    dword ptr fs:[eax]
007B754C   648920                 mov     fs:[eax], esp
007B754F   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.First(TComponentList):TComponent;
|           or: Contnrs.TComponentList.Last(TComponentList):TComponent;
|
007B7551   E8F64DEAFF             call    0065C34C

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7556   E809A6E9FF             call    00651B64

* Reference to field TfrmSelExportField.ControlStyle : TControlStyle
|
007B755B   8B4050                 mov     eax, [eax+$50]
007B755E   8D55F4                 lea     edx, [ebp-$0C]
007B7561   8B08                   mov     ecx, [eax]

* Possible reference to virtual method TControlStyle.OFFS_10
|
007B7563   FF5110                 call    dword ptr [ecx+$10]
007B7566   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.First(TComponentList):TComponent;
|           or: Contnrs.TComponentList.Last(TComponentList):TComponent;
|
007B7568   E8DF4DEAFF             call    0065C34C

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B756D   E8F2A5E9FF             call    00651B64

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7572   8B801C010000           mov     eax, [eax+$011C]
007B7578   8D4DF0                 lea     ecx, [ebp-$10]
007B757B   BA02000000             mov     edx, $00000002

|
007B7580   E86B29EAFF             call    00659EF0
007B7585   8B55F4                 mov     edx, [ebp-$0C]
007B7588   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B758A   E825F6D0FF             call    004C6BB4
007B758F   8D55EC                 lea     edx, [ebp-$14]
007B7592   8B08                   mov     ecx, [eax]
007B7594   FF5160                 call    dword ptr [ecx+$60]
007B7597   8B45EC                 mov     eax, [ebp-$14]
007B759A   8D55FC                 lea     edx, [ebp-$04]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B759D   E84A33C5FF             call    0040A8EC
007B75A2   8D55E8                 lea     edx, [ebp-$18]
007B75A5   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B75A8   E83F33C5FF             call    0040A8EC
007B75AD   837DE800               cmp     dword ptr [ebp-$18], +$00
007B75B1   741D                   jz      007B75D0
007B75B3   8B55F0                 mov     edx, [ebp-$10]
007B75B6   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B75B8   E8F7F5D0FF             call    004C6BB4
007B75BD   8D55E4                 lea     edx, [ebp-$1C]
007B75C0   8B08                   mov     ecx, [eax]
007B75C2   FF5160                 call    dword ptr [ecx+$60]
007B75C5   8B45E4                 mov     eax, [ebp-$1C]
007B75C8   8D55F8                 lea     edx, [ebp-$08]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B75CB   E81C33C5FF             call    0040A8EC
007B75D0   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
007B75D2   E87DFFD0FF             call    004C7554
007B75D7   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.First(TDataSet);
|
007B75D9   E8520AD1FF             call    004C8030
007B75DE   E9BB000000             jmp     007B769E
007B75E3   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Edit(TDataSet);
|
007B75E5   E8560ED1FF             call    004C8440
007B75EA   837DFC00               cmp     dword ptr [ebp-$04], +$00
007B75EE   7521                   jnz     007B7611
007B75F0   8B55F4                 mov     edx, [ebp-$0C]
007B75F3   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B75F5   E8BAF5D0FF             call    004C6BB4
007B75FA   50                     push    eax
007B75FB   8D45D4                 lea     eax, [ebp-$2C]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B75FE   E85D5DC6FF             call    0041D360
007B7603   8D55D4                 lea     edx, [ebp-$2C]
007B7606   58                     pop     eax
007B7607   8B08                   mov     ecx, [eax]
007B7609   FF91B4000000           call    dword ptr [ecx+$00B4]
007B760F   EB22                   jmp     007B7633
007B7611   8B55F4                 mov     edx, [ebp-$0C]
007B7614   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B7616   E899F5D0FF             call    004C6BB4
007B761B   50                     push    eax
007B761C   8D45C4                 lea     eax, [ebp-$3C]
007B761F   8B55FC                 mov     edx, [ebp-$04]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B7622   E8A117C6FF             call    00418DC8
007B7627   8D55C4                 lea     edx, [ebp-$3C]
007B762A   58                     pop     eax
007B762B   8B08                   mov     ecx, [eax]
007B762D   FF91B4000000           call    dword ptr [ecx+$00B4]
007B7633   8D55C0                 lea     edx, [ebp-$40]
007B7636   8B45F0                 mov     eax, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B7639   E8AE32C5FF             call    0040A8EC
007B763E   837DC000               cmp     dword ptr [ebp-$40], +$00
007B7642   7449                   jz      007B768D
007B7644   837DF800               cmp     dword ptr [ebp-$08], +$00
007B7648   7521                   jnz     007B766B
007B764A   8B55F0                 mov     edx, [ebp-$10]
007B764D   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B764F   E860F5D0FF             call    004C6BB4
007B7654   50                     push    eax
007B7655   8D45B0                 lea     eax, [ebp-$50]

* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
|           or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
|           or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
|           or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
|           or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
|           or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
007B7658   E8035DC6FF             call    0041D360
007B765D   8D55B0                 lea     edx, [ebp-$50]
007B7660   58                     pop     eax
007B7661   8B08                   mov     ecx, [eax]
007B7663   FF91B4000000           call    dword ptr [ecx+$00B4]
007B7669   EB22                   jmp     007B768D
007B766B   8B55F0                 mov     edx, [ebp-$10]
007B766E   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B7670   E83FF5D0FF             call    004C6BB4
007B7675   50                     push    eax
007B7676   8D45A0                 lea     eax, [ebp-$60]
007B7679   8B55F8                 mov     edx, [ebp-$08]

* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
007B767C   E84717C6FF             call    00418DC8
007B7681   8D55A0                 lea     edx, [ebp-$60]
007B7684   58                     pop     eax
007B7685   8B08                   mov     ecx, [eax]
007B7687   FF91B4000000           call    dword ptr [ecx+$00B4]
007B768D   8BC3                   mov     eax, ebx
007B768F   8B10                   mov     edx, [eax]
007B7691   FF924C020000           call    dword ptr [edx+$024C]
007B7697   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Next(TDataSet);
|
007B7699   E8AE0CD1FF             call    004C834C
007B769E   80BBA100000000         cmp     byte ptr [ebx+$00A1], $00
007B76A5   0F8438FFFFFF           jz      007B75E3
007B76AB   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
007B76AD   E8C2FED0FF             call    004C7574
007B76B2   33C0                   xor     eax, eax
007B76B4   5A                     pop     edx
007B76B5   59                     pop     ecx
007B76B6   59                     pop     ecx
007B76B7   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B76BA   6802777B00             push    $007B7702
007B76BF   8D45A0                 lea     eax, [ebp-$60]

* Reference to object Variant
|
007B76C2   8B153C114000           mov     edx, [$0040113C]
007B76C8   B902000000             mov     ecx, $00000002

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B76CD   E842EAC4FF             call    00406114
007B76D2   8D45C0                 lea     eax, [ebp-$40]

* Reference to: System.@LStrClr(void;void);
|
007B76D5   E84ADCC4FF             call    00405324
007B76DA   8D45C4                 lea     eax, [ebp-$3C]

* Reference to object Variant
|
007B76DD   8B153C114000           mov     edx, [$0040113C]
007B76E3   B902000000             mov     ecx, $00000002

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B76E8   E827EAC4FF             call    00406114
007B76ED   8D45E4                 lea     eax, [ebp-$1C]
007B76F0   BA07000000             mov     edx, $00000007

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B76F5   E84EDCC4FF             call    00405348
007B76FA   C3                     ret


* Reference to: System.@HandleFinally;
|
007B76FB   E9F4D3C4FF             jmp     00404AF4
007B7700   EBBD                   jmp     007B76BF

****** END
|
007B7702   5E                     pop     esi
007B7703   5B                     pop     ebx
007B7704   8BE5                   mov     esp, ebp
007B7706   5D                     pop     ebp
007B7707   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B7708(Sender : TObject);
begin
(*
007B7708   55                     push    ebp
007B7709   8BEC                   mov     ebp, esp
007B770B   51                     push    ecx
007B770C   B906000000             mov     ecx, $00000006
007B7711   6A00                   push    $00
007B7713   6A00                   push    $00
007B7715   49                     dec     ecx
007B7716   75F9                   jnz     007B7711
007B7718   874DFC                 xchg    [ebp-$04], ecx
007B771B   53                     push    ebx
007B771C   56                     push    esi
007B771D   57                     push    edi
007B771E   894DFC                 mov     [ebp-$04], ecx
007B7721   8BF2                   mov     esi, edx
007B7723   8BD8                   mov     ebx, eax
007B7725   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7728   E8B7E0C4FF             call    004057E4
007B772D   8B4510                 mov     eax, [ebp+$10]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7730   E8AFE0C4FF             call    004057E4
007B7735   33C0                   xor     eax, eax
007B7737   55                     push    ebp
007B7738   681D797B00             push    $007B791D

***** TRY
|
007B773D   64FF30                 push    dword ptr fs:[eax]
007B7740   648920                 mov     fs:[eax], esp
007B7743   33C0                   xor     eax, eax
007B7745   55                     push    ebp

* Possible String Reference to: 'é„ÏÄÿ3Ûj@h|y{'
|
007B7746   68B7787B00             push    $007B78B7

***** TRY
|
007B774B   64FF30                 push    dword ptr fs:[eax]
007B774E   648920                 mov     fs:[eax], esp
007B7751   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Close(TDataSet);
|
007B7753   E87CE1D0FF             call    004C58D4
007B7758   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B775A   E84D68D2FF             call    004DDFAC
007B775F   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B7761   FF5244                 call    dword ptr [edx+$44]
007B7764   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7766   E84168D2FF             call    004DDFAC

* Possible String Reference to: 'exec Get_SY_MaxBH '
|
007B776B   BA38797B00             mov     edx, $007B7938
007B7770   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B7772   FF5138                 call    dword ptr [ecx+$38]
007B7775   8D55F4                 lea     edx, [ebp-$0C]
007B7778   8B45FC                 mov     eax, [ebp-$04]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B777B   E87432C5FF             call    0040A9F4
007B7780   8B4DF4                 mov     ecx, [ebp-$0C]
007B7783   8D45F8                 lea     eax, [ebp-$08]
007B7786   BA54797B00             mov     edx, $007B7954

* Reference to: System.@LStrCat3;
|
007B778B   E8B0DEC4FF             call    00405640
007B7790   8B45F8                 mov     eax, [ebp-$08]
007B7793   50                     push    eax
007B7794   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7796   E81168D2FF             call    004DDFAC
007B779B   5A                     pop     edx
007B779C   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B779E   FF5138                 call    dword ptr [ecx+$38]
007B77A1   8D55EC                 lea     edx, [ebp-$14]
007B77A4   8B4510                 mov     eax, [ebp+$10]

* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
007B77A7   E84832C5FF             call    0040A9F4
007B77AC   8B4DEC                 mov     ecx, [ebp-$14]
007B77AF   8D45F0                 lea     eax, [ebp-$10]
007B77B2   BA60797B00             mov     edx, $007B7960

* Reference to: System.@LStrCat3;
|
007B77B7   E884DEC4FF             call    00405640
007B77BC   8B45F0                 mov     eax, [ebp-$10]
007B77BF   50                     push    eax
007B77C0   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B77C2   E8E567D2FF             call    004DDFAC
007B77C7   5A                     pop     edx
007B77C8   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B77CA   FF5138                 call    dword ptr [ecx+$38]
007B77CD   8D55E4                 lea     edx, [ebp-$1C]
007B77D0   8B450C                 mov     eax, [ebp+$0C]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
007B77D3   E83437C5FF             call    0040AF0C
007B77D8   8B4DE4                 mov     ecx, [ebp-$1C]
007B77DB   8D45E8                 lea     eax, [ebp-$18]
007B77DE   BA60797B00             mov     edx, $007B7960

* Reference to: System.@LStrCat3;
|
007B77E3   E858DEC4FF             call    00405640
007B77E8   8B45E8                 mov     eax, [ebp-$18]
007B77EB   50                     push    eax
007B77EC   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B77EE   E8B967D2FF             call    004DDFAC
007B77F3   5A                     pop     edx
007B77F4   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B77F6   FF5138                 call    dword ptr [ecx+$38]
007B77F9   8D55DC                 lea     edx, [ebp-$24]
007B77FC   8B4508                 mov     eax, [ebp+$08]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
007B77FF   E80837C5FF             call    0040AF0C
007B7804   8B4DDC                 mov     ecx, [ebp-$24]
007B7807   8D45E0                 lea     eax, [ebp-$20]
007B780A   BA60797B00             mov     edx, $007B7960

* Reference to: System.@LStrCat3;
|
007B780F   E82CDEC4FF             call    00405640
007B7814   8B45E0                 mov     eax, [ebp-$20]
007B7817   50                     push    eax
007B7818   8BC3                   mov     eax, ebx

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B781A   E88D67D2FF             call    004DDFAC
007B781F   5A                     pop     edx
007B7820   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.ConstrainedResize(Integer,Integer,Integer,Integer)
|
007B7822   FF5138                 call    dword ptr [ecx+$38]
007B7825   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.Open(TDataSet);
|
007B7827   E89CE0D0FF             call    004C58C8
007B782C   8BC3                   mov     eax, ebx
007B782E   8B10                   mov     edx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_014C
|
007B7830   FF924C010000           call    dword ptr [edx+$014C]
007B7836   85C0                   test    eax, eax
007B7838   7E36                   jle     007B7870

* Possible String Reference to: 'MaxBH'
|
007B783A   BA6C797B00             mov     edx, $007B796C
007B783F   8BC3                   mov     eax, ebx

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B7841   E86EF3D0FF             call    004C6BB4
007B7846   8D55D4                 lea     edx, [ebp-$2C]
007B7849   8B08                   mov     ecx, [eax]

* Reference to method TfrmSelExportField.SetDragMode(TDragMode)
|
007B784B   FF5160                 call    dword ptr [ecx+$60]
007B784E   8B45D4                 mov     eax, [ebp-$2C]
007B7851   8D55D8                 lea     edx, [ebp-$28]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B7854   E89330C5FF             call    0040A8EC
007B7859   8B55D8                 mov     edx, [ebp-$28]
007B785C   8BC6                   mov     eax, esi

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B785E   E815DBC4FF             call    00405378
007B7863   833E00                 cmp     dword ptr [esi], +$00
007B7866   7404                   jz      007B786C
007B7868   B301                   mov     bl, $01
007B786A   EB06                   jmp     007B7872
007B786C   33DB                   xor     ebx, ebx
007B786E   EB02                   jmp     007B7872
007B7870   33DB                   xor     ebx, ebx
007B7872   84DB                   test    bl, bl
007B7874   7537                   jnz     007B78AD
007B7876   6A40                   push    $40

* Possible String Reference to: 'ÎÞ·¨Éú³ÉÁ÷Ë®ºÅ('
|
007B7878   687C797B00             push    $007B797C
007B787D   FF75FC                 push    dword ptr [ebp-$04]
007B7880   6894797B00             push    $007B7994
007B7885   8D45D0                 lea     eax, [ebp-$30]
007B7888   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrCatN;
|
007B788D   E822DEC4FF             call    004056B4
007B7892   8B45D0                 mov     eax, [ebp-$30]

* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
007B7895   E85ADFC4FF             call    004057F4
007B789A   8BD0                   mov     edx, eax

* Possible String Reference to: 'ÌáÊ¾ÐÅÏ¢'
|
007B789C   B998797B00             mov     ecx, $007B7998
*)
end;

procedure TfrmSelExportField._PROC_007B79A5(Sender : TObject);
begin
(*
007B79A5   8BEC                   mov     ebp, esp
007B79A7   6A00                   push    $00
007B79A9   6A00                   push    $00
007B79AB   6A00                   push    $00
007B79AD   6A00                   push    $00
007B79AF   6A00                   push    $00
007B79B1   6A00                   push    $00
007B79B3   53                     push    ebx
007B79B4   894DF8                 mov     [ebp-$08], ecx
007B79B7   8BDA                   mov     ebx, edx
007B79B9   8945FC                 mov     [ebp-$04], eax
007B79BC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B79BF   E820DEC4FF             call    004057E4
007B79C4   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B79C7   E818DEC4FF             call    004057E4
007B79CC   33C0                   xor     eax, eax
007B79CE   55                     push    ebp
007B79CF   68687A7B00             push    $007B7A68

***** TRY
|
007B79D4   64FF30                 push    dword ptr fs:[eax]
007B79D7   648920                 mov     fs:[eax], esp
007B79DA   8D55EC                 lea     edx, [ebp-$14]
*)
end;

procedure TfrmSelExportField._PROC_007B7AA5(Sender : TObject);
begin
(*
007B7AA5   8BEC                   mov     ebp, esp
007B7AA7   6A00                   push    $00
007B7AA9   6A00                   push    $00
007B7AAB   6A00                   push    $00
007B7AAD   6A00                   push    $00
007B7AAF   6A00                   push    $00
007B7AB1   6A00                   push    $00
007B7AB3   53                     push    ebx
007B7AB4   894DF8                 mov     [ebp-$08], ecx
007B7AB7   8BDA                   mov     ebx, edx
007B7AB9   8945FC                 mov     [ebp-$04], eax
007B7ABC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7ABF   E820DDC4FF             call    004057E4
007B7AC4   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7AC7   E818DDC4FF             call    004057E4
007B7ACC   33C0                   xor     eax, eax
007B7ACE   55                     push    ebp

* Possible String Reference to: 'éŽÏÄÿëë[‹å]Ã'
|
007B7ACF   68617B7B00             push    $007B7B61

***** TRY
|
007B7AD4   64FF30                 push    dword ptr fs:[eax]
007B7AD7   648920                 mov     fs:[eax], esp
007B7ADA   8D55EC                 lea     edx, [ebp-$14]
*)
end;

procedure TfrmSelExportField._PROC_007B7BA1(Sender : TObject);
begin
(*
007B7BA1   8BEC                   mov     ebp, esp
007B7BA3   6A00                   push    $00
007B7BA5   6A00                   push    $00
007B7BA7   6A00                   push    $00
007B7BA9   6A00                   push    $00
007B7BAB   6A00                   push    $00
007B7BAD   6A00                   push    $00
007B7BAF   6A00                   push    $00
007B7BB1   6A00                   push    $00
007B7BB3   53                     push    ebx
007B7BB4   894DF8                 mov     [ebp-$08], ecx
007B7BB7   8BDA                   mov     ebx, edx
007B7BB9   8945FC                 mov     [ebp-$04], eax
007B7BBC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7BBF   E820DCC4FF             call    004057E4
007B7BC4   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7BC7   E818DCC4FF             call    004057E4
007B7BCC   33C0                   xor     eax, eax
007B7BCE   55                     push    ebp

* Possible String Reference to: 'érÎÄÿëë[‹å]Ã'
|
007B7BCF   687D7C7B00             push    $007B7C7D

***** TRY
|
007B7BD4   64FF30                 push    dword ptr fs:[eax]
007B7BD7   648920                 mov     fs:[eax], esp
007B7BDA   8D55EC                 lea     edx, [ebp-$14]
*)
end;

procedure TfrmSelExportField._PROC_007B7CBD(Sender : TObject);
begin
(*
007B7CBD   8BEC                   mov     ebp, esp
007B7CBF   6A00                   push    $00
007B7CC1   6A00                   push    $00
007B7CC3   6A00                   push    $00
007B7CC5   6A00                   push    $00
007B7CC7   6A00                   push    $00
007B7CC9   6A00                   push    $00
007B7CCB   6A00                   push    $00
007B7CCD   6A00                   push    $00
007B7CCF   53                     push    ebx
007B7CD0   894DF8                 mov     [ebp-$08], ecx
007B7CD3   8BDA                   mov     ebx, edx
007B7CD5   8945FC                 mov     [ebp-$04], eax
007B7CD8   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7CDB   E804DBC4FF             call    004057E4
007B7CE0   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B7CE3   E8FCDAC4FF             call    004057E4
007B7CE8   33C0                   xor     eax, eax
007B7CEA   55                     push    ebp

* Possible String Reference to: 'éVÍÄÿëë[‹å]Ã'
|
007B7CEB   68997D7B00             push    $007B7D99

***** TRY
|
007B7CF0   64FF30                 push    dword ptr fs:[eax]
007B7CF3   648920                 mov     fs:[eax], esp
007B7CF6   8D55EC                 lea     edx, [ebp-$14]
*)
end;

procedure TfrmSelExportField._PROC_007B7DD9(Sender : TObject);
begin
(*
007B7DD9   8BEC                   mov     ebp, esp
007B7DDB   33C9                   xor     ecx, ecx
007B7DDD   51                     push    ecx
007B7DDE   51                     push    ecx
007B7DDF   51                     push    ecx
007B7DE0   51                     push    ecx
007B7DE1   51                     push    ecx
007B7DE2   53                     push    ebx
007B7DE3   56                     push    esi
007B7DE4   57                     push    edi
007B7DE5   8BF0                   mov     esi, eax
007B7DE7   33C0                   xor     eax, eax
007B7DE9   55                     push    ebp

* Possible String Reference to: 'éßÊÄÿëã_^[‹å]Ã'
|
007B7DEA   6810807B00             push    $007B8010

***** TRY
|
007B7DEF   64FF30                 push    dword ptr fs:[eax]
007B7DF2   648920                 mov     fs:[eax], esp
007B7DF5   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|           or: QForms.TCustomForm.GetCanvas(TCustomForm):TCanvas;
|
007B7DF7   E8E83BEBFF             call    0066B9E4

* Reference to field TfrmSelExportField.OnMouseMove : TMouseMoveEvent
|
007B7DFC   8B80D8000000           mov     eax, [eax+$00D8]
007B7E02   33D2                   xor     edx, edx
007B7E04   55                     push    ebp
007B7E05   68E67F7B00             push    $007B7FE6

***** TRY
|
007B7E0A   64FF32                 push    dword ptr fs:[edx]
007B7E0D   648922                 mov     fs:[edx], esp

* Reference to field TMouseMoveEvent.OFFS_0004
|
007B7E10   8B4004                 mov     eax, [eax+$04]
007B7E13   8B80D8000000           mov     eax, [eax+$00D8]
007B7E19   8B4034                 mov     eax, [eax+$34]

* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
|           or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
|           or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
|           or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
|           or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
|           or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
007B7E1C   E82BCFD5FF             call    00514D4C
007B7E21   8945FC                 mov     [ebp-$04], eax
007B7E24   8B45FC                 mov     eax, [ebp-$04]

|
007B7E27   E858CED5FF             call    00514C84

* Reference to: Classes.TCollection.Clear(TCollection);
|
007B7E2C   E843C5C6FF             call    00424374
007B7E31   8BC6                   mov     eax, esi

* Reference to: Forms.TCustomForm.WMClose(TCustomForm;TWMClose;TWMClose);
|           or: Forms.TCustomForm.CMRelease(TCustomForm;TMessage;TMessage);
|           or: QForms.TCustomForm.SetParent(TCustomForm;TWidgetControl);
|
007B7E33   E80C45EAFF             call    0065C344
007B7E38   48                     dec     eax
007B7E39   85C0                   test    eax, eax
007B7E3B   0F8C97010000           jl      007B7FD8
007B7E41   40                     inc     eax
007B7E42   8945F4                 mov     [ebp-$0C], eax
007B7E45   33DB                   xor     ebx, ebx
007B7E47   8BD3                   mov     edx, ebx
007B7E49   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7E4B   E8803BEBFF             call    0066B9D0
007B7E50   8B10                   mov     edx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_00D0
|
007B7E52   FF92D0000000           call    dword ptr [edx+$00D0]
007B7E58   84C0                   test    al, al
007B7E5A   0F846E010000           jz      007B7FCE
007B7E60   8BD3                   mov     edx, ebx
007B7E62   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7E64   E8673BEBFF             call    0066B9D0

|
007B7E69   E8B239EBFF             call    0066B820
007B7E6E   8D55F8                 lea     edx, [ebp-$08]

|
007B7E71   E8522FEBFF             call    0066ADC8
007B7E76   8BD3                   mov     edx, ebx
007B7E78   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7E7A   E8513BEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7E7F   8B801C010000           mov     eax, [eax+$011C]
007B7E85   33D2                   xor     edx, edx

|
007B7E87   E89420EAFF             call    00659F20
007B7E8C   3C01                   cmp     al, $01
007B7E8E   0F85A2000000           jnz     007B7F36
007B7E94   8B45FC                 mov     eax, [ebp-$04]
007B7E97   8B4010                 mov     eax, [eax+$10]

* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
|           or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
|           or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
|           or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
|           or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
|           or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
007B7E9A   E8C5C0D5FF             call    00513F64
007B7E9F   8BF8                   mov     edi, eax
007B7EA1   8BD3                   mov     edx, ebx
007B7EA3   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7EA5   E8263BEBFF             call    0066B9D0
007B7EAA   8BD0                   mov     edx, eax
007B7EAC   8BC7                   mov     eax, edi

|
007B7EAE   E859BCD5FF             call    00513B0C
007B7EB3   33D2                   xor     edx, edx
007B7EB5   8BC7                   mov     eax, edi

|
007B7EB7   E840C0D5FF             call    00513EFC
007B7EBC   B201                   mov     dl, $01
007B7EBE   8BC7                   mov     eax, edi

|
007B7EC0   E827C0D5FF             call    00513EEC
007B7EC5   8BD3                   mov     edx, ebx
007B7EC7   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7EC9   E8023BEBFF             call    0066B9D0
007B7ECE   8D55EC                 lea     edx, [ebp-$14]

* Reference to : TcxCustomGridTableView._PROC_00629378()
|
007B7ED1   E8A214E7FF             call    00629378
007B7ED6   8B45EC                 mov     eax, [ebp-$14]
007B7ED9   8D55F0                 lea     edx, [ebp-$10]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B7EDC   E80B2AC5FF             call    0040A8EC
007B7EE1   8D45F0                 lea     eax, [ebp-$10]

* Possible String Reference to: 'Ð¡¼Æ=#,0.0'
|
007B7EE4   BA28807B00             mov     edx, $007B8028

* Reference to: System.@LStrCat;
|
007B7EE9   E80ED7C4FF             call    004055FC
007B7EEE   8B55F0                 mov     edx, [ebp-$10]
007B7EF1   8BC7                   mov     eax, edi

|
007B7EF3   E8CCBFD5FF             call    00513EC4
007B7EF8   8BD3                   mov     edx, ebx
007B7EFA   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7EFC   E8CF3AEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7F01   8B801C010000           mov     eax, [eax+$011C]
007B7F07   B101                   mov     cl, $01
007B7F09   BA01000000             mov     edx, $00000001

|
007B7F0E   E86520EAFF             call    00659F78
007B7F13   8BD3                   mov     edx, ebx
007B7F15   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7F17   E8B43AEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7F1C   8B801C010000           mov     eax, [eax+$011C]

* Possible String Reference to: '#,0.00'
|
007B7F22   B93C807B00             mov     ecx, $007B803C
007B7F27   BA01000000             mov     edx, $00000001

|
007B7F2C   E81720EAFF             call    00659F48
007B7F31   E998000000             jmp     007B7FCE
007B7F36   8BD3                   mov     edx, ebx
007B7F38   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7F3A   E8913AEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7F3F   8B801C010000           mov     eax, [eax+$011C]
007B7F45   33D2                   xor     edx, edx

|
007B7F47   E8D41FEAFF             call    00659F20
007B7F4C   3C04                   cmp     al, $04
007B7F4E   755D                   jnz     007B7FAD
007B7F50   8BD3                   mov     edx, ebx
007B7F52   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7F54   E8773AEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7F59   8B801C010000           mov     eax, [eax+$011C]
007B7F5F   B104                   mov     cl, $04
007B7F61   33D2                   xor     edx, edx

|
007B7F63   E81020EAFF             call    00659F78
007B7F68   8BD3                   mov     edx, ebx
007B7F6A   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7F6C   E85F3AEBFF             call    0066B9D0

* Reference to field TfrmSelExportField.OFFS_011C
|
007B7F71   8B801C010000           mov     eax, [eax+$011C]
007B7F77   B104                   mov     cl, $04
007B7F79   BA01000000             mov     edx, $00000001

|
007B7F7E   E8F51FEAFF             call    00659F78
007B7F83   8B45FC                 mov     eax, [ebp-$04]
007B7F86   8B4010                 mov     eax, [eax+$10]

* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
|           or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
|           or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
|           or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
|           or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
|           or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
007B7F89   E8D6BFD5FF             call    00513F64
007B7F8E   8BF8                   mov     edi, eax
007B7F90   8BD3                   mov     edx, ebx
007B7F92   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7F94   E8373AEBFF             call    0066B9D0
007B7F99   8BD0                   mov     edx, eax
007B7F9B   8BC7                   mov     eax, edi

|
007B7F9D   E86ABBD5FF             call    00513B0C
007B7FA2   B204                   mov     dl, $04
007B7FA4   8BC7                   mov     eax, edi

|
007B7FA6   E841BFD5FF             call    00513EEC
007B7FAB   EB21                   jmp     007B7FCE
007B7FAD   8B45FC                 mov     eax, [ebp-$04]

|
007B7FB0   E8CFCCD5FF             call    00514C84

* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
|           or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
|           or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
|           or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
|           or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
|           or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
007B7FB5   E8E2CAD5FF             call    00514A9C
007B7FBA   8BF8                   mov     edi, eax
007B7FBC   8BD3                   mov     edx, ebx
007B7FBE   8BC6                   mov     eax, esi

* Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent;
|           or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent;
|
007B7FC0   E80B3AEBFF             call    0066B9D0
007B7FC5   8BD0                   mov     edx, eax
007B7FC7   8BC7                   mov     eax, edi

|
007B7FC9   E83EBBD5FF             call    00513B0C
007B7FCE   43                     inc     ebx
007B7FCF   FF4DF4                 dec     dword ptr [ebp-$0C]
007B7FD2   0F856FFEFFFF           jnz     007B7E47
007B7FD8   33C0                   xor     eax, eax
007B7FDA   5A                     pop     edx
007B7FDB   59                     pop     ecx
007B7FDC   59                     pop     ecx
007B7FDD   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B7FE0   68ED7F7B00             push    $007B7FED
007B7FE5   C3                     ret


* Reference to: System.@HandleFinally;
|
007B7FE6   E909CBC4FF             jmp     00404AF4
007B7FEB   EBF8                   jmp     007B7FE5

****** END
|
007B7FED   33C0                   xor     eax, eax
007B7FEF   5A                     pop     edx
007B7FF0   59                     pop     ecx
007B7FF1   59                     pop     ecx
007B7FF2   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã'
|
007B7FF5   6817807B00             push    $007B8017
007B7FFA   8D45EC                 lea     eax, [ebp-$14]
007B7FFD   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B8002   E841D3C4FF             call    00405348
007B8007   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B800A   E815D3C4FF             call    00405324
007B800F   C3                     ret


* Reference to: System.@HandleFinally;
|
007B8010   E9DFCAC4FF             jmp     00404AF4
007B8015   EBE3                   jmp     007B7FFA

****** END
|
007B8017   5F                     pop     edi
007B8018   5E                     pop     esi
007B8019   5B                     pop     ebx
007B801A   8BE5                   mov     esp, ebp
007B801C   5D                     pop     ebp
007B801D   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B8045(Sender : TObject);
begin
(*
007B8045   8BEC                   mov     ebp, esp
007B8047   83C4F4                 add     esp, -$0C
007B804A   53                     push    ebx
007B804B   56                     push    esi
007B804C   57                     push    edi
007B804D   33C9                   xor     ecx, ecx
007B804F   894DF4                 mov     [ebp-$0C], ecx
007B8052   8BDA                   mov     ebx, edx
007B8054   8945FC                 mov     [ebp-$04], eax
007B8057   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B805A   E885D7C4FF             call    004057E4
007B805F   33C0                   xor     eax, eax
007B8061   55                     push    ebp

* Possible String Reference to: 'éNÉÄÿëè_^[‹å]Ã'
|
007B8062   68A1817B00             push    $007B81A1

***** TRY
|
007B8067   64FF30                 push    dword ptr fs:[eax]
007B806A   648920                 mov     fs:[eax], esp
007B806D   33C0                   xor     eax, eax
007B806F   55                     push    ebp
007B8070   687C817B00             push    $007B817C

***** TRY
|
007B8075   64FF30                 push    dword ptr fs:[eax]
007B8078   648920                 mov     fs:[eax], esp
007B807B   33C9                   xor     ecx, ecx
007B807D   B201                   mov     dl, $01

* Reference to class TSaveDialog
|
007B807F   A1A4EC4300             mov     eax, dword ptr [$0043ECA4]

* Reference to: Dialogs.TOpenDialog.Create(TOpenDialog;boolean;TComponent);
|
007B8084   E8F77CC8FF             call    0043FD80
007B8089   8945F8                 mov     [ebp-$08], eax
007B808C   8B45F8                 mov     eax, [ebp-$08]
007B808F   83C060                 add     eax, +$60

* Possible String Reference to: 'xls(*.xls)|*.xls|È«²¿(*.*)|*.*'
|
007B8092   BAB8817B00             mov     edx, $007B81B8

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B8097   E8DCD2C4FF             call    00405378
007B809C   8B45F8                 mov     eax, [ebp-$08]
007B809F   8B15D8817B00           mov     edx, [$007B81D8]

* Reference to field TSaveDialog.Options : TOpenOptions
|
007B80A5   89505C                 mov     [eax+$5C], edx
007B80A8   8B45F8                 mov     eax, [ebp-$08]
007B80AB   83C078                 add     eax, +$78
007B80AE   8B55FC                 mov     edx, [ebp-$04]

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B80B1   E8C2D2C4FF             call    00405378
007B80B6   8B45F8                 mov     eax, [ebp-$08]
007B80B9   8B10                   mov     edx, [eax]

* Reference to method TSaveDialog.Execute()
|
007B80BB   FF523C                 call    dword ptr [edx+$3C]
007B80BE   84C0                   test    al, al
007B80C0   0F84A0000000           jz      007B8166
007B80C6   85DB                   test    ebx, ebx
007B80C8   0F8480000000           jz      007B814E
007B80CE   33C0                   xor     eax, eax
007B80D0   55                     push    ebp

* Possible String Reference to: 'é5ÇÄÿj'
|
007B80D1   6806817B00             push    $007B8106

***** TRY
|
007B80D6   64FF30                 push    dword ptr fs:[eax]
007B80D9   648920                 mov     fs:[eax], esp
007B80DC   6A01                   push    $01
007B80DE   6A01                   push    $01

* Possible String Reference to: 'xls'
|
007B80E0   68E4817B00             push    $007B81E4
007B80E5   8D55F4                 lea     edx, [ebp-$0C]
007B80E8   8B45F8                 mov     eax, [ebp-$08]

* Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName;
|
007B80EB   E8D884C8FF             call    004405C8
007B80F0   8B45F4                 mov     eax, [ebp-$0C]
007B80F3   B101                   mov     cl, $01
007B80F5   8BD3                   mov     edx, ebx

|
007B80F7   E87096EEFF             call    006A176C
007B80FC   33C0                   xor     eax, eax
007B80FE   5A                     pop     edx
007B80FF   59                     pop     ecx
007B8100   59                     pop     ecx
007B8101   648910                 mov     fs:[eax], edx
007B8104   EB2E                   jmp     007B8134

* Reference to: System.@HandleAnyException;
|
007B8106   E935C7C4FF             jmp     00404840
007B810B   6A00                   push    $00

* Possible String Reference to: 'ÌáÊ¾ÐÅÏ¢'
|
007B810D   B9E8817B00             mov     ecx, $007B81E8

* Possible String Reference to: '´´½¨Ê§°Ü,Ô´ÎÄ¼þ¿ÉÄÜ´¦ÓÚ±à¼­×´Ì¬!'
|
007B8112   BAF4817B00             mov     edx, $007B81F4
*)
end;

procedure TfrmSelExportField._PROC_007B8231(Sender : TObject);
begin
(*
007B8231   8BEC                   mov     ebp, esp
007B8233   83C4EC                 add     esp, -$14
007B8236   53                     push    ebx
007B8237   56                     push    esi
007B8238   57                     push    edi
007B8239   33DB                   xor     ebx, ebx
007B823B   895DEC                 mov     [ebp-$14], ebx
007B823E   895DF0                 mov     [ebp-$10], ebx
007B8241   894DF8                 mov     [ebp-$08], ecx
007B8244   8955FC                 mov     [ebp-$04], edx
007B8247   8BF0                   mov     esi, eax
007B8249   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.@LStrAddRef(void;void):Pointer;
|
007B824C   E893D5C4FF             call    004057E4
007B8251   33C0                   xor     eax, eax
007B8253   55                     push    ebp

* Possible String Reference to: 'éZÆÄÿëã_^[‹å]Ã�U‹ì3ÉQQQQSV‹Ú‹ð3ÀUhW
|                                …{'
|
007B8254   6895847B00             push    $007B8495

***** TRY
|
007B8259   64FF30                 push    dword ptr fs:[eax]
007B825C   648920                 mov     fs:[eax], esp
007B825F   8B45FC                 mov     eax, [ebp-$04]

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B8262   E859FCD0FF             call    004C7EC0
007B8267   84C0                   test    al, al
007B8269   0F8503020000           jnz     007B8472
007B826F   33D2                   xor     edx, edx
007B8271   55                     push    ebp
007B8272   6868847B00             push    $007B8468

***** TRY
|
007B8277   64FF32                 push    dword ptr fs:[edx]
007B827A   648922                 mov     fs:[edx], esp
*)
end;

procedure TfrmSelExportField._PROC_007B84A4(Sender : TObject);
begin
(*
007B84A4   55                     push    ebp
007B84A5   8BEC                   mov     ebp, esp
007B84A7   33C9                   xor     ecx, ecx
007B84A9   51                     push    ecx
007B84AA   51                     push    ecx
007B84AB   51                     push    ecx
007B84AC   51                     push    ecx
007B84AD   53                     push    ebx
007B84AE   56                     push    esi
007B84AF   8BDA                   mov     ebx, edx
007B84B1   8BF0                   mov     esi, eax
007B84B3   33C0                   xor     eax, eax
007B84B5   55                     push    ebp
007B84B6   6857857B00             push    $007B8557

***** TRY
|
007B84BB   64FF30                 push    dword ptr fs:[eax]
007B84BE   648920                 mov     fs:[eax], esp
007B84C1   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
007B84C3   E8F8F9D0FF             call    004C7EC0
007B84C8   84C0                   test    al, al
007B84CA   7575                   jnz     007B8541
007B84CC   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
007B84CE   E881F0D0FF             call    004C7554
007B84D3   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.First(TDataSet);
|
007B84D5   E856FBD0FF             call    004C8030
007B84DA   EB55                   jmp     007B8531

* Possible String Reference to: 'SSel'
|
007B84DC   BA6C857B00             mov     edx, $007B856C
007B84E1   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B84E3   E8CCE6D0FF             call    004C6BB4
007B84E8   8B10                   mov     edx, [eax]

* Reference to method TfrmSelExportField.GetClientRect()
|
007B84EA   FF5244                 call    dword ptr [edx+$44]
007B84ED   8BD3                   mov     edx, ebx
007B84EF   80F201                 xor     dl, $01
007B84F2   3AC2                   cmp     al, dl
007B84F4   7534                   jnz     007B852A
007B84F6   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Edit(TDataSet);
|
007B84F8   E843FFD0FF             call    004C8440

* Possible String Reference to: 'SSel'
|
007B84FD   BA6C857B00             mov     edx, $007B856C
007B8502   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
007B8504   E8ABE6D0FF             call    004C6BB4
007B8509   50                     push    eax
007B850A   8D45F0                 lea     eax, [ebp-$10]
007B850D   8BD3                   mov     edx, ebx

* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
007B850F   E85008C6FF             call    00418D64
007B8514   8D55F0                 lea     edx, [ebp-$10]
007B8517   58                     pop     eax
007B8518   8B08                   mov     ecx, [eax]
007B851A   FF91B4000000           call    dword ptr [ecx+$00B4]
007B8520   8BC6                   mov     eax, esi
007B8522   8B10                   mov     edx, [eax]

* Possible reference to virtual method TfrmSelExportField.OFFS_024C
|
007B8524   FF924C020000           call    dword ptr [edx+$024C]
007B852A   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Next(TDataSet);
|
007B852C   E81BFED0FF             call    004C834C

* Reference to field TfrmSelExportField.OFFS_00A1
|
007B8531   80BEA100000000         cmp     byte ptr [esi+$00A1], $00
007B8538   74A2                   jz      007B84DC
007B853A   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
007B853C   E833F0D0FF             call    004C7574
007B8541   33C0                   xor     eax, eax
007B8543   5A                     pop     edx
007B8544   59                     pop     ecx
007B8545   59                     pop     ecx
007B8546   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B8549   685E857B00             push    $007B855E
007B854E   8D45F0                 lea     eax, [ebp-$10]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B8551   E81EC1C5FF             call    00414674
007B8556   C3                     ret


* Reference to: System.@HandleFinally;
|
007B8557   E998C5C4FF             jmp     00404AF4
007B855C   EBF0                   jmp     007B854E

****** END
|
007B855E   5E                     pop     esi
007B855F   5B                     pop     ebx
007B8560   8BE5                   mov     esp, ebp
007B8562   5D                     pop     ebp
007B8563   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B87F1(Sender : TObject);
begin
(*
007B87F1   8BEC                   mov     ebp, esp
007B87F3   33C0                   xor     eax, eax
007B87F5   55                     push    ebp

* Possible String Reference to: 'é„ÂÄÿëø]Ãƒ-ì;‰'
|
007B87F6   686B887B00             push    $007B886B

***** TRY
|
007B87FB   64FF30                 push    dword ptr fs:[eax]
007B87FE   648920                 mov     fs:[eax], esp
007B8801   FF05EC3B8900           inc     dword ptr [$00893BEC]
007B8807   7554                   jnz     007B885D
007B8809   B8E4FD8800             mov     eax, $0088FDE4
007B880E   B90A000000             mov     ecx, $0000000A

* Reference to object String
|
007B8813   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B8819   E8F6D8C4FF             call    00406114
007B881E   B8D4FD8800             mov     eax, $0088FDD4
007B8823   B904000000             mov     ecx, $00000004

* Reference to object String
|
007B8828   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B882E   E8E1D8C4FF             call    00406114
007B8833   B888FD8800             mov     eax, $0088FD88
007B8838   B913000000             mov     ecx, $00000013

* Reference to object String
|
007B883D   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B8843   E8CCD8C4FF             call    00406114
007B8848   B868FD8800             mov     eax, $0088FD68
007B884D   B908000000             mov     ecx, $00000008

* Reference to object String
|
007B8852   8B1520114000           mov     edx, [$00401120]

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B8858   E8B7D8C4FF             call    00406114
007B885D   33C0                   xor     eax, eax
007B885F   5A                     pop     edx
007B8860   59                     pop     ecx
007B8861   59                     pop     ecx
007B8862   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ãƒ-ì;‰'
|
007B8865   6872887B00             push    $007B8872
007B886A   C3                     ret


* Reference to: System.@HandleFinally;
|
007B886B   E984C2C4FF             jmp     00404AF4
007B8870   EBF8                   jmp     007B886A

****** END
|
007B8872   5D                     pop     ebp
007B8873   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B8874(Sender : TObject);
begin
(*
007B8874   832DEC3B890001         sub     dword ptr [$00893BEC], +$01
007B887B   C3                     ret

*)
end;

procedure TfrmSelExportField._PROC_007B887C(Sender : TObject);
begin
(*
007B887C   80887B00081954         or      byte ptr [eax+$1908007B], $54
007B8883   63784F                 arpl    [eax+$4F], di
007B8886   6E                     outsb
007B8887   47                     inc     edi
007B8888   657443                 jz      007B88CE
007B888B   6F                     outsd
007B888C   6E                     outsb
007B888D   7465                   jz      007B88F4
007B888F   6E                     outsb
007B8890   7453                   jz      007B88E5
007B8892   7479                   jz      007B890D
007B8894   6C                     insb
007B8895   6545                   inc     ebp
007B8897   7665                   jbe     007B88FE
007B8899   6E                     outsb
007B889A   7400                   jz      007B889C
007B889C   0308                   add     ecx, [eax]
007B889E   06                     push    es
007B889F   53                     push    ebx
007B88A0   656E                   outsb
007B88A2   64657207               jb      007B88AD
007B88A6   54                     push    esp
007B88A7   4F                     dec     edi
007B88A8   626A65                 bound   ebp, qword ptr [edx+$65]
007B88AB   63740005               arpl    [eax+eax+$05], si
007B88AF   41                     inc     ecx
007B88B0   44                     inc     esp
007B88B1   61                     popa
007B88B2   7461                   jz      007B8915
007B88B4   07                     pop     es
007B88B5   50                     push    eax
007B88B6   6F                     outsd
007B88B7   696E7465722806         imul    ebp, [esi+$74], $06287265
007B88BE   41                     inc     ecx
007B88BF   53                     push    ebx
007B88C0   7479                   jz      007B893B
007B88C2   6C                     insb
007B88C3   6508546378             or      gs:[ebx+$78], dl
007B88C8   53                     push    ebx
007B88C9   7479                   jz      007B8944
007B88CB   6C                     insb
007B88CC   6500B011400000         add     gs:[eax+$4011], dh
007B88D3   0000                   add     [eax], al

007B88D5   00E8                   add     al, ch
007B88D7   704F                   jo      007B8928
007B88D9   008BC028897B           add     [ebx+$7B8928C0], cl
007B88DF   0000                   add     [eax], al

007B88E1   0000                   add     [eax], al

007B88E3   0000                   add     [eax], al

007B88E5   0000                   add     [eax], al

007B88E7   0000                   add     [eax], al

007B88E9   0000                   add     [eax], al

007B88EB   006889                 add     [eax-$77], ch
007B88EE   7B00                   jnp     007B88F0
007B88F0   0000                   add     [eax], al

007B88F2   0000                   add     [eax], al

007B88F4   0000                   add     [eax], al

007B88F6   0000                   add     [eax], al

007B88F8   0000                   add     [eax], al

007B88FA   0000                   add     [eax], al

007B88FC   4C                     dec     esp
007B88FD   897B00                 mov     [ebx+$00], edi
007B8900   40                     inc     eax
007B8901   0000                   add     [eax], al

007B8903   001472                 add     [edx+esi*2], dl
007B8906   4F                     dec     edi
007B8907   00A84540005C           add     [eax+$5C004045], ch
007B890D   3E42                   inc     edx
007B890F   00B8454000BC           add     [eax+$BC004045], bh
007B8915   45                     inc     ebp
007B8916   40                     inc     eax
007B8917   00B0454000E4           add     [eax+$E4004045], dh
007B891D   42                     inc     edx
007B891E   40                     inc     eax
007B891F   0000                   add     [eax], al

007B8921   43                     inc     ebx
007B8922   40                     inc     eax
007B8923   00BC8D7B009C3D         add     [ebp+ecx*4+$3D9C007B], bh
007B892A   42                     inc     edx
007B892B   00A43D4200EC8D         add     [ebp+edi+$8DEC0042], ah
007B8932   7B00                   jnp     007B8934
007B8934   EC                     in      al, dx
007B8935   3E42                   inc     edx
007B8937   00748D7B               add     [ebp+ecx*4+$7B], dh
007B893B   009C8E7B00007D         add     [esi+ecx*4+$7D00007B], bl
007B8942   4F                     dec     edi
007B8943   00D0                   add     al, dl
007B8945   8E7B00                 mov     , word ptr [ebx+$00]
007B8948   7C83                   jl      007B88CD
007B894A   4F                     dec     edi
007B894B   0016                   add     [esi], dl
007B894D   54                     push    esp
007B894E   637843                 arpl    [eax+$43], di
007B8951   7573                   jnz     007B89C6
007B8953   746F                   jz      007B89C4
007B8955   6D                     insd
007B8956   43                     inc     ebx
007B8957   6F                     outsd
007B8958   6E                     outsb
007B8959   7472                   jz      007B89CD
007B895B   6F                     outsd
007B895C   6C                     insb
007B895D   53                     push    ebx
007B895E   7479                   jz      007B89D9
007B8960   6C                     insb
007B8961   657390                 jnb     007B88F4
007B8964   68897B0007             push    $07007B89
007B8969   16                     push    ss
007B896A   54                     push    esp
007B896B   637843                 arpl    [eax+$43], di
007B896E   7573                   jnz     007B89E3
007B8970   746F                   jz      007B89E1
007B8972   6D                     insd
007B8973   43                     inc     ebx
007B8974   6F                     outsd
007B8975   6E                     outsb
007B8976   7472                   jz      007B89EA
007B8978   6F                     outsd
007B8979   6C                     insb
007B897A   53                     push    ebx
007B897B   7479                   jz      007B89F6
007B897D   6C                     insb
007B897E   657328                 jnb     007B89A9
007B8981   897B00                 mov     [ebx+$00], edi
007B8984   90                     nop
007B8985   724F                   jb      007B89D6
007B8987   0006                   add     [esi], al
007B8989   0012                   add     [edx], dl
007B898B   637849                 arpl    [eax+$49], di
007B898E   6E                     outsb
007B898F   706C                   jo      007B89FD
007B8991   61                     popa
007B8992   636543                 arpl    [ebp+$43], sp
007B8995   6F                     outsd
007B8996   6E                     outsb
007B8997   7461                   jz      007B89FA
007B8999   696E65720600E8         imul    ebp, [esi+$65], $E8000672
007B89A0   704F                   jo      007B89F1
007B89A2   004883                 add     [eax-$7D], cl
007B89A5   4F                     dec     edi
007B89A6   005C834F               add     [ebx+eax*4+$4F], bl
007B89AA   0001                   add     [ecx], al
007B89AC   0000                   add     [eax], al

007B89AE   0001                   add     [ecx], al
007B89B0   0000                   add     [eax], al

007B89B2   0000                   add     [eax], al

007B89B4   0000                   add     [eax], al

007B89B6   800000                 add     byte ptr [eax], $00
007B89B9   0A4261                 or      al, byte ptr [edx+$61]
007B89BC   636B67                 arpl    [ebx+$67], bp
007B89BF   726F                   jb      007B8A30
007B89C1   756E                   jnz     007B8A31
007B89C3   64E8704F0048           call    487BD939
007B89C9   834F005C               or      dword ptr [edi+$00], +$5C
007B89CD   834F0001               or      dword ptr [edi+$00], +$01
007B89D1   0000                   add     [eax], al

007B89D3   0000                   add     [eax], al

007B89D5   0000                   add     [eax], al

007B89D7   0000                   add     [eax], al

007B89D9   0000                   add     [eax], al

007B89DB   800100                 add     byte ptr [ecx], $00
007B89DE   07                     pop     es
007B89DF   43                     inc     ebx
007B89E0   6F                     outsd
007B89E1   6E                     outsb
007B89E2   7465                   jz      007B8A49
007B89E4   6E                     outsb
007B89E5   74E8                   jz      007B89CF
007B89E7   704F                   jo      007B8A38
007B89E9   004883                 add     [eax-$7D], cl
007B89EC   4F                     dec     edi
007B89ED   005C834F               add     [ebx+eax*4+$4F], bl
007B89F1   0001                   add     [ecx], al
007B89F3   0000                   add     [eax], al

007B89F5   0002                   add     [edx], al
007B89F7   0000                   add     [eax], al

007B89F9   0000                   add     [eax], al

007B89FB   0000                   add     [eax], al

007B89FD   800200                 add     byte ptr [edx], $00
007B8A00   08496E                 or      [ecx+$6E], cl
007B8A03   61                     popa
007B8A04   63746976               arpl    [ecx+ebp*2+$76], si
007B8A08   65E8704F0048           call    487BD97E
007B8A0E   834F005C               or      dword ptr [edi+$00], +$5C
007B8A12   834F0001               or      dword ptr [edi+$00], +$01
007B8A16   0000                   add     [eax], al

007B8A18   0003                   add     [ebx], al
007B8A1A   0000                   add     [eax], al

007B8A1C   0000                   add     [eax], al

007B8A1E   0000                   add     [eax], al

007B8A20   800300                 add     byte ptr [ebx], $00
007B8A23   095365                 or      [ebx+$65], edx
007B8A26   6C                     insb
007B8A27   656374696F             arpl    gs:[ecx+ebp*2+$6F], si
007B8A2C   6E                     outsb
007B8A2D   7C88                   jl      007B89B7
007B8A2F   7B00                   jnp     007B8A31
007B8A31   3800                   cmp     [eax], al
007B8A33   00FF                   add     bh, bh
007B8A35   3800                   cmp     [eax], al
007B8A37   00FF                   add     bh, bh
007B8A39   0100                   add     [eax], eax
007B8A3B   0000                   add     [eax], al

007B8A3D   0000                   add     [eax], al

007B8A3F   008000000080           add     [eax+$80000000], al
007B8A45   0400                   add     al, +$00
007B8A47   114F6E                 adc     [edi+$6E], ecx
007B8A4A   47                     inc     edi
007B8A4B   657443                 jz      007B8A91
007B8A4E   6F                     outsd
007B8A4F   6E                     outsb
007B8A50   7465                   jz      007B8AB7
007B8A52   6E                     outsb
007B8A53   7453                   jz      007B8AA8
007B8A55   7479                   jz      007B8AD0
007B8A57   6C                     insb
007B8A58   654C                   dec     esp
007B8A5A   6D                     insd
007B8A5B   4F                     dec     edi
007B8A5C   0018                   add     [eax], bl
007B8A5E   0000                   add     [eax], al

007B8A60   FF3480                 push    dword ptr [eax+eax*4]
007B8A63   4F                     dec     edi
007B8A64   0001                   add     [ecx], al
007B8A66   0000                   add     [eax], al

007B8A68   0000                   add     [eax], al

007B8A6A   0000                   add     [eax], al

007B8A6C   800000                 add     byte ptr [eax], $00
007B8A6F   008005000A53           add     [eax+$530A0005], al
007B8A75   7479                   jz      007B8AF0
007B8A77   6C                     insb
007B8A78   6553                   push    ebx
007B8A7A   686565748B             push    $8B746565
007B8A7F   C0CC8A                 ror     ah, $8A
007B8A82   7B00                   jnp     007B8A84
007B8A84   0000                   add     [eax], al

007B8A86   0000                   add     [eax], al

007B8A88   0000                   add     [eax], al

007B8A8A   0000                   add     [eax], al

007B8A8C   0000                   add     [eax], al

007B8A8E   0000                   add     [eax], al

007B8A90   0000                   add     [eax], al

007B8A92   0000                   add     [eax], al

007B8A94   0000                   add     [eax], al

007B8A96   0000                   add     [eax], al

007B8A98   0000                   add     [eax], al

007B8A9A   0000                   add     [eax], al

007B8A9C   0000                   add     [eax], al

007B8A9E   0000                   add     [eax], al

007B8AA0   CC                     int     3
007B8AA1   8A7B00                 mov     bh, byte ptr [ebx+$00]
007B8AA4   0800                   or      [eax], al
007B8AA6   0000                   add     [eax], al

007B8AA8   5C                     pop     esp
007B8AA9   114000                 adc     [eax+$00], eax
007B8AAC   A845                   test    al, $45
007B8AAE   40                     inc     eax
007B8AAF   00B4454000B845         add     [ebp+eax*2+$45B80040], dh
007B8AB6   40                     inc     eax
007B8AB7   00BC454000B045         add     [ebp+eax*2+$45B00040], bh
007B8ABE   40                     inc     eax
007B8ABF   00E4                   add     ah, ah
007B8AC1   42                     inc     edx
007B8AC2   40                     inc     eax
007B8AC3   0000                   add     [eax], al

007B8AC5   43                     inc     ebx
007B8AC6   40                     inc     eax
007B8AC7   004091                 add     [eax-$6F], al
007B8ACA   7B00                   jnp     007B8ACC
007B8ACC   1B546378               sbb     edx, [ebx+$78]
007B8AD0   56                     push    esi
007B8AD1   61                     popa
007B8AD2   6C                     insb
007B8AD3   7565                   jnz     007B8B3A
007B8AD5   54                     push    esp
007B8AD6   7970                   jns     007B8B48
007B8AD8   6543                   inc     ebx
007B8ADA   6C                     insb
007B8ADB   61                     popa
007B8ADC   7373                   jnb     007B8B51
007B8ADE   52                     push    edx
007B8ADF   65706F                 jo      007B8B51
007B8AE2   7369                   jnb     007B8B4D
007B8AE4   746F                   jz      007B8B55
007B8AE6   7279                   jb      007B8B61
007B8AE8   55                     push    ebp
007B8AE9   8BEC                   mov     ebp, esp
007B8AEB   33C0                   xor     eax, eax
007B8AED   55                     push    ebp
007B8AEE   68298B7B00             push    $007B8B29

***** TRY
|
007B8AF3   64FF30                 push    dword ptr fs:[eax]
007B8AF6   648920                 mov     fs:[eax], esp
007B8AF9   833DFC3B890000         cmp     dword ptr [$00893BFC], +$00
007B8B00   740B                   jz      007B8B0D
007B8B02   A1FC3B8900             mov     eax, dword ptr [$00893BFC]
007B8B07   50                     push    eax

* Reference to: user32.UnhookWindowsHookEx()
|
007B8B08   E83703C5FF             call    00408E44
007B8B0D   33C0                   xor     eax, eax
007B8B0F   5A                     pop     edx
007B8B10   59                     pop     ecx
007B8B11   59                     pop     ecx
007B8B12   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B8B15   68308B7B00             push    $007B8B30
007B8B1A   33C0                   xor     eax, eax

* Reference to GlobalVar_00893BF8
|
007B8B1C   A3F83B8900             mov     dword ptr [$00893BF8], eax
007B8B21   33C0                   xor     eax, eax

* Reference to GlobalVar_00893BFC
|
007B8B23   A3FC3B8900             mov     dword ptr [$00893BFC], eax
007B8B28   C3                     ret


* Reference to: System.@HandleFinally;
|
007B8B29   E9C6BFC4FF             jmp     00404AF4
007B8B2E   EBEA                   jmp     007B8B1A

****** END
|
007B8B30   5D                     pop     ebp
007B8B31   C3                     ret

007B8B32   8BC0                   mov     eax, eax
007B8B34   53                     push    ebx
007B8B35   56                     push    esi
007B8B36   8BD8                   mov     ebx, eax
007B8B38   8BC3                   mov     eax, ebx
007B8B3A   66BEFFFF               mov     si, $FFFF

* Reference to: System.@CallDynaInst;
|
007B8B3E   E811BAC4FF             call    00404554
007B8B43   5E                     pop     esi
007B8B44   5B                     pop     ebx
007B8B45   C3                     ret

007B8B46   8BC0                   mov     eax, eax
007B8B48   53                     push    ebx
007B8B49   8BD8                   mov     ebx, eax
007B8B4B   8BC3                   mov     eax, ebx

|
007B8B4D   E8E2FFFFFF             call    007B8B34

* Reference to field GlobalVar_00893BFC.OFFS_0038
|
007B8B52   8B4038                 mov     eax, [eax+$38]
007B8B55   5B                     pop     ebx
007B8B56   C3                     ret

007B8B57   90                     nop
*)
end;

end.