unit RM_e_Xls;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TRMXLSExportForm=class(TForm)
    btnOK: TButton;
    btnCancel: TButton;
    edtExportFileName: TEdit;
    btnFileName: TSpeedButton;
    GroupBox1: TGroupBox;
    Label1: TLabel;
    SaveDialog: TSaveDialog;
    rdbPrintAll: TRadioButton;
    rbdPrintCurPage: TRadioButton;
    rbdPrintPages: TRadioButton;
    edtPages: TEdit;
    Label2: TLabel;
    GroupBox2: TGroupBox;
    chkShowAfterGenerate: TCheckBox;
    chkExportFrames: TCheckBox;
    gbExportImages: TGroupBox;
    lblExportImageFormat: TLabel;
    lblJPEGQuality: TLabel;
    Label4: TLabel;
    cmbImageFormat: TComboBox;
    edJPEGQuality: TEdit;
    UpDown1: TUpDown;
    cmbPixelFormat: TComboBox;
    chkExportImages: TCheckBox;
    edPages: TEdit;
    UpDown2: TUpDown;
    Label3: TLabel;
    chkWYB: TCheckBox;
    procedure FormCreate(Sender : TObject);
    procedure btnFileNameClick(Sender : TObject);
    procedure FormCloseQuery(Sender : TObject);
    procedure rbdPrintPagesClick(Sender : TObject);
    procedure edtPagesEnter(Sender : TObject);
    procedure chkExportFramesClick(Sender : TObject);
    procedure edJPEGQualityKeyPress(Sender : TObject);
    procedure cmbImageFormatChange(Sender : TObject);
    procedure _PROC_007B1D95(Sender : TObject);
    procedure _PROC_007B20A4(Sender : TObject);
    procedure _PROC_007B241F(Sender : TObject);
    procedure _PROC_007B2500(Sender : TObject);
    procedure _PROC_007B2519(Sender : TObject);
    procedure _PROC_007B2660(Sender : TObject);
    procedure _PROC_007B26C8(Sender : TObject);
    procedure _PROC_007B2758(Sender : TObject);
    procedure _PROC_007B2AC5(Sender : TObject);
    procedure _PROC_007B2FCD(Sender : TObject);
    procedure _PROC_007B3080(Sender : TObject);
    procedure _PROC_007B3088(Sender : TObject);
    procedure _PROC_007B309C(Sender : TObject);
    procedure _PROC_007B30A4(Sender : TObject);
    procedure _PROC_007B3188(Sender : TObject);
    procedure _PROC_007B3630(Sender : TObject);
    procedure _PROC_007B3660(Sender : TObject);
    procedure _PROC_007B3668(Sender : TObject);
    procedure _PROC_007B36CE(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  RMXLSExportForm: TRMXLSExportForm;

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

implementation

{$R *.DFM}

procedure TRMXLSExportForm.FormCreate(Sender : TObject);
begin
(*
007B33B4   53                     push    ebx
007B33B5   56                     push    esi
007B33B6   8BD8                   mov     ebx, eax
007B33B8   8BC3                   mov     eax, ebx

* Reference to : TRMXLSExportForm._PROC_007B3188()
|
007B33BA   E8C9FDFFFF             call    007B3188

* Reference to control TRMXLSExportForm.cmbImageFormat : TComboBox
|
007B33BF   8B8344030000           mov     eax, [ebx+$0344]

* Reference to field TComboBox.Items : TStrings
|
007B33C5   8B803C020000           mov     eax, [eax+$023C]
007B33CB   8B10                   mov     edx, [eax]

* Possible reference to virtual method TStrings.OFFS_44
|
007B33CD   FF5244                 call    dword ptr [edx+$44]
*)
end;

procedure TRMXLSExportForm.btnFileNameClick(Sender : TObject);
begin
(*
007B3424   55                     push    ebp
007B3425   8BEC                   mov     ebp, esp
007B3427   6A00                   push    $00
007B3429   6A00                   push    $00
007B342B   53                     push    ebx
007B342C   8BD8                   mov     ebx, eax
007B342E   33C0                   xor     eax, eax
007B3430   55                     push    ebp
007B3431   68A4347B00             push    $007B34A4

***** TRY
|
007B3436   64FF30                 push    dword ptr fs:[eax]
007B3439   648920                 mov     fs:[eax], esp
007B343C   8D55FC                 lea     edx, [ebp-$04]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B343F   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B3445   E8A651CDFF             call    004885F0
007B344A   8B55FC                 mov     edx, [ebp-$04]

* Reference to control TRMXLSExportForm.SaveDialog : TSaveDialog
|
007B344D   8B8310030000           mov     eax, [ebx+$0310]
007B3453   83C078                 add     eax, +$78

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B3456   E81D1FC5FF             call    00405378

* Reference to control TRMXLSExportForm.SaveDialog : TSaveDialog
|
007B345B   8B8310030000           mov     eax, [ebx+$0310]
007B3461   8B10                   mov     edx, [eax]

* Reference to method TSaveDialog.Execute()
|
007B3463   FF523C                 call    dword ptr [edx+$3C]
007B3466   84C0                   test    al, al
007B3468   741C                   jz      007B3486
007B346A   8D55F8                 lea     edx, [ebp-$08]

* Reference to control TRMXLSExportForm.SaveDialog : TSaveDialog
|
007B346D   8B8310030000           mov     eax, [ebx+$0310]

* Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName;
|
007B3473   E850D1C8FF             call    004405C8
007B3478   8B55F8                 mov     edx, [ebp-$08]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B347B   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B3481   E89A51CDFF             call    00488620
007B3486   33C0                   xor     eax, eax
007B3488   5A                     pop     edx
007B3489   59                     pop     ecx
007B348A   59                     pop     ecx
007B348B   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '[YY]ÃU‹ìj'
|
007B348E   68AB347B00             push    $007B34AB
007B3493   8D45F8                 lea     eax, [ebp-$08]

* Reference to: System.@LStrClr(void;void);
|
007B3496   E8891EC5FF             call    00405324
007B349B   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
007B349E   E8811EC5FF             call    00405324
007B34A3   C3                     ret


* Reference to: System.@HandleFinally;
|
007B34A4   E94B16C5FF             jmp     00404AF4
007B34A9   EBE8                   jmp     007B3493

****** END
|
007B34AB   5B                     pop     ebx
007B34AC   59                     pop     ecx
007B34AD   59                     pop     ecx
007B34AE   5D                     pop     ebp
007B34AF   C3                     ret

*)
end;

procedure TRMXLSExportForm.FormCloseQuery(Sender : TObject);
begin
(*
007B34B0   55                     push    ebp
007B34B1   8BEC                   mov     ebp, esp
007B34B3   6A00                   push    $00
007B34B5   53                     push    ebx
007B34B6   56                     push    esi
007B34B7   8BF1                   mov     esi, ecx
007B34B9   8BD8                   mov     ebx, eax
007B34BB   33C0                   xor     eax, eax
007B34BD   55                     push    ebp
007B34BE   68FF347B00             push    $007B34FF

***** TRY
|
007B34C3   64FF30                 push    dword ptr fs:[eax]
007B34C6   648920                 mov     fs:[eax], esp

* Reference to field TRMXLSExportForm.ModalResult : TModalResult
|
007B34C9   83BB4C02000001         cmp     dword ptr [ebx+$024C], +$01
007B34D0   7517                   jnz     007B34E9
007B34D2   8D55FC                 lea     edx, [ebp-$04]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B34D5   8B8300030000           mov     eax, [ebx+$0300]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B34DB   E81051CDFF             call    004885F0
007B34E0   837DFC00               cmp     dword ptr [ebp-$04], +$00
007B34E4   7503                   jnz     007B34E9
007B34E6   C60600                 mov     byte ptr [esi], $00
007B34E9   33C0                   xor     eax, eax
007B34EB   5A                     pop     edx
007B34EC   59                     pop     ecx
007B34ED   59                     pop     ecx
007B34EE   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B34F1   6806357B00             push    $007B3506
007B34F6   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
007B34F9   E8261EC5FF             call    00405324
007B34FE   C3                     ret


* Reference to: System.@HandleFinally;
|
007B34FF   E9F015C5FF             jmp     00404AF4
007B3504   EBF0                   jmp     007B34F6

****** END
|
007B3506   5E                     pop     esi
007B3507   5B                     pop     ebx
007B3508   59                     pop     ecx
007B3509   5D                     pop     ebp
007B350A   C3                     ret

*)
end;

procedure TRMXLSExportForm.rbdPrintPagesClick(Sender : TObject);
begin
(*

* Reference to control TRMXLSExportForm.edtPages : TEdit
|
007B350C   8B8020030000           mov     eax, [eax+$0320]
007B3512   8B10                   mov     edx, [eax]

* Reference to method TEdit.SetFocus()
|
007B3514   FF92C4000000           call    dword ptr [edx+$00C4]
007B351A   C3                     ret

*)
end;

procedure TRMXLSExportForm.edtPagesEnter(Sender : TObject);
begin
(*
007B351C   B201                   mov     dl, $01

* Reference to control TRMXLSExportForm.rbdPrintPages : TRadioButton
|
007B351E   8B801C030000           mov     eax, [eax+$031C]
007B3524   8B08                   mov     ecx, [eax]

* Reference to method TRadioButton.SetChecked(Boolean)
|
007B3526   FF91CC000000           call    dword ptr [ecx+$00CC]
007B352C   C3                     ret

*)
end;

procedure TRMXLSExportForm.chkExportFramesClick(Sender : TObject);
begin
(*
007B3530   53                     push    ebx
007B3531   56                     push    esi
007B3532   8BF2                   mov     esi, edx
007B3534   8BD8                   mov     ebx, eax

* Reference to control TRMXLSExportForm.chkExportImages : TCheckBox
|
007B3536   8B8354030000           mov     eax, [ebx+$0354]
007B353C   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B353E   FF92C8000000           call    dword ptr [edx+$00C8]
007B3544   8BD0                   mov     edx, eax

* Reference to control TRMXLSExportForm.gbExportImages : TGroupBox
|
007B3546   8B8334030000           mov     eax, [ebx+$0334]

|
007B354C   E8EB42FCFF             call    0077783C
007B3551   8BD6                   mov     edx, esi
007B3553   8BC3                   mov     eax, ebx

* Reference to : TRMXLSExportForm.cmbImageFormatChange()
|
007B3555   E816000000             call    007B3570
007B355A   5E                     pop     esi
007B355B   5B                     pop     ebx
007B355C   C3                     ret

*)
end;

procedure TRMXLSExportForm.edJPEGQualityKeyPress(Sender : TObject);
begin
(*
007B3560   8A01                   mov     al, byte ptr [ecx]
007B3562   2C08                   sub     al, $08
007B3564   7409                   jz      007B356F
007B3566   04D8                   add     al, -$28
007B3568   2C0A                   sub     al, $0A
007B356A   7203                   jb      007B356F
007B356C   C60100                 mov     byte ptr [ecx], $00
007B356F   C3                     ret

*)
end;

procedure TRMXLSExportForm.cmbImageFormatChange(Sender : TObject);
begin
(*
007B3570   55                     push    ebp
007B3571   8BEC                   mov     ebp, esp
007B3573   6A00                   push    $00
007B3575   53                     push    ebx
007B3576   8BD8                   mov     ebx, eax
007B3578   33C0                   xor     eax, eax
007B357A   55                     push    ebp
007B357B   6825367B00             push    $007B3625

***** TRY
|
007B3580   64FF30                 push    dword ptr fs:[eax]
007B3583   648920                 mov     fs:[eax], esp

* Reference to control TRMXLSExportForm.chkExportImages : TCheckBox
|
007B3586   8B8354030000           mov     eax, [ebx+$0354]
007B358C   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B358E   FF92C8000000           call    dword ptr [edx+$00C8]
007B3594   84C0                   test    al, al
007B3596   744D                   jz      007B35E5
007B3598   8D55FC                 lea     edx, [ebp-$04]

* Reference to control TRMXLSExportForm.cmbImageFormat : TComboBox
|
007B359B   8B8344030000           mov     eax, [ebx+$0344]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B35A1   E84A50CDFF             call    004885F0
007B35A6   8B45FC                 mov     eax, [ebp-$04]
*)
end;

procedure TRMXLSExportForm._PROC_007B1D95(Sender : TObject);
begin
(*
007B1D95   8BEC                   mov     ebp, esp
007B1D97   33C9                   xor     ecx, ecx
007B1D99   51                     push    ecx
007B1D9A   51                     push    ecx
007B1D9B   51                     push    ecx
007B1D9C   51                     push    ecx
007B1D9D   51                     push    ecx
007B1D9E   53                     push    ebx
007B1D9F   56                     push    esi
007B1DA0   8BD8                   mov     ebx, eax
007B1DA2   33C0                   xor     eax, eax
007B1DA4   55                     push    ebp
007B1DA5   6891207B00             push    $007B2091

***** TRY
|
007B1DAA   64FF30                 push    dword ptr fs:[eax]
007B1DAD   648920                 mov     fs:[eax], esp
007B1DB0   8BC3                   mov     eax, ebx

|
007B1DB2   E86DA9FBFF             call    0076C724
007B1DB7   8B10                   mov     edx, [eax]

* Reference to method TRMXLSExportForm.GetClientRect()
|
007B1DB9   FF5244                 call    dword ptr [edx+$44]

* Reference to field TRMXLSExportForm.OFFS_0034
|
007B1DBC   807B3400               cmp     byte ptr [ebx+$34], $00
007B1DC0   750B                   jnz     007B1DCD
007B1DC2   66C745FE0100           mov     word ptr [ebp-$02], $0001
007B1DC8   E9A9020000             jmp     007B2076
007B1DCD   33C9                   xor     ecx, ecx
007B1DCF   B201                   mov     dl, $01

* Reference to class TRMXLSExportForm
|
007B1DD1   A1E8177B00             mov     eax, dword ptr [$007B17E8]

* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|           or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
007B1DD6   E8F5FFCEFF             call    004A1DD0
007B1DDB   8945F8                 mov     [ebp-$08], eax
007B1DDE   33C0                   xor     eax, eax
007B1DE0   55                     push    ebp
007B1DE1   686F207B00             push    $007B206F

***** TRY
|
007B1DE6   64FF30                 push    dword ptr fs:[eax]
007B1DE9   648920                 mov     fs:[eax], esp

* Reference to field TRMXLSExportForm.OFFS_0058
|
007B1DEC   8B5358                 mov     edx, [ebx+$58]
007B1DEF   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B1DF2   8B8000030000           mov     eax, [eax+$0300]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B1DF8   E82368CDFF             call    00488620
007B1DFD   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B1E00   8B8000030000           mov     eax, [eax+$0300]
007B1E06   8B10                   mov     edx, [eax]

* Reference to method TEdit.GetEnabled()
|
007B1E08   FF5250                 call    dword ptr [edx+$50]
007B1E0B   8BD0                   mov     edx, eax
007B1E0D   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.btnFileName : TSpeedButton
|
007B1E10   8B8004030000           mov     eax, [eax+$0304]
007B1E16   8B08                   mov     ecx, [eax]

* Reference to method TSpeedButton.SetEnabled(Boolean)
|
007B1E18   FF5164                 call    dword ptr [ecx+$64]

* Reference to field TRMXLSExportForm.OFFS_007E
|
007B1E1B   8A537E                 mov     dl, byte ptr [ebx+$7E]
007B1E1E   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkExportFrames : TCheckBox
|
007B1E21   8B8030030000           mov     eax, [eax+$0330]
007B1E27   8B08                   mov     ecx, [eax]

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

* Reference to field TRMXLSExportForm.PopupMenu : TPopupMenu
|
007B1E2F   8A537C                 mov     dl, byte ptr [ebx+$7C]
007B1E32   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkShowAfterGenerate : TCheckBox
|
007B1E35   8B802C030000           mov     eax, [eax+$032C]
007B1E3B   8B08                   mov     ecx, [eax]

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

* Reference to field TRMXLSExportForm.OFFS_0088
|
007B1E43   668B9388000000         mov     dx, word ptr [ebx+$0088]
007B1E4A   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.UpDown2 : TUpDown
|
007B1E4D   8B805C030000           mov     eax, [eax+$035C]

* Reference to: ComCtrls.TCustomUpDown.SetPosition(TCustomUpDown;Smallint);
|
007B1E53   E89C49CBFF             call    004667F4
007B1E58   33D2                   xor     edx, edx

* Reference to field TRMXLSExportForm.OFFS_007F
|
007B1E5A   8A537F                 mov     dl, byte ptr [ebx+$7F]
007B1E5D   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.cmbPixelFormat : TComboBox
|
007B1E60   8B8050030000           mov     eax, [eax+$0350]
007B1E66   8B08                   mov     ecx, [eax]

* Reference to method TComboBox.ItemIndex()
|
007B1E68   FF91D0000000           call    dword ptr [ecx+$00D0]

* Reference to field TRMXLSExportForm.OFFS_007D
|
007B1E6E   8A537D                 mov     dl, byte ptr [ebx+$7D]
007B1E71   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkExportImages : TCheckBox
|
007B1E74   8B8054030000           mov     eax, [eax+$0354]
007B1E7A   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetChecked(Boolean)
|
007B1E7C   FF91CC000000           call    dword ptr [ecx+$00CC]
007B1E82   33D2                   xor     edx, edx

* Reference to field TRMXLSExportForm.Hint : string
|
007B1E84   8A9380000000           mov     dl, byte ptr [ebx+$0080]
007B1E8A   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.cmbImageFormat : TComboBox
|
007B1E8D   8BB044030000           mov     esi, [eax+$0344]

* Reference to field TComboBox.Items : TStrings
|
007B1E93   8B863C020000           mov     eax, [esi+$023C]
007B1E99   8B08                   mov     ecx, [eax]

* Reference to method TStrings.IndexOfObject(TObject)
|
007B1E9B   FF515C                 call    dword ptr [ecx+$5C]
007B1E9E   8BD0                   mov     edx, eax
007B1EA0   8BC6                   mov     eax, esi
007B1EA2   8B08                   mov     ecx, [eax]

* Reference to method TComboBox.ItemIndex()
|
007B1EA4   FF91D0000000           call    dword ptr [ecx+$00D0]
007B1EAA   33D2                   xor     edx, edx

* Reference to field TRMXLSExportForm.OFFS_0081
|
007B1EAC   8A9381000000           mov     dl, byte ptr [ebx+$0081]
007B1EB2   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.UpDown1 : TUpDown
|
007B1EB5   8B804C030000           mov     eax, [eax+$034C]

* Reference to: ComCtrls.TCustomUpDown.SetPosition(TCustomUpDown;Smallint);
|
007B1EBB   E83449CBFF             call    004667F4
007B1EC0   8BD3                   mov     edx, ebx
007B1EC2   8B45F8                 mov     eax, [ebp-$08]

* Reference to : TRMXLSExportForm.chkExportFramesClick()
|
007B1EC5   E866160000             call    007B3530

* Reference to field TRMXLSExportForm.Cursor : TCursor
|
007B1ECA   837B7801               cmp     dword ptr [ebx+$78], +$01
007B1ECE   0F9EC2                 setle   dl
007B1ED1   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkWYB : TCheckBox
|
007B1ED4   8B8064030000           mov     eax, [eax+$0364]
007B1EDA   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetChecked(Boolean)
|
007B1EDC   FF91CC000000           call    dword ptr [ecx+$00CC]
007B1EE2   8B45F8                 mov     eax, [ebp-$08]
007B1EE5   8B10                   mov     edx, [eax]

* Reference to method TRMXLSExportForm.ShowModal()
|
007B1EE7   FF92EC000000           call    dword ptr [edx+$00EC]
007B1EED   668945FE               mov     [ebp-$02], ax
007B1EF1   66837DFE01             cmp     word ptr [ebp-$02], +$01
007B1EF6   0F855D010000           jnz     007B2059
007B1EFC   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.rdbPrintAll : TRadioButton
|
007B1EFF   8B8014030000           mov     eax, [eax+$0314]
007B1F05   8B10                   mov     edx, [eax]

* Reference to method TRadioButton.GetChecked()
|
007B1F07   FF92C8000000           call    dword ptr [edx+$00C8]
007B1F0D   84C0                   test    al, al
007B1F0F   7410                   jz      007B1F21
007B1F11   33C9                   xor     ecx, ecx
007B1F13   BA01000000             mov     edx, $00000001
007B1F18   8BC3                   mov     eax, ebx

|
007B1F1A   E825A8FBFF             call    0076C744
007B1F1F   EB45                   jmp     007B1F66
007B1F21   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.rbdPrintCurPage : TRadioButton
|
007B1F24   8B8018030000           mov     eax, [eax+$0318]
007B1F2A   8B10                   mov     edx, [eax]

* Reference to method TRadioButton.GetChecked()
|
007B1F2C   FF92C8000000           call    dword ptr [edx+$00C8]
007B1F32   84C0                   test    al, al
007B1F34   7410                   jz      007B1F46
007B1F36   33C9                   xor     ecx, ecx
007B1F38   BA02000000             mov     edx, $00000002
007B1F3D   8BC3                   mov     eax, ebx

|
007B1F3F   E800A8FBFF             call    0076C744
007B1F44   EB20                   jmp     007B1F66
007B1F46   8D55F4                 lea     edx, [ebp-$0C]
007B1F49   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.edtPages : TEdit
|
007B1F4C   8B8020030000           mov     eax, [eax+$0320]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B1F52   E89966CDFF             call    004885F0
007B1F57   8B4DF4                 mov     ecx, [ebp-$0C]
007B1F5A   BA03000000             mov     edx, $00000003
007B1F5F   8BC3                   mov     eax, ebx

|
007B1F61   E8DEA7FBFF             call    0076C744
007B1F66   8D55F0                 lea     edx, [ebp-$10]
007B1F69   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.edtExportFileName : TEdit
|
007B1F6C   8B8000030000           mov     eax, [eax+$0300]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B1F72   E87966CDFF             call    004885F0
007B1F77   8B55F0                 mov     edx, [ebp-$10]

* Reference to field TRMXLSExportForm.OFFS_0058
|
007B1F7A   8D4358                 lea     eax, [ebx+$58]

* Reference to: System.@LStrAsg(void;void;void;void);
|
007B1F7D   E8F633C5FF             call    00405378
007B1F82   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkExportFrames : TCheckBox
|
007B1F85   8B8030030000           mov     eax, [eax+$0330]
007B1F8B   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B1F8D   FF92C8000000           call    dword ptr [edx+$00C8]

* Reference to field TRMXLSExportForm.OFFS_007E
|
007B1F93   88437E                 mov     [ebx+$7E], al
007B1F96   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkShowAfterGenerate : TCheckBox
|
007B1F99   8B802C030000           mov     eax, [eax+$032C]
007B1F9F   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B1FA1   FF92C8000000           call    dword ptr [edx+$00C8]

* Reference to field TRMXLSExportForm.PopupMenu : TPopupMenu
|
007B1FA7   88437C                 mov     [ebx+$7C], al
007B1FAA   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.UpDown2 : TUpDown
|
007B1FAD   8B805C030000           mov     eax, [eax+$035C]

* Reference to: ComCtrls.TCustomUpDown.GetPosition(TCustomUpDown):Smallint;
|
007B1FB3   E81847CBFF             call    004666D0
007B1FB8   0FBFC0                 movsx   eax, ax

* Reference to field TRMXLSExportForm.OFFS_0088
|
007B1FBB   898388000000           mov     [ebx+$0088], eax
007B1FC1   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkExportImages : TCheckBox
|
007B1FC4   8B8054030000           mov     eax, [eax+$0354]
007B1FCA   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B1FCC   FF92C8000000           call    dword ptr [edx+$00C8]

* Reference to field TRMXLSExportForm.OFFS_007D
|
007B1FD2   88437D                 mov     [ebx+$7D], al
007B1FD5   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.chkWYB : TCheckBox
|
007B1FD8   8B8064030000           mov     eax, [eax+$0364]
007B1FDE   8B10                   mov     edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
007B1FE0   FF92C8000000           call    dword ptr [edx+$00C8]
007B1FE6   84C0                   test    al, al
007B1FE8   7409                   jz      007B1FF3

* Reference to field TRMXLSExportForm.Cursor : TCursor
|
007B1FEA   C7437801000000         mov     dword ptr [ebx+$78], $00000001
007B1FF1   EB07                   jmp     007B1FFA

* Reference to field TRMXLSExportForm.Cursor : TCursor
|
007B1FF3   C743780A000000         mov     dword ptr [ebx+$78], $0000000A

* Reference to field TRMXLSExportForm.OFFS_007D
|
007B1FFA   807B7D00               cmp     byte ptr [ebx+$7D], $00
007B1FFE   7459                   jz      007B2059
007B2000   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.cmbPixelFormat : TComboBox
|
007B2003   8B8050030000           mov     eax, [eax+$0350]
007B2009   8B10                   mov     edx, [eax]

* Reference to method TComboBox.ItemIndex()
|
007B200B   FF92CC000000           call    dword ptr [edx+$00CC]

* Reference to field TRMXLSExportForm.OFFS_007F
|
007B2011   88437F                 mov     [ebx+$7F], al
007B2014   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.cmbImageFormat : TComboBox
|
007B2017   8BB044030000           mov     esi, [eax+$0344]
007B201D   8BC6                   mov     eax, esi
007B201F   8B10                   mov     edx, [eax]

* Reference to method TComboBox.ItemIndex()
|
007B2021   FF92CC000000           call    dword ptr [edx+$00CC]
007B2027   8BD0                   mov     edx, eax

* Reference to field TComboBox.Items : TStrings
|
007B2029   8B863C020000           mov     eax, [esi+$023C]
007B202F   8B08                   mov     ecx, [eax]

* Reference to method TStrings.GetObject(Integer)
|
007B2031   FF5118                 call    dword ptr [ecx+$18]

* Reference to field TRMXLSExportForm.Hint : string
|
007B2034   888380000000           mov     [ebx+$0080], al
007B203A   8D55EC                 lea     edx, [ebp-$14]
007B203D   8B45F8                 mov     eax, [ebp-$08]

* Reference to control TRMXLSExportForm.edJPEGQuality : TEdit
|
007B2040   8B8048030000           mov     eax, [eax+$0348]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
007B2046   E8A565CDFF             call    004885F0
007B204B   8B45EC                 mov     eax, [ebp-$14]

* Reference to: SysUtils.StrToInt(AnsiString):Integer;
|
007B204E   E8F58FC5FF             call    0040B048

* Reference to field TRMXLSExportForm.OFFS_0081
|
007B2053   888381000000           mov     [ebx+$0081], al
007B2059   33C0                   xor     eax, eax
007B205B   5A                     pop     edx
007B205C   59                     pop     ecx
007B205D   59                     pop     ecx
007B205E   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B2061   6876207B00             push    $007B2076
007B2066   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.TObject.Free(TObject);
|
007B2069   E8DE22C5FF             call    0040434C
007B206E   C3                     ret


* Reference to: System.@HandleFinally;
|
007B206F   E9802AC5FF             jmp     00404AF4
007B2074   EBF0                   jmp     007B2066

****** END
|
007B2076   33C0                   xor     eax, eax
007B2078   5A                     pop     edx
007B2079   59                     pop     ecx
007B207A   59                     pop     ecx
007B207B   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B207E   6898207B00             push    $007B2098
007B2083   8D45EC                 lea     eax, [ebp-$14]
007B2086   BA03000000             mov     edx, $00000003

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B208B   E8B832C5FF             call    00405348
007B2090   C3                     ret


* Reference to: System.@HandleFinally;
|
007B2091   E95E2AC5FF             jmp     00404AF4
007B2096   EBEB                   jmp     007B2083

****** END
|
007B2098   668B45FE               mov     ax, word ptr [ebp-$02]
007B209C   5E                     pop     esi
007B209D   5B                     pop     ebx
007B209E   8BE5                   mov     esp, ebp
007B20A0   5D                     pop     ebp
007B20A1   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B20A4(Sender : TObject);
begin
(*
007B20A4   55                     push    ebp
007B20A5   8BEC                   mov     ebp, esp
007B20A7   B914000000             mov     ecx, $00000014
007B20AC   6A00                   push    $00
007B20AE   6A00                   push    $00
007B20B0   49                     dec     ecx
007B20B1   75F9                   jnz     007B20AC
007B20B3   51                     push    ecx
007B20B4   53                     push    ebx
007B20B5   8945FC                 mov     [ebp-$04], eax
007B20B8   33C0                   xor     eax, eax
007B20BA   55                     push    ebp
007B20BB   6888237B00             push    $007B2388

***** TRY
|
007B20C0   64FF30                 push    dword ptr fs:[eax]
007B20C3   648920                 mov     fs:[eax], esp
007B20C6   8B4508                 mov     eax, [ebp+$08]
007B20C9   8B40FC                 mov     eax, [eax-$04]

* Reference to field TRMXLSExportForm.OFFS_0090
|
007B20CC   83B89000000000         cmp     dword ptr [eax+$0090], +$00
007B20D3   0F8463020000           jz      007B233C
007B20D9   8D55D4                 lea     edx, [ebp-$2C]
007B20DC   8B45FC                 mov     eax, [ebp-$04]

* Reference to: SysUtils.ExtractFileExt(AnsiString):AnsiString;
|
007B20DF   E84099C5FF             call    0040BA24
007B20E4   8B45D4                 mov     eax, [ebp-$2C]

* Possible String Reference to: '.xls'
|
007B20E7   BA9C237B00             mov     edx, $007B239C

|
007B20EC   E893B6FCFF             call    0077D784
007B20F1   84C0                   test    al, al
007B20F3   7411                   jz      007B2106
007B20F5   B201                   mov     dl, $01

* Reference to class TwawExcelWriter
|
007B20F7   A1F8917A00             mov     eax, dword ptr [$007A91F8]

|
007B20FC   E8FBA3FFFF             call    007AC4FC
007B2101   8945F8                 mov     [ebp-$08], eax
007B2104   EB0F                   jmp     007B2115
007B2106   B201                   mov     dl, $01

* Reference to class TwawHTMLWriter
|
007B2108   A164917A00             mov     eax, dword ptr [$007A9164]

|
007B210D   E8C678FFFF             call    007A99D8
007B2112   8945F8                 mov     [ebp-$08], eax
007B2115   33C0                   xor     eax, eax
007B2117   55                     push    ebp
007B2118   684F217B00             push    $007B214F

***** TRY
|
007B211D   64FF30                 push    dword ptr fs:[eax]
007B2120   648920                 mov     fs:[eax], esp
007B2123   8B4508                 mov     eax, [ebp+$08]
007B2126   8B40FC                 mov     eax, [eax-$04]

* Reference to field TwawHTMLWriter.OFFS_0090
|
007B2129   8B9090000000           mov     edx, [eax+$0090]
007B212F   8B4DFC                 mov     ecx, [ebp-$04]
007B2132   8B45F8                 mov     eax, [ebp-$08]
007B2135   8B18                   mov     ebx, [eax]
007B2137   FF13                   call    dword ptr [ebx]
007B2139   33C0                   xor     eax, eax
007B213B   5A                     pop     edx
007B213C   59                     pop     ecx
007B213D   59                     pop     ecx
007B213E   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B2141   6856217B00             push    $007B2156
007B2146   8B45F8                 mov     eax, [ebp-$08]

* Reference to: System.TObject.Free(TObject);
|
007B2149   E8FE21C5FF             call    0040434C
007B214E   C3                     ret


* Reference to: System.@HandleFinally;
|
007B214F   E9A029C5FF             jmp     00404AF4
007B2154   EBF0                   jmp     007B2146

****** END
|
007B2156   8B4508                 mov     eax, [ebp+$08]
007B2159   8B40FC                 mov     eax, [eax-$04]
007B215C   0590000000             add     eax, +$00000090

* Reference to: SysUtils.FreeAndNil(void;void);
|
007B2161   E84603C6FF             call    004124AC
007B2166   8B4508                 mov     eax, [ebp+$08]
007B2169   8B40FC                 mov     eax, [eax-$04]
007B216C   80B8B000000000         cmp     byte ptr [eax+$00B0], $00
007B2173   0F84C3010000           jz      007B233C
007B2179   8D55D0                 lea     edx, [ebp-$30]
007B217C   8B45FC                 mov     eax, [ebp-$04]

* Reference to: SysUtils.ExtractFileExt(AnsiString):AnsiString;
|
007B217F   E8A098C5FF             call    0040BA24
007B2184   8B45D0                 mov     eax, [ebp-$30]

* Possible String Reference to: '.xls'
|
007B2187   BA9C237B00             mov     edx, $007B239C

|
007B218C   E8F3B5FCFF             call    0077D784
007B2191   84C0                   test    al, al
007B2193   0F84A3010000           jz      007B233C
007B2199   8B45FC                 mov     eax, [ebp-$04]

* Reference to: SysUtils.FileExists(AnsiString):Boolean;
|
007B219C   E89793C5FF             call    0040B538
007B21A1   84C0                   test    al, al
007B21A3   0F8493010000           jz      007B233C
007B21A9   8D55CC                 lea     edx, [ebp-$34]

* Possible String Reference to: 'Excel.Application'
|
007B21AC   B8AC237B00             mov     eax, $007B23AC

* Reference to: ComObj.CreateOleObject(AnsiString):IDispatch;
|
007B21B1   E8AE01D0FF             call    004B2364
007B21B6   8B55CC                 mov     edx, [ebp-$34]
007B21B9   8D45E8                 lea     eax, [ebp-$18]

* Reference to: Variants.@VarFromDisp(TVarData;TVarData;IDispatch);
|
007B21BC   E8E76CC6FF             call    00418EA8
007B21C1   6A00                   push    $00
007B21C3   68C0237B00             push    $007B23C0
007B21C8   68D4237B00             push    $007B23D4
007B21CD   8D45E8                 lea     eax, [ebp-$18]
007B21D0   50                     push    eax
007B21D1   8D45BC                 lea     eax, [ebp-$44]
007B21D4   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B21D5   E8A224C6FF             call    0041467C
007B21DA   83C40C                 add     esp, +$0C
007B21DD   8D45BC                 lea     eax, [ebp-$44]
007B21E0   50                     push    eax
007B21E1   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B21E3   E89424C6FF             call    0041467C
007B21E8   83C410                 add     esp, +$10
007B21EB   6A00                   push    $00
007B21ED   68E4237B00             push    $007B23E4
007B21F2   68D4237B00             push    $007B23D4
007B21F7   8D45E8                 lea     eax, [ebp-$18]
007B21FA   50                     push    eax
007B21FB   8D45AC                 lea     eax, [ebp-$54]
007B21FE   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B21FF   E87824C6FF             call    0041467C
007B2204   83C40C                 add     esp, +$0C
007B2207   8D45AC                 lea     eax, [ebp-$54]
007B220A   50                     push    eax
007B220B   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B220D   E86A24C6FF             call    0041467C
007B2212   83C410                 add     esp, +$10
007B2215   6A00                   push    $00
007B2217   68FC237B00             push    $007B23FC
007B221C   68D4237B00             push    $007B23D4
007B2221   8D45E8                 lea     eax, [ebp-$18]
007B2224   50                     push    eax
007B2225   8D459C                 lea     eax, [ebp-$64]
007B2228   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2229   E84E24C6FF             call    0041467C
007B222E   83C40C                 add     esp, +$0C
007B2231   8D459C                 lea     eax, [ebp-$64]
007B2234   50                     push    eax
007B2235   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2237   E84024C6FF             call    0041467C
007B223C   83C410                 add     esp, +$10
007B223F   6A00                   push    $00
007B2241   6814247B00             push    $007B2414
007B2246   68D4237B00             push    $007B23D4
007B224B   8D45E8                 lea     eax, [ebp-$18]
007B224E   50                     push    eax
007B224F   8D458C                 lea     eax, [ebp-$74]
007B2252   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2253   E82424C6FF             call    0041467C
007B2258   83C40C                 add     esp, +$0C
007B225B   8D458C                 lea     eax, [ebp-$74]
007B225E   50                     push    eax
007B225F   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2261   E81624C6FF             call    0041467C
007B2266   83C410                 add     esp, +$10
007B2269   6A00                   push    $00
007B226B   6828247B00             push    $007B2428
007B2270   68D4237B00             push    $007B23D4
007B2275   8D45E8                 lea     eax, [ebp-$18]
007B2278   50                     push    eax
007B2279   8D857CFFFFFF           lea     eax, [ebp+$FFFFFF7C]
007B227F   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2280   E8F723C6FF             call    0041467C
007B2285   83C40C                 add     esp, +$0C
007B2288   8D857CFFFFFF           lea     eax, [ebp+$FFFFFF7C]
007B228E   50                     push    eax
007B228F   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2291   E8E623C6FF             call    0041467C
007B2296   83C410                 add     esp, +$10
007B2299   6A00                   push    $00
007B229B   6838247B00             push    $007B2438
007B22A0   68D4237B00             push    $007B23D4
007B22A5   8D45E8                 lea     eax, [ebp-$18]
007B22A8   50                     push    eax
007B22A9   8D856CFFFFFF           lea     eax, [ebp+$FFFFFF6C]
007B22AF   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B22B0   E8C723C6FF             call    0041467C
007B22B5   83C40C                 add     esp, +$0C
007B22B8   8D856CFFFFFF           lea     eax, [ebp+$FFFFFF6C]
007B22BE   50                     push    eax
007B22BF   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B22C1   E8B623C6FF             call    0041467C
007B22C6   83C410                 add     esp, +$10
007B22C9   8B45FC                 mov     eax, [ebp-$04]
007B22CC   50                     push    eax
007B22CD   684C247B00             push    $007B244C
007B22D2   6858247B00             push    $007B2458
007B22D7   8D45E8                 lea     eax, [ebp-$18]
007B22DA   50                     push    eax
007B22DB   8D855CFFFFFF           lea     eax, [ebp+$FFFFFF5C]
007B22E1   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B22E2   E89523C6FF             call    0041467C
007B22E7   83C40C                 add     esp, +$0C
007B22EA   8D855CFFFFFF           lea     eax, [ebp+$FFFFFF5C]
007B22F0   50                     push    eax
007B22F1   8D45D8                 lea     eax, [ebp-$28]
007B22F4   50                     push    eax

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B22F5   E88223C6FF             call    0041467C
007B22FA   83C410                 add     esp, +$10
007B22FD   68D1EFFFFF             push    $FFFFEFD1
007B2302   8B45FC                 mov     eax, [ebp-$04]
007B2305   50                     push    eax
007B2306   6868247B00             push    $007B2468
007B230B   8D45D8                 lea     eax, [ebp-$28]
007B230E   50                     push    eax
007B230F   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2311   E86623C6FF             call    0041467C
007B2316   83C414                 add     esp, +$14
007B2319   6874247B00             push    $007B2474
007B231E   8D45E8                 lea     eax, [ebp-$18]
007B2321   50                     push    eax
007B2322   6A00                   push    $00

* Reference to: Variants.@DispInvoke(PVarData;TVarData;TVarData;PCallDesc;Pointer);cdecl;
|
007B2324   E85323C6FF             call    0041467C
007B2329   83C40C                 add     esp, +$0C
007B232C   8D45E8                 lea     eax, [ebp-$18]

* 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);
|
007B232F   E82CB0C6FF             call    0041D360
007B2334   8D45E8                 lea     eax, [ebp-$18]

* 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);
|
007B2337   E81CB0C6FF             call    0041D358
007B233C   33C0                   xor     eax, eax
007B233E   5A                     pop     edx
007B233F   59                     pop     ecx
007B2340   59                     pop     ecx
007B2341   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B2344   688F237B00             push    $007B238F
007B2349   8D855CFFFFFF           lea     eax, [ebp+$FFFFFF5C]

* Reference to object Variant
|
007B234F   8B153C114000           mov     edx, [$0040113C]
007B2355   B907000000             mov     ecx, $00000007

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B235A   E8B53DC5FF             call    00406114
007B235F   8D45CC                 lea     eax, [ebp-$34]

* Reference to: System.@IntfClear(IInterface;IInterface):Pointer;
|
007B2362   E8A951C5FF             call    00407510
007B2367   8D45D0                 lea     eax, [ebp-$30]
007B236A   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B236F   E8D42FC5FF             call    00405348
007B2374   8D45D8                 lea     eax, [ebp-$28]

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

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B2382   E88D3DC5FF             call    00406114
007B2387   C3                     ret


* Reference to: System.@HandleFinally;
|
007B2388   E96727C5FF             jmp     00404AF4
007B238D   EBBA                   jmp     007B2349

****** END
|
007B238F   5B                     pop     ebx
007B2390   8BE5                   mov     esp, ebp
007B2392   5D                     pop     ebp
007B2393   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B241F(Sender : TObject);
begin
(*
007B241F   7064                   jo      007B2485
007B2421   61                     popa
007B2422   7469                   jz      007B248D
007B2424   6E                     outsb
007B2425   670000                 add     [bx+si], al
007B2428   0401                   add     al, +$01
007B242A   000B                   add     [ebx], cl
007B242C   49                     dec     ecx
007B242D   6E                     outsb
007B242E   7465                   jz      007B2495
007B2430   7261                   jb      007B2493
007B2432   63746976               arpl    [ecx+ebp*2+$76], si
007B2436   65000401               add     gs:[ecx+eax], al
007B243A   000B                   add     [ebx], cl
007B243C   44                     inc     esp
007B243D   6973706C617941         imul    esi, [ebx+$70], $4179616C
007B2444   6C                     insb
007B2445   657274                 jb      007B24BC
007B2448   7300                   jnb     007B244A
007B244A   0000                   add     [eax], al

007B244C   0101                   add     [ecx], eax
007B244E   00484F                 add     [eax+$4F], cl
007B2451   7065                   jo      007B24B8
007B2453   6E                     outsb
007B2454   0000                   add     [eax], al

007B2456   0000                   add     [eax], al

007B2458   0100                   add     [eax], eax
007B245A   00576F                 add     [edi+$6F], dl
007B245D   726B                   jb      007B24CA
007B245F   42                     inc     edx
007B2460   6F                     outsd
007B2461   6F                     outsd
007B2462   6B730000               imul    esi, [ebx+$00], $00
007B2466   0000                   add     [eax], al

007B2468   0102                   add     [edx], eax
007B246A   004803                 add     [eax+$03], cl
007B246D   53                     push    ebx
007B246E   61                     popa
007B246F   7665                   jbe     007B24D6
007B2471   41                     inc     ecx
007B2472   7300                   jnb     007B2474
007B2474   0100                   add     [eax], eax
007B2476   005175                 add     [ecx+$75], dl
007B2479   697400558BEC5153       imul    esi, [eax+eax+$55], $5351EC8B
007B2481   8BDA                   mov     ebx, edx
007B2483   8945FC                 mov     [ebp-$04], eax
007B2486   33C0                   xor     eax, eax
007B2488   55                     push    ebp

* Possible String Reference to: 'éï%Åÿëë[Y]Ã'
|
007B2489   6800257B00             push    $007B2500

***** TRY
|
007B248E   64FF30                 push    dword ptr fs:[eax]
007B2491   648920                 mov     fs:[eax], esp
007B2494   8B45FC                 mov     eax, [ebp-$04]
007B2497   83B88C00000000         cmp     dword ptr [eax+$008C], +$00
007B249E   7E13                   jle     007B24B3
007B24A0   8B45FC                 mov     eax, [ebp-$04]
007B24A3   33D2                   xor     edx, edx
007B24A5   89908C000000           mov     [eax+$008C], edx
007B24AB   8B45FC                 mov     eax, [ebp-$04]

|
007B24AE   E811060000             call    007B2AC4
007B24B3   55                     push    ebp
007B24B4   8BC3                   mov     eax, ebx

* Reference to : TRMXLSExportForm._PROC_007B20A4()
|
007B24B6   E8E9FBFFFF             call    007B20A4
007B24BB   59                     pop     ecx
007B24BC   8B45FC                 mov     eax, [ebp-$04]
007B24BF   80787C00               cmp     byte ptr [eax+$7C], $00
007B24C3   7420                   jz      007B24E5
007B24C5   6A01                   push    $01
007B24C7   680C257B00             push    $007B250C
007B24CC   680C257B00             push    $007B250C
007B24D1   8BC3                   mov     eax, ebx

* Reference to: System.@LStrToPChar(String):PAnsiChar;
|
007B24D3   E81C33C5FF             call    004057F4
007B24D8   50                     push    eax

* Possible String Reference to: 'open'
|
007B24D9   6810257B00             push    $007B2510
007B24DE   6A00                   push    $00

* Reference to: shell32.ShellExecuteA()
|
007B24E0   E8ABBEC8FF             call    0043E390
007B24E5   33C0                   xor     eax, eax
007B24E7   5A                     pop     edx
007B24E8   59                     pop     ecx
007B24E9   59                     pop     ecx
007B24EA   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '[Y]Ã'
|
007B24ED   6807257B00             push    $007B2507
007B24F2   8B45FC                 mov     eax, [ebp-$04]
007B24F5   0594000000             add     eax, +$00000094

* Reference to: SysUtils.FreeAndNil(void;void);
|
007B24FA   E8ADFFC5FF             call    004124AC
007B24FF   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2500(Sender : TObject);
begin
(*

* Reference to: System.@HandleFinally;
|
007B2500   E9EF25C5FF             jmp     00404AF4

|
007B2505   EBEB                   jmp     007B24F2
007B2507   5B                     pop     ebx
007B2508   59                     pop     ecx
007B2509   5D                     pop     ebp
007B250A   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2519(Sender : TObject);
begin
(*
007B2519   8BEC                   mov     ebp, esp
007B251B   53                     push    ebx
007B251C   56                     push    esi
007B251D   8BF2                   mov     esi, edx
007B251F   33DB                   xor     ebx, ebx
007B2521   807E1800               cmp     byte ptr [esi+$18], $00
007B2525   0F842F010000           jz      007B265A
007B252B   83E807                 sub     eax, +$07
007B252E   740B                   jz      007B253B
007B2530   48                     dec     eax
007B2531   740C                   jz      007B253F
007B2533   48                     dec     eax
007B2534   7411                   jz      007B2547
007B2536   48                     dec     eax
007B2537   740A                   jz      007B2543
007B2539   EB0E                   jmp     007B2549
007B253B   B303                   mov     bl, $03
007B253D   EB0A                   jmp     007B2549
007B253F   B305                   mov     bl, $05
007B2541   EB06                   jmp     007B2549
007B2543   B304                   mov     bl, $04
007B2545   EB02                   jmp     007B2549
007B2547   B302                   mov     bl, $02
007B2549   33C0                   xor     eax, eax
007B254B   8A4619                 mov     al, byte ptr [esi+$19]
007B254E   83F806                 cmp     eax, +$06
007B2551   0F87D3000000           jnbe    007B262A
007B2557   FF24855E257B00         jmp     dword ptr [$7B255E+eax*4]
007B255E   7A25                   jp      007B2585
007B2560   7B00                   jnp     007B2562
007B2562   96                     xchg    eax, esi
007B2563   257B00AF25             and     eax, $25AF007B
007B2568   7B00                   jnp     007B256A
007B256A   C825                   enter   , $25
007B256C   7B00                   jnp     007B256E
007B256E   E125                   loope   +$25
007B2570   7B00                   jnp     007B2572
007B2572   FA                     cli
007B2573   257B001326             and     eax, $2613007B
007B2578   7B00                   jnp     007B257A
007B257A   8B4508                 mov     eax, [ebp+$08]
007B257D   8B4008                 mov     eax, [eax+$08]
007B2580   8B40FC                 mov     eax, [eax-$04]
007B2583   8B4018                 mov     eax, [eax+$18]
007B2586   8BD3                   mov     edx, ebx

|
007B2588   E82FE1FFFF             call    007B06BC
007B258D   C6400801               mov     byte ptr [eax+$08], $01
007B2591   E994000000             jmp     007B262A
007B2596   8B4508                 mov     eax, [ebp+$08]
007B2599   8B4008                 mov     eax, [eax+$08]
007B259C   8B40FC                 mov     eax, [eax-$04]
007B259F   8B4018                 mov     eax, [eax+$18]
007B25A2   8BD3                   mov     edx, ebx

|
007B25A4   E813E1FFFF             call    007B06BC
007B25A9   C6400803               mov     byte ptr [eax+$08], $03
007B25AD   EB7B                   jmp     007B262A
007B25AF   8B4508                 mov     eax, [ebp+$08]
007B25B2   8B4008                 mov     eax, [eax+$08]
007B25B5   8B40FC                 mov     eax, [eax-$04]
007B25B8   8B4018                 mov     eax, [eax+$18]
007B25BB   8BD3                   mov     edx, ebx

|
007B25BD   E8FAE0FFFF             call    007B06BC
007B25C2   C6400804               mov     byte ptr [eax+$08], $04
007B25C6   EB62                   jmp     007B262A
007B25C8   8B4508                 mov     eax, [ebp+$08]
007B25CB   8B4008                 mov     eax, [eax+$08]
007B25CE   8B40FC                 mov     eax, [eax-$04]
007B25D1   8B4018                 mov     eax, [eax+$18]
007B25D4   8BD3                   mov     edx, ebx

|
007B25D6   E8E1E0FFFF             call    007B06BC
007B25DB   C6400809               mov     byte ptr [eax+$08], $09
007B25DF   EB49                   jmp     007B262A
007B25E1   8B4508                 mov     eax, [ebp+$08]
007B25E4   8B4008                 mov     eax, [eax+$08]
007B25E7   8B40FC                 mov     eax, [eax-$04]
007B25EA   8B4018                 mov     eax, [eax+$18]
007B25ED   8BD3                   mov     edx, ebx

|
007B25EF   E8C8E0FFFF             call    007B06BC
007B25F4   C640080B               mov     byte ptr [eax+$08], $0B
007B25F8   EB30                   jmp     007B262A
007B25FA   8B4508                 mov     eax, [ebp+$08]
007B25FD   8B4008                 mov     eax, [eax+$08]
007B2600   8B40FC                 mov     eax, [eax-$04]
007B2603   8B4018                 mov     eax, [eax+$18]
007B2606   8BD3                   mov     edx, ebx

|
007B2608   E8AFE0FFFF             call    007B06BC
007B260D   C6400800               mov     byte ptr [eax+$08], $00
007B2611   EB17                   jmp     007B262A
007B2613   8B4508                 mov     eax, [ebp+$08]
007B2616   8B4008                 mov     eax, [eax+$08]
007B2619   8B40FC                 mov     eax, [eax-$04]
007B261C   8B4018                 mov     eax, [eax+$18]
007B261F   8BD3                   mov     edx, ebx

|
007B2621   E896E0FFFF             call    007B06BC
007B2626   C6400800               mov     byte ptr [eax+$08], $00
007B262A   8B4508                 mov     eax, [ebp+$08]
007B262D   8B4008                 mov     eax, [eax+$08]
007B2630   8B40FC                 mov     eax, [eax-$04]
007B2633   8B4018                 mov     eax, [eax+$18]
007B2636   8BD3                   mov     edx, ebx

|
007B2638   E87FE0FFFF             call    007B06BC
007B263D   8B561C                 mov     edx, [esi+$1C]
007B2640   895004                 mov     [eax+$04], edx
007B2643   8B4508                 mov     eax, [ebp+$08]
007B2646   8B4008                 mov     eax, [eax+$08]
007B2649   8B40FC                 mov     eax, [eax-$04]
007B264C   8B4018                 mov     eax, [eax+$18]
007B264F   8BD3                   mov     edx, ebx

|
007B2651   E866E0FFFF             call    007B06BC
007B2656   C6400901               mov     byte ptr [eax+$09], $01
007B265A   5E                     pop     esi
007B265B   5B                     pop     ebx
007B265C   5D                     pop     ebp
007B265D   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2660(Sender : TObject);
begin
(*
007B2660   55                     push    ebp
007B2661   8BEC                   mov     ebp, esp
007B2663   8B4508                 mov     eax, [ebp+$08]
007B2666   8B40F8                 mov     eax, [eax-$08]

* Reference to field TRMXLSExportForm.OFFS_007E
|
007B2669   80787E00               cmp     byte ptr [eax+$7E], $00
007B266D   7454                   jz      007B26C3
007B266F   55                     push    ebp
007B2670   8B4508                 mov     eax, [ebp+$08]
007B2673   8B40F4                 mov     eax, [eax-$0C]

* Reference to field TRMXLSExportForm.OFFS_0010
|
007B2676   8B5010                 mov     edx, [eax+$10]
007B2679   B807000000             mov     eax, $00000007

|
007B267E   E895FEFFFF             call    007B2518
007B2683   59                     pop     ecx
007B2684   55                     push    ebp
007B2685   8B4508                 mov     eax, [ebp+$08]
007B2688   8B40F4                 mov     eax, [eax-$0C]
007B268B   8B5014                 mov     edx, [eax+$14]
007B268E   B808000000             mov     eax, $00000008

|
007B2693   E880FEFFFF             call    007B2518
007B2698   59                     pop     ecx
007B2699   55                     push    ebp
007B269A   8B4508                 mov     eax, [ebp+$08]
007B269D   8B40F4                 mov     eax, [eax-$0C]
007B26A0   8B5018                 mov     edx, [eax+$18]
007B26A3   B80A000000             mov     eax, $0000000A

|
007B26A8   E86BFEFFFF             call    007B2518
007B26AD   59                     pop     ecx
007B26AE   55                     push    ebp
007B26AF   8B4508                 mov     eax, [ebp+$08]
007B26B2   8B40F4                 mov     eax, [eax-$0C]
007B26B5   8B501C                 mov     edx, [eax+$1C]
007B26B8   B809000000             mov     eax, $00000009

|
007B26BD   E856FEFFFF             call    007B2518
007B26C2   59                     pop     ecx
007B26C3   5D                     pop     ebp
007B26C4   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B26C8(Sender : TObject);
begin
(*
007B26C8   55                     push    ebp
007B26C9   8BEC                   mov     ebp, esp
007B26CB   51                     push    ecx
007B26CC   B201                   mov     dl, $01

* Reference to class TPicture
|
007B26CE   A14CF54200             mov     eax, dword ptr [$0042F54C]

* Reference to: Graphics.TPicture.Create(TPicture;boolean);
|
007B26D3   E8BC19C8FF             call    00434094
007B26D8   8945FC                 mov     [ebp-$04], eax
007B26DB   33C0                   xor     eax, eax
007B26DD   55                     push    ebp
007B26DE   684D277B00             push    $007B274D

***** TRY
|
007B26E3   64FF30                 push    dword ptr fs:[eax]
007B26E6   648920                 mov     fs:[eax], esp
007B26E9   8B4508                 mov     eax, [ebp+$08]
007B26EC   8B40F0                 mov     eax, [eax-$10]

|
007B26EF   E8601BFFFF             call    007A4254
007B26F4   8BD0                   mov     edx, eax
007B26F6   8B45FC                 mov     eax, [ebp-$04]
007B26F9   8B08                   mov     ecx, [eax]

* Reference to method TPicture.Assign(TPersistent)
|
007B26FB   FF5108                 call    dword ptr [ecx+$08]
007B26FE   8B4508                 mov     eax, [ebp+$08]
007B2701   8B40F0                 mov     eax, [eax-$10]

* Reference to field TPicture.OnChange : TNotifyEvent
|
007B2704   8B4010                 mov     eax, [eax+$10]
007B2707   50                     push    eax
007B2708   8B4508                 mov     eax, [ebp+$08]
007B270B   8B40F0                 mov     eax, [eax-$10]
007B270E   8B4014                 mov     eax, [eax+$14]
007B2711   50                     push    eax
007B2712   8B45FC                 mov     eax, [ebp-$04]
007B2715   50                     push    eax
007B2716   6A01                   push    $01
007B2718   8B4508                 mov     eax, [ebp+$08]
007B271B   8B40F0                 mov     eax, [eax-$10]
007B271E   8B480C                 mov     ecx, [eax+$0C]
007B2721   49                     dec     ecx
007B2722   8B4508                 mov     eax, [ebp+$08]
007B2725   8B40F0                 mov     eax, [eax-$10]
007B2728   8B5008                 mov     edx, [eax+$08]
007B272B   4A                     dec     edx
007B272C   8B4508                 mov     eax, [ebp+$08]
007B272F   8B40EC                 mov     eax, [eax-$14]

|
007B2732   E84DEBFFFF             call    007B1284
007B2737   33C0                   xor     eax, eax
007B2739   5A                     pop     edx
007B273A   59                     pop     ecx
007B273B   59                     pop     ecx
007B273C   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B273F   6854277B00             push    $007B2754
007B2744   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.TObject.Free(TObject);
|
007B2747   E8001CC5FF             call    0040434C
007B274C   C3                     ret


* Reference to: System.@HandleFinally;
|
007B274D   E9A223C5FF             jmp     00404AF4
007B2752   EBF0                   jmp     007B2744

****** END
|
007B2754   59                     pop     ecx
007B2755   5D                     pop     ebp
007B2756   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2758(Sender : TObject);
begin
(*
007B2758   55                     push    ebp
007B2759   8BEC                   mov     ebp, esp
007B275B   B90B000000             mov     ecx, $0000000B
007B2760   6A00                   push    $00
007B2762   6A00                   push    $00
007B2764   49                     dec     ecx
007B2765   75F9                   jnz     007B2760
007B2767   53                     push    ebx
007B2768   56                     push    esi
007B2769   57                     push    edi
007B276A   8B7D08                 mov     edi, [ebp+$08]
007B276D   83C7F0                 add     edi, -$10
007B2770   33C0                   xor     eax, eax
007B2772   55                     push    ebp

* Possible String Reference to: 'é_ Åÿë°_^[‹å]Ã'
|
007B2773   68902A7B00             push    $007B2A90

***** TRY
|
007B2778   64FF30                 push    dword ptr fs:[eax]
007B277B   648920                 mov     fs:[eax], esp
007B277E   8B07                   mov     eax, [edi]

* Reference to field TRMXLSExportForm.OFFS_0010
|
007B2780   8B4010                 mov     eax, [eax+$10]
007B2783   48                     dec     eax
007B2784   50                     push    eax
007B2785   8B07                   mov     eax, [edi]
007B2787   8B4014                 mov     eax, [eax+$14]
007B278A   48                     dec     eax
007B278B   50                     push    eax
007B278C   8B07                   mov     eax, [edi]
007B278E   8B480C                 mov     ecx, [eax+$0C]
007B2791   49                     dec     ecx
007B2792   8B07                   mov     eax, [edi]
007B2794   8B5008                 mov     edx, [eax+$08]
007B2797   4A                     dec     edx
007B2798   8B4508                 mov     eax, [ebp+$08]
007B279B   8B40EC                 mov     eax, [eax-$14]

|
007B279E   E8F5E9FFFF             call    007B1198
007B27A3   8B5508                 mov     edx, [ebp+$08]
007B27A6   8942FC                 mov     [edx-$04], eax
007B27A9   8B07                   mov     eax, [edi]

|
007B27AB   E8C41AFFFF             call    007A4274
007B27B0   8B10                   mov     edx, [eax]
007B27B2   FF5214                 call    dword ptr [edx+$14]
007B27B5   8BD8                   mov     ebx, eax
007B27B7   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@WStrClr(void;void);
|
007B27BA   E88132C5FF             call    00405A40
007B27BF   8BF3                   mov     esi, ebx
007B27C1   4E                     dec     esi
007B27C2   85F6                   test    esi, esi
007B27C4   7C34                   jl      007B27FA
007B27C6   46                     inc     esi
007B27C7   33DB                   xor     ebx, ebx
007B27C9   85DB                   test    ebx, ebx
007B27CB   7E0D                   jle     007B27DA
007B27CD   8D45FC                 lea     eax, [ebp-$04]
007B27D0   BAA42A7B00             mov     edx, $007B2AA4

|
007B27D5   E85A34C5FF             call    00405C34
007B27DA   8B07                   mov     eax, [edi]

|
007B27DC   E8931AFFFF             call    007A4274
007B27E1   8D4DEC                 lea     ecx, [ebp-$14]
007B27E4   8BD3                   mov     edx, ebx

* Reference to : TWStringList._PROC_006DB9C8()
|
007B27E6   E8DD91F2FF             call    006DB9C8
007B27EB   8B55EC                 mov     edx, [ebp-$14]
007B27EE   8D45FC                 lea     eax, [ebp-$04]

|
007B27F1   E83E34C5FF             call    00405C34
007B27F6   43                     inc     ebx
007B27F7   4E                     dec     esi
007B27F8   75CF                   jnz     007B27C9
007B27FA   A0AC2A7B00             mov     al, byte ptr [$007B2AAC]
007B27FF   50                     push    eax
007B2800   8D45E8                 lea     eax, [ebp-$18]
007B2803   50                     push    eax
007B2804   8D45E4                 lea     eax, [ebp-$1C]
007B2807   8B55FC                 mov     edx, [ebp-$04]

* Reference to: System.@LStrFromWStr(String;String;WideString);
|
007B280A   E8AD2DC5FF             call    004055BC
007B280F   8B45E4                 mov     eax, [ebp-$1C]
007B2812   33C9                   xor     ecx, ecx
007B2814   BAB82A7B00             mov     edx, $007B2AB8

* Reference to: SysUtils.StringReplace(AnsiString;AnsiString;AnsiString;TReplaceFlags):AnsiString;
|
007B2819   E8FEECC5FF             call    0041151C
007B281E   8B55E8                 mov     edx, [ebp-$18]
007B2821   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@WStrFromLStr(WideString;WideString;String);
|
007B2824   E8DF33C5FF             call    00405C08
007B2829   8B45FC                 mov     eax, [ebp-$04]
007B282C   33D2                   xor     edx, edx

* Reference to: System.@WStrCmp;
|
007B282E   E81135C5FF             call    00405D44
007B2833   740F                   jz      007B2844
007B2835   8B45FC                 mov     eax, [ebp-$04]
007B2838   BAA42A7B00             mov     edx, $007B2AA4

* Reference to: System.@WStrCmp;
|
007B283D   E80235C5FF             call    00405D44
007B2842   7531                   jnz     007B2875
007B2844   B020                   mov     al, $20
007B2846   8845D1                 mov     [ebp-$2F], al
007B2849   C645D001               mov     byte ptr [ebp-$30], $01
007B284D   8D45D4                 lea     eax, [ebp-$2C]
007B2850   8D55D0                 lea     edx, [ebp-$30]

* Reference to: DB.TWideStringField.SetAsString(TWideStringField;AnsiString);
|           or: DB.TWideStringField.SetVarValue(TWideStringField;Variant;Variant);
|           or: DB.TInterfaceField.SetVarValue(TInterfaceField;Variant;Variant);
|           or: Variants.@VarFromPStr(TVarData;TVarData;ShortString;ShortString);
|           or: Variants.@OleVarFromLStr(TVarData;TVarData;AnsiString);
|           or: Variants.@OleVarFromPStr(TVarData;TVarData;ShortString;ShortString);
|
007B2853   E89C65C6FF             call    00418DF4
007B2858   8D55D4                 lea     edx, [ebp-$2C]
007B285B   8B4508                 mov     eax, [ebp+$08]
007B285E   8B40FC                 mov     eax, [eax-$04]

|
007B2861   E816DFFFFF             call    007B077C
007B2866   8B4508                 mov     eax, [ebp+$08]
007B2869   8B40FC                 mov     eax, [eax-$04]
007B286C   C6402200               mov     byte ptr [eax+$22], $00
007B2870   E9E3000000             jmp     007B2958
007B2875   8D45CC                 lea     eax, [ebp-$34]
007B2878   50                     push    eax
007B2879   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@WStrLen(WideString):Integer;
|
007B287C   E8A733C5FF             call    00405C28
007B2881   8BD0                   mov     edx, eax
007B2883   4A                     dec     edx
007B2884   B902000000             mov     ecx, $00000002
007B2889   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@WStrCopy(WideString;Integer;Integer):WideString;
|
007B288C   E83735C5FF             call    00405DC8
007B2891   8B45CC                 mov     eax, [ebp-$34]
007B2894   BAA42A7B00             mov     edx, $007B2AA4

* Reference to: System.@WStrCmp;
|
007B2899   E8A634C5FF             call    00405D44
007B289E   751E                   jnz     007B28BE
007B28A0   8D45FC                 lea     eax, [ebp-$04]
007B28A3   50                     push    eax
007B28A4   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@WStrLen(WideString):Integer;
|
007B28A7   E87C33C5FF             call    00405C28
007B28AC   8BC8                   mov     ecx, eax
007B28AE   83E902                 sub     ecx, +$02
007B28B1   BA01000000             mov     edx, $00000001
007B28B6   8B45FC                 mov     eax, [ebp-$04]

* Reference to: System.@WStrCopy(WideString;Integer;Integer):WideString;
|
007B28B9   E80A35C5FF             call    00405DC8
007B28BE   8B07                   mov     eax, [edi]
007B28C0   80782400               cmp     byte ptr [eax+$24], $00
007B28C4   750C                   jnz     007B28D2
007B28C6   8B4508                 mov     eax, [ebp+$08]
007B28C9   8B40F4                 mov     eax, [eax-$0C]
007B28CC   80782001               cmp     byte ptr [eax+$20], $01
007B28D0   7535                   jnz     007B2907
007B28D2   8D45C8                 lea     eax, [ebp-$38]
007B28D5   8B55FC                 mov     edx, [ebp-$04]

* Reference to: System.@LStrFromWStr(String;String;WideString);
|
007B28D8   E8DF2CC5FF             call    004055BC
007B28DD   8B45C8                 mov     eax, [ebp-$38]
007B28E0   8D55F0                 lea     edx, [ebp-$10]

* Reference to: SysUtils.TryStrToFloat(AnsiString;Extended;Extended):Boolean;overload;
|
007B28E3   E8BCAEC5FF             call    0040D7A4
007B28E8   84C0                   test    al, al
007B28EA   741B                   jz      007B2907
007B28EC   DB6DF0                 fld     tbyte ptr [ebp-$10]
007B28EF   8D45B8                 lea     eax, [ebp-$48]

* Reference to: Variants.@VarFromReal;
|
007B28F2   E89564C6FF             call    00418D8C
007B28F7   8D55B8                 lea     edx, [ebp-$48]
007B28FA   8B4508                 mov     eax, [ebp+$08]
007B28FD   8B40FC                 mov     eax, [eax-$04]

|
007B2900   E877DEFFFF             call    007B077C
007B2905   EB51                   jmp     007B2958
007B2907   8D45A8                 lea     eax, [ebp-$58]
007B290A   8B55FC                 mov     edx, [ebp-$04]

* Reference to: Variants.@VarFromWStr(TVarData;TVarData;WideString);
|
007B290D   E83265C6FF             call    00418E44
007B2912   8D55A8                 lea     edx, [ebp-$58]
007B2915   8B4508                 mov     eax, [ebp+$08]
007B2918   8B40FC                 mov     eax, [eax-$04]

|
007B291B   E85CDEFFFF             call    007B077C
007B2920   8B55FC                 mov     edx, [ebp-$04]
007B2923   B8A42A7B00             mov     eax, $007B2AA4

* Reference to: System.@WStrPos;
|
007B2928   E81336C5FF             call    00405F40
007B292D   85C0                   test    eax, eax
007B292F   7F11                   jnle    007B2942
007B2931   8B55FC                 mov     edx, [ebp-$04]
007B2934   B8C02A7B00             mov     eax, $007B2AC0

* Reference to: System.@WStrPos;
|
007B2939   E80236C5FF             call    00405F40
007B293E   85C0                   test    eax, eax
007B2940   7E0C                   jle     007B294E
007B2942   8B4508                 mov     eax, [ebp+$08]
007B2945   8B40FC                 mov     eax, [eax-$04]
007B2948   C6402201               mov     byte ptr [eax+$22], $01
007B294C   EB0A                   jmp     007B2958
007B294E   8B4508                 mov     eax, [ebp+$08]
007B2951   8B40FC                 mov     eax, [eax-$04]
007B2954   C6402200               mov     byte ptr [eax+$22], $00
007B2958   8B4508                 mov     eax, [ebp+$08]
007B295B   8B40F4                 mov     eax, [eax-$0C]
007B295E   8B5004                 mov     edx, [eax+$04]
007B2961   8B4508                 mov     eax, [ebp+$08]
007B2964   8B40FC                 mov     eax, [eax-$04]
007B2967   8B401C                 mov     eax, [eax+$1C]
007B296A   8B08                   mov     ecx, [eax]
007B296C   FF5108                 call    dword ptr [ecx+$08]
007B296F   8B4508                 mov     eax, [ebp+$08]
007B2972   50                     push    eax

* Reference to : TRMXLSExportForm._PROC_007B2660()
|
007B2973   E8E8FCFFFF             call    007B2660
007B2978   59                     pop     ecx
007B2979   8B4508                 mov     eax, [ebp+$08]
007B297C   8B40F4                 mov     eax, [eax-$0C]
007B297F   8B400C                 mov     eax, [eax+$0C]
007B2982   3DFFFFFF1F             cmp     eax, $1FFFFFFF
007B2987   742D                   jz      007B29B6
007B2989   8B5508                 mov     edx, [ebp+$08]
007B298C   3DFFFFFF00             cmp     eax, $00FFFFFF
007B2991   7423                   jz      007B29B6
007B2993   8B5508                 mov     edx, [ebp+$08]
007B2996   8B5508                 mov     edx, [ebp+$08]
007B2999   8B52FC                 mov     edx, [edx-$04]
007B299C   89423C                 mov     [edx+$3C], eax
007B299F   8B4508                 mov     eax, [ebp+$08]
007B29A2   8B40FC                 mov     eax, [eax-$04]
007B29A5   C74040FFFFFF00         mov     dword ptr [eax+$40], $00FFFFFF
007B29AC   8B4508                 mov     eax, [ebp+$08]
007B29AF   8B40FC                 mov     eax, [eax-$04]
007B29B2   C6403811               mov     byte ptr [eax+$38], $11
007B29B6   8B4508                 mov     eax, [ebp+$08]
007B29B9   8B40F4                 mov     eax, [eax-$0C]
007B29BC   8A4009                 mov     al, byte ptr [eax+$09]
007B29BF   2C01                   sub     al, $01
007B29C1   721E                   jb      007B29E1
007B29C3   7410                   jz      007B29D5
007B29C5   FEC8                   dec     al
007B29C7   7524                   jnz     007B29ED
007B29C9   8B4508                 mov     eax, [ebp+$08]
007B29CC   8B40FC                 mov     eax, [eax-$04]
007B29CF   C6402102               mov     byte ptr [eax+$21], $02
007B29D3   EB22                   jmp     007B29F7
007B29D5   8B4508                 mov     eax, [ebp+$08]
007B29D8   8B40FC                 mov     eax, [eax-$04]
007B29DB   C6402101               mov     byte ptr [eax+$21], $01
007B29DF   EB16                   jmp     007B29F7
007B29E1   8B4508                 mov     eax, [ebp+$08]
007B29E4   8B40FC                 mov     eax, [eax-$04]
007B29E7   C6402100               mov     byte ptr [eax+$21], $00
007B29EB   EB0A                   jmp     007B29F7
007B29ED   8B4508                 mov     eax, [ebp+$08]
007B29F0   8B40FC                 mov     eax, [eax-$04]
007B29F3   C6402103               mov     byte ptr [eax+$21], $03
007B29F7   8B4508                 mov     eax, [ebp+$08]
007B29FA   8B40F4                 mov     eax, [eax-$0C]
007B29FD   8A4008                 mov     al, byte ptr [eax+$08]
007B2A00   2C01                   sub     al, $01
007B2A02   7208                   jb      007B2A0C
007B2A04   7412                   jz      007B2A18
007B2A06   FEC8                   dec     al
007B2A08   741A                   jz      007B2A24
007B2A0A   EB24                   jmp     007B2A30
007B2A0C   8B4508                 mov     eax, [ebp+$08]
007B2A0F   8B40FC                 mov     eax, [eax-$04]
007B2A12   C6402001               mov     byte ptr [eax+$20], $01
007B2A16   EB22                   jmp     007B2A3A
007B2A18   8B4508                 mov     eax, [ebp+$08]
007B2A1B   8B40FC                 mov     eax, [eax-$04]
007B2A1E   C6402002               mov     byte ptr [eax+$20], $02
007B2A22   EB16                   jmp     007B2A3A
007B2A24   8B4508                 mov     eax, [ebp+$08]
007B2A27   8B40FC                 mov     eax, [eax-$04]
007B2A2A   C6402003               mov     byte ptr [eax+$20], $03
007B2A2E   EB0A                   jmp     007B2A3A
007B2A30   8B4508                 mov     eax, [ebp+$08]
007B2A33   8B40FC                 mov     eax, [eax-$04]
007B2A36   C6402005               mov     byte ptr [eax+$20], $05
007B2A3A   33C0                   xor     eax, eax
007B2A3C   5A                     pop     edx
007B2A3D   59                     pop     ecx
007B2A3E   59                     pop     ecx
007B2A3F   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã'
|
007B2A42   68972A7B00             push    $007B2A97
007B2A47   8D45A8                 lea     eax, [ebp-$58]

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

* Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal);
|
007B2A55   E8BA36C5FF             call    00406114
007B2A5A   8D45C8                 lea     eax, [ebp-$38]

* Reference to: System.@LStrClr(void;void);
|
007B2A5D   E8C228C5FF             call    00405324
007B2A62   8D45CC                 lea     eax, [ebp-$34]

* Reference to: System.@WStrClr(void;void);
|
007B2A65   E8D62FC5FF             call    00405A40
007B2A6A   8D45D4                 lea     eax, [ebp-$2C]

* Reference to: Variants.@VarClr(TVarData;TVarData);
|
007B2A6D   E8021CC6FF             call    00414674
007B2A72   8D45E4                 lea     eax, [ebp-$1C]
007B2A75   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B2A7A   E8C928C5FF             call    00405348
007B2A7F   8D45EC                 lea     eax, [ebp-$14]

* Reference to: System.@WStrClr(void;void);
|
007B2A82   E8B92FC5FF             call    00405A40
007B2A87   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@WStrClr(void;void);
|
007B2A8A   E8B12FC5FF             call    00405A40
007B2A8F   C3                     ret


* Reference to: System.@HandleFinally;
|
007B2A90   E95F20C5FF             jmp     00404AF4
007B2A95   EBB0                   jmp     007B2A47

****** END
|
007B2A97   5F                     pop     edi
007B2A98   5E                     pop     esi
007B2A99   5B                     pop     ebx
007B2A9A   8BE5                   mov     esp, ebp
007B2A9C   5D                     pop     ebp
007B2A9D   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2AC5(Sender : TObject);
begin
(*
007B2AC5   8BEC                   mov     ebp, esp
007B2AC7   83C4D8                 add     esp, -$28
007B2ACA   53                     push    ebx
007B2ACB   56                     push    esi
007B2ACC   57                     push    edi
007B2ACD   33D2                   xor     edx, edx
007B2ACF   8955DC                 mov     [ebp-$24], edx
007B2AD2   8955D8                 mov     [ebp-$28], edx
007B2AD5   8945F8                 mov     [ebp-$08], eax
007B2AD8   8D75EC                 lea     esi, [ebp-$14]
007B2ADB   33C0                   xor     eax, eax
007B2ADD   55                     push    ebp
007B2ADE   683A2F7B00             push    $007B2F3A

***** TRY
|
007B2AE3   64FF30                 push    dword ptr fs:[eax]
007B2AE6   648920                 mov     fs:[eax], esp
007B2AE9   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2AEC   8B8094000000           mov     eax, [eax+$0094]

|
007B2AF2   E86526FFFF             call    007A515C
007B2AF7   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0090
|
007B2AFA   8B8090000000           mov     eax, [eax+$0090]

|
007B2B00   E85BE9FFFF             call    007B1460
007B2B05   8906                   mov     [esi], eax
007B2B07   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.UndockHeight : Integer
|
007B2B0A   8B80AC000000           mov     eax, [eax+$00AC]
007B2B10   3D00010000             cmp     eax, $00000100
007B2B15   7D24                   jnl     007B2B3B
007B2B17   83F842                 cmp     eax, +$42
007B2B1A   7D1F                   jnl     007B2B3B
007B2B1C   8B55F8                 mov     edx, [ebp-$08]

* Reference to field TRMXLSExportForm.UndockHeight : Integer
|
007B2B1F   8A92AC000000           mov     dl, byte ptr [edx+$00AC]
007B2B25   8B06                   mov     eax, [esi]
007B2B27   8B400C                 mov     eax, [eax+$0C]
007B2B2A   88502A                 mov     [eax+$2A], dl
007B2B2D   C7401C01000000         mov     dword ptr [eax+$1C], $00000001
007B2B34   C7401801000000         mov     dword ptr [eax+$18], $00000001
007B2B3B   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.UndockWidth : Integer
|
007B2B3E   80B8A800000000         cmp     byte ptr [eax+$00A8], $00
007B2B45   750B                   jnz     007B2B52
007B2B47   8B06                   mov     eax, [esi]
007B2B49   8B400C                 mov     eax, [eax+$0C]
007B2B4C   C6402900               mov     byte ptr [eax+$29], $00
007B2B50   EB09                   jmp     007B2B5B
007B2B52   8B06                   mov     eax, [esi]
007B2B54   8B400C                 mov     eax, [eax+$0C]
007B2B57   C6402901               mov     byte ptr [eax+$29], $01
007B2B5B   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.ScalingFlags : TScalingFlags
|
007B2B5E   8B8098000000           mov     eax, [eax+$0098]
007B2B64   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2B66   E8B9CFF8FF             call    0073FB24
007B2B6B   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2B71   E86606C5FF             call    004031DC
007B2B76   8945E0                 mov     [ebp-$20], eax
007B2B79   8955E4                 mov     [ebp-$1C], edx
007B2B7C   DF6DE0                 fild    qword ptr [ebp-$20]
007B2B7F   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2B85   DB2D4C2F7B00           fld     tbyte ptr [$007B2F4C]
007B2B8B   DEE9                   fsubp   st(1), st(0)
007B2B8D   8B06                   mov     eax, [esi]
007B2B8F   8B400C                 mov     eax, [eax+$0C]
007B2B92   DD5838                 fstp    qword ptr [eax+$38]
007B2B95   9B                     wait
007B2B96   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.DockOrientation : TDockOrientation
|
007B2B99   8B809C000000           mov     eax, [eax+$009C]
007B2B9F   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2BA1   E87ECFF8FF             call    0073FB24
007B2BA6   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2BAC   E82B06C5FF             call    004031DC
007B2BB1   8945E0                 mov     [ebp-$20], eax
007B2BB4   8955E4                 mov     [ebp-$1C], edx
007B2BB7   DF6DE0                 fild    qword ptr [ebp-$20]
007B2BBA   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2BC0   8B06                   mov     eax, [esi]
007B2BC2   8B400C                 mov     eax, [eax+$0C]
007B2BC5   DD5848                 fstp    qword ptr [eax+$48]
007B2BC8   9B                     wait
007B2BC9   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.HostDockSite : TWinControl
|
007B2BCC   8B80A0000000           mov     eax, [eax+$00A0]
007B2BD2   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2BD4   E84BCFF8FF             call    0073FB24
007B2BD9   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2BDF   E8F805C5FF             call    004031DC
007B2BE4   8945E0                 mov     [ebp-$20], eax
007B2BE7   8955E4                 mov     [ebp-$1C], edx
007B2BEA   DF6DE0                 fild    qword ptr [ebp-$20]
007B2BED   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2BF3   DB2D4C2F7B00           fld     tbyte ptr [$007B2F4C]
007B2BF9   DEE9                   fsubp   st(1), st(0)
007B2BFB   8B06                   mov     eax, [esi]
007B2BFD   8B400C                 mov     eax, [eax+$0C]
007B2C00   DD5840                 fstp    qword ptr [eax+$40]
007B2C03   9B                     wait
007B2C04   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.WheelAccumulator : Integer
|
007B2C07   8B80A4000000           mov     eax, [eax+$00A4]
007B2C0D   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2C0F   E810CFF8FF             call    0073FB24
007B2C14   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2C1A   E8BD05C5FF             call    004031DC
007B2C1F   8945E0                 mov     [ebp-$20], eax
007B2C22   8955E4                 mov     [ebp-$1C], edx
007B2C25   DF6DE0                 fild    qword ptr [ebp-$20]
007B2C28   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2C2E   8B06                   mov     eax, [esi]
007B2C30   8B580C                 mov     ebx, [eax+$0C]
007B2C33   DD5B50                 fstp    qword ptr [ebx+$50]
007B2C36   9B                     wait
007B2C37   33C0                   xor     eax, eax
007B2C39   894360                 mov     [ebx+$60], eax
007B2C3C   894364                 mov     [ebx+$64], eax
007B2C3F   33C0                   xor     eax, eax
007B2C41   894358                 mov     [ebx+$58], eax
007B2C44   89435C                 mov     [ebx+$5C], eax
007B2C47   8D55D8                 lea     edx, [ebp-$28]
007B2C4A   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0084
|
007B2C4D   8B8084000000           mov     eax, [eax+$0084]

* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
007B2C53   E8B482C5FF             call    0040AF0C
007B2C58   8B4DD8                 mov     ecx, [ebp-$28]
007B2C5B   8D45DC                 lea     eax, [ebp-$24]

* Possible String Reference to: 'Sheet'
|
007B2C5E   BA602F7B00             mov     edx, $007B2F60

* Reference to: System.@LStrCat3;
|
007B2C63   E8D829C5FF             call    00405640
007B2C68   8B55DC                 mov     edx, [ebp-$24]
007B2C6B   8B06                   mov     eax, [esi]

|
007B2C6D   E8A2E0FFFF             call    007B0D14
007B2C72   8B45F8                 mov     eax, [ebp-$08]
007B2C75   FF8084000000           inc     dword ptr [eax+$0084]
007B2C7B   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2C7E   8B8094000000           mov     eax, [eax+$0094]

* Reference to: ExtCtrls.THeaderStrings.GetCount(THeaderStrings):Integer;
|           or: MXQPARSE.TXtabQuery.getNAggregates(TXtabQuery):Integer;
|           or: Mxstore.TIndexInfo.GetCapacity(TIndexInfo):Integer;
|
007B2C84   E87725FFFF             call    007A5200
007B2C89   8BD8                   mov     ebx, eax
007B2C8B   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2C8E   8B8094000000           mov     eax, [eax+$0094]

* Reference to: AdaptReq.TActionFieldValuesImpl.GetFieldCount(TActionFieldValuesImpl):System.Integer;
|           or: AdaptReq.TActionFieldValueImpl.GetFileCount(TActionFieldValueImpl):System.Integer;
|           or: ExtCtrls.TPageAccess.GetCount(TPageAccess):Integer;
|           or: Grids.TStringSparseList.GetCount(TStringSparseList):Integer;
|           or: MXQPARSE.TXtabQuery.getNDimensions(TXtabQuery):Integer;
|           or: Mxstore.TDataCache.GetIndexCount(TDataCache):Integer;
|
007B2C94   E86F25FFFF             call    007A5208
007B2C99   0FAFD8                 imul    ebx, eax
007B2C9C   8BD3                   mov     edx, ebx

* Possible String Reference to: 'Exporting Row Height'
|
007B2C9E   B9702F7B00             mov     ecx, $007B2F70
007B2CA3   8B45F8                 mov     eax, [ebp-$08]

|
007B2CA6   E89D99FBFF             call    0076C648
007B2CAB   33DB                   xor     ebx, ebx
007B2CAD   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2CB0   8B8094000000           mov     eax, [eax+$0094]

* Reference to: ExtCtrls.THeaderStrings.GetCount(THeaderStrings):Integer;
|           or: MXQPARSE.TXtabQuery.getNAggregates(TXtabQuery):Integer;
|           or: Mxstore.TIndexInfo.GetCapacity(TIndexInfo):Integer;
|
007B2CB6   E84525FFFF             call    007A5200
007B2CBB   48                     dec     eax
007B2CBC   85C0                   test    eax, eax
007B2CBE   0F8C9F000000           jl      007B2D63
007B2CC4   40                     inc     eax
007B2CC5   8945E8                 mov     [ebp-$18], eax
007B2CC8   33FF                   xor     edi, edi
007B2CCA   8B45F8                 mov     eax, [ebp-$08]

|
007B2CCD   E8E299FBFF             call    0076C6B4
007B2CD2   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.Parent : TWinControl
|
007B2CD5   8B4030                 mov     eax, [eax+$30]

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B2CD8   80783800               cmp     byte ptr [eax+$38], $00
007B2CDC   0F8581000000           jnz     007B2D63
007B2CE2   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2CE5   8B8094000000           mov     eax, [eax+$0094]
007B2CEB   8BD7                   mov     edx, edi

|
007B2CED   E83625FFFF             call    007A5228
007B2CF2   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2CF4   E82BCEF8FF             call    0073FB24
007B2CF9   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2CFF   E8D804C5FF             call    004031DC
007B2D04   8945E0                 mov     [ebp-$20], eax
007B2D07   8955E4                 mov     [ebp-$1C], edx
007B2D0A   DF6DE0                 fild    qword ptr [ebp-$20]
007B2D0D   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2D13   83C4F8                 add     esp, -$08
007B2D16   DD1C24                 fstp    qword ptr [esp]
007B2D19   9B                     wait
007B2D1A   8BD7                   mov     edx, edi
007B2D1C   8B06                   mov     eax, [esi]

* Reference to: CheckLst.TCheckListBox.GetWrapper(TCheckListBox;Integer):TObject;
|           or: QCheckLst.TCheckListBox.GetWrapper(TCheckListBox;System.Integer):System.TObject;
|           or: WebAdapt.TCustomAdapter.FindNamedVariable(TCustomAdapter;System.AnsiString):Classes.TComponent;
|
007B2D1E   E8B9E0FFFF             call    007B0DDC

|
007B2D23   E8D4D7FFFF             call    007B04FC
007B2D28   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2D2B   8B8094000000           mov     eax, [eax+$0094]
007B2D31   8BD7                   mov     edx, edi

|
007B2D33   E8D824FFFF             call    007A5210
007B2D38   50                     push    eax
007B2D39   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2D3C   8B8094000000           mov     eax, [eax+$0094]
007B2D42   8BD3                   mov     edx, ebx

|
007B2D44   E8AB25FFFF             call    007A52F4
007B2D49   5A                     pop     edx
007B2D4A   3BD0                   cmp     edx, eax
007B2D4C   7C0B                   jl      007B2D59
007B2D4E   8D5701                 lea     edx, [edi+$01]
007B2D51   8B06                   mov     eax, [esi]

|
007B2D53   E898E5FFFF             call    007B12F0
007B2D58   43                     inc     ebx
007B2D59   47                     inc     edi
007B2D5A   FF4DE8                 dec     dword ptr [ebp-$18]
007B2D5D   0F8567FFFFFF           jnz     007B2CCA
007B2D63   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2D66   8B8094000000           mov     eax, [eax+$0094]

* Reference to: ExtCtrls.THeaderStrings.GetCount(THeaderStrings):Integer;
|           or: MXQPARSE.TXtabQuery.getNAggregates(TXtabQuery):Integer;
|           or: Mxstore.TIndexInfo.GetCapacity(TIndexInfo):Integer;
|
007B2D6C   E88F24FFFF             call    007A5200
007B2D71   8BD8                   mov     ebx, eax
007B2D73   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2D76   8B8094000000           mov     eax, [eax+$0094]

* Reference to: AdaptReq.TActionFieldValuesImpl.GetFieldCount(TActionFieldValuesImpl):System.Integer;
|           or: AdaptReq.TActionFieldValueImpl.GetFileCount(TActionFieldValueImpl):System.Integer;
|           or: ExtCtrls.TPageAccess.GetCount(TPageAccess):Integer;
|           or: Grids.TStringSparseList.GetCount(TStringSparseList):Integer;
|           or: MXQPARSE.TXtabQuery.getNDimensions(TXtabQuery):Integer;
|           or: Mxstore.TDataCache.GetIndexCount(TDataCache):Integer;
|
007B2D7C   E88724FFFF             call    007A5208
007B2D81   0FAFD8                 imul    ebx, eax
007B2D84   8BD3                   mov     edx, ebx

* Possible String Reference to: 'Exporting Column Width'
|
007B2D86   B9902F7B00             mov     ecx, $007B2F90
007B2D8B   8B45F8                 mov     eax, [ebp-$08]

|
007B2D8E   E8B598FBFF             call    0076C648
007B2D93   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2D96   8B8094000000           mov     eax, [eax+$0094]

* Reference to: AdaptReq.TActionFieldValuesImpl.GetFieldCount(TActionFieldValuesImpl):System.Integer;
|           or: AdaptReq.TActionFieldValueImpl.GetFileCount(TActionFieldValueImpl):System.Integer;
|           or: ExtCtrls.TPageAccess.GetCount(TPageAccess):Integer;
|           or: Grids.TStringSparseList.GetCount(TStringSparseList):Integer;
|           or: MXQPARSE.TXtabQuery.getNDimensions(TXtabQuery):Integer;
|           or: Mxstore.TDataCache.GetIndexCount(TDataCache):Integer;
|
007B2D9C   E86724FFFF             call    007A5208
007B2DA1   48                     dec     eax
007B2DA2   85C0                   test    eax, eax
007B2DA4   7C6E                   jl      007B2E14
007B2DA6   40                     inc     eax
007B2DA7   8945E8                 mov     [ebp-$18], eax
007B2DAA   33DB                   xor     ebx, ebx
007B2DAC   8B45F8                 mov     eax, [ebp-$08]

|
007B2DAF   E80099FBFF             call    0076C6B4
007B2DB4   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.Parent : TWinControl
|
007B2DB7   8B4030                 mov     eax, [eax+$30]

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B2DBA   80783800               cmp     byte ptr [eax+$38], $00
007B2DBE   7554                   jnz     007B2E14
007B2DC0   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2DC3   8B8094000000           mov     eax, [eax+$0094]
007B2DC9   8BD3                   mov     edx, ebx

|
007B2DCB   E89824FFFF             call    007A5268
007B2DD0   B201                   mov     dl, $01

* Reference to : TRMApplication._PROC_0073FB24()
|
007B2DD2   E84DCDF8FF             call    0073FB24
007B2DD7   DB2DA82F7B00           fld     tbyte ptr [$007B2FA8]
007B2DDD   DEC9                   fmulp   st(1), st(0)
007B2DDF   D80D482F7B00           fmul    dword ptr [$007B2F48]

* Reference to: System.@ROUND;
|
007B2DE5   E8F203C5FF             call    004031DC
007B2DEA   8945E0                 mov     [ebp-$20], eax
007B2DED   8955E4                 mov     [ebp-$1C], edx
007B2DF0   DF6DE0                 fild    qword ptr [ebp-$20]
007B2DF3   D835482F7B00           fdiv    dword ptr [$007B2F48]
007B2DF9   83C4F8                 add     esp, -$08
007B2DFC   DD1C24                 fstp    qword ptr [esp]
007B2DFF   9B                     wait
007B2E00   8BD3                   mov     edx, ebx
007B2E02   8B06                   mov     eax, [esi]

* Reference to: CheckLst.TCheckListBox.GetWrapper(TCheckListBox;Integer):TObject;
|           or: QCheckLst.TCheckListBox.GetWrapper(TCheckListBox;System.Integer):System.TObject;
|           or: WebAdapt.TCustomAdapter.FindNamedVariable(TCustomAdapter;System.AnsiString):Classes.TComponent;
|
007B2E04   E8B3DFFFFF             call    007B0DBC

|
007B2E09   E866D7FFFF             call    007B0574
007B2E0E   43                     inc     ebx
007B2E0F   FF4DE8                 dec     dword ptr [ebp-$18]
007B2E12   7598                   jnz     007B2DAC
007B2E14   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2E17   8B8094000000           mov     eax, [eax+$0094]

* Reference to: ExtCtrls.THeaderStrings.GetCount(THeaderStrings):Integer;
|           or: MXQPARSE.TXtabQuery.getNAggregates(TXtabQuery):Integer;
|           or: Mxstore.TIndexInfo.GetCapacity(TIndexInfo):Integer;
|
007B2E1D   E8DE23FFFF             call    007A5200
007B2E22   8BD8                   mov     ebx, eax
007B2E24   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2E27   8B8094000000           mov     eax, [eax+$0094]

* Reference to: AdaptReq.TActionFieldValuesImpl.GetFieldCount(TActionFieldValuesImpl):System.Integer;
|           or: AdaptReq.TActionFieldValueImpl.GetFileCount(TActionFieldValueImpl):System.Integer;
|           or: ExtCtrls.TPageAccess.GetCount(TPageAccess):Integer;
|           or: Grids.TStringSparseList.GetCount(TStringSparseList):Integer;
|           or: MXQPARSE.TXtabQuery.getNDimensions(TXtabQuery):Integer;
|           or: Mxstore.TDataCache.GetIndexCount(TDataCache):Integer;
|
007B2E2D   E8D623FFFF             call    007A5208
007B2E32   0FAFD8                 imul    ebx, eax
007B2E35   8BD3                   mov     edx, ebx

* Possible String Reference to: 'Exporting Cells'
|
007B2E37   B9BC2F7B00             mov     ecx, $007B2FBC
007B2E3C   8B45F8                 mov     eax, [ebp-$08]

|
007B2E3F   E80498FBFF             call    0076C648
007B2E44   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2E47   8B8094000000           mov     eax, [eax+$0094]

* Reference to: ExtCtrls.THeaderStrings.GetCount(THeaderStrings):Integer;
|           or: MXQPARSE.TXtabQuery.getNAggregates(TXtabQuery):Integer;
|           or: Mxstore.TIndexInfo.GetCapacity(TIndexInfo):Integer;
|
007B2E4D   E8AE23FFFF             call    007A5200
007B2E52   48                     dec     eax
007B2E53   85C0                   test    eax, eax
007B2E55   0F8CB4000000           jl      007B2F0F
007B2E5B   40                     inc     eax
007B2E5C   8945E8                 mov     [ebp-$18], eax
007B2E5F   33FF                   xor     edi, edi
007B2E61   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.Parent : TWinControl
|
007B2E64   8B4030                 mov     eax, [eax+$30]

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B2E67   80783800               cmp     byte ptr [eax+$38], $00
007B2E6B   0F859E000000           jnz     007B2F0F
007B2E71   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2E74   8B8094000000           mov     eax, [eax+$0094]

* Reference to: AdaptReq.TActionFieldValuesImpl.GetFieldCount(TActionFieldValuesImpl):System.Integer;
|           or: AdaptReq.TActionFieldValueImpl.GetFileCount(TActionFieldValueImpl):System.Integer;
|           or: ExtCtrls.TPageAccess.GetCount(TPageAccess):Integer;
|           or: Grids.TStringSparseList.GetCount(TStringSparseList):Integer;
|           or: MXQPARSE.TXtabQuery.getNDimensions(TXtabQuery):Integer;
|           or: Mxstore.TDataCache.GetIndexCount(TDataCache):Integer;
|
007B2E7A   E88923FFFF             call    007A5208
007B2E7F   8BF0                   mov     esi, eax
007B2E81   4E                     dec     esi
007B2E82   85F6                   test    esi, esi
007B2E84   7C7F                   jl      007B2F05
007B2E86   46                     inc     esi
007B2E87   33DB                   xor     ebx, ebx
007B2E89   8B45F8                 mov     eax, [ebp-$08]

|
007B2E8C   E82398FBFF             call    0076C6B4
007B2E91   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.Parent : TWinControl
|
007B2E94   8B4030                 mov     eax, [eax+$30]

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B2E97   80783800               cmp     byte ptr [eax+$38], $00
007B2E9B   7568                   jnz     007B2F05
007B2E9D   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2EA0   8B8094000000           mov     eax, [eax+$0094]
007B2EA6   8BCF                   mov     ecx, edi
007B2EA8   8BD3                   mov     edx, ebx

|
007B2EAA   E8F923FFFF             call    007A52A8
007B2EAF   8945F0                 mov     [ebp-$10], eax
007B2EB2   837DF000               cmp     dword ptr [ebp-$10], +$00
007B2EB6   7449                   jz      007B2F01
007B2EB8   8B45F0                 mov     eax, [ebp-$10]
007B2EBB   83782000               cmp     dword ptr [eax+$20], +$00
007B2EBF   7F40                   jnle    007B2F01
007B2EC1   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2EC4   8B8094000000           mov     eax, [eax+$0094]
007B2ECA   8B55F0                 mov     edx, [ebp-$10]

|
007B2ECD   E80224FFFF             call    007A52D4
007B2ED2   8945F4                 mov     [ebp-$0C], eax
007B2ED5   8B45F0                 mov     eax, [ebp-$10]
007B2ED8   C7402001000000         mov     dword ptr [eax+$20], $00000001
007B2EDF   8B45F0                 mov     eax, [ebp-$10]
007B2EE2   80784000               cmp     byte ptr [eax+$40], $00
007B2EE6   7509                   jnz     007B2EF1
007B2EE8   55                     push    ebp

* Reference to : TRMXLSExportForm._PROC_007B2758()
|
007B2EE9   E86AF8FFFF             call    007B2758
007B2EEE   59                     pop     ecx
007B2EEF   EB10                   jmp     007B2F01
007B2EF1   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_007D
|
007B2EF4   80787D00               cmp     byte ptr [eax+$7D], $00
007B2EF8   7407                   jz      007B2F01
007B2EFA   55                     push    ebp

* Reference to : TRMXLSExportForm._PROC_007B26C8()
|
007B2EFB   E8C8F7FFFF             call    007B26C8
007B2F00   59                     pop     ecx
007B2F01   43                     inc     ebx
007B2F02   4E                     dec     esi
007B2F03   7584                   jnz     007B2E89
007B2F05   47                     inc     edi
007B2F06   FF4DE8                 dec     dword ptr [ebp-$18]
007B2F09   0F8552FFFFFF           jnz     007B2E61
007B2F0F   8B45F8                 mov     eax, [ebp-$08]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2F12   8B8094000000           mov     eax, [eax+$0094]
007B2F18   33D2                   xor     edx, edx

|
007B2F1A   E8F514FFFF             call    007A4414
007B2F1F   33C0                   xor     eax, eax
007B2F21   5A                     pop     edx
007B2F22   59                     pop     ecx
007B2F23   59                     pop     ecx
007B2F24   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '_^[‹å]Ã'
|
007B2F27   68412F7B00             push    $007B2F41
007B2F2C   8D45D8                 lea     eax, [ebp-$28]
007B2F2F   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B2F34   E80F24C5FF             call    00405348
007B2F39   C3                     ret


* Reference to: System.@HandleFinally;
|
007B2F3A   E9B51BC5FF             jmp     00404AF4
007B2F3F   EBEB                   jmp     007B2F2C

****** END
|
007B2F41   5F                     pop     edi
007B2F42   5E                     pop     esi
007B2F43   5B                     pop     ebx
007B2F44   8BE5                   mov     esp, ebp
007B2F46   5D                     pop     ebp
007B2F47   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B2FCD(Sender : TObject);
begin
(*
007B2FCD   8BEC                   mov     ebp, esp
007B2FCF   53                     push    ebx
007B2FD0   56                     push    esi
007B2FD1   57                     push    edi
007B2FD2   8BD8                   mov     ebx, eax
007B2FD4   8BC3                   mov     eax, ebx

|
007B2FD6   E82597FBFF             call    0076C700

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2FDB   83BB9400000000         cmp     dword ptr [ebx+$0094], +$00
007B2FE2   7514                   jnz     007B2FF8
007B2FE4   8BCB                   mov     ecx, ebx
007B2FE6   B201                   mov     dl, $01

* Reference to class TRMIEMList
|
007B2FE8   A1043F7A00             mov     eax, dword ptr [$007A3F04]

|
007B2FED   E83613FFFF             call    007A4328

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2FF2   898394000000           mov     [ebx+$0094], eax

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B2FF8   8B8394000000           mov     eax, [ebx+$0094]
007B2FFE   B201                   mov     dl, $01

|
007B3000   E80F14FFFF             call    007A4414

* Reference to field TRMXLSExportForm.Cursor : TCursor
|
007B3005   8B5378                 mov     edx, [ebx+$78]

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B3008   8B8394000000           mov     eax, [ebx+$0094]
007B300E   895028                 mov     [eax+$28], edx

* Reference to field TRMXLSExportForm.OFFS_007D
|
007B3011   8A537D                 mov     dl, byte ptr [ebx+$7D]
007B3014   88502D                 mov     [eax+$2D], dl
007B3017   C6402F00               mov     byte ptr [eax+$2F], $00

* Reference to field TRMXLSExportForm.Parent : TWinControl
|
007B301B   8B4330                 mov     eax, [ebx+$30]

* Reference to field TWinControl.WindowProc : TWndMethod
|
007B301E   C6403800               mov     byte ptr [eax+$38], $00
007B3022   33C0                   xor     eax, eax

* Reference to field TRMXLSExportForm.OFFS_008C
|
007B3024   89838C000000           mov     [ebx+$008C], eax

* Reference to field TRMXLSExportForm.OFFS_0084
|
007B302A   C7838400000001000000   mov     dword ptr [ebx+$0084], $00000001

* Reference to field TRMXLSExportForm.Height : Integer
|
007B3034   895B4C                 mov     [ebx+$4C], ebx

* Reference to field TRMXLSExportForm.Width : Integer
|
007B3037   C743487C247B00         mov     dword ptr [ebx+$48], $007B247C
007B303E   33C0                   xor     eax, eax
007B3040   55                     push    ebp
007B3041   6871307B00             push    $007B3071

***** TRY
|
007B3046   64FF30                 push    dword ptr fs:[eax]
007B3049   648920                 mov     fs:[eax], esp
007B304C   B201                   mov     dl, $01

* Reference to class TwawXLSWorkbook
|
007B304E   A140027B00             mov     eax, dword ptr [$007B0240]

|
007B3053   E8BCE2FFFF             call    007B1314
007B3058   8BF0                   mov     esi, eax

* Reference to field TRMXLSExportForm.OFFS_0090
|
007B305A   89B390000000           mov     [ebx+$0090], esi
007B3060   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);
|
007B3062   E89DE4FFFF             call    007B1504
007B3067   33C0                   xor     eax, eax
007B3069   5A                     pop     edx
007B306A   59                     pop     ecx
007B306B   59                     pop     ecx
007B306C   648910                 mov     fs:[eax], edx
007B306F   EB0A                   jmp     007B307B

* Reference to: System.@HandleAnyException;
|
007B3071   E9CA17C5FF             jmp     00404840

* Reference to: System.@DoneExcept;
|
007B3076   E8F11BC5FF             call    00404C6C

****** END
|
007B307B   5F                     pop     edi
007B307C   5E                     pop     esi
007B307D   5B                     pop     ebx
007B307E   5D                     pop     ebp
007B307F   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3080(Sender : TObject);
begin
(*

|
007B3080   E87F96FBFF             call    0076C704
007B3085   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3088(Sender : TObject);
begin
(*
007B3088   53                     push    ebx
007B3089   8BD8                   mov     ebx, eax
007B308B   8BC3                   mov     eax, ebx

|
007B308D   E87E96FBFF             call    0076C710
007B3092   FF838C000000           inc     dword ptr [ebx+$008C]
007B3098   5B                     pop     ebx
007B3099   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B309C(Sender : TObject);
begin
(*

|
007B309C   E87396FBFF             call    0076C714
007B30A1   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B30A4(Sender : TObject);
begin
(*
007B30A4   53                     push    ebx
007B30A5   56                     push    esi
007B30A6   57                     push    edi
007B30A7   55                     push    ebp
007B30A8   51                     push    ecx
007B30A9   8BFA                   mov     edi, edx
007B30AB   8BF0                   mov     esi, eax
007B30AD   33D2                   xor     edx, edx
007B30AF   8BC7                   mov     eax, edi

|
007B30B1   E8BE0DFBFF             call    00763E74

* Reference to field TRMXLSExportForm.ScalingFlags : TScalingFlags
|
007B30B6   898698000000           mov     [esi+$0098], eax
007B30BC   BA01000000             mov     edx, $00000001
007B30C1   8BC7                   mov     eax, edi

|
007B30C3   E8AC0DFBFF             call    00763E74

* Reference to field TRMXLSExportForm.DockOrientation : TDockOrientation
|
007B30C8   89869C000000           mov     [esi+$009C], eax
007B30CE   BA02000000             mov     edx, $00000002
007B30D3   8BC7                   mov     eax, edi

|
007B30D5   E89A0DFBFF             call    00763E74

* Reference to field TRMXLSExportForm.HostDockSite : TWinControl
|
007B30DA   8986A0000000           mov     [esi+$00A0], eax
007B30E0   BA03000000             mov     edx, $00000003
007B30E5   8BC7                   mov     eax, edi

|
007B30E7   E8880DFBFF             call    00763E74

* Reference to field TRMXLSExportForm.WheelAccumulator : Integer
|
007B30EC   8986A4000000           mov     [esi+$00A4], eax
007B30F2   8A471E                 mov     al, byte ptr [edi+$1E]

* Reference to field TRMXLSExportForm.UndockWidth : Integer
|
007B30F5   8886A8000000           mov     [esi+$00A8], al
007B30FB   0FB7471C               movzx   eax, word ptr [edi+$1C]

* Reference to field TRMXLSExportForm.UndockHeight : Integer
|
007B30FF   8986AC000000           mov     [esi+$00AC], eax
007B3105   8B4758                 mov     eax, [edi+$58]
007B3108   8B4024                 mov     eax, [eax+$24]
007B310B   8B6808                 mov     ebp, [eax+$08]
007B310E   4D                     dec     ebp
007B310F   85ED                   test    ebp, ebp
007B3111   7C42                   jl      007B3155
007B3113   45                     inc     ebp
007B3114   C7042400000000         mov     dword ptr [esp], $00000000
007B311B   8B4758                 mov     eax, [edi+$58]
007B311E   8B4024                 mov     eax, [eax+$24]
007B3121   8B1424                 mov     edx, [esp]

* Reference to: Classes.TList.Get(TList;Integer):Pointer;
|
007B3124   E8E7FBC6FF             call    00422D10
007B3129   8BD8                   mov     ebx, eax
007B312B   807B1900               cmp     byte ptr [ebx+$19], $00
007B312F   751E                   jnz     007B314F
007B3131   8BC3                   mov     eax, ebx

* Reference to class TRMSubReportView
|
007B3133   8B1550B27300           mov     edx, [$0073B250]

* Reference to: System.@IsClass(TObject;TClass):Boolean;
|
007B3139   E8A613C5FF             call    004044E4
007B313E   84C0                   test    al, al
007B3140   750D                   jnz     007B314F
007B3142   8BD3                   mov     edx, ebx

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B3144   8B8694000000           mov     eax, [esi+$0094]

|
007B314A   E86D19FFFF             call    007A4ABC
007B314F   FF0424                 inc     dword ptr [esp]
007B3152   4D                     dec     ebp
007B3153   75C6                   jnz     007B311B

* Reference to field TRMXLSExportForm.OFFS_008C
|
007B3155   8B868C000000           mov     eax, [esi+$008C]

* Reference to field TRMXLSExportForm.OFFS_0088
|
007B315B   3B8688000000           cmp     eax, [esi+$0088]
007B3161   7C11                   jl      007B3174
007B3163   33C0                   xor     eax, eax

* Reference to field TRMXLSExportForm.OFFS_008C
|
007B3165   89868C000000           mov     [esi+$008C], eax
007B316B   8BC6                   mov     eax, esi

|
007B316D   E852F9FFFF             call    007B2AC4
007B3172   EB0B                   jmp     007B317F

* Reference to field TRMXLSExportForm.OFFS_0094
|
007B3174   8B8694000000           mov     eax, [esi+$0094]

|
007B317A   E8811AFFFF             call    007A4C00
007B317F   5A                     pop     edx
007B3180   5D                     pop     ebp
007B3181   5F                     pop     edi
007B3182   5E                     pop     esi
007B3183   5B                     pop     ebx
007B3184   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3188(Sender : TObject);
begin
(*
007B3188   55                     push    ebp
007B3189   8BEC                   mov     ebp, esp
007B318B   33C9                   xor     ecx, ecx
007B318D   51                     push    ecx
007B318E   51                     push    ecx
007B318F   51                     push    ecx
007B3190   51                     push    ecx
007B3191   51                     push    ecx
007B3192   53                     push    ebx
007B3193   8BD8                   mov     ebx, eax
007B3195   33C0                   xor     eax, eax
007B3197   55                     push    ebp
007B3198   6896337B00             push    $007B3396

***** TRY
|
007B319D   64FF30                 push    dword ptr fs:[eax]
007B31A0   648920                 mov     fs:[eax], esp
007B31A3   8D55FC                 lea     edx, [ebp-$04]
007B31A6   B854B90000             mov     eax, $0000B954

|
007B31AB   E8EC51FCFF             call    0077839C
007B31B0   8B55FC                 mov     edx, [ebp-$04]

* Reference to field TRMXLSExportForm.Font : TFont
|
007B31B3   8B4368                 mov     eax, [ebx+$68]

* Reference to: Graphics.TFont.SetName(TFont;TFontName);
|
007B31B6   E89DD9C7FF             call    00430B58
007B31BB   8D55F8                 lea     edx, [ebp-$08]
007B31BE   B855B90000             mov     eax, $0000B955

|
007B31C3   E8D451FCFF             call    0077839C
007B31C8   8B45F8                 mov     eax, [ebp-$08]

* Reference to: SysUtils.StrToInt(AnsiString):Integer;
|
007B31CB   E8787EC5FF             call    0040B048
007B31D0   8BD0                   mov     edx, eax

* Reference to field TRMXLSExportForm.Font : TFont
|
007B31D2   8B4368                 mov     eax, [ebx+$68]

* Reference to: Graphics.TFont.SetSize(TFont;Integer);
|
007B31D5   E8F6D9C7FF             call    00430BD0
007B31DA   8D55F4                 lea     edx, [ebp-$0C]
007B31DD   B8E9B80000             mov     eax, $0000B8E9

|
007B31E2   E8B551FCFF             call    0077839C
007B31E7   8B45F4                 mov     eax, [ebp-$0C]

* Reference to: SysUtils.StrToInt(AnsiString):Integer;
|
007B31EA   E8597EC5FF             call    0040B048
007B31EF   8BD0                   mov     edx, eax

* Reference to field TRMXLSExportForm.Font : TFont
|
007B31F1   8B4368                 mov     eax, [ebx+$68]

* Reference to: Graphics.TFont.SetCharset(TFont;TFontCharset);
|
007B31F4   E867DAC7FF             call    00430C60
007B31F9   B9E5B60000             mov     ecx, $0000B6E5

* Possible String Reference to: 'Caption'
|
007B31FE   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.chkExportImages : TCheckBox
|
007B3203   8B8354030000           mov     eax, [ebx+$0354]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3209   E8DE43FCFF             call    007775EC
007B320E   B9E0B60000             mov     ecx, $0000B6E0

* Possible String Reference to: 'Caption'
|
007B3213   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.lblExportImageFormat : TLabel
|
007B3218   8B8338030000           mov     eax, [ebx+$0338]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B321E   E8C943FCFF             call    007775EC
007B3223   B9DEB60000             mov     ecx, $0000B6DE

* Possible String Reference to: 'Caption'
|
007B3228   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.lblJPEGQuality : TLabel
|
007B322D   8B833C030000           mov     eax, [ebx+$033C]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3233   E8B443FCFF             call    007775EC
007B3238   B9C4B60000             mov     ecx, $0000B6C4

* Possible String Reference to: 'Caption'
|
007B323D   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.Label4 : TLabel
|
007B3242   8B8340030000           mov     eax, [ebx+$0340]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3248   E89F43FCFF             call    007775EC
007B324D   B9F4AF0000             mov     ecx, $0000AFF4

* Possible String Reference to: 'Caption'
|
007B3252   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.GroupBox1 : TGroupBox
|
007B3257   8B8308030000           mov     eax, [ebx+$0308]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B325D   E88A43FCFF             call    007775EC
007B3262   B9F5AF0000             mov     ecx, $0000AFF5

* Possible String Reference to: 'Caption'
|
007B3267   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.rdbPrintAll : TRadioButton
|
007B326C   8B8314030000           mov     eax, [ebx+$0314]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3272   E87543FCFF             call    007775EC
007B3277   B9F6AF0000             mov     ecx, $0000AFF6

* Possible String Reference to: 'Caption'
|
007B327C   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.rbdPrintCurPage : TRadioButton
|
007B3281   8B8318030000           mov     eax, [ebx+$0318]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3287   E86043FCFF             call    007775EC
007B328C   B9F7AF0000             mov     ecx, $0000AFF7

* Possible String Reference to: 'Caption'
|
007B3291   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.rbdPrintPages : TRadioButton
|
007B3296   8B831C030000           mov     eax, [ebx+$031C]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B329C   E84B43FCFF             call    007775EC
007B32A1   B9F8AF0000             mov     ecx, $0000AFF8

* Possible String Reference to: 'Caption'
|
007B32A6   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.Label2 : TLabel
|
007B32AB   8B8324030000           mov     eax, [ebx+$0324]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B32B1   E83643FCFF             call    007775EC
007B32B6   B943B10000             mov     ecx, $0000B143

* Possible String Reference to: 'Caption'
|
007B32BB   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.GroupBox2 : TGroupBox
|
007B32C0   8B8328030000           mov     eax, [ebx+$0328]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B32C6   E82143FCFF             call    007775EC
007B32CB   B942B10000             mov     ecx, $0000B142

* Possible String Reference to: 'Caption'
|
007B32D0   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.Label1 : TLabel
|
007B32D5   8B830C030000           mov     eax, [ebx+$030C]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B32DB   E80C43FCFF             call    007775EC
007B32E0   B944B10000             mov     ecx, $0000B144

* Possible String Reference to: 'Caption'
|
007B32E5   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.chkShowAfterGenerate : TCheckBox
|
007B32EA   8B832C030000           mov     eax, [ebx+$032C]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B32F0   E8F742FCFF             call    007775EC
007B32F5   B9BAB60000             mov     ecx, $0000B6BA

* Possible String Reference to: 'Caption'
|
007B32FA   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.chkExportFrames : TCheckBox
|
007B32FF   8B8330030000           mov     eax, [ebx+$0330]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3305   E8E242FCFF             call    007775EC
007B330A   B946B10000             mov     ecx, $0000B146

* Possible String Reference to: 'Caption'
|
007B330F   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.Label3 : TLabel
|
007B3314   8B8360030000           mov     eax, [ebx+$0360]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B331A   E8CD42FCFF             call    007775EC
007B331F   B9B7B60000             mov     ecx, $0000B6B7

* Possible String Reference to: 'Caption'
|
007B3324   BAAC337B00             mov     edx, $007B33AC

* Reference to control TRMXLSExportForm.chkWYB : TCheckBox
|
007B3329   8B8364030000           mov     eax, [ebx+$0364]

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B332F   E8B842FCFF             call    007775EC
007B3334   B9BBB60000             mov     ecx, $0000B6BB

* Possible String Reference to: 'Caption'
|
007B3339   BAAC337B00             mov     edx, $007B33AC
007B333E   8BC3                   mov     eax, ebx

* Reference to : TWrapperComponent._PROC_007775EC()
|
007B3340   E8A742FCFF             call    007775EC
007B3345   8D55F0                 lea     edx, [ebp-$10]
007B3348   B898B70000             mov     eax, $0000B798

|
007B334D   E84A50FCFF             call    0077839C
007B3352   8B55F0                 mov     edx, [ebp-$10]

* Reference to control TRMXLSExportForm.btnOK : TButton
|
007B3355   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B335B   E8C052CDFF             call    00488620
007B3360   8D55EC                 lea     edx, [ebp-$14]
007B3363   B899B70000             mov     eax, $0000B799

|
007B3368   E82F50FCFF             call    0077839C
007B336D   8B55EC                 mov     edx, [ebp-$14]

* Reference to control TRMXLSExportForm.btnCancel : TButton
|
007B3370   8B83FC020000           mov     eax, [ebx+$02FC]

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B3376   E8A552CDFF             call    00488620
007B337B   33C0                   xor     eax, eax
007B337D   5A                     pop     edx
007B337E   59                     pop     ecx
007B337F   59                     pop     ecx
007B3380   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '[‹å]Ã'
|
007B3383   689D337B00             push    $007B339D
007B3388   8D45EC                 lea     eax, [ebp-$14]
007B338B   BA05000000             mov     edx, $00000005

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B3390   E8B31FC5FF             call    00405348
007B3395   C3                     ret


* Reference to: System.@HandleFinally;
|
007B3396   E95917C5FF             jmp     00404AF4
007B339B   EBEB                   jmp     007B3388

****** END
|
007B339D   5B                     pop     ebx
007B339E   8BE5                   mov     esp, ebp
007B33A0   5D                     pop     ebp
007B33A1   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3630(Sender : TObject);
begin
(*
007B3630   55                     push    ebp
007B3631   8BEC                   mov     ebp, esp
007B3633   33C0                   xor     eax, eax
007B3635   55                     push    ebp
007B3636   6855367B00             push    $007B3655

***** TRY
|
007B363B   64FF30                 push    dword ptr fs:[eax]
007B363E   648920                 mov     fs:[eax], esp
007B3641   FF05D43B8900           inc     dword ptr [$00893BD4]
007B3647   33C0                   xor     eax, eax
007B3649   5A                     pop     edx
007B364A   59                     pop     ecx
007B364B   59                     pop     ecx
007B364C   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: ']Ã‹Àƒ-Ô;‰'
|
007B364F   685C367B00             push    $007B365C
007B3654   C3                     ret


* Reference to: System.@HandleFinally;
|
007B3655   E99A14C5FF             jmp     00404AF4
007B365A   EBF8                   jmp     007B3654

****** END
|
007B365C   5D                     pop     ebp
007B365D   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3660(Sender : TObject);
begin
(*
007B3660   832DD43B890001         sub     dword ptr [$00893BD4], +$01
007B3667   C3                     ret

*)
end;

procedure TRMXLSExportForm._PROC_007B3668(Sender : TObject);
begin
(*
007B3668   B436                   mov     ah, $36
007B366A   7B00                   jnp     007B366C
007B366C   0000                   add     [eax], al

*)
end;

procedure TRMXLSExportForm._PROC_007B36CE(Sender : TObject);
begin
(*
007B36CE   48                     dec     eax
007B36CF   0050D4                 add     [eax-$2C], dl
007B36D2   42                     inc     edx
007B36D3   0008                   add     [eax], cl
007B36D5   2D4A007CD0             sub     eax, $D07C004A
007B36DA   42                     inc     edx
007B36DB   00F4                   add     ah, dh
007B36DD   6B4A00D0               imul    ecx, [edx+$00], $D0
007B36E1   1D4A0030F6             sbb     eax, $F630004A
007B36E6   48                     dec     eax
007B36E7   004CFB48               add     [ebx+edi*8+$48], cl
007B36EB   0098FA48000C           add     [eax+$C0048FA], bl
007B36F1   7948                   jns     007B373B
007B36F3   00ACF04800E829         add     [eax+esi*8+$29E80048], ch
007B36FA   4A                     dec     edx
007B36FB   00E4                   add     ah, ah
007B36FD   ED                     in      eax, dx
007B36FE   48                     dec     eax
007B36FF   00547848               add     [eax+edi*2+$48], dl
007B3703   005878                 add     [eax+$78], bl
007B3706   48                     dec     eax
007B3707   00DC                   add     ah, bl
007B3709   2A4A00                 sub     cl, byte ptr [edx+$00]
007B370C   3CA9                   cmp     al, $A9
007B370E   48                     dec     eax
007B370F   00C0                   add     al, al
007B3711   834800D0               or      dword ptr [eax+$00], -$30
007B3715   7948                   jns     007B375F
007B3717   004C8548               add     [ebp+eax*4+$48], cl
007B371B   00D0                   add     al, dl
007B371D   2C4A                   sub     al, $4A
007B371F   009C2B4A008486         add     [ebx+ebp+$8684004A], bl
007B3726   48                     dec     eax
007B3727   00482D                 add     [eax+$2D], cl
007B372A   4A                     dec     edx
007B372B   00C0                   add     al, al
007B372D   A9480038EE             test    eax, $EE380048
007B3732   48                     dec     eax
007B3733   00F4                   add     ah, dh
007B3735   EE                     out     dx, al
007B3736   48                     dec     eax
007B3737   00F0                   add     al, dh
007B3739   E94800D8EE             jmp     EF533786
007B373E   48                     dec     eax
007B373F   00D8                   add     al, bl
007B3741   1B4A00                 sbb     ecx, [edx+$00]
007B3744   EC                     in      al, dx
007B3745   334A00                 xor     ecx, [edx+$00]
007B3748   20C4                   and     ah, al
007B374A   48                     dec     eax
007B374B   00B0404A0010           add     [eax+$10004A40], dh
007B3751   44                     inc     esp
007B3752   4A                     dec     edx
007B3753   00CC                   add     ah, cl
007B3755   42                     inc     edx
007B3756   4A                     dec     edx
007B3757   00B8C44800BC           add     [eax+$BC0048C4], bh
007B375D   C44800                 les     ecx, [eax+$00]
007B3760   48                     dec     eax
007B3761   45                     inc     ebp
007B3762   4A                     dec     edx
007B3763   001CC3                 add     [ebx+eax*8], bl
007B3766   48                     dec     eax
007B3767   0018                   add     [eax], bl
007B3769   F0                     lock
007B376A   48                     dec     eax
007B376B   00444C4A               add     [esp+ecx*2+$4A], al
007B376F   000C02                 add     [edx+eax], cl
007B3772   49                     dec     ecx
007B3773   0094EC48009C64         add     [esp+ebp*8+$649C0048], dl
007B377A   4A                     dec     edx
007B377B   008C154A003C18         add     [ebp+edx+$183C004A], cl
007B3782   4A                     dec     edx
007B3783   0038                   add     [eax], bh
007B3785   52                     push    edx
007B3786   4A                     dec     edx
007B3787   005C224A               add     [edx+$4A], bl
007B378B   00D8                   add     al, bl
007B378D   224A00                 and     cl, byte ptr [edx+$00]
007B3790   7C68                   jl      007B37FA
007B3792   4A                     dec     edx
007B3793   00941F4A003C60         add     [edi+ebx+$603C004A], dl
007B379A   4A                     dec     edx
007B379B   001447                 add     [edi+eax*2], dl
007B379E   4A                     dec     edx
007B379F   0034654A00CC2C         add     [$2CCC004A], dh
007B37A6   4A                     dec     edx
007B37A7   000E                   add     [esi], cl
007B37A9   0000                   add     [eax], al

007B37AB   0000                   add     [eax], al

007B37AD   0002                   add     [edx], al
007B37AF   0000                   add     [eax], al

007B37B1   0020                   add     [eax], ah
007B37B3   114000                 adc     [eax+$00], eax
007B37B6   2003                   and     [ebx], al
007B37B8   0000                   add     [eax], al

007B37BA   2011                   and     [ecx], dl
007B37BC   40                     inc     eax
007B37BD   002403                 add     [ebx+eax], ah
007B37C0   0000                   add     [eax], al

007B37C2   0A00                   or      al, byte ptr [eax]
007B37C4   FB                     sti
007B37C5   387B00                 cmp     [ebx+$00], bh
007B37C8   F8                     clc
007B37C9   0200                   add     al, byte ptr [eax]
007B37CB   0000                   add     [eax], al

007B37CD   0007                   add     [edi], al
007B37CF   42                     inc     edx
007B37D0   7574                   jnz     007B3846
007B37D2   746F                   jz      007B3843
007B37D4   6E                     outsb
007B37D5   31FC                   xor     esp, edi
007B37D7   0200                   add     al, byte ptr [eax]
007B37D9   0000                   add     [eax], al

007B37DB   0007                   add     [edi], al
007B37DD   42                     inc     edx
007B37DE   7574                   jnz     007B3854
007B37E0   746F                   jz      007B3851
007B37E2   6E                     outsb
007B37E3   3200                   xor     al, byte ptr [eax]
007B37E5   0300                   add     eax, [eax]
007B37E7   0001                   add     [ecx], al
007B37E9   0010                   add     [eax], dl
007B37EB   45                     inc     ebp
007B37EC   7870                   js      007B385E
007B37EE   6F                     outsd
007B37EF   7274                   jb      007B3865
007B37F1   44                     inc     esp
007B37F2   61                     popa
007B37F3   7461                   jz      007B3856
007B37F5   53                     push    ebx
007B37F6   6F                     outsd
007B37F7   7572                   jnz     007B386B
007B37F9   636504                 arpl    [ebp+$04], sp
007B37FC   0300                   add     eax, [eax]
007B37FE   0002                   add     [edx], al
007B3800   0007                   add     [edi], al
007B3802   45                     inc     ebp
007B3803   7870                   js      007B3875
007B3805   47                     inc     edi
007B3806   7269                   jb      007B3871
007B3808   640803                 or      fs:[ebx], al
007B380B   0000                   add     [eax], al

007B380D   0300                   add     eax, [eax]
007B380F   0D63784772             or      eax, $72477863
007B3814   6964314C6576656C       imul    esp, [ecx+esi+$4C], $6C657665
007B381C   310C03                 xor     [ebx+eax], ecx
007B381F   0000                   add     [eax], al

007B3821   0400                   add     al, +$00
007B3823   07                     pop     es
007B3824   637847                 arpl    [eax+$47], di
007B3827   7269                   jb      007B3892
007B3829   643110                 xor     fs:[eax], edx
007B382C   0300                   add     eax, [eax]
007B382E   000500065061           add     [$61500600], al
007B3834   6E                     outsb
007B3835   656C                   insb
007B3837   321403                 xor     dl, byte ptr [ebx+eax]
007B383A   0000                   add     [eax], al

007B383C   06                     push    es
007B383D   0006                   add     [esi], al
007B383F   4C                     dec     esp
007B3840   61                     popa
007B3841   62656C                 bound   esp, qword ptr [ebp+$6C]
007B3844   3418                   xor     al, $18
007B3846   0300                   add     eax, [eax]
007B3848   0007                   add     [edi], al
007B384A   0009                   add     [ecx], cl
007B384C   43                     inc     ebx
007B384D   6865636B42             push    $426B6365
007B3852   6F                     outsd
007B3853   7831                   js      007B3886
007B3855   1C03                   sbb     al, $03
007B3857   0000                   add     [eax], al

007B3859   07                     pop     es
007B385A   0009                   add     [ecx], cl
007B385C   43                     inc     ebx
007B385D   6865636B42             push    $426B6365
007B3862   6F                     outsd
007B3863   7832                   js      007B3897
007B3865   07                     pop     es
007B3866   0013                   add     [ebx], dl
007B3868   00C4                   add     ah, al
007B386A   3A7B00                 cmp     bh, byte ptr [ebx+$00]
007B386D   0C42                   or      al, $42
007B386F   7574                   jnz     007B38E5
007B3871   746F                   jz      007B38E2
007B3873   6E                     outsb
007B3874   31436C                 xor     [ebx+$6C], eax
007B3877   69636B1000003B         imul    esp, [ebx+$6B], $3B000010
007B387E   7B00                   jnp     007B3880
007B3880   09466F                 or      [esi+$6F], eax
007B3883   726D                   jb      007B38F2
007B3885   43                     inc     ebx
007B3886   6C                     insb
007B3887   6F                     outsd
007B3888   7365                   jnb     007B38EF
007B388A   1200                   adc     al, byte ptr [eax]
007B388C   043B                   add     al, +$3B
007B388E   7B00                   jnp     007B3890
007B3890   0B466F                 or      eax, [esi+$6F]
007B3893   726D                   jb      007B3902
007B3895   44                     inc     esp
007B3896   657374                 jnb     007B390D
007B3899   726F                   jb      007B390A
007B389B   790F                   jns     007B38AC
007B389D   000C3B                 add     [ebx+edi], cl
007B38A0   7B00                   jnp     007B38A2
007B38A2   08466F                 or      [esi+$6F], al
007B38A5   726D                   jb      007B3914
007B38A7   53                     push    ebx
007B38A8   686F771300             push    $0013776F
007B38AD   003D7B000C42           add     [$420C007B], bh
007B38B3   7574                   jnz     007B3929
007B38B5   746F                   jz      007B3926
007B38B7   6E                     outsb
007B38B8   32436C                 xor     al, byte ptr [ebx+$6C]
007B38BB   69636B15002841         imul    esp, [ebx+$6B], $41280015
007B38C2   7B00                   jnp     007B38C4
007B38C4   0E                     push    cs
007B38C5   43                     inc     ebx
007B38C6   6865636B42             push    $426B6365
007B38CB   6F                     outsd
007B38CC   7831                   js      007B38FF
007B38CE   43                     inc     ebx
007B38CF   6C                     insb
007B38D0   69636B1500F841         imul    esp, [ebx+$6B], $41F80015
007B38D7   7B00                   jnp     007B38D9
007B38D9   0E                     push    cs
007B38DA   43                     inc     ebx
007B38DB   6865636B42             push    $426B6365
007B38E0   6F                     outsd
007B38E1   7832                   js      007B3915
007B38E3   43                     inc     ebx
007B38E4   6C                     insb
007B38E5   69636B12546672         imul    esp, [ebx+$6B], $72665412
007B38EC   6D                     insd
007B38ED   53                     push    ebx
007B38EE   656C                   insb
007B38F0   45                     inc     ebp
007B38F1   7870                   js      007B3963
007B38F3   6F                     outsd
007B38F4   7274                   jb      007B396A
007B38F6   46                     inc     esi
007B38F7   69656C64080000         imul    esp, [ebp+$6C], $00000864
007B38FE   8E4700                 mov     es, word ptr [edi+$00]
007B3901   087F4B                 or      [edi+$4B], bh
007B3904   00F4                   add     ah, dh
007B3906   B466                   mov     ah, $66
007B3908   00A40E64000016         add     [esi+ecx+$16000064], ah
007B390F   6300                   arpl    [eax], ax
007B3911   84E1                   test    cl, ah
007B3913   49                     dec     ecx
007B3914   001C5F                 add     [edi+ebx*2], bl
007B3917   47                     inc     edi
007B3918   00C0                   add     al, al
007B391A   96                     xchg    eax, esi
007B391B   47                     inc     edi
007B391C   008D40002439           add     [ebp+$39240040], cl
007B3922   7B00                   jnp     007B3924
007B3924   07                     pop     es
007B3925   12546672               adc     dl, byte ptr [esi+$72]
007B3929   6D                     insd
007B392A   53                     push    ebx
007B392B   656C                   insb
007B392D   45                     inc     ebp
007B392E   7870                   js      007B39A0
007B3930   6F                     outsd
007B3931   7274                   jb      007B39A7
007B3933   46                     inc     esi
007B3934   69656C64B4367B         imul    esp, [ebp+$6C], $7B36B464
007B393B   00D0                   add     al, dl
007B393D   F2                     repne
007B393E   49                     dec     ecx
007B393F   005E00                 add     [esi+$00], bl
007B3942   10555F                 adc     [ebp+$5F], dl
007B3945   53                     push    ebx
007B3946   656C                   insb
007B3948   45                     inc     ebp
007B3949   7870                   js      007B39BB
007B394B   6F                     outsd
007B394C   7274                   jb      007B39C2
007B394E   46                     inc     esi
007B394F   69656C6400008D         imul    esp, [ebp+$6C], $8D000064
007B3956   40                     inc     eax
007B3957   00558B                 add     [ebp-$75], dl
007B395A   EC                     in      al, dx
007B395B   83C4E8                 add     esp, -$18
007B395E   53                     push    ebx
007B395F   56                     push    esi
007B3960   57                     push    edi
007B3961   33D2                   xor     edx, edx
007B3963   8955EC                 mov     [ebp-$14], edx
007B3966   8955E8                 mov     [ebp-$18], edx
007B3969   8BF0                   mov     esi, eax
007B396B   33C0                   xor     eax, eax
007B396D   55                     push    ebp
007B396E   68B63A7B00             push    $007B3AB6

***** TRY
|
007B3973   64FF30                 push    dword ptr fs:[eax]
007B3976   648920                 mov     fs:[eax], esp
007B3979   33C0                   xor     eax, eax
007B397B   8945F4                 mov     [ebp-$0C], eax

* Reference to control ScrollBox1 : N.A.
|
007B397E   8B8604030000           mov     eax, [esi+$0304]

* 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);
|
007B3984   E8BB89EAFF             call    0065C344
007B3989   48                     dec     eax
007B398A   85C0                   test    eax, eax
007B398C   0F8C09010000           jl      007B3A9B
007B3992   40                     inc     eax
007B3993   8945F0                 mov     [ebp-$10], eax
007B3996   33FF                   xor     edi, edi
007B3998   8BD7                   mov     edx, edi

* Reference to control ScrollBox1 : N.A.
|
007B399A   8B8604030000           mov     eax, [esi+$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;
|
007B39A0   E82B80EBFF             call    0066B9D0
007B39A5   8B10                   mov     edx, [eax]

* Possible reference to virtual method TN.A..OFFS_00D0
|
007B39A7   FF92D0000000           call    dword ptr [edx+$00D0]
007B39AD   3C01                   cmp     al, $01
007B39AF   0F85DC000000           jnz     007B3A91
007B39B5   8B4DF4                 mov     ecx, [ebp-$0C]
007B39B8   41                     inc     ecx
007B39B9   8BC1                   mov     eax, ecx
007B39BB   BB03000000             mov     ebx, $00000003
007B39C0   99                     cdq
007B39C1   F7FB                   idiv    ebx 
007B39C3   8945FC                 mov     [ebp-$04], eax
007B39C6   8BC1                   mov     eax, ecx
007B39C8   B903000000             mov     ecx, $00000003
007B39CD   99                     cdq
007B39CE   F7F9                   idiv    ecx 
007B39D0   8955F8                 mov     [ebp-$08], edx
007B39D3   8BCE                   mov     ecx, esi
007B39D5   B201                   mov     dl, $01

* Reference to class TCheckBox
|
007B39D7   A1C0964700             mov     eax, dword ptr [$004796C0]

* Reference to: StdCtrls.TCustomCheckBox.Create(TCustomCheckBox;boolean;TComponent);
|
007B39DC   E8D7BFCCFF             call    0047F9B8
007B39E1   8BD8                   mov     ebx, eax
007B39E3   8BD7                   mov     edx, edi

* Reference to control ScrollBox1 : N.A.
|
007B39E5   8B8604030000           mov     eax, [esi+$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;
|
007B39EB   E8E07FEBFF             call    0066B9D0
007B39F0   8D55E8                 lea     edx, [ebp-$18]

* Reference to : TcxCustomGridTableView._PROC_00629378()
|
007B39F3   E88059E7FF             call    00629378
007B39F8   8B45E8                 mov     eax, [ebp-$18]
007B39FB   8D55EC                 lea     edx, [ebp-$14]

* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
007B39FE   E8E96EC5FF             call    0040A8EC
007B3A03   8B55EC                 mov     edx, [ebp-$14]
007B3A06   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
007B3A08   E8134CCDFF             call    00488620

* Reference to field TCheckBox.Tag : Longint
|
007B3A0D   897B0C                 mov     [ebx+$0C], edi

* Reference to control Label4 : TLabel
|
007B3A10   8B9610030000           mov     edx, [esi+$0310]
007B3A16   8BC3                   mov     eax, ebx
007B3A18   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetParent(TWinControl)
|
007B3A1A   FF5168                 call    dword ptr [ecx+$68]
007B3A1D   B201                   mov     dl, $01
007B3A1F   8BC3                   mov     eax, ebx
007B3A21   8B08                   mov     ecx, [eax]

* Reference to method TCheckBox.SetChecked(Boolean)
|
007B3A23   FF91CC000000           call    dword ptr [ecx+$00CC]
007B3A29   837DF800               cmp     dword ptr [ebp-$08], +$00
007B3A2D   7E15                   jle     007B3A44
007B3A2F   8B45FC                 mov     eax, [ebp-$04]
007B3A32   40                     inc     eax
007B3A33   8BD0                   mov     edx, eax
007B3A35   C1E202                 shl     edx, $02
007B3A38   8D14D2                 lea     edx, [edx+edx*8]
007B3A3B   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetTop(TControl;Integer);
|
007B3A3D   E81A43CDFF             call    00487D5C
007B3A42   EB10                   jmp     007B3A54
007B3A44   8B55FC                 mov     edx, [ebp-$04]
007B3A47   C1E202                 shl     edx, $02
007B3A4A   8D14D2                 lea     edx, [edx+edx*8]
007B3A4D   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetTop(TControl;Integer);
|
007B3A4F   E80843CDFF             call    00487D5C
007B3A54   837DF801               cmp     dword ptr [ebp-$08], +$01
007B3A58   750E                   jnz     007B3A68
007B3A5A   BA1D000000             mov     edx, $0000001D
007B3A5F   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetLeft(TControl;Integer);
|
007B3A61   E8D242CDFF             call    00487D38
007B3A66   EB26                   jmp     007B3A8E
007B3A68   837DF802               cmp     dword ptr [ebp-$08], +$02
007B3A6C   750E                   jnz     007B3A7C
007B3A6E   BAA3000000             mov     edx, $000000A3
007B3A73   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetLeft(TControl;Integer);
|
007B3A75   E8BE42CDFF             call    00487D38
007B3A7A   EB12                   jmp     007B3A8E
007B3A7C   837DF800               cmp     dword ptr [ebp-$08], +$00
007B3A80   750C                   jnz     007B3A8E
007B3A82   BA31010000             mov     edx, $00000131
007B3A87   8BC3                   mov     eax, ebx

* Reference to: Controls.TControl.SetLeft(TControl;Integer);
|
007B3A89   E8AA42CDFF             call    00487D38
007B3A8E   FF45F4                 inc     dword ptr [ebp-$0C]
007B3A91   47                     inc     edi
007B3A92   FF4DF0                 dec     dword ptr [ebp-$10]
007B3A95   0F85FDFEFFFF           jnz     007B3998
007B3A9B   33C0                   xor     eax, eax
007B3A9D   5A                     pop     edx
007B3A9E   59                     pop     ecx
007B3A9F   59                     pop     ecx
007B3AA0   648910                 mov     fs:[eax], edx

****** FINALLY
|
007B3AA3   68BD3A7B00             push    $007B3ABD
007B3AA8   8D45E8                 lea     eax, [ebp-$18]
007B3AAB   BA02000000             mov     edx, $00000002

* Reference to: System.@LStrArrayClr(void;void;Integer);
|
007B3AB0   E89318C5FF             call    00405348
007B3AB5   C3                     ret

*)
end;

end.