1740 lines
65 KiB
ObjectPascal
1740 lines
65 KiB
ObjectPascal
unit U_JYOrderYS;
|
||
|
||
interface
|
||
|
||
uses
|
||
Windows, Messages, SysUtils, Classes, Graphics,
|
||
Controls, Forms, Dialogs, StdCtrls
|
||
type
|
||
TFrmJYOrderYS=class(TForm)
|
||
Panel1: TPanel;
|
||
Label2: TLabel;
|
||
KHName: TEdit;
|
||
Label3: TLabel;
|
||
JFJGMoney: TEdit;
|
||
Panel2: TPanel;
|
||
cxGrid1: TcxGrid;
|
||
cxGridLevel1: TcxGridLevel;
|
||
TV1: TcxGridDBBandedTableView;
|
||
ToolBar1: TToolBar;
|
||
TBClose: TToolButton;
|
||
V1CRTime: TcxGridDBBandedColumn;
|
||
V1SPName: TcxGridDBBandedColumn;
|
||
V1TTQty: TcxGridDBBandedColumn;
|
||
V1Price: TcxGridDBBandedColumn;
|
||
V1PBMoney: TcxGridDBBandedColumn;
|
||
Panel3: TPanel;
|
||
Panel4: TPanel;
|
||
V1KCPBQty: TcxGridDBBandedColumn;
|
||
V1KCPBPS: TcxGridDBBandedColumn;
|
||
DataSource1: TDataSource;
|
||
DataSource2: TDataSource;
|
||
DataSource4: TDataSource;
|
||
DataSource5: TDataSource;
|
||
Order_PB: TClientDataSet;
|
||
Order_RF: TClientDataSet;
|
||
Order_XS: TClientDataSet;
|
||
Order_FYZC: TClientDataSet;
|
||
ADOQuery1: TADOQuery;
|
||
ADOQuery2: TADOQuery;
|
||
ADOQuery4: TADOQuery;
|
||
cxGrid2: TcxGrid;
|
||
TV2: TcxGridDBBandedTableView;
|
||
cxGridDBBandedColumn1: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn2: TcxGridDBBandedColumn;
|
||
V2Column1: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn3: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn4: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn5: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn6: TcxGridDBBandedColumn;
|
||
V2FactoryName: TcxGridDBBandedColumn;
|
||
cxGridLevel2: TcxGridLevel;
|
||
Panel5: TPanel;
|
||
cxGrid5: TcxGrid;
|
||
TV5: TcxGridDBBandedTableView;
|
||
V5CRTime: TcxGridDBBandedColumn;
|
||
V5YFName: TcxGridDBBandedColumn;
|
||
V5RMBMoney: TcxGridDBBandedColumn;
|
||
cxGridLevel5: TcxGridLevel;
|
||
Label1: TLabel;
|
||
ConNo: TEdit;
|
||
cxGrid4: TcxGrid;
|
||
TV4: TcxGridDBBandedTableView;
|
||
cxGridDBBandedColumn15: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn16: TcxGridDBBandedColumn;
|
||
V4P_Spec: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn17: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn18: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn19: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn20: TcxGridDBBandedColumn;
|
||
V4RMBMoney: TcxGridDBBandedColumn;
|
||
V4BZType: TcxGridDBBandedColumn;
|
||
cxGridLevel4: TcxGridLevel;
|
||
cxGrid3: TcxGrid;
|
||
TV3: TcxGridDBBandedTableView;
|
||
cxGridDBBandedColumn8: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn9: TcxGridDBBandedColumn;
|
||
cxGridDBBandedColumn10: TcxGridDBBandedColumn;
|
||
cxGridLevel3: TcxGridLevel;
|
||
DataSource3: TDataSource;
|
||
ADOQuery3: TADOQuery;
|
||
Order_SK: TClientDataSet;
|
||
V5BZType: TcxGridDBBandedColumn;
|
||
V3BZType: TcxGridDBBandedColumn;
|
||
V3Huilv: TcxGridDBBandedColumn;
|
||
Label4: TLabel;
|
||
MaoLMoney: TEdit;
|
||
Label5: TLabel;
|
||
YGMoney: TEdit;
|
||
V1FactoryName: TcxGridDBBandedColumn;
|
||
V5Note: TcxGridDBBandedColumn;
|
||
V4Huilv: TcxGridDBBandedColumn;
|
||
DataSource6: TDataSource;
|
||
ADOQuery5: TADOQuery;
|
||
Order_FL: TClientDataSet;
|
||
cxGrid6: TcxGrid;
|
||
TV6: TcxGridDBBandedTableView;
|
||
V6CRTime: TcxGridDBBandedColumn;
|
||
V6FactoryName: TcxGridDBBandedColumn;
|
||
V6SPName: TcxGridDBBandedColumn;
|
||
V6FLQty: TcxGridDBBandedColumn;
|
||
V6Price: TcxGridDBBandedColumn;
|
||
V6FLMoney: TcxGridDBBandedColumn;
|
||
cxGridLevel6: TcxGridLevel;
|
||
procedure FormClose(Sender : TObject);
|
||
procedure FormDestroy(Sender : TObject);
|
||
procedure FormShow(Sender : TObject);
|
||
procedure TBCloseClick(Sender : TObject);
|
||
procedure _PROC_00840CF6(Sender : TObject);
|
||
procedure _PROC_00841285(Sender : TObject);
|
||
procedure _PROC_008412B4(Sender : TObject);
|
||
procedure _PROC_008412BC(Sender : TObject);
|
||
procedure _PROC_00841322(Sender : TObject);
|
||
private
|
||
{ Private declarations }
|
||
public
|
||
{ Public declarations }
|
||
end ;
|
||
|
||
var
|
||
FrmJYOrderYS: TFrmJYOrderYS;
|
||
|
||
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
|
||
|
||
implementation
|
||
|
||
{$R *.DFM}
|
||
|
||
procedure TFrmJYOrderYS.FormClose(Sender : TObject);
|
||
begin
|
||
(*
|
||
00840FEC C60102 mov byte ptr [ecx], $02
|
||
00840FEF C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS.FormDestroy(Sender : TObject);
|
||
begin
|
||
(*
|
||
00840FF0 33C0 xor eax, eax
|
||
|
||
* Reference to GlobalVar_00895A38
|
||
|
|
||
00840FF2 A3385A8900 mov dword ptr [$00895A38], eax
|
||
00840FF7 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS.FormShow(Sender : TObject);
|
||
begin
|
||
(*
|
||
00840FF8 55 push ebp
|
||
00840FF9 8BEC mov ebp, esp
|
||
00840FFB 33C9 xor ecx, ecx
|
||
00840FFD 51 push ecx
|
||
00840FFE 51 push ecx
|
||
00840FFF 51 push ecx
|
||
00841000 51 push ecx
|
||
00841001 53 push ebx
|
||
00841002 8BD8 mov ebx, eax
|
||
00841004 33C0 xor eax, eax
|
||
00841006 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>9<EFBFBD><39><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
00841007 681E118400 push $0084111E
|
||
|
||
***** TRY
|
||
|
|
||
0084100C 64FF30 push dword ptr fs:[eax]
|
||
0084100F 648920 mov fs:[eax], esp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841012 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control TFrmJYOrderYS.TV1 : TcxGridDBBandedTableView
|
||
|
|
||
00841017 8B9318030000 mov edx, [ebx+$0318]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>2'
|
||
|
|
||
0084101D B84C118400 mov eax, $0084114C
|
||
|
||
|
|
||
00841022 E87D6AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841027 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control TFrmJYOrderYS.TV2 : TcxGridDBBandedTableView
|
||
|
|
||
0084102C 8B9378030000 mov edx, [ebx+$0378]
|
||
|
||
* Possible String Reference to: 'Ⱦ<><C8BE>1'
|
||
|
|
||
00841032 B85C118400 mov eax, $0084115C
|
||
|
||
|
|
||
00841037 E8686AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
0084103C B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control TFrmJYOrderYS.TV3 : TcxGridDBBandedTableView
|
||
|
|
||
00841041 8B93F8030000 mov edx, [ebx+$03F8]
|
||
|
||
* Possible String Reference to: '<27>տ<EFBFBD>1'
|
||
|
|
||
00841047 B86C118400 mov eax, $0084116C
|
||
|
||
|
|
||
0084104C E8536AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841051 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control TFrmJYOrderYS.TV5 : TcxGridDBBandedTableView
|
||
|
|
||
00841056 8B93A8030000 mov edx, [ebx+$03A8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>֧<EFBFBD><D6A7>1'
|
||
|
|
||
0084105C B87C118400 mov eax, $0084117C
|
||
|
||
|
|
||
00841061 E83E6AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841066 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control TFrmJYOrderYS.TV4 : TcxGridDBBandedTableView
|
||
|
|
||
0084106B 8B93C8030000 mov edx, [ebx+$03C8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD>۳<EFBFBD><DBB3><EFBFBD>2'
|
||
|
|
||
00841071 B890118400 mov eax, $00841190
|
||
|
||
|
|
||
00841076 E8296AF7FF call 007B7AA4
|
||
0084107B 8D55FC lea edx, [ebp-$04]
|
||
|
||
* Reference to field TFrmJYOrderYS.OFFS_0474
|
||
|
|
||
0084107E 8B8374040000 mov eax, [ebx+$0474]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
00841084 E86398BCFF call 0040A8EC
|
||
00841089 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to control TFrmJYOrderYS.ConNo : TEdit
|
||
|
|
||
0084108C 8B83C0030000 mov eax, [ebx+$03C0]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
00841092 E88975C4FF call 00488620
|
||
00841097 8D55F8 lea edx, [ebp-$08]
|
||
|
||
* Reference to field TFrmJYOrderYS.OFFS_047C
|
||
|
|
||
0084109A 8B837C040000 mov eax, [ebx+$047C]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410A0 E84798BCFF call 0040A8EC
|
||
008410A5 8B55F8 mov edx, [ebp-$08]
|
||
|
||
* Reference to control TFrmJYOrderYS.KHName : TEdit
|
||
|
|
||
008410A8 8B8300030000 mov eax, [ebx+$0300]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410AE E86D75C4FF call 00488620
|
||
008410B3 8D55F4 lea edx, [ebp-$0C]
|
||
|
||
* Reference to field TFrmJYOrderYS.OFFS_0480
|
||
|
|
||
008410B6 8B8380040000 mov eax, [ebx+$0480]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410BC E82B98BCFF call 0040A8EC
|
||
008410C1 8B55F4 mov edx, [ebp-$0C]
|
||
|
||
* Reference to control TFrmJYOrderYS.MaoLMoney : TEdit
|
||
|
|
||
008410C4 8B8328040000 mov eax, [ebx+$0428]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410CA E85175C4FF call 00488620
|
||
008410CF 8D55F0 lea edx, [ebp-$10]
|
||
|
||
* Reference to field TFrmJYOrderYS.OFFS_0484
|
||
|
|
||
008410D2 8B8384040000 mov eax, [ebx+$0484]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410D8 E80F98BCFF call 0040A8EC
|
||
008410DD 8B55F0 mov edx, [ebp-$10]
|
||
|
||
* Reference to control TFrmJYOrderYS.YGMoney : TEdit
|
||
|
|
||
008410E0 8B8330040000 mov eax, [ebx+$0430]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410E6 E83575C4FF call 00488620
|
||
|
||
* Reference to field TFrmJYOrderYS.OFFS_0488
|
||
|
|
||
008410EB 8B9388040000 mov edx, [ebx+$0488]
|
||
|
||
* Reference to control TFrmJYOrderYS.JFJGMoney : TEdit
|
||
|
|
||
008410F1 8B8308030000 mov eax, [ebx+$0308]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410F7 E82475C4FF call 00488620
|
||
008410FC 8BC3 mov eax, ebx
|
||
|
||
|
|
||
008410FE E805EFFFFF call 00840008
|
||
00841103 33C0 xor eax, eax
|
||
00841105 5A pop edx
|
||
00841106 59 pop ecx
|
||
00841107 59 pop ecx
|
||
00841108 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '[<5B><>]<5D>'
|
||
|
|
||
0084110B 6825118400 push $00841125
|
||
00841110 8D45F0 lea eax, [ebp-$10]
|
||
00841113 BA04000000 mov edx, $00000004
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
00841118 E82B42BCFF call 00405348
|
||
0084111D C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
0084111E E9D139BCFF jmp 00404AF4
|
||
00841123 EBEB jmp 00841110
|
||
|
||
****** END
|
||
|
|
||
00841125 5B pop ebx
|
||
00841126 8BE5 mov esp, ebp
|
||
00841128 5D pop ebp
|
||
00841129 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS.TBCloseClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
0084119C 53 push ebx
|
||
0084119D 8BD8 mov ebx, eax
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
0084119F B91C128400 mov ecx, $0084121C
|
||
|
||
* Reference to control TFrmJYOrderYS.TV1 : TcxGridDBBandedTableView
|
||
|
|
||
008411A4 8B9318030000 mov edx, [ebx+$0318]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>2'
|
||
|
|
||
008411AA B834128400 mov eax, $00841234
|
||
|
||
|
|
||
008411AF E8086BF7FF call 007B7CBC
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
008411B4 B91C128400 mov ecx, $0084121C
|
||
|
||
* Reference to control TFrmJYOrderYS.TV2 : TcxGridDBBandedTableView
|
||
|
|
||
008411B9 8B9378030000 mov edx, [ebx+$0378]
|
||
|
||
* Possible String Reference to: 'Ⱦ<><C8BE>1'
|
||
|
|
||
008411BF B844128400 mov eax, $00841244
|
||
|
||
|
|
||
008411C4 E8F36AF7FF call 007B7CBC
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
008411C9 B91C128400 mov ecx, $0084121C
|
||
|
||
* Reference to control TFrmJYOrderYS.TV3 : TcxGridDBBandedTableView
|
||
|
|
||
008411CE 8B93F8030000 mov edx, [ebx+$03F8]
|
||
|
||
* Possible String Reference to: '<27>տ<EFBFBD>1'
|
||
|
|
||
008411D4 B854128400 mov eax, $00841254
|
||
|
||
|
|
||
008411D9 E8DE6AF7FF call 007B7CBC
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
008411DE B91C128400 mov ecx, $0084121C
|
||
|
||
* Reference to control TFrmJYOrderYS.TV5 : TcxGridDBBandedTableView
|
||
|
|
||
008411E3 8B93A8030000 mov edx, [ebx+$03A8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>֧<EFBFBD><D6A7>1'
|
||
|
|
||
008411E9 B864128400 mov eax, $00841264
|
||
|
||
|
|
||
008411EE E8C96AF7FF call 007B7CBC
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
008411F3 B91C128400 mov ecx, $0084121C
|
||
|
||
* Reference to control TFrmJYOrderYS.TV4 : TcxGridDBBandedTableView
|
||
|
|
||
008411F8 8B93C8030000 mov edx, [ebx+$03C8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD>۳<EFBFBD><DBB3><EFBFBD>2'
|
||
|
|
||
008411FE B878128400 mov eax, $00841278
|
||
|
||
|
|
||
00841203 E8B46AF7FF call 007B7CBC
|
||
00841208 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
||
|
|
||
0084120A E8894DC6FF call 004A5F98
|
||
0084120F 5B pop ebx
|
||
00841210 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS._PROC_00840CF6(Sender : TObject);
|
||
begin
|
||
(*
|
||
00840CF6 53 push ebx
|
||
00840CF7 44 inc esp
|
||
00840CF8 4D dec ebp
|
||
00840CF9 6F outsd
|
||
00840CFA 6E outsb
|
||
00840CFB 65793D jns 00840D3B
|
||
00840CFE 7375 jnb 00840D75
|
||
00840D00 6D insd
|
||
00840D01 28452E sub [ebp+$2E], al
|
||
00840D04 4E dec esi
|
||
00840D05 756D jnz 00840D74
|
||
00840D07 2900 sub dword ptr [eax], eax
|
||
00840D09 0000 add [eax], al
|
||
|
||
00840D0B 00FF add bh, bh
|
||
00840D0D FFFF DB $FF, $FF //
|
||
00840D0F FF13 call dword ptr [ebx]
|
||
00840D11 0000 add [eax], al
|
||
|
||
00840D13 006672 add [esi+$72], ah
|
||
00840D16 6F outsd
|
||
00840D17 6D insd
|
||
00840D18 205946 and [ecx+$46], bl
|
||
00840D1B 5F pop edi
|
||
00840D1C 4D dec ebp
|
||
00840D1D 6F outsd
|
||
00840D1E 6E outsb
|
||
00840D1F 65795F jns 00840D81
|
||
00840D22 43 inc ebx
|
||
00840D23 52 push edx
|
||
00840D24 204120 and [ecx+$20], al
|
||
00840D27 00FF add bh, bh
|
||
00840D29 FFFF DB $FF, $FF //
|
||
00840D2B FF27 jmp dword ptr [edi]
|
||
00840D2D 0000 add [eax], al
|
||
|
||
00840D2F 00696E add [ecx+$6E], ch
|
||
00840D32 6E outsb
|
||
00840D33 657220 jb 00840D56
|
||
00840D36 6A6F push $6F
|
||
00840D38 696E2059465F6C imul ebp, [esi+$20], $6C5F4659
|
||
00840D3F 6F outsd
|
||
00840D40 67204520 and [di+$20], al
|
||
00840D44 6F outsd
|
||
00840D45 6E outsb
|
||
00840D46 20452E and [ebp+$2E], al
|
||
00840D49 4C dec esp
|
||
00840D4A 6973744E6F3D41 imul esi, [ebx+$74], $413D6F4E
|
||
00840D51 2E59 pop ecx
|
||
00840D53 46 inc esi
|
||
00840D54 49 dec ecx
|
||
00840D55 44 inc esp
|
||
00840D56 2000 and [eax], al
|
||
00840D58 FFFF DB $FF, $FF //
|
||
00840D5A FFFF DB $FF, $FF //
|
||
00840D5C 44 inc esp
|
||
00840D5D 0000 add [eax], al
|
||
|
||
00840D5F 00696E add [ecx+$6E], ch
|
||
00840D62 6E outsb
|
||
00840D63 657220 jb 00840D86
|
||
00840D66 6A6F push $6F
|
||
00840D68 696E2059465F4D imul ebp, [esi+$20], $4D5F4659
|
||
00840D6F 6F outsd
|
||
00840D70 6E outsb
|
||
00840D71 65795F jns 00840DD3
|
||
00840D74 43 inc ebx
|
||
00840D75 52 push edx
|
||
00840D76 204220 and [edx+$20], al
|
||
00840D79 6F outsd
|
||
00840D7A 6E outsb
|
||
00840D7B 20422E and [edx+$2E], al
|
||
00840D7E 59 pop ecx
|
||
00840D7F 46 inc esi
|
||
00840D80 49 dec ecx
|
||
00840D81 44 inc esp
|
||
00840D82 3D452E546F cmp eax, $6F542E45
|
||
00840D87 4E dec esi
|
||
00840D88 6F outsd
|
||
00840D89 20616E and [ecx+$6E], ah
|
||
00840D8C 6420422E and fs:[edx+$2E], al
|
||
00840D90 43 inc ebx
|
||
00840D91 52 push edx
|
||
00840D92 54 push esp
|
||
00840D93 7970 jns 00840E05
|
||
00840D95 653D27D3A6CA cmp eax, $CAA6D327
|
||
00840D9B D5 aad
|
||
00840D9C BFEEB5C7BC mov edi, $BCC7B5EE
|
||
00840DA1 C72720000000 mov dword ptr [edi], $00000020
|
||
00840DA7 00FF add bh, bh
|
||
00840DA9 FFFF DB $FF, $FF //
|
||
00840DAB FF10 call dword ptr [eax]
|
||
00840DAD 0000 add [eax], al
|
||
|
||
00840DAF 007768 add [edi+$68], dh
|
||
00840DB2 657265 jb 00840E1A
|
||
00840DB5 20422E and [edx+$2E], al
|
||
00840DB8 4D dec ebp
|
||
00840DB9 61 popa
|
||
00840DBA 696E69643D2700 imul ebp, [esi+$69], $00273D64
|
||
00840DC1 0000 add [eax], al
|
||
|
||
00840DC3 00FF add bh, bh
|
||
00840DC5 FFFF DB $FF, $FF //
|
||
00840DC7 FF1A call [edx]
|
||
00840DC9 0000 add [eax], al
|
||
|
||
00840DCB 0027 add [edi], ah
|
||
00840DCD 20616E and [ecx+$6E], ah
|
||
00840DD0 6420412E and fs:[ecx+$2E], al
|
||
00840DD4 43 inc ebx
|
||
00840DD5 52 push edx
|
||
00840DD6 54 push esp
|
||
00840DD7 7970 jns 00840E49
|
||
00840DD9 653D27CAD5BF cmp eax, $BFD5CA27
|
||
00840DDF EE out dx, al
|
||
00840DE0 B5C7 mov ch, $C7
|
||
00840DE2 BCC7272000 mov esp, $002027C7
|
||
00840DE7 00FF add bh, bh
|
||
00840DE9 FFFF DB $FF, $FF //
|
||
00840DEB FF12 call dword ptr [edx]
|
||
00840DED 0000 add [eax], al
|
||
|
||
00840DEF 0020 add [eax], ah
|
||
00840DF1 61 popa
|
||
00840DF2 6E outsb
|
||
00840DF3 6420412E and fs:[ecx+$2E], al
|
||
00840DF7 7374 jnb 00840E6D
|
||
00840DF9 61 popa
|
||
00840DFA 7475 jz 00840E71
|
||
00840DFC 733C jnb 00840E3A
|
||
00840DFE 3E27 daa
|
||
00840E00 3027 xor [edi], ah
|
||
00840E02 0000 add [eax], al
|
||
|
||
00840E04 FFFF DB $FF, $FF //
|
||
00840E06 FFFF DB $FF, $FF //
|
||
00840E08 2B00 sub eax, dword ptr [eax]
|
||
00840E0A 0000 add [eax], al
|
||
|
||
00840E0C 206772 and [edi+$72], ah
|
||
00840E0F 6F outsd
|
||
00840E10 7570 jnz 00840E82
|
||
00840E12 206279 and [edx+$79], ah
|
||
00840E15 20422E and [edx+$2E], al
|
||
00840E18 43 inc ebx
|
||
00840E19 6F outsd
|
||
00840E1A 6E outsb
|
||
00840E1B 4E dec esi
|
||
00840E1C 6F outsd
|
||
00840E1D 2C41 sub al, $41
|
||
00840E1F 2E43 inc ebx
|
||
00840E21 52 push edx
|
||
00840E22 54 push esp
|
||
00840E23 696D652C412E42 imul ebp, [ebp+$65], $422E412C
|
||
00840E2A 5A pop edx
|
||
00840E2B 54 push esp
|
||
00840E2C 7970 jns 00840E9E
|
||
00840E2E 652C41 sub al, $41
|
||
00840E31 2E48 dec eax
|
||
00840E33 7569 jnz 00840E9E
|
||
00840E35 6C insb
|
||
00840E36 7600 jbe 00840E38
|
||
00840E38 FFFF DB $FF, $FF //
|
||
00840E3A FFFF DB $FF, $FF //
|
||
00840E3C 2900 sub dword ptr [eax], eax
|
||
00840E3E 0000 add [eax], al
|
||
|
||
00840E40 7365 jnb 00840EA7
|
||
00840E42 6C insb
|
||
00840E43 6563742041 arpl gs:[eax+$41], si
|
||
00840E48 2E43 inc ebx
|
||
00840E4A 52 push edx
|
||
00840E4B 54 push esp
|
||
00840E4C 696D652C412E59 imul ebp, [ebp+$65], $592E412C
|
||
00840E53 46 inc esi
|
||
00840E54 4E dec esi
|
||
00840E55 61 popa
|
||
00840E56 6D insd
|
||
00840E57 652C41 sub al, $41
|
||
00840E5A 2E42 inc edx
|
||
00840E5C 5A pop edx
|
||
00840E5D 54 push esp
|
||
00840E5E 7970 jns 00840ED0
|
||
00840E60 652C41 sub al, $41
|
||
00840E63 2E4E dec esi
|
||
00840E65 6F outsd
|
||
00840E66 7465 jz 00840ECD
|
||
00840E68 2000 and [eax], al
|
||
00840E6A 0000 add [eax], al
|
||
|
||
00840E6C FFFF DB $FF, $FF //
|
||
00840E6E FFFF DB $FF, $FF //
|
||
00840E70 1E push ds
|
||
00840E71 0000 add [eax], al
|
||
|
||
00840E73 002C52 add [edx+edx*2], ch
|
||
00840E76 4D dec ebp
|
||
00840E77 42 inc edx
|
||
00840E78 4D dec ebp
|
||
00840E79 6F outsd
|
||
00840E7A 6E outsb
|
||
00840E7B 65793D jns 00840EBB
|
||
00840E7E 53 push ebx
|
||
00840E7F 756D jnz 00840EEE
|
||
00840E81 28412E sub [ecx+$2E], al
|
||
00840E84 4D dec ebp
|
||
00840E85 6F outsd
|
||
00840E86 6E outsb
|
||
00840E87 65792A jns 00840EB4
|
||
00840E8A 41 inc ecx
|
||
00840E8B 2E48 dec eax
|
||
00840E8D 7569 jnz 00840EF8
|
||
00840E8F 6C insb
|
||
00840E90 7629 jbe 00840EBB
|
||
00840E92 0000 add [eax], al
|
||
|
||
00840E94 FFFF DB $FF, $FF //
|
||
00840E96 FFFF DB $FF, $FF //
|
||
00840E98 4E dec esi
|
||
00840E99 0000 add [eax], al
|
||
|
||
00840E9B 0027 add [edi], ah
|
||
00840E9D 20616E and [ecx+$6E], ah
|
||
00840EA0 6420412E and fs:[ecx+$2E], al
|
||
00840EA4 43 inc ebx
|
||
00840EA5 52 push edx
|
||
00840EA6 54 push esp
|
||
00840EA7 7970 jns 00840F19
|
||
00840EA9 6520696E and gs:[ecx+$6E], ch
|
||
00840EAD 2028 and [eax], ch
|
||
00840EAF 27 daa
|
||
00840EB0 D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl
|
||
00840EB6 B5C7 mov ch, $C7
|
||
00840EB8 BCC7272C27 mov esp, $272C27C7
|
||
00840EBD B8B6BFEED4 mov eax, $D4EEBFB6
|
||
00840EC2 D3B7D1272920 DB $D3, $B7, $D1, $27, $29, $20 // dword ptr [edi+$202927D1], cl
|
||
00840EC8 61 popa
|
||
00840EC9 6E outsb
|
||
00840ECA 64206973 and fs:[ecx+$73], ch
|
||
00840ECE 6E outsb
|
||
00840ECF 756C jnz 00840F3D
|
||
00840ED1 6C insb
|
||
00840ED2 28412E sub [ecx+$2E], al
|
||
00840ED5 46 inc esi
|
||
00840ED6 59 pop ecx
|
||
00840ED7 54 push esp
|
||
00840ED8 7970 jns 00840F4A
|
||
00840EDA 652C27 sub al, $27
|
||
00840EDD 27 daa
|
||
00840EDE 293C3E sub dword ptr [esi+edi], edi
|
||
00840EE1 27 daa
|
||
00840EE2 BCD3B9A4B7 mov esp, $B7A4B9D3
|
||
00840EE7 D127 shl dword ptr [edi], 1
|
||
00840EE9 2000 and [eax], al
|
||
00840EEB 00FF add bh, bh
|
||
00840EED FFFF DB $FF, $FF //
|
||
00840EEF FF4500 inc dword ptr [ebp+$00]
|
||
00840EF2 0000 add [eax], al
|
||
|
||
00840EF4 20616E and [ecx+$6E], ah
|
||
00840EF7 64206973 and fs:[ecx+$73], ch
|
||
00840EFB 6E outsb
|
||
00840EFC 756C jnz 00840F6A
|
||
00840EFE 6C insb
|
||
00840EFF 28412E sub [ecx+$2E], al
|
||
00840F02 59 pop ecx
|
||
00840F03 46 inc esi
|
||
00840F04 4E dec esi
|
||
00840F05 61 popa
|
||
00840F06 6D insd
|
||
00840F07 652C27 sub al, $27
|
||
00840F0A 27 daa
|
||
00840F0B 293C3E sub dword ptr [esi+edi], edi
|
||
00840F0E 27 daa
|
||
00840F0F B8A8C1CFB7 mov eax, $B7CFC1A8
|
||
00840F14 D127 shl dword ptr [edi], 1
|
||
00840F16 20616E and [ecx+$6E], ah
|
||
00840F19 64206973 and fs:[ecx+$73], ch
|
||
00840F1D 6E outsb
|
||
00840F1E 756C jnz 00840F8C
|
||
00840F20 6C insb
|
||
00840F21 28412E sub [ecx+$2E], al
|
||
00840F24 46 inc esi
|
||
00840F25 59 pop ecx
|
||
00840F26 54 push esp
|
||
00840F27 7970 jns 00840F99
|
||
00840F29 652C27 sub al, $27
|
||
00840F2C 27 daa
|
||
00840F2D 293C3E sub dword ptr [esi+edi], edi
|
||
00840F30 27 daa
|
||
00840F31 C5F7 lds esi, di
|
||
00840F33 B2BC mov dl, $BC
|
||
00840F35 B7D1 mov bh, $D1
|
||
00840F37 27 daa
|
||
00840F38 2000 and [eax], al
|
||
00840F3A 0000 add [eax], al
|
||
|
||
00840F3C FFFF DB $FF, $FF //
|
||
00840F3E FFFF DB $FF, $FF //
|
||
00840F40 7300 jnb 00840F42
|
||
00840F42 0000 add [eax], al
|
||
|
||
00840F44 20616E and [ecx+$6E], ah
|
||
00840F47 64206973 and fs:[ecx+$73], ch
|
||
00840F4B 6E outsb
|
||
00840F4C 756C jnz 00840FBA
|
||
00840F4E 6C insb
|
||
00840F4F 28412E sub [ecx+$2E], al
|
||
00840F52 59 pop ecx
|
||
00840F53 46 inc esi
|
||
00840F54 4E dec esi
|
||
00840F55 61 popa
|
||
00840F56 6D insd
|
||
00840F57 652C27 sub al, $27
|
||
00840F5A 27 daa
|
||
00840F5B 293C3E sub dword ptr [esi+edi], edi
|
||
00840F5E 27 daa
|
||
00840F5F B2C3 mov dl, $C3
|
||
00840F61 BCF4C8CBB9 mov esp, $B9CBC8F4
|
||
00840F66 A4 movsb
|
||
00840F67 B7D1 mov bh, $D1
|
||
00840F69 27 daa
|
||
00840F6A 20616E and [ecx+$6E], ah
|
||
00840F6D 64206973 and fs:[ecx+$73], ch
|
||
00840F71 6E outsb
|
||
00840F72 756C jnz 00840FE0
|
||
00840F74 6C insb
|
||
00840F75 28412E sub [ecx+$2E], al
|
||
00840F78 59 pop ecx
|
||
00840F79 46 inc esi
|
||
00840F7A 4E dec esi
|
||
00840F7B 61 popa
|
||
00840F7C 6D insd
|
||
00840F7D 652C27 sub al, $27
|
||
00840F80 27 daa
|
||
00840F81 293C3E sub dword ptr [esi+edi], edi
|
||
00840F84 27 daa
|
||
00840F85 B3B5 mov bl, $B5
|
||
00840F87 B9A4C8CBB9 mov ecx, $B9CBC8A4
|
||
00840F8C A4 movsb
|
||
00840F8D B7D1 mov bh, $D1
|
||
00840F8F 27 daa
|
||
00840F90 20616E and [ecx+$6E], ah
|
||
00840F93 64206973 and fs:[ecx+$73], ch
|
||
00840F97 6E outsb
|
||
00840F98 756C jnz 00841006
|
||
00840F9A 6C insb
|
||
00840F9B 28412E sub [ecx+$2E], al
|
||
00840F9E 59 pop ecx
|
||
00840F9F 46 inc esi
|
||
00840FA0 4E dec esi
|
||
00840FA1 61 popa
|
||
00840FA2 6D insd
|
||
00840FA3 652C27 sub al, $27
|
||
00840FA6 27 daa
|
||
00840FA7 293C3E sub dword ptr [esi+edi], edi
|
||
00840FAA 27 daa
|
||
00840FAB B0FC mov al, $FC
|
||
00840FAD D7 xlat
|
||
00840FAE B0C8 mov al, $C8
|
||
00840FB0 CB ret
|
||
|
||
00840FB1 B9A4B7D127 mov ecx, $27D1B7A4
|
||
00840FB6 2000 and [eax], al
|
||
00840FB8 FFFF DB $FF, $FF //
|
||
00840FBA FFFF DB $FF, $FF //
|
||
00840FBC 2B00 sub eax, dword ptr [eax]
|
||
00840FBE 0000 add [eax], al
|
||
|
||
00840FC0 206772 and [edi+$72], ah
|
||
00840FC3 6F outsd
|
||
00840FC4 7570 jnz 00841036
|
||
00840FC6 206279 and [edx+$79], ah
|
||
00840FC9 20412E and [ecx+$2E], al
|
||
00840FCC 43 inc ebx
|
||
00840FCD 52 push edx
|
||
00840FCE 54 push esp
|
||
00840FCF 696D652C412E59 imul ebp, [ebp+$65], $592E412C
|
||
00840FD6 46 inc esi
|
||
00840FD7 4E dec esi
|
||
00840FD8 61 popa
|
||
00840FD9 6D insd
|
||
00840FDA 652C41 sub al, $41
|
||
00840FDD 2E42 inc edx
|
||
00840FDF 5A pop edx
|
||
00840FE0 54 push esp
|
||
00840FE1 7970 jns 00841053
|
||
00840FE3 652C41 sub al, $41
|
||
00840FE6 2E4E dec esi
|
||
00840FE8 6F outsd
|
||
00840FE9 7465 jz 00841050
|
||
00840FEB 00C6 add dh, al
|
||
00840FED 0102 add [edx], eax
|
||
00840FEF C3 ret
|
||
|
||
00840FF0 33C0 xor eax, eax
|
||
|
||
* Reference to GlobalVar_00895A38
|
||
|
|
||
00840FF2 A3385A8900 mov dword ptr [$00895A38], eax
|
||
00840FF7 C3 ret
|
||
|
||
00840FF8 55 push ebp
|
||
00840FF9 8BEC mov ebp, esp
|
||
00840FFB 33C9 xor ecx, ecx
|
||
00840FFD 51 push ecx
|
||
00840FFE 51 push ecx
|
||
00840FFF 51 push ecx
|
||
00841000 51 push ecx
|
||
00841001 53 push ebx
|
||
00841002 8BD8 mov ebx, eax
|
||
00841004 33C0 xor eax, eax
|
||
00841006 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>9<EFBFBD><39><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
00841007 681E118400 push $0084111E
|
||
|
||
***** TRY
|
||
|
|
||
0084100C 64FF30 push dword ptr fs:[eax]
|
||
0084100F 648920 mov fs:[eax], esp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841012 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control Label7 : N.A.
|
||
|
|
||
00841017 8B9318030000 mov edx, [ebx+$0318]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>2'
|
||
|
|
||
0084101D B84C118400 mov eax, $0084114C
|
||
|
||
|
|
||
00841022 E87D6AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841027 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control v1XHNo : N.A.
|
||
|
|
||
0084102C 8B9378030000 mov edx, [ebx+$0378]
|
||
|
||
* Possible String Reference to: 'Ⱦ<><C8BE>1'
|
||
|
|
||
00841032 B85C118400 mov eax, $0084115C
|
||
|
||
|
|
||
00841037 E8686AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
0084103C B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control KHConNo : N.A.
|
||
|
|
||
00841041 8B93F8030000 mov edx, [ebx+$03F8]
|
||
|
||
* Possible String Reference to: '<27>տ<EFBFBD>1'
|
||
|
|
||
00841047 B86C118400 mov eax, $0084116C
|
||
|
||
|
|
||
0084104C E8536AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841051 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control Label17 : N.A.
|
||
|
|
||
00841056 8B93A8030000 mov edx, [ebx+$03A8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>֧<EFBFBD><D6A7>1'
|
||
|
|
||
0084105C B87C118400 mov eax, $0084117C
|
||
|
||
|
|
||
00841061 E83E6AF7FF call 007B7AA4
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD>ո<EFBFBD><D5B8><EFBFBD><EFBFBD><EFBFBD>ϸ'
|
||
|
|
||
00841066 B934118400 mov ecx, $00841134
|
||
|
||
* Reference to control ToolButton3 : N.A.
|
||
|
|
||
0084106B 8B93C8030000 mov edx, [ebx+$03C8]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD>۳<EFBFBD><DBB3><EFBFBD>2'
|
||
|
|
||
00841071 B890118400 mov eax, $00841190
|
||
|
||
|
|
||
00841076 E8296AF7FF call 007B7AA4
|
||
0084107B 8D55FC lea edx, [ebp-$04]
|
||
|
||
* Reference to control Label34 : N.A.
|
||
|
|
||
0084107E 8B8374040000 mov eax, [ebx+$0474]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
00841084 E86398BCFF call 0040A8EC
|
||
00841089 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to control Label21 : N.A.
|
||
|
|
||
0084108C 8B83C0030000 mov eax, [ebx+$03C0]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
00841092 E88975C4FF call 00488620
|
||
00841097 8D55F8 lea edx, [ebp-$08]
|
||
|
||
* Reference to control cxGrid2 : TcxGrid
|
||
|
|
||
0084109A 8B837C040000 mov eax, [ebx+$047C]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410A0 E84798BCFF call 0040A8EC
|
||
008410A5 8B55F8 mov edx, [ebp-$08]
|
||
|
||
* Reference to control TBClose : TToolButton
|
||
|
|
||
008410A8 8B8300030000 mov eax, [ebx+$0300]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410AE E86D75C4FF call 00488620
|
||
008410B3 8D55F4 lea edx, [ebp-$0C]
|
||
|
||
* Reference to control Tv2 : N.A.
|
||
|
|
||
008410B6 8B8380040000 mov eax, [ebx+$0480]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410BC E82B98BCFF call 0040A8EC
|
||
008410C1 8B55F4 mov edx, [ebp-$0C]
|
||
|
||
* Reference to control conDefstr3 : N.A.
|
||
|
|
||
008410C4 8B8328040000 mov eax, [ebx+$0428]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410CA E85175C4FF call 00488620
|
||
008410CF 8D55F0 lea edx, [ebp-$10]
|
||
|
||
* Reference to control cxGridDBColumn1 : N.A.
|
||
|
|
||
008410D2 8B8384040000 mov eax, [ebx+$0484]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
008410D8 E80F98BCFF call 0040A8EC
|
||
008410DD 8B55F0 mov edx, [ebp-$10]
|
||
|
||
* Reference to control conDefstr5 : N.A.
|
||
|
|
||
008410E0 8B8330040000 mov eax, [ebx+$0430]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410E6 E83575C4FF call 00488620
|
||
|
||
* Reference to control cxGridDBColumn18 : N.A.
|
||
|
|
||
008410EB 8B9388040000 mov edx, [ebx+$0488]
|
||
|
||
* Reference to control Label3 : TLabel
|
||
|
|
||
008410F1 8B8308030000 mov eax, [ebx+$0308]
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
008410F7 E82475C4FF call 00488620
|
||
008410FC 8BC3 mov eax, ebx
|
||
|
||
|
|
||
008410FE E805EFFFFF call 00840008
|
||
00841103 33C0 xor eax, eax
|
||
00841105 5A pop edx
|
||
00841106 59 pop ecx
|
||
00841107 59 pop ecx
|
||
00841108 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '[<5B><>]<5D>'
|
||
|
|
||
0084110B 6825118400 push $00841125
|
||
00841110 8D45F0 lea eax, [ebp-$10]
|
||
00841113 BA04000000 mov edx, $00000004
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
00841118 E82B42BCFF call 00405348
|
||
0084111D C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS._PROC_00841285(Sender : TObject);
|
||
begin
|
||
(*
|
||
00841285 8BEC mov ebp, esp
|
||
00841287 33C0 xor eax, eax
|
||
00841289 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>F8<46><38><EFBFBD><EFBFBD>]Ë<><C38B>-<Z<>'
|
||
|
|
||
0084128A 68A9128400 push $008412A9
|
||
|
||
***** TRY
|
||
|
|
||
0084128F 64FF30 push dword ptr fs:[eax]
|
||
00841292 648920 mov fs:[eax], esp
|
||
00841295 FF053C5A8900 inc dword ptr [$00895A3C]
|
||
0084129B 33C0 xor eax, eax
|
||
0084129D 5A pop edx
|
||
0084129E 59 pop ecx
|
||
0084129F 59 pop ecx
|
||
008412A0 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: ']Ë<><C38B>-<Z<>'
|
||
|
|
||
008412A3 68B0128400 push $008412B0
|
||
008412A8 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
008412A9 E94638BCFF jmp 00404AF4
|
||
008412AE EBF8 jmp 008412A8
|
||
|
||
****** END
|
||
|
|
||
008412B0 5D pop ebp
|
||
008412B1 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS._PROC_008412B4(Sender : TObject);
|
||
begin
|
||
(*
|
||
008412B4 832D3C5A890001 sub dword ptr [$00895A3C], +$01
|
||
008412BB C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS._PROC_008412BC(Sender : TObject);
|
||
begin
|
||
(*
|
||
008412BC 0813 or [ebx], dl
|
||
008412BE 8400 test [eax], al
|
||
008412C0 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TFrmJYOrderYS._PROC_00841322(Sender : TObject);
|
||
begin
|
||
(*
|
||
00841322 48 dec eax
|
||
00841323 0050D4 add [eax-$2C], dl
|
||
00841326 42 inc edx
|
||
00841327 0008 add [eax], cl
|
||
00841329 2D4A007CD0 sub eax, $D07C004A
|
||
0084132E 42 inc edx
|
||
0084132F 00F4 add ah, dh
|
||
00841331 6B4A00D0 imul ecx, [edx+$00], $D0
|
||
00841335 1D4A0030F6 sbb eax, $F630004A
|
||
0084133A 48 dec eax
|
||
0084133B 004CFB48 add [ebx+edi*8+$48], cl
|
||
0084133F 0098FA48000C add [eax+$C0048FA], bl
|
||
00841345 7948 jns 0084138F
|
||
00841347 00ACF04800E829 add [eax+esi*8+$29E80048], ch
|
||
0084134E 4A dec edx
|
||
0084134F 00E4 add ah, ah
|
||
00841351 ED in eax, dx
|
||
00841352 48 dec eax
|
||
00841353 00547848 add [eax+edi*2+$48], dl
|
||
00841357 005878 add [eax+$78], bl
|
||
0084135A 48 dec eax
|
||
0084135B 00DC add ah, bl
|
||
0084135D 2A4A00 sub cl, byte ptr [edx+$00]
|
||
00841360 3CA9 cmp al, $A9
|
||
00841362 48 dec eax
|
||
00841363 00C0 add al, al
|
||
00841365 834800D0 or dword ptr [eax+$00], -$30
|
||
00841369 7948 jns 008413B3
|
||
0084136B 004C8548 add [ebp+eax*4+$48], cl
|
||
0084136F 00D0 add al, dl
|
||
00841371 2C4A sub al, $4A
|
||
00841373 009C2B4A008486 add [ebx+ebp+$8684004A], bl
|
||
0084137A 48 dec eax
|
||
0084137B 00482D add [eax+$2D], cl
|
||
0084137E 4A dec edx
|
||
0084137F 00C0 add al, al
|
||
00841381 A9480038EE test eax, $EE380048
|
||
00841386 48 dec eax
|
||
00841387 00F4 add ah, dh
|
||
00841389 EE out dx, al
|
||
0084138A 48 dec eax
|
||
0084138B 00F0 add al, dh
|
||
0084138D E94800D8EE jmp EF5C13DA
|
||
00841392 48 dec eax
|
||
00841393 00D8 add al, bl
|
||
00841395 1B4A00 sbb ecx, [edx+$00]
|
||
00841398 EC in al, dx
|
||
00841399 334A00 xor ecx, [edx+$00]
|
||
0084139C 20C4 and ah, al
|
||
0084139E 48 dec eax
|
||
0084139F 00B0404A0010 add [eax+$10004A40], dh
|
||
008413A5 44 inc esp
|
||
008413A6 4A dec edx
|
||
008413A7 00CC add ah, cl
|
||
008413A9 42 inc edx
|
||
008413AA 4A dec edx
|
||
008413AB 00B8C44800BC add [eax+$BC0048C4], bh
|
||
008413B1 C44800 les ecx, [eax+$00]
|
||
008413B4 48 dec eax
|
||
008413B5 45 inc ebp
|
||
008413B6 4A dec edx
|
||
008413B7 001CC3 add [ebx+eax*8], bl
|
||
008413BA 48 dec eax
|
||
008413BB 0018 add [eax], bl
|
||
008413BD F0 lock
|
||
008413BE 48 dec eax
|
||
008413BF 00444C4A add [esp+ecx*2+$4A], al
|
||
008413C3 000C02 add [edx+eax], cl
|
||
008413C6 49 dec ecx
|
||
008413C7 0094EC48009C64 add [esp+ebp*8+$649C0048], dl
|
||
008413CE 4A dec edx
|
||
008413CF 008C154A003C18 add [ebp+edx+$183C004A], cl
|
||
008413D6 4A dec edx
|
||
008413D7 0038 add [eax], bh
|
||
008413D9 52 push edx
|
||
008413DA 4A dec edx
|
||
008413DB 005C224A add [edx+$4A], bl
|
||
008413DF 00D8 add al, bl
|
||
008413E1 224A00 and cl, byte ptr [edx+$00]
|
||
008413E4 7C68 jl 0084144E
|
||
008413E6 4A dec edx
|
||
008413E7 00941F4A003C60 add [edi+ebx+$603C004A], dl
|
||
008413EE 4A dec edx
|
||
008413EF 001447 add [edi+eax*2], dl
|
||
008413F2 4A dec edx
|
||
008413F3 0034654A00CC2C add [$2CCC004A], dh
|
||
008413FA 4A dec edx
|
||
008413FB 000E add [esi], cl
|
||
008413FD 0000 add [eax], al
|
||
|
||
008413FF 0000 add [eax], al
|
||
|
||
00841401 0002 add [edx], al
|
||
00841403 0000 add [eax], al
|
||
|
||
00841405 0020 add [eax], ah
|
||
00841407 114000 adc [eax+$00], eax
|
||
0084140A 48 dec eax
|
||
0084140B 0300 add eax, [eax]
|
||
0084140D 0020 add [eax], ah
|
||
0084140F 114000 adc [eax+$00], eax
|
||
00841412 4C dec esp
|
||
00841413 0300 add eax, [eax]
|
||
00841415 001400 add [eax+eax], dl
|
||
00841418 3E16 push ss
|
||
0084141A 8400 test [eax], al
|
||
0084141C F8 clc
|
||
0084141D 0200 add al, byte ptr [eax]
|
||
0084141F 0000 add [eax], al
|
||
|
||
00841421 0009 add [ecx], cl
|
||
00841423 4C dec esp
|
||
00841424 69737456696577 imul esi, [ebx+$74], $77656956
|
||
0084142B 31FC xor esp, edi
|
||
0084142D 0200 add al, byte ptr [eax]
|
||
0084142F 0001 add [ecx], al
|
||
00841431 0006 add [esi], al
|
||
00841433 50 push eax
|
||
00841434 61 popa
|
||
00841435 6E outsb
|
||
00841436 656C insb
|
||
00841438 3100 xor [eax], eax
|
||
0084143A 0300 add eax, [eax]
|
||
0084143C 0002 add [edx], al
|
||
0084143E 0008 add [eax], cl
|
||
00841440 46 inc esi
|
||
00841441 696C654E616D6504 imul ebp, [ebp+$4E], $04656D61
|
||
00841449 0300 add eax, [eax]
|
||
0084144B 0002 add [edx], al
|
||
0084144D 0009 add [ecx], cl
|
||
0084144F 637842 arpl [eax+$42], di
|
||
00841452 7574 jnz 008414C8
|
||
00841454 746F jz 008414C5
|
||
00841456 6E outsb
|
||
00841457 3108 xor [eax], ecx
|
||
00841459 0300 add eax, [eax]
|
||
0084145B 0002 add [edx], al
|
||
0084145D 0009 add [ecx], cl
|
||
0084145F 637842 arpl [eax+$42], di
|
||
00841462 7574 jnz 008414D8
|
||
00841464 746F jz 008414D5
|
||
00841466 6E outsb
|
||
00841467 320C03 xor cl, byte ptr [ebx+eax]
|
||
0084146A 0000 add [eax], al
|
||
|
||
0084146C 0200 add al, byte ptr [eax]
|
||
0084146E 096378 or [ebx+$78], esp
|
||
00841471 42 inc edx
|
||
00841472 7574 jnz 008414E8
|
||
00841474 746F jz 008414E5
|
||
00841476 6E outsb
|
||
00841477 3310 xor edx, [eax]
|
||
00841479 0300 add eax, [eax]
|
||
0084147B 0003 add [ebx], al
|
||
0084147D 000B add [ebx], cl
|
||
0084147F 41 inc ecx
|
||
00841480 44 inc esp
|
||
00841481 4F dec edi
|
||
00841482 51 push ecx
|
||
00841483 7565 jnz 008414EA
|
||
00841485 7279 jb 00841500
|
||
00841487 54 push esp
|
||
00841488 6D insd
|
||
00841489 7014 jo 0084149F
|
||
0084148B 0300 add eax, [eax]
|
||
0084148D 0003 add [ebx], al
|
||
0084148F 000B add [ebx], cl
|
||
00841491 41 inc ecx
|
||
00841492 44 inc esp
|
||
00841493 4F dec edi
|
||
00841494 51 push ecx
|
||
00841495 7565 jnz 008414FC
|
||
00841497 7279 jb 00841512
|
||
00841499 43 inc ebx
|
||
0084149A 6D insd
|
||
0084149B 641803 sbb fs:[ebx], al
|
||
0084149E 0000 add [eax], al
|
||
|
||
008414A0 0400 add al, +$00
|
||
008414A2 0A496D or cl, byte ptr [ecx+$6D]
|
||
008414A5 61 popa
|
||
008414A6 67654C dec esp
|
||
008414A9 697374311C0300 imul esi, [ebx+$74], $00031C31
|
||
008414B0 0001 add [ecx], al
|
||
008414B2 0006 add [esi], al
|
||
008414B4 50 push eax
|
||
008414B5 61 popa
|
||
008414B6 6E outsb
|
||
008414B7 656C insb
|
||
008414B9 3220 xor ah, byte ptr [eax]
|
||
008414BB 0300 add eax, [eax]
|
||
008414BD 000500064964 add [$64490600], al
|
||
008414C3 46 inc esi
|
||
008414C4 54 push esp
|
||
008414C5 50 push eax
|
||
008414C6 312403 xor [ebx+eax], esp
|
||
008414C9 0000 add [eax], al
|
||
|
||
008414CB 06 push es
|
||
008414CC 000E add [esi], cl
|
||
008414CE 41 inc ecx
|
||
008414CF 44 inc esp
|
||
008414D0 4F dec edi
|
||
008414D1 43 inc ebx
|
||
008414D2 6F outsd
|
||
008414D3 6E outsb
|
||
008414D4 6E outsb
|
||
008414D5 656374696F arpl gs:[ecx+ebp*2+$6F], si
|
||
008414DA 6E outsb
|
||
008414DB 3128 xor [eax], ebp
|
||
008414DD 0300 add eax, [eax]
|
||
008414DF 0007 add [edi], al
|
||
008414E1 0003 add [ebx], al
|
||
008414E3 54 push esp
|
||
008414E4 7631 jbe 00841517
|
||
008414E6 2C03 sub al, $03
|
||
008414E8 0000 add [eax], al
|
||
|
||
008414EA 0800 or [eax], al
|
||
008414EC 0D63784772 or eax, $72477863
|
||
008414F1 6964314C6576656C imul esp, [ecx+esi+$4C], $6C657665
|
||
008414F9 3130 xor [eax], esi
|
||
008414FB 0300 add eax, [eax]
|
||
008414FD 0009 add [ecx], cl
|
||
008414FF 0007 add [edi], al
|
||
00841501 637847 arpl [eax+$47], di
|
||
00841504 7269 jb 0084156F
|
||
00841506 64313403 xor fs:[ebx+eax], esi
|
||
0084150A 0000 add [eax], al
|
||
|
||
0084150C 0A00 or al, byte ptr [eax]
|
||
0084150E 097631 or [esi+$31], esi
|
||
00841511 43 inc ebx
|
||
00841512 6F outsd
|
||
00841513 6C insb
|
||
00841514 756D jnz 00841583
|
||
00841516 6E outsb
|
||
00841517 3138 xor [eax], edi
|
||
00841519 0300 add eax, [eax]
|
||
0084151B 000A add [edx], cl
|
||
0084151D 0009 add [ecx], cl
|
||
0084151F 7631 jbe 00841552
|
||
00841521 43 inc ebx
|
||
00841522 6F outsd
|
||
00841523 6C insb
|
||
00841524 756D jnz 00841593
|
||
00841526 6E outsb
|
||
00841527 323C03 xor bh, byte ptr [ebx+eax]
|
||
0084152A 0000 add [eax], al
|
||
|
||
0084152C 0A00 or al, byte ptr [eax]
|
||
0084152E 097631 or [esi+$31], esi
|
||
00841531 43 inc ebx
|
||
00841532 6F outsd
|
||
00841533 6C insb
|
||
00841534 756D jnz 008415A3
|
||
00841536 6E outsb
|
||
00841537 334003 xor eax, [eax+$03]
|
||
0084153A 0000 add [eax], al
|
||
|
||
0084153C 0B00 or eax, [eax]
|
||
0084153E 0B446174 or eax, [ecx+$74]
|
||
00841542 61 popa
|
||
00841543 53 push ebx
|
||
00841544 6F outsd
|
||
00841545 7572 jnz 008415B9
|
||
00841547 636531 arpl [ebp+$31], sp
|
||
0084154A 44 inc esp
|
||
0084154B 0300 add eax, [eax]
|
||
0084154D 000A add [edx], cl
|
||
0084154F 0009 add [ecx], cl
|
||
00841551 7631 jbe 00841584
|
||
00841553 43 inc ebx
|
||
00841554 6F outsd
|
||
00841555 6C insb
|
||
00841556 756D jnz 008415C5
|
||
00841558 6E outsb
|
||
00841559 340B xor al, $0B
|
||
0084155B 001500041884 add [$84180400], dl
|
||
00841561 000E add [esi], cl
|
||
00841563 637842 arpl [eax+$42], di
|
||
00841566 7574 jnz 008415DC
|
||
00841568 746F jz 008415D9
|
||
0084156A 6E outsb
|
||
0084156B 33436C xor eax, [ebx+$6C]
|
||
0084156E 69636B12003C18 imul esp, [ebx+$6B], $183C0012
|
||
00841575 8400 test [eax], al
|
||
00841577 0B466F or eax, [esi+$6F]
|
||
0084157A 726D jb 008415E9
|
||
0084157C 44 inc esp
|
||
0084157D 657374 jnb 008415F4
|
||
00841580 726F jb 008415F1
|
||
00841582 7914 jns 00841598
|
||
00841584 00441884 add [eax+ebx-$7C], al
|
||
00841588 000D46696C65 add [$656C6946], cl
|
||
0084158E 4E dec esi
|
||
0084158F 61 popa
|
||
00841590 6D insd
|
||
00841591 6543 inc ebx
|
||
00841593 6C insb
|
||
00841594 69636B11003C1E imul esp, [ebx+$6B], $1E3C0011
|
||
0084159B 8400 test [eax], al
|
||
0084159D 0A466F or al, byte ptr [esi+$6F]
|
||
008415A0 726D jb 0084160F
|
||
008415A2 43 inc ebx
|
||
008415A3 7265 jb 0084160A
|
||
008415A5 61 popa
|
||
008415A6 7465 jz 0084160D
|
||
008415A8 0F00BC DB $0F, $00, $BC //
|
||
008415AB 1E push ds
|
||
008415AC 8400 test [eax], al
|
||
008415AE 08466F or [esi+$6F], al
|
||
008415B1 726D jb 00841620
|
||
008415B3 53 push ebx
|
||
008415B4 686F771800 push $0018776F
|
||
008415B9 F0 lock
|
||
008415BA 1E push ds
|
||
008415BB 8400 test [eax], al
|
||
008415BD 114C6973 adc [ecx+ebp*2+$73], ecx
|
||
008415C1 7456 jz 00841619
|
||
008415C3 6965773144626C imul esp, [ebp+$77], $6C624431
|
||
008415CA 43 inc ebx
|
||
008415CB 6C insb
|
||
008415CC 69636B15007422 imul esp, [ebx+$6B], $22740015
|
||
008415D3 8400 test [eax], al
|
||
008415D5 0E push cs
|
||
008415D6 637842 arpl [eax+$42], di
|
||
008415D9 7574 jnz 0084164F
|
||
008415DB 746F jz 0084164C
|
||
008415DD 6E outsb
|
||
008415DE 31436C xor [ebx+$6C], eax
|
||
008415E1 69636B1500BC23 imul esp, [ebx+$6B], $23BC0015
|
||
008415E8 8400 test [eax], al
|
||
008415EA 0E push cs
|
||
008415EB 637842 arpl [eax+$42], di
|
||
008415EE 7574 jnz 00841664
|
||
008415F0 746F jz 00841661
|
||
008415F2 6E outsb
|
||
008415F3 32436C xor al, byte ptr [ebx+$6C]
|
||
008415F6 69636B1000B825 imul esp, [ebx+$6B], $25B80010
|
||
008415FD 8400 test [eax], al
|
||
008415FF 09466F or [esi+$6F], eax
|
||
00841602 726D jb 00841671
|
||
00841604 43 inc ebx
|
||
00841605 6C insb
|
||
00841606 6F outsd
|
||
00841607 7365 jnb 0084166E
|
||
00841609 1500CC2584 adc eax, $8425CC00
|
||
0084160E 000E add [esi], cl
|
||
00841610 50 push eax
|
||
00841611 61 popa
|
||
00841612 6E outsb
|
||
00841613 656C insb
|
||
00841615 3244626C xor al, byte ptr [edx+$6C]
|
||
00841619 43 inc ebx
|
||
0084161A 6C insb
|
||
0084161B 69636B1200DC25 imul esp, [ebx+$6B], $25DC0012
|
||
00841622 8400 test [eax], al
|
||
00841624 0B547631 or edx, [esi+esi*2+$31]
|
||
00841628 44 inc esp
|
||
00841629 626C436C bound ebp, qword ptr [ebx+eax*2+$6C]
|
||
0084162D 69636B0D546672 imul esp, [ebx+$6B], $7266540D
|
||
00841634 6D insd
|
||
00841635 46 inc esi
|
||
00841636 6A4C push $4C
|
||
00841638 6973745F525A0C imul esi, [ebx+$74], $0C5A525F
|
||
0084163F 007C7845 add [eax+edi*2+$45], bh
|
||
00841643 0020 add [eax], ah
|
||
00841645 42 inc edx
|
||
00841646 44 inc esp
|
||
00841647 00EC add ah, ch
|
||
00841649 E55B in eax, $5B
|
||
0084164B 00B8124D00F4 add [eax+$F4004D12], bh
|
||
00841651 4B dec ebx
|
||
00841652 48 dec eax
|
||
00841653 008C9C7C00D8EA add [esp+ebx*4+$EAD8007C], cl
|
||
0084165A 4C dec esp
|
||
0084165B 00F4 add ah, dh
|
||
0084165D B466 mov ah, $66
|
||
0084165F 00A40E64000016 add [esi+ecx+$16000064], ah
|
||
00841666 6300 arpl [eax], ax
|
||
00841668 34B1 xor al, $B1
|
||
0084166A 660008 add [eax], cl
|
||
0084166D 7F4B jnle 008416BA
|
||
0084166F 00741684 add [esi+edx-$7C], dh
|
||
00841673 0007 add [edi], al
|
||
00841675 0D5466726D or eax, $6D726654
|
||
0084167A 46 inc esi
|
||
0084167B 6A4C push $4C
|
||
0084167D 6973745F525A08 imul esi, [ebx+$74], $085A525F
|
||
00841684 138400D0F24900 adc eax, [eax+eax+$49F2D0]
|
||
0084168B 5E pop esi
|
||
0084168C 000B add [ebx], cl
|
||
0084168E 55 push ebp
|
||
0084168F 5F pop edi
|
||
00841690 46 inc esi
|
||
00841691 6A4C push $4C
|
||
00841693 6973745F525A00 imul esi, [ebx+$74], $005A525F
|
||
0084169A 0090558BEC33 add [eax+$33EC8B55], dl
|
||
008416A0 C9 leave
|
||
008416A1 51 push ecx
|
||
008416A2 51 push ecx
|
||
008416A3 51 push ecx
|
||
008416A4 51 push ecx
|
||
008416A5 51 push ecx
|
||
008416A6 51 push ecx
|
||
008416A7 53 push ebx
|
||
008416A8 56 push esi
|
||
008416A9 57 push edi
|
||
008416AA 8BF0 mov esi, eax
|
||
008416AC 33C0 xor eax, eax
|
||
008416AE 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>B3<42><33><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
||
|
|
||
008416AF 68AD178400 push $008417AD
|
||
|
||
***** TRY
|
||
|
|
||
008416B4 64FF30 push dword ptr fs:[eax]
|
||
008416B7 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control ToolBar1 : TToolBar
|
||
|
|
||
008416BA 8B86F8020000 mov eax, [esi+$02F8]
|
||
|
||
* Reference to field TToolBar.Wrapable : Boolean
|
||
|
|
||
008416C0 8B802C020000 mov eax, [eax+$022C]
|
||
|
||
* Reference to: ComCtrls.TListItems.Clear(TListItems);
|
||
|
|
||
008416C6 E85567C2FF call 00467E20
|
||
008416CB 33C0 xor eax, eax
|
||
008416CD 55 push ebp
|
||
008416CE 6888178400 push $00841788
|
||
|
||
***** TRY
|
||
|
|
||
008416D3 64FF30 push dword ptr fs:[eax]
|
||
008416D6 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control Label4 : TLabel
|
||
|
|
||
008416D9 8B9E10030000 mov ebx, [esi+$0310]
|
||
008416DF 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
008416E1 E8EE41C8FF call 004C58D4
|
||
008416E6 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|
||
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
||
|
|
||
008416E8 E8BFC8C9FF call 004DDFAC
|
||
008416ED 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TLabel.GetClientRect()
|
||
|
|
||
008416EF FF5244 call dword ptr [edx+$44]
|
||
008416F2 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|
||
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
||
|
|
||
008416F4 E8B3C8C9FF call 004DDFAC
|
||
|
||
* Possible String Reference to: 'select * from TP_File '
|
||
|
|
||
008416F9 BAC4178400 mov edx, $008417C4
|
||
008416FE 8B08 mov ecx, [eax]
|
||
|
||
* Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer)
|
||
|
|
||
00841700 FF5138 call dword ptr [ecx+$38]
|
||
00841703 8D55F4 lea edx, [ebp-$0C]
|
||
|
||
* Reference to control Order_Sub : N.A.
|
||
|
|
||
00841706 8B8648030000 mov eax, [esi+$0348]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
0084170C E8DB91BCFF call 0040A8EC
|
||
00841711 8B45F4 mov eax, [ebp-$0C]
|
||
00841714 8D55F8 lea edx, [ebp-$08]
|
||
|
||
* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
||
|
|
||
00841717 E8D892BCFF call 0040A9F4
|
||
0084171C 8B4DF8 mov ecx, [ebp-$08]
|
||
0084171F 8D45FC lea eax, [ebp-$04]
|
||
|
||
* Possible String Reference to: 'where WBID='
|
||
|
|
||
00841722 BAE4178400 mov edx, $008417E4
|
||
|
||
* Reference to: System.@LStrCat3;
|
||
|
|
||
00841727 E8143FBCFF call 00405640
|
||
0084172C 8B45FC mov eax, [ebp-$04]
|
||
0084172F 50 push eax
|
||
00841730 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|
||
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
||
|
|
||
00841732 E875C8C9FF call 004DDFAC
|
||
00841737 5A pop edx
|
||
00841738 8B08 mov ecx, [eax]
|
||
|
||
* Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer)
|
||
|
|
||
0084173A FF5138 call dword ptr [ecx+$38]
|
||
0084173D 8D55E8 lea edx, [ebp-$18]
|
||
|
||
* Reference to control ADOQuery1 : TADOQuery
|
||
|
|
||
00841740 8B864C030000 mov eax, [esi+$034C]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
00841746 E8A191BCFF call 0040A8EC
|
||
0084174B 8B45E8 mov eax, [ebp-$18]
|
||
0084174E 8D55EC lea edx, [ebp-$14]
|
||
|
||
* Reference to: SysUtils.QuotedStr(AnsiString):AnsiString;
|
||
|
|
||
00841751 E89E92BCFF call 0040A9F4
|
||
00841756 8B4DEC mov ecx, [ebp-$14]
|
||
00841759 8D45F0 lea eax, [ebp-$10]
|
||
|
||
* Possible String Reference to: 'and TFType='
|
||
|
|
||
0084175C BAF8178400 mov edx, $008417F8
|
||
|
||
* Reference to: System.@LStrCat3;
|
||
|
|
||
00841761 E8DA3EBCFF call 00405640
|
||
00841766 8B45F0 mov eax, [ebp-$10]
|
||
00841769 50 push eax
|
||
0084176A 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|
||
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
||
|
|
||
0084176C E83BC8C9FF call 004DDFAC
|
||
00841771 5A pop edx
|
||
00841772 8B08 mov ecx, [eax]
|
||
|
||
* Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer)
|
||
|
|
||
00841774 FF5138 call dword ptr [ecx+$38]
|
||
00841777 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
00841779 E84A41C8FF call 004C58C8
|
||
0084177E 33C0 xor eax, eax
|
||
00841780 5A pop edx
|
||
00841781 59 pop ecx
|
||
00841782 59 pop ecx
|
||
00841783 648910 mov fs:[eax], edx
|
||
00841786 EB0A jmp 00841792
|
||
|
||
* Reference to: System.@HandleAnyException;
|
||
|
|
||
00841788 E9B330BCFF jmp 00404840
|
||
|
||
* Reference to: System.@DoneExcept;
|
||
|
|
||
0084178D E8DA34BCFF call 00404C6C
|
||
|
||
****** END
|
||
|
|
||
00841792 33C0 xor eax, eax
|
||
00841794 5A pop edx
|
||
00841795 59 pop ecx
|
||
00841796 59 pop ecx
|
||
00841797 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '_^[<5B><>]<5D>'
|
||
|
|
||
0084179A 68B4178400 push $008417B4
|
||
0084179F 8D45E8 lea eax, [ebp-$18]
|
||
008417A2 BA06000000 mov edx, $00000006
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
008417A7 E89C3BBCFF call 00405348
|
||
008417AC C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
end. |