D7myChuangpin/YSYF/U_YSCRPB_QT.pas
“ddf” ece69a5ac1 1
2024-07-23 20:18:14 +08:00

11970 lines
468 KiB
ObjectPascal
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

unit U_YSCRPB_QT;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmYSCRPB_QT=class(TForm)
ToolBar1: TToolBar;
TBRafresh: TToolButton;
TBDel: TToolButton;
TBClose: TToolButton;
ADOQueryTemp: TADOQuery;
ADOQueryCmd: TADOQuery;
Panel1: TPanel;
ToolButton2: TToolButton;
Label1: TLabel;
YFName: TEdit;
ADOQueryMain: TADOQuery;
ToolButton1: TToolButton;
RM1: TRMGridReport;
RMDB_Main: TRMDBDataSet;
cxGrid2: TcxGrid;
Tv2: TcxGridDBTableView;
cxGridDBColumn1: TcxGridDBColumn;
cxGridDBColumn3: TcxGridDBColumn;
cxGridLevel1: TcxGridLevel;
Label2: TLabel;
Label6: TLabel;
begdate: TDateTimePicker;
Enddate: TDateTimePicker;
cxGridPopupMenu2: TcxGridPopupMenu;
DS_HZ: TDataSource;
CDS_HZ: TClientDataSet;
ToolButton3: TToolButton;
VBZ: TcxGridDBColumn;
VMoney: TcxGridDBColumn;
v2Column6: TcxGridDBColumn;
VOrderNo: TcxGridDBColumn;
v2Note: TcxGridDBColumn;
v2Column5: TcxGridDBColumn;
Label7: TLabel;
Edit1: TEdit;
Button1: TToolButton;
CheckBox1: TCheckBox;
OrderNo: TEdit;
Label8: TLabel;
Tchk: TToolButton;
Tnochk: TToolButton;
cxTabControl1: TcxTabControl;
v2ComTaitou: TcxGridDBColumn;
TZDSC: TToolButton;
v2ConNo: TcxGridDBColumn;
Label11: TLabel;
Label13: TLabel;
Label4: TLabel;
ConNo: TEdit;
Label5: TLabel;
chknote: TEdit;
ADOQuery1: TADOQuery;
Label3: TLabel;
ComTaitou: TEdit;
Label9: TLabel;
FactoryName: TEdit;
v2chknote: TcxGridDBColumn;
v2Huilv: TcxGridDBColumn;
TYJTH: TToolButton;
v2Price: TcxGridDBColumn;
v2Qty: TcxGridDBColumn;
v2QtyUnit: TcxGridDBColumn;
TZD: TToolButton;
v2PayMent: TcxGridDBColumn;
Label10: TLabel;
PayMent: TEdit;
procedure FormDestroy(Sender : TObject);
procedure FormClose(Sender : TObject);
procedure TBCloseClick(Sender : TObject);
procedure TBDelClick(Sender : TObject);
procedure FormShow(Sender : TObject);
procedure TBRafreshClick(Sender : TObject);
procedure ToolButton2Click(Sender : TObject);
procedure ComTaitouChange(Sender : TObject);
procedure Button2Click(Sender : TObject);
procedure cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject);
procedure cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject);
procedure cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject);
procedure ToolButton3Click(Sender : TObject);
procedure cxGridDBColumn3PropertiesButtonClick(Sender : TObject);
procedure cxGridDBColumn6PropertiesButtonClick(Sender : TObject);
procedure v2Column3PropertiesButtonClick(Sender : TObject);
procedure ToolButton1Click(Sender : TObject);
procedure v2Column7PropertiesButtonClick(Sender : TObject);
procedure v2PSPropertiesEditValueChanged(Sender : TObject);
procedure v2Column2PropertiesEditValueChanged(Sender : TObject);
procedure v2KPMoneyPropertiesEditValueChanged(Sender : TObject);
procedure Button1Click(Sender : TObject);
procedure CheckBox1Click(Sender : TObject);
procedure cxTabControl1Change(Sender : TObject);
procedure FormCreate(Sender : TObject);
procedure TchkClick(Sender : TObject);
procedure TnochkClick(Sender : TObject);
procedure v2ComTaitouPropertiesButtonClick(Sender : TObject);
procedure VBZPropertiesButtonClick(Sender : TObject);
procedure v2Column4PropertiesButtonClick(Sender : TObject);
procedure v2Column5PropertiesChange(Sender : TObject);
procedure v2ConNoHZPropertiesButtonClick(Sender : TObject);
procedure v2GYSNamePropertiesButtonClick(Sender : TObject);
procedure v2Column6PropertiesButtonClick(Sender : TObject);
procedure ConNoKeyPress(Sender : TObject);
procedure OrderNoKeyPress(Sender : TObject);
procedure Tv2StylesGetContentStyle(Sender : TObject);
procedure TZDSCClick(Sender : TObject);
procedure ToolButton4Click(Sender : TObject);
procedure TYJTHClick(Sender : TObject);
procedure v2QtyUnitPropertiesButtonClick(Sender : TObject);
procedure v2QtyPropertiesEditValueChanged(Sender : TObject);
procedure TZDClick(Sender : TObject);
procedure v2PayMentPropertiesButtonClick(Sender : TObject);
procedure _PROC_0085A315(Sender : TObject);
procedure _PROC_0085A539(Sender : TObject);
procedure _PROC_0085A5D1(Sender : TObject);
procedure _PROC_0085AE01(Sender : TObject);
procedure _PROC_0085B901(Sender : TObject);
procedure _PROC_0085BD51(Sender : TObject);
procedure _PROC_0085C6BD(Sender : TObject);
procedure _PROC_0085C9F9(Sender : TObject);
procedure _PROC_0085D30D(Sender : TObject);
procedure _PROC_0085D62A(Sender : TObject);
procedure _PROC_0085D660(Sender : TObject);
procedure _PROC_0085D66D(Sender : TObject);
procedure _PROC_0085D9C9(Sender : TObject);
procedure _PROC_0085E1D1(Sender : TObject);
procedure _PROC_0085E4F9(Sender : TObject);
procedure _PROC_0085E779(Sender : TObject);
procedure _PROC_0085EB9D(Sender : TObject);
procedure _PROC_0085FB19(Sender : TObject);
procedure _PROC_0085FE51(Sender : TObject);
procedure _PROC_008601A5(Sender : TObject);
procedure _PROC_008605BD(Sender : TObject);
procedure _PROC_0086088D(Sender : TObject);
procedure _PROC_00860B09(Sender : TObject);
procedure _PROC_00860CE5(Sender : TObject);
procedure _PROC_00860D7D(Sender : TObject);
procedure _PROC_008610B5(Sender : TObject);
procedure _PROC_0086114D(Sender : TObject);
procedure _PROC_008623F4(Sender : TObject);
procedure _PROC_00862425(Sender : TObject);
procedure _PROC_008627A9(Sender : TObject);
procedure _PROC_00862B65(Sender : TObject);
procedure _PROC_00862CA6(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmYSCRPB_QT: TfrmYSCRPB_QT;
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmYSCRPB_QT.FormDestroy(Sender : TObject);
begin
(*
0085A790 33C0 xor eax, eax
* Reference to GlobalVar_00895A9C
|
0085A792 A39C5A8900 mov dword ptr [$00895A9C], eax
0085A797 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.FormClose(Sender : TObject);
begin
(*
0085A798 C60102 mov byte ptr [ecx], $02
0085A79B C3 ret
*)
end;
procedure TfrmYSCRPB_QT.TBCloseClick(Sender : TObject);
begin
(*
0085A79C 53 push ebx
0085A79D 8BD8 mov ebx, eax
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0085A79F B9C8A78500 mov ecx, $0085A7C8
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085A7A4 8B9334030000 mov edx, [ebx+$0334]
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>Ǽ<EFBFBD>4'
|
0085A7AA B8DCA78500 mov eax, $0085A7DC
|
0085A7AF E8ECD3F5FF call 007B7BA0
0085A7B4 8BC3 mov eax, ebx
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
0085A7B6 E8DDB7C4FF call 004A5F98
0085A7BB 5B pop ebx
0085A7BC C3 ret
*)
end;
procedure TfrmYSCRPB_QT.TBDelClick(Sender : TObject);
begin
(*
0085A7E8 55 push ebp
0085A7E9 8BEC mov ebp, esp
0085A7EB 33C9 xor ecx, ecx
0085A7ED 51 push ecx
0085A7EE 51 push ecx
0085A7EF 51 push ecx
0085A7F0 51 push ecx
0085A7F1 51 push ecx
0085A7F2 51 push ecx
0085A7F3 51 push ecx
0085A7F4 51 push ecx
0085A7F5 53 push ebx
0085A7F6 56 push esi
0085A7F7 57 push edi
0085A7F8 8945FC mov [ebp-$04], eax
0085A7FB 33C0 xor eax, eax
0085A7FD 55 push ebp
0085A7FE 68EFA98500 push $0085A9EF
***** TRY
|
0085A803 64FF30 push dword ptr fs:[eax]
0085A806 648920 mov fs:[eax], esp
0085A809 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085A80C 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085A812 E8A9D6C6FF call 004C7EC0
0085A817 84C0 test al, al
0085A819 0F85AD010000 jnz 0085A9CC
0085A81F A000AA8500 mov al, byte ptr [$0085AA00]
0085A824 50 push eax
0085A825 8D45EC lea eax, [ebp-$14]
0085A828 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085A82A E835E5BBFF call 00418D64
0085A82F 8D4DEC lea ecx, [ebp-$14]
0085A832 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085A835 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0085A83B BA0CAA8500 mov edx, $0085AA0C
0085A840 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0085A842 FF9344020000 call dword ptr [ebx+$0244]
0085A848 84C0 test al, al
0085A84A 751D jnz 0085A869
0085A84C 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085A84E B914AA8500 mov ecx, $0085AA14
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0085A853 BA1CAA8500 mov edx, $0085AA1C
*)
end;
procedure TfrmYSCRPB_QT.FormShow(Sender : TObject);
begin
(*
0085AA9C 53 push ebx
0085AA9D 8BD8 mov ebx, eax
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0085AA9F B974AB8500 mov ecx, $0085AB74
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085AAA4 8B9334030000 mov edx, [ebx+$0334]
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>Ǽ<EFBFBD>4'
|
0085AAAA B888AB8500 mov eax, $0085AB88
|
0085AAAF E8F0CEF5FF call 007B79A4
* Reference to control TfrmYSCRPB_QT.ADOQueryTemp : TADOQuery
|
0085AAB4 8B8308030000 mov eax, [ebx+$0308]
|
0085AABA E8C99EF5FF call 007B4988
0085AABF 83C4F8 add esp, -$08
0085AAC2 DD1C24 fstp qword ptr [esp]
0085AAC5 9B wait
* Reference to control TfrmYSCRPB_QT.Enddate : TDateTimePicker
|
0085AAC6 8B8350030000 mov eax, [ebx+$0350]
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
0085AACC E85B77C1FF call 0047222C
* Reference to control TfrmYSCRPB_QT.ADOQueryTemp : TADOQuery
|
0085AAD1 8B8308030000 mov eax, [ebx+$0308]
|
0085AAD7 E8AC9EF5FF call 007B4988
0085AADC D82594AB8500 fsub dword ptr [$0085AB94]
0085AAE2 83C4F8 add esp, -$08
0085AAE5 DD1C24 fstp qword ptr [esp]
0085AAE8 9B wait
* Reference to control TfrmYSCRPB_QT.begdate : TDateTimePicker
|
0085AAE9 8B834C030000 mov eax, [ebx+$034C]
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
0085AAEF E83877C1FF call 0047222C
* Reference to field TfrmYSCRPB_QT.OFFS_0410
|
0085AAF4 8B8310040000 mov eax, [ebx+$0410]
* Possible String Reference to: '<27>鿴'
|
0085AAFA BAA0AB8500 mov edx, $0085ABA0
* Reference to: System.@LStrCmp;
|
0085AAFF E83CACBAFF call 00405740
0085AB04 752E jnz 0085AB34
0085AB06 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QT.ToolButton3 : TToolButton
|
0085AB08 8B8360030000 mov eax, [ebx+$0360]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0085AB0E E8FDD9C2FF call 00488510
0085AB13 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QT.TBDel : TToolButton
|
0085AB15 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0085AB1B E8F0D9C2FF call 00488510
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085AB20 8B8334030000 mov eax, [ebx+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085AB26 E86D18E0FF call 0065C398
0085AB2B 33D2 xor edx, edx
* Reference to : TcxCustomGridTableView._PROC_0062C720()
|
0085AB2D E8EE1BDDFF call 0062C720
0085AB32 EB2C jmp 0085AB60
0085AB34 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QT.ToolButton3 : TToolButton
|
0085AB36 8B8360030000 mov eax, [ebx+$0360]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0085AB3C E8CFD9C2FF call 00488510
0085AB41 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QT.TBDel : TToolButton
|
0085AB43 8B8300030000 mov eax, [ebx+$0300]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0085AB49 E8C2D9C2FF call 00488510
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085AB4E 8B8334030000 mov eax, [ebx+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085AB54 E83F18E0FF call 0065C398
0085AB59 B201 mov dl, $01
* Reference to : TcxCustomGridTableView._PROC_0062C720()
|
0085AB5B E8C01BDDFF call 0062C720
0085AB60 8BC3 mov eax, ebx
|
0085AB62 E8ADF7FFFF call 0085A314
0085AB67 5B pop ebx
0085AB68 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.TBRafreshClick(Sender : TObject);
begin
(*
0085ABA8 53 push ebx
0085ABA9 8BD8 mov ebx, eax
* Reference to control TfrmYSCRPB_QT.begdate : TDateTimePicker
|
0085ABAB 8B834C030000 mov eax, [ebx+$034C]
0085ABB1 8B10 mov edx, [eax]
* Reference to method TDateTimePicker.SetFocus()
|
0085ABB3 FF92C4000000 call dword ptr [edx+$00C4]
0085ABB9 8BC3 mov eax, ebx
|
0085ABBB E854F7FFFF call 0085A314
0085ABC0 5B pop ebx
0085ABC1 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.ToolButton2Click(Sender : TObject);
begin
(*
0085ABC4 55 push ebp
0085ABC5 8BEC mov ebp, esp
0085ABC7 6A00 push $00
0085ABC9 53 push ebx
0085ABCA 8BD8 mov ebx, eax
0085ABCC 33C0 xor eax, eax
0085ABCE 55 push ebp
* Possible String Reference to: '闞<><E9979E><EFBFBD><EFBFBD>[Y]<5D>'
|
0085ABCF 6858AC8500 push $0085AC58
***** TRY
|
0085ABD4 64FF30 push dword ptr fs:[eax]
0085ABD7 648920 mov fs:[eax], esp
0085ABDA BA6CAC8500 mov edx, $0085AC6C
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
0085ABDF 8B83B0030000 mov eax, [ebx+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0085ABE5 E836DAC2FF call 00488620
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085ABEA 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.GetActive(TDataSet):Boolean;
|
0085ABF0 E81FAEC6FF call 004C5A14
0085ABF5 84C0 test al, al
0085ABF7 7449 jz 0085AC42
0085ABF9 8D45FC lea eax, [ebp-$04]
0085ABFC 50 push eax
0085ABFD B902000000 mov ecx, $00000002
0085AC02 BA01000000 mov edx, $00000001
* Reference to control TfrmYSCRPB_QT.Panel1 : TPanel
|
0085AC07 8B8310030000 mov eax, [ebx+$0310]
|
0085AC0D E89EB4F5FF call 007B60B0
0085AC12 8B55FC mov edx, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085AC15 8B8320030000 mov eax, [ebx+$0320]
|
0085AC1B E8A8C0F5FF call 007B6CC8
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085AC20 8B935C030000 mov edx, [ebx+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085AC26 8B8320030000 mov eax, [ebx+$0320]
|
0085AC2C E85FC2F5FF call 007B6E90
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085AC31 8B935C030000 mov edx, [ebx+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085AC37 8B8320030000 mov eax, [ebx+$0320]
|
0085AC3D E8D6C3F5FF call 007B7018
0085AC42 33C0 xor eax, eax
0085AC44 5A pop edx
0085AC45 59 pop ecx
0085AC46 59 pop ecx
0085AC47 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]<5D>'
|
0085AC4A 685FAC8500 push $0085AC5F
0085AC4F 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
0085AC52 E8CDA6BAFF call 00405324
0085AC57 C3 ret
* Reference to: System.@HandleFinally;
|
0085AC58 E9979EBAFF jmp 00404AF4
0085AC5D EBF0 jmp 0085AC4F
****** END
|
0085AC5F 5B pop ebx
0085AC60 59 pop ecx
0085AC61 5D pop ebp
0085AC62 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.ComTaitouChange(Sender : TObject);
begin
(*
0085AC70 56 push esi
* Reference to control TfrmYSCRPB_QT.ToolButton2 : TToolButton
|
0085AC71 8B8014030000 mov eax, [eax+$0314]
0085AC77 66BEEBFF mov si, $FFEB
* Reference to: System.@CallDynaInst;
|
0085AC7B E8D498BAFF call 00404554
0085AC80 5E pop esi
0085AC81 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.Button2Click(Sender : TObject);
begin
(*
0085AC84 55 push ebp
0085AC85 8BEC mov ebp, esp
0085AC87 33C9 xor ecx, ecx
0085AC89 51 push ecx
0085AC8A 51 push ecx
0085AC8B 51 push ecx
0085AC8C 51 push ecx
0085AC8D 51 push ecx
0085AC8E 53 push ebx
0085AC8F 56 push esi
0085AC90 8BD8 mov ebx, eax
0085AC92 33C0 xor eax, eax
0085AC94 55 push ebp
* Possible String Reference to: '<27>^<5E><><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085AC95 6891AD8500 push $0085AD91
***** TRY
|
0085AC9A 64FF30 push dword ptr fs:[eax]
0085AC9D 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085ACA0 8B835C030000 mov eax, [ebx+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085ACA6 E815D2C6FF call 004C7EC0
0085ACAB 84C0 test al, al
0085ACAD 0F85C3000000 jnz 0085AD76
0085ACB3 6A24 push $24
* Possible String Reference to: '<27><>ʾ'
|
0085ACB5 B9A0AD8500 mov ecx, $0085ADA0
* Possible String Reference to: 'ȷ<><C8B7>Ҫɾ<D2AA><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0085ACBA BAA8AD8500 mov edx, $0085ADA8
*)
end;
procedure TfrmYSCRPB_QT.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject);
begin
(*
0085BB2C 55 push ebp
0085BB2D 8BEC mov ebp, esp
0085BB2F B908000000 mov ecx, $00000008
0085BB34 6A00 push $00
0085BB36 6A00 push $00
0085BB38 49 dec ecx
0085BB39 75F9 jnz 0085BB34
0085BB3B 51 push ecx
0085BB3C 53 push ebx
0085BB3D 56 push esi
0085BB3E 8BDA mov ebx, edx
0085BB40 8BF0 mov esi, eax
0085BB42 33C0 xor eax, eax
0085BB44 55 push ebp
* Possible String Reference to: '鵍<><E9B58D><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085BB45 683ABD8500 push $0085BD3A
***** TRY
|
0085BB4A 64FF30 push dword ptr fs:[eax]
0085BB4D 648920 mov fs:[eax], esp
0085BB50 8D55FC lea edx, [ebp-$04]
0085BB53 8BC3 mov eax, ebx
* 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;
|
0085BB55 E8623BD3FF call 0058F6BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085BB5A 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085BB60 E8E707E0FF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BB65 E8FA5FDFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085BB6A 8B4050 mov eax, [eax+$50]
0085BB6D 8D55F4 lea edx, [ebp-$0C]
0085BB70 8B08 mov ecx, [eax]
0085BB72 FF5110 call dword ptr [ecx+$10]
0085BB75 8B45F4 mov eax, [ebp-$0C]
0085BB78 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BB7B E86CEDBAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085BB80 8B9E5C030000 mov ebx, [esi+$035C]
0085BB86 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085BB88 E8B3C8C6FF call 004C8440
0085BB8D 8D55E0 lea edx, [ebp-$20]
0085BB90 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BB93 E854EDBAFF call 0040A8EC
0085BB98 8B55E0 mov edx, [ebp-$20]
0085BB9B 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085BB9E E825D2BBFF call 00418DC8
0085BBA3 8D45E4 lea eax, [ebp-$1C]
0085BBA6 50 push eax
0085BBA7 8B55F8 mov edx, [ebp-$08]
0085BBAA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085BBAC E803B0C6FF call 004C6BB4
0085BBB1 5A pop edx
0085BBB2 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085BBB4 FF91B4000000 call dword ptr [ecx+$00B4]
0085BBBA 8BC3 mov eax, ebx
0085BBBC 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085BBBE FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085BBC4 8B9E0C030000 mov ebx, [esi+$030C]
0085BBCA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085BBCC E8039DC6FF call 004C58D4
0085BBD1 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085BBD3 E8D423C8FF call 004DDFAC
0085BBD8 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085BBDA FF5244 call dword ptr [edx+$44]
0085BBDD 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085BBDF E8C823C8FF call 004DDFAC
* Possible String Reference to: 'UPdate YCL_SG_HZ '
|
0085BBE4 BA50BD8500 mov edx, $0085BD50
0085BBE9 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085BBEB FF5138 call dword ptr [ecx+$38]
0085BBEE 8D55DC lea edx, [ebp-$24]
0085BBF1 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BBF4 E8F3ECBAFF call 0040A8EC
0085BBF9 837DDC00 cmp dword ptr [ebp-$24], +$00
0085BBFD 7440 jz 0085BC3F
* Possible String Reference to: ' Set '
|
0085BBFF 686CBD8500 push $0085BD6C
0085BC04 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085BC07 687CBD8500 push $0085BD7C
0085BC0C 8D55D4 lea edx, [ebp-$2C]
0085BC0F 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BC12 E8D5ECBAFF call 0040A8EC
0085BC17 FF75D4 push dword ptr [ebp-$2C]
0085BC1A 6888BD8500 push $0085BD88
0085BC1F 8D45D8 lea eax, [ebp-$28]
0085BC22 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085BC27 E8889ABAFF call 004056B4
0085BC2C 8B45D8 mov eax, [ebp-$28]
0085BC2F 50 push eax
0085BC30 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085BC32 E87523C8FF call 004DDFAC
0085BC37 5A pop edx
0085BC38 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085BC3A FF5138 call dword ptr [ecx+$38]
0085BC3D EB2B jmp 0085BC6A
0085BC3F 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085BC41 E86623C8FF call 004DDFAC
0085BC46 50 push eax
* Possible String Reference to: ' Set '
|
0085BC47 686CBD8500 push $0085BD6C
0085BC4C FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0085BC4F 6894BD8500 push $0085BD94
0085BC54 8D45D0 lea eax, [ebp-$30]
0085BC57 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085BC5C E8539ABAFF call 004056B4
0085BC61 8B55D0 mov edx, [ebp-$30]
0085BC64 58 pop eax
0085BC65 8B08 mov ecx, [eax]
0085BC67 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085BC6A 68A4BD8500 push $0085BDA4
0085BC6F 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QT.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject);
begin
(*
0085BDF8 55 push ebp
0085BDF9 8BEC mov ebp, esp
0085BDFB B924000000 mov ecx, $00000024
0085BE00 6A00 push $00
0085BE02 6A00 push $00
0085BE04 49 dec ecx
0085BE05 75F9 jnz 0085BE00
0085BE07 53 push ebx
0085BE08 56 push esi
0085BE09 8BF2 mov esi, edx
0085BE0B 8BD8 mov ebx, eax
0085BE0D 33C0 xor eax, eax
0085BE0F 55 push ebp
* Possible String Reference to: '<27>.<2E><><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085BE10 68C1C58500 push $0085C5C1
***** TRY
|
0085BE15 64FF30 push dword ptr fs:[eax]
0085BE18 648920 mov fs:[eax], esp
0085BE1B 8D55FC lea edx, [ebp-$04]
0085BE1E 8BC6 mov eax, esi
* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
| or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
| or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
| or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
| or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
| or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
0085BE20 E89738D3FF call 0058F6BC
0085BE25 8D55D8 lea edx, [ebp-$28]
0085BE28 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE2B E8BCEABAFF call 0040A8EC
0085BE30 837DD800 cmp dword ptr [ebp-$28], +$00
0085BE34 7513 jnz 0085BE49
0085BE36 8D45C8 lea eax, [ebp-$38]
* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
| or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
| or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
| or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
| or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
| or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
0085BE39 E82215BCFF call 0041D360
0085BE3E 8D55C8 lea edx, [ebp-$38]
0085BE41 8D45FC lea eax, [ebp-$04]
* Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData);
|
0085BE44 E8C7BEBBFF call 00417D10
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085BE49 8B8334030000 mov eax, [ebx+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085BE4F E8F804E0FF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BE54 E80B5DDFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085BE59 8B4050 mov eax, [eax+$50]
0085BE5C 8D55C4 lea edx, [ebp-$3C]
0085BE5F 8B08 mov ecx, [eax]
0085BE61 FF5110 call dword ptr [ecx+$10]
0085BE64 8B45C4 mov eax, [ebp-$3C]
0085BE67 8D55E0 lea edx, [ebp-$20]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE6A E87DEABAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085BE6F 8BB35C030000 mov esi, [ebx+$035C]
0085BE75 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085BE77 E8C4C5C6FF call 004C8440
0085BE7C 8D55B0 lea edx, [ebp-$50]
0085BE7F 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE82 E865EABAFF call 0040A8EC
0085BE87 8B55B0 mov edx, [ebp-$50]
0085BE8A 8D45B4 lea eax, [ebp-$4C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085BE8D E836CFBBFF call 00418DC8
0085BE92 8D45B4 lea eax, [ebp-$4C]
0085BE95 50 push eax
0085BE96 8B55E0 mov edx, [ebp-$20]
0085BE99 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085BE9B E814ADC6FF call 004C6BB4
0085BEA0 5A pop edx
0085BEA1 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085BEA3 FF91B4000000 call dword ptr [ecx+$00B4]
0085BEA9 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QT.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject);
begin
(*
0085C7D4 55 push ebp
0085C7D5 8BEC mov ebp, esp
0085C7D7 B908000000 mov ecx, $00000008
0085C7DC 6A00 push $00
0085C7DE 6A00 push $00
0085C7E0 49 dec ecx
0085C7E1 75F9 jnz 0085C7DC
0085C7E3 51 push ecx
0085C7E4 53 push ebx
0085C7E5 56 push esi
0085C7E6 8BDA mov ebx, edx
0085C7E8 8BF0 mov esi, eax
0085C7EA 33C0 xor eax, eax
0085C7EC 55 push ebp
* Possible String Reference to: '遺<><E981BA><EFBFBD>^[<5B><>]<5D>'
|
0085C7ED 68E2C98500 push $0085C9E2
***** TRY
|
0085C7F2 64FF30 push dword ptr fs:[eax]
0085C7F5 648920 mov fs:[eax], esp
0085C7F8 8D55FC lea edx, [ebp-$04]
0085C7FB 8BC3 mov eax, ebx
* 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;
|
0085C7FD E8BA2ED3FF call 0058F6BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085C802 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085C808 E83FFBDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C80D E85253DFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085C812 8B4050 mov eax, [eax+$50]
0085C815 8D55F4 lea edx, [ebp-$0C]
0085C818 8B08 mov ecx, [eax]
0085C81A FF5110 call dword ptr [ecx+$10]
0085C81D 8B45F4 mov eax, [ebp-$0C]
0085C820 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C823 E8C4E0BAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085C828 8B9E5C030000 mov ebx, [esi+$035C]
0085C82E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085C830 E80BBCC6FF call 004C8440
0085C835 8D55E0 lea edx, [ebp-$20]
0085C838 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C83B E8ACE0BAFF call 0040A8EC
0085C840 8B55E0 mov edx, [ebp-$20]
0085C843 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085C846 E87DC5BBFF call 00418DC8
0085C84B 8D45E4 lea eax, [ebp-$1C]
0085C84E 50 push eax
0085C84F 8B55F8 mov edx, [ebp-$08]
0085C852 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085C854 E85BA3C6FF call 004C6BB4
0085C859 5A pop edx
0085C85A 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085C85C FF91B4000000 call dword ptr [ecx+$00B4]
0085C862 8BC3 mov eax, ebx
0085C864 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085C866 FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085C86C 8B9E0C030000 mov ebx, [esi+$030C]
0085C872 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085C874 E85B90C6FF call 004C58D4
0085C879 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085C87B E82C17C8FF call 004DDFAC
0085C880 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085C882 FF5244 call dword ptr [edx+$44]
0085C885 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085C887 E82017C8FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085C88C BAF8C98500 mov edx, $0085C9F8
0085C891 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085C893 FF5138 call dword ptr [ecx+$38]
0085C896 8D55DC lea edx, [ebp-$24]
0085C899 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C89C E84BE0BAFF call 0040A8EC
0085C8A1 837DDC00 cmp dword ptr [ebp-$24], +$00
0085C8A5 7440 jz 0085C8E7
* Possible String Reference to: ' Set '
|
0085C8A7 6814CA8500 push $0085CA14
0085C8AC FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085C8AF 6824CA8500 push $0085CA24
0085C8B4 8D55D4 lea edx, [ebp-$2C]
0085C8B7 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C8BA E82DE0BAFF call 0040A8EC
0085C8BF FF75D4 push dword ptr [ebp-$2C]
0085C8C2 6830CA8500 push $0085CA30
0085C8C7 8D45D8 lea eax, [ebp-$28]
0085C8CA BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085C8CF E8E08DBAFF call 004056B4
0085C8D4 8B45D8 mov eax, [ebp-$28]
0085C8D7 50 push eax
0085C8D8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085C8DA E8CD16C8FF call 004DDFAC
0085C8DF 5A pop edx
0085C8E0 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085C8E2 FF5138 call dword ptr [ecx+$38]
0085C8E5 EB2B jmp 0085C912
0085C8E7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085C8E9 E8BE16C8FF call 004DDFAC
0085C8EE 50 push eax
* Possible String Reference to: ' Set '
|
0085C8EF 6814CA8500 push $0085CA14
0085C8F4 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0085C8F7 683CCA8500 push $0085CA3C
0085C8FC 8D45D0 lea eax, [ebp-$30]
0085C8FF BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085C904 E8AB8DBAFF call 004056B4
0085C909 8B55D0 mov edx, [ebp-$30]
0085C90C 58 pop eax
0085C90D 8B08 mov ecx, [eax]
0085C90F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085C912 684CCA8500 push $0085CA4C
0085C917 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QT.ToolButton3Click(Sender : TObject);
begin
(*
0085CAA0 55 push ebp
0085CAA1 8BEC mov ebp, esp
0085CAA3 B916000000 mov ecx, $00000016
0085CAA8 6A00 push $00
0085CAAA 6A00 push $00
0085CAAC 49 dec ecx
0085CAAD 75F9 jnz 0085CAA8
0085CAAF 51 push ecx
0085CAB0 56 push esi
0085CAB1 57 push edi
0085CAB2 8BF8 mov edi, eax
0085CAB4 33C0 xor eax, eax
0085CAB6 55 push ebp
0085CAB7 68D5CD8500 push $0085CDD5
***** TRY
|
0085CABC 64FF30 push dword ptr fs:[eax]
0085CABF 648920 mov fs:[eax], esp
0085CAC2 33C0 xor eax, eax
0085CAC4 55 push ebp
0085CAC5 6865CD8500 push $0085CD65
***** TRY
|
0085CACA 64FF30 push dword ptr fs:[eax]
0085CACD 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.cxGridDBColumn3PropertiesButtonClick(Sender : TObject);
begin
(*
0085CEEC 55 push ebp
0085CEED 8BEC mov ebp, esp
0085CEEF 51 push ecx
0085CEF0 B90C000000 mov ecx, $0000000C
0085CEF5 6A00 push $00
0085CEF7 6A00 push $00
0085CEF9 49 dec ecx
0085CEFA 75F9 jnz 0085CEF5
0085CEFC 51 push ecx
0085CEFD 874DFC xchg [ebp-$04], ecx
0085CF00 53 push ebx
0085CF01 56 push esi
0085CF02 8BF0 mov esi, eax
0085CF04 33C0 xor eax, eax
0085CF06 55 push ebp
* Possible String Reference to: '<27>~x<><78><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085CF07 6871D28500 push $0085D271
***** TRY
|
0085CF0C 64FF30 push dword ptr fs:[eax]
0085CF0F 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085CF12 8B865C030000 mov eax, [esi+$035C]
* Possible String Reference to: 'YFType'
|
0085CF18 BA88D28500 mov edx, $0085D288
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085CF1D E8929CC6FF call 004C6BB4
0085CF22 8D55F8 lea edx, [ebp-$08]
0085CF25 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0085CF27 FF5160 call dword ptr [ecx+$60]
0085CF2A 8B45F8 mov eax, [ebp-$08]
0085CF2D 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085CF30 E8B7D9BAFF call 0040A8EC
0085CF35 837DFC00 cmp dword ptr [ebp-$04], +$00
0085CF39 741D jz 0085CF58
0085CF3B 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085CF3D B990D28500 mov ecx, $0085D290
* Possible String Reference to: '<27>Զ<EFBFBD><D4B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݲ<EFBFBD><DDB2>ܸ<EFBFBD><DCB8><EFBFBD>!'
|
0085CF42 BA98D28500 mov edx, $0085D298
*)
end;
procedure TfrmYSCRPB_QT.cxGridDBColumn6PropertiesButtonClick(Sender : TObject);
begin
(*
0085D3B4 55 push ebp
0085D3B5 8BEC mov ebp, esp
0085D3B7 51 push ecx
0085D3B8 B906000000 mov ecx, $00000006
0085D3BD 6A00 push $00
0085D3BF 6A00 push $00
0085D3C1 49 dec ecx
0085D3C2 75F9 jnz 0085D3BD
0085D3C4 51 push ecx
0085D3C5 874DFC xchg [ebp-$04], ecx
0085D3C8 53 push ebx
0085D3C9 56 push esi
0085D3CA 8BF0 mov esi, eax
0085D3CC 33C0 xor eax, eax
0085D3CE 55 push ebp
* Possible String Reference to: '<27><>t<EFBFBD><74><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085D3CF 680DD68500 push $0085D60D
***** TRY
|
0085D3D4 64FF30 push dword ptr fs:[eax]
0085D3D7 648920 mov fs:[eax], esp
0085D3DA 33C0 xor eax, eax
0085D3DC 55 push ebp
0085D3DD 68E3D58500 push $0085D5E3
***** TRY
|
0085D3E2 64FF30 push dword ptr fs:[eax]
0085D3E5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2Column3PropertiesButtonClick(Sender : TObject);
begin
(*
0085D710 55 push ebp
0085D711 8BEC mov ebp, esp
0085D713 51 push ecx
0085D714 B906000000 mov ecx, $00000006
0085D719 6A00 push $00
0085D71B 6A00 push $00
0085D71D 49 dec ecx
0085D71E 75F9 jnz 0085D719
0085D720 51 push ecx
0085D721 874DFC xchg [ebp-$04], ecx
0085D724 53 push ebx
0085D725 56 push esi
0085D726 8BF0 mov esi, eax
0085D728 33C0 xor eax, eax
0085D72A 55 push ebp
* Possible String Reference to: '<27><>q<EFBFBD><71><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085D72B 6869D98500 push $0085D969
***** TRY
|
0085D730 64FF30 push dword ptr fs:[eax]
0085D733 648920 mov fs:[eax], esp
0085D736 33C0 xor eax, eax
0085D738 55 push ebp
0085D739 683FD98500 push $0085D93F
***** TRY
|
0085D73E 64FF30 push dword ptr fs:[eax]
0085D741 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.ToolButton1Click(Sender : TObject);
begin
(*
0085DA70 53 push ebx
0085DA71 8BD8 mov ebx, eax
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085DA73 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085DA79 E842A4C6FF call 004C7EC0
0085DA7E 84C0 test al, al
0085DA80 7516 jnz 0085DA98
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>б<EFBFBD>'
|
0085DA82 B9A4DA8500 mov ecx, $0085DAA4
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085DA87 8B9320030000 mov edx, [ebx+$0320]
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085DA8D 8B8334030000 mov eax, [ebx+$0334]
|
0085DA93 E898A7F5FF call 007B8230
0085DA98 5B pop ebx
0085DA99 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.v2Column7PropertiesButtonClick(Sender : TObject);
begin
(*
0085DAB0 55 push ebp
0085DAB1 8BEC mov ebp, esp
0085DAB3 51 push ecx
0085DAB4 B91D000000 mov ecx, $0000001D
0085DAB9 6A00 push $00
0085DABB 6A00 push $00
0085DABD 49 dec ecx
0085DABE 75F9 jnz 0085DAB9
0085DAC0 51 push ecx
0085DAC1 874DFC xchg [ebp-$04], ecx
0085DAC4 53 push ebx
0085DAC5 8945FC mov [ebp-$04], eax
0085DAC8 33C0 xor eax, eax
0085DACA 55 push ebp
* Possible String Reference to: '<27><>i<EFBFBD><69><EFBFBD>q<EFBFBD><71><EFBFBD>[<5B><>]<5D>'
|
0085DACB 6828E18500 push $0085E128
***** TRY
|
0085DAD0 64FF30 push dword ptr fs:[eax]
0085DAD3 648920 mov fs:[eax], esp
0085DAD6 33C0 xor eax, eax
0085DAD8 55 push ebp
0085DAD9 688FE08500 push $0085E08F
***** TRY
|
0085DADE 64FF30 push dword ptr fs:[eax]
0085DAE1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2PSPropertiesEditValueChanged(Sender : TObject);
begin
(*
0085E2EC 55 push ebp
0085E2ED 8BEC mov ebp, esp
0085E2EF B908000000 mov ecx, $00000008
0085E2F4 6A00 push $00
0085E2F6 6A00 push $00
0085E2F8 49 dec ecx
0085E2F9 75F9 jnz 0085E2F4
0085E2FB 53 push ebx
0085E2FC 56 push esi
0085E2FD 8BDA mov ebx, edx
0085E2FF 8BF0 mov esi, eax
0085E301 33C0 xor eax, eax
0085E303 55 push ebp
0085E304 68D4E48500 push $0085E4D4
***** TRY
|
0085E309 64FF30 push dword ptr fs:[eax]
0085E30C 648920 mov fs:[eax], esp
0085E30F 8D55FC lea edx, [ebp-$04]
0085E312 8BC3 mov eax, ebx
* 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;
|
0085E314 E8A313D3FF call 0058F6BC
0085E319 8D55F4 lea edx, [ebp-$0C]
0085E31C 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E31F E8C8C5BAFF call 0040A8EC
0085E324 837DF400 cmp dword ptr [ebp-$0C], +$00
0085E328 750D jnz 0085E337
0085E32A 8D45FC lea eax, [ebp-$04]
0085E32D BAECE48500 mov edx, $0085E4EC
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0085E332 E88570BAFF call 004053BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085E337 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E33D E80AE0DFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E342 E81D38DFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085E347 8B4050 mov eax, [eax+$50]
0085E34A 8D55F0 lea edx, [ebp-$10]
0085E34D 8B08 mov ecx, [eax]
0085E34F FF5110 call dword ptr [ecx+$10]
0085E352 8B45F0 mov eax, [ebp-$10]
0085E355 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E358 E88FC5BAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085E35D 8B9E5C030000 mov ebx, [esi+$035C]
0085E363 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E365 E8D6A0C6FF call 004C8440
0085E36A 8D55DC lea edx, [ebp-$24]
0085E36D 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E370 E877C5BAFF call 0040A8EC
0085E375 8B55DC mov edx, [ebp-$24]
0085E378 8D45E0 lea eax, [ebp-$20]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E37B E848AABBFF call 00418DC8
0085E380 8D45E0 lea eax, [ebp-$20]
0085E383 50 push eax
0085E384 8B55F8 mov edx, [ebp-$08]
0085E387 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E389 E82688C6FF call 004C6BB4
0085E38E 5A pop edx
0085E38F 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085E391 FF91B4000000 call dword ptr [ecx+$00B4]
0085E397 8BC3 mov eax, ebx
0085E399 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085E39B FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085E3A1 8B9E0C030000 mov ebx, [esi+$030C]
0085E3A7 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E3A9 E82675C6FF call 004C58D4
0085E3AE 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E3B0 E8F7FBC7FF call 004DDFAC
0085E3B5 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085E3B7 FF5244 call dword ptr [edx+$44]
0085E3BA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E3BC E8EBFBC7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E3C1 BAF8E48500 mov edx, $0085E4F8
0085E3C6 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E3C8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E3CB 6814E58500 push $0085E514
0085E3D0 FF75F8 push dword ptr [ebp-$08]
0085E3D3 6824E58500 push $0085E524
0085E3D8 8D55D4 lea edx, [ebp-$2C]
0085E3DB 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E3DE E809C5BAFF call 0040A8EC
0085E3E3 FF75D4 push dword ptr [ebp-$2C]
0085E3E6 8D45D8 lea eax, [ebp-$28]
0085E3E9 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0085E3EE E8C172BAFF call 004056B4
0085E3F3 8B45D8 mov eax, [ebp-$28]
0085E3F6 50 push eax
0085E3F7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E3F9 E8AEFBC7FF call 004DDFAC
0085E3FE 5A pop edx
0085E3FF 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E401 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E404 6830E58500 push $0085E530
0085E409 8D55CC lea edx, [ebp-$34]
*)
end;
procedure TfrmYSCRPB_QT.v2Column2PropertiesEditValueChanged(Sender : TObject);
begin
(*
0085E590 55 push ebp
0085E591 8BEC mov ebp, esp
0085E593 B907000000 mov ecx, $00000007
0085E598 6A00 push $00
0085E59A 6A00 push $00
0085E59C 49 dec ecx
0085E59D 75F9 jnz 0085E598
0085E59F 51 push ecx
0085E5A0 53 push ebx
0085E5A1 56 push esi
0085E5A2 8BDA mov ebx, edx
0085E5A4 8BF0 mov esi, eax
0085E5A6 33C0 xor eax, eax
0085E5A8 55 push ebp
* Possible String Reference to: '<27><>c<EFBFBD><63><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085E5A9 6860E78500 push $0085E760
***** TRY
|
0085E5AE 64FF30 push dword ptr fs:[eax]
0085E5B1 648920 mov fs:[eax], esp
0085E5B4 8D55FC lea edx, [ebp-$04]
0085E5B7 8BC3 mov eax, ebx
* 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;
|
0085E5B9 E8FE10D3FF call 0058F6BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085E5BE 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E5C4 E883DDDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E5C9 E89635DFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085E5CE 8B4050 mov eax, [eax+$50]
0085E5D1 8D55F4 lea edx, [ebp-$0C]
0085E5D4 8B08 mov ecx, [eax]
0085E5D6 FF5110 call dword ptr [ecx+$10]
0085E5D9 8B45F4 mov eax, [ebp-$0C]
0085E5DC 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E5DF E808C3BAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085E5E4 8B9E5C030000 mov ebx, [esi+$035C]
0085E5EA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E5EC E84F9EC6FF call 004C8440
0085E5F1 8D55E0 lea edx, [ebp-$20]
0085E5F4 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E5F7 E8F0C2BAFF call 0040A8EC
0085E5FC 8B55E0 mov edx, [ebp-$20]
0085E5FF 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E602 E8C1A7BBFF call 00418DC8
0085E607 8D45E4 lea eax, [ebp-$1C]
0085E60A 50 push eax
0085E60B 8B55F8 mov edx, [ebp-$08]
0085E60E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E610 E89F85C6FF call 004C6BB4
0085E615 5A pop edx
0085E616 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085E618 FF91B4000000 call dword ptr [ecx+$00B4]
0085E61E 8BC3 mov eax, ebx
0085E620 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085E622 FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085E628 8B9E0C030000 mov ebx, [esi+$030C]
0085E62E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E630 E89F72C6FF call 004C58D4
0085E635 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E637 E870F9C7FF call 004DDFAC
0085E63C 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085E63E FF5244 call dword ptr [edx+$44]
0085E641 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E643 E864F9C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E648 BA78E78500 mov edx, $0085E778
0085E64D 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E64F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E652 6894E78500 push $0085E794
0085E657 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085E65A 68A4E78500 push $0085E7A4
0085E65F 8D55D8 lea edx, [ebp-$28]
0085E662 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E665 E882C2BAFF call 0040A8EC
0085E66A FF75D8 push dword ptr [ebp-$28]
0085E66D 68B0E78500 push $0085E7B0
0085E672 8D45DC lea eax, [ebp-$24]
0085E675 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085E67A E83570BAFF call 004056B4
0085E67F 8B45DC mov eax, [ebp-$24]
0085E682 50 push eax
0085E683 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E685 E822F9C7FF call 004DDFAC
0085E68A 5A pop edx
0085E68B 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E68D FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E690 68BCE78500 push $0085E7BC
0085E695 8D55D0 lea edx, [ebp-$30]
*)
end;
procedure TfrmYSCRPB_QT.v2KPMoneyPropertiesEditValueChanged(Sender : TObject);
begin
(*
0085E810 55 push ebp
0085E811 8BEC mov ebp, esp
0085E813 B90C000000 mov ecx, $0000000C
0085E818 6A00 push $00
0085E81A 6A00 push $00
0085E81C 49 dec ecx
0085E81D 75F9 jnz 0085E818
0085E81F 53 push ebx
0085E820 56 push esi
0085E821 8BDA mov ebx, edx
0085E823 8BF0 mov esi, eax
0085E825 33C0 xor eax, eax
0085E827 55 push ebp
0085E828 6807EB8500 push $0085EB07
***** TRY
|
0085E82D 64FF30 push dword ptr fs:[eax]
0085E830 648920 mov fs:[eax], esp
0085E833 8D55FC lea edx, [ebp-$04]
0085E836 8BC3 mov eax, ebx
* 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;
|
0085E838 E87F0ED3FF call 0058F6BC
0085E83D 8D55EC lea edx, [ebp-$14]
0085E840 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E843 E8A4C0BAFF call 0040A8EC
0085E848 837DEC00 cmp dword ptr [ebp-$14], +$00
0085E84C 750D jnz 0085E85B
0085E84E 8D45FC lea eax, [ebp-$04]
0085E851 BA1CEB8500 mov edx, $0085EB1C
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0085E856 E8616BBAFF call 004053BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
0085E85B 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E861 E8E6DADFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E866 E8F932DFFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0085E86B 8B4050 mov eax, [eax+$50]
0085E86E 8D55E8 lea edx, [ebp-$18]
0085E871 8B08 mov ecx, [eax]
0085E873 FF5110 call dword ptr [ecx+$10]
0085E876 8B45E8 mov eax, [ebp-$18]
0085E879 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E87C E86BC0BAFF call 0040A8EC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085E881 8B9E5C030000 mov ebx, [esi+$035C]
0085E887 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E889 E8B29BC6FF call 004C8440
0085E88E 8D55D4 lea edx, [ebp-$2C]
0085E891 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E894 E853C0BAFF call 0040A8EC
0085E899 8B55D4 mov edx, [ebp-$2C]
0085E89C 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E89F E824A5BBFF call 00418DC8
0085E8A4 8D45D8 lea eax, [ebp-$28]
0085E8A7 50 push eax
0085E8A8 8B55F0 mov edx, [ebp-$10]
0085E8AB 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E8AD E80283C6FF call 004C6BB4
0085E8B2 5A pop edx
0085E8B3 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085E8B5 FF91B4000000 call dword ptr [ecx+$00B4]
0085E8BB 8BC3 mov eax, ebx
0085E8BD 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085E8BF FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QT.ADOQueryTemp : TADOQuery
|
0085E8C5 8B9E08030000 mov ebx, [esi+$0308]
0085E8CB 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E8CD E80270C6FF call 004C58D4
0085E8D2 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E8D4 E8D3F6C7FF call 004DDFAC
0085E8D9 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085E8DB FF5244 call dword ptr [edx+$44]
* Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr
| om YF_Money_CR where YFID=''
|
0085E8DE 6828EB8500 push $0085EB28
* Possible String Reference to: 'YFID'
|
0085E8E3 BA70EB8500 mov edx, $0085EB70
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085E8E8 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E8EE E8C182C6FF call 004C6BB4
0085E8F3 8D55CC lea edx, [ebp-$34]
0085E8F6 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0085E8F8 FF5160 call dword ptr [ecx+$60]
0085E8FB FF75CC push dword ptr [ebp-$34]
0085E8FE 6880EB8500 push $0085EB80
0085E903 8D45D0 lea eax, [ebp-$30]
0085E906 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085E90B E8A46DBAFF call 004056B4
0085E910 8B45D0 mov eax, [ebp-$30]
0085E913 50 push eax
0085E914 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E916 E891F6C7FF call 004DDFAC
0085E91B 5A pop edx
0085E91C 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E91E FF5138 call dword ptr [ecx+$38]
0085E921 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0085E923 E8A06FC6FF call 004C58C8
* Possible String Reference to: 'KPMoney'
|
0085E928 BA8CEB8500 mov edx, $0085EB8C
* Reference to control TfrmYSCRPB_QT.ADOQueryTemp : TADOQuery
|
0085E92D 8B8608030000 mov eax, [esi+$0308]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E933 E87C82C6FF call 004C6BB4
0085E938 8D55F4 lea edx, [ebp-$0C]
0085E93B 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_60
|
0085E93D FF5160 call dword ptr [ecx+$60]
* Possible String Reference to: 'KPMoney'
|
0085E940 BA8CEB8500 mov edx, $0085EB8C
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085E945 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E94B E86482C6FF call 004C6BB4
0085E950 8D55F8 lea edx, [ebp-$08]
0085E953 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0085E955 FF5160 call dword ptr [ecx+$60]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085E958 8B9E0C030000 mov ebx, [esi+$030C]
0085E95E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E960 E86F6FC6FF call 004C58D4
0085E965 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E967 E840F6C7FF call 004DDFAC
0085E96C 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085E96E FF5244 call dword ptr [edx+$44]
0085E971 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E973 E834F6C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E978 BA9CEB8500 mov edx, $0085EB9C
0085E97D 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E97F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E982 68B8EB8500 push $0085EBB8
0085E987 FF75F0 push dword ptr [ebp-$10]
0085E98A 68C8EB8500 push $0085EBC8
0085E98F 8D55C4 lea edx, [ebp-$3C]
0085E992 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E995 E852BFBAFF call 0040A8EC
0085E99A FF75C4 push dword ptr [ebp-$3C]
0085E99D 8D45C8 lea eax, [ebp-$38]
0085E9A0 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0085E9A5 E80A6DBAFF call 004056B4
0085E9AA 8B45C8 mov eax, [ebp-$38]
0085E9AD 50 push eax
0085E9AE 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085E9B0 E8F7F5C7FF call 004DDFAC
0085E9B5 5A pop edx
0085E9B6 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085E9B8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E9BB 68D4EB8500 push $0085EBD4
0085E9C0 8D55BC lea edx, [ebp-$44]
*)
end;
procedure TfrmYSCRPB_QT.Button1Click(Sender : TObject);
begin
(*
0085EC90 55 push ebp
0085EC91 8BEC mov ebp, esp
0085EC93 B910000000 mov ecx, $00000010
0085EC98 6A00 push $00
0085EC9A 6A00 push $00
0085EC9C 49 dec ecx
0085EC9D 75F9 jnz 0085EC98
0085EC9F 51 push ecx
0085ECA0 53 push ebx
0085ECA1 56 push esi
0085ECA2 57 push edi
0085ECA3 8945FC mov [ebp-$04], eax
0085ECA6 33C0 xor eax, eax
0085ECA8 55 push ebp
* Possible String Reference to: '<27><>Z<EFBFBD><5A><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085ECA9 6821F08500 push $0085F021
***** TRY
|
0085ECAE 64FF30 push dword ptr fs:[eax]
0085ECB1 648920 mov fs:[eax], esp
0085ECB4 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085ECB7 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085ECBD E8FE91C6FF call 004C7EC0
0085ECC2 84C0 test al, al
0085ECC4 0F85F1020000 jnz 0085EFBB
0085ECCA A030F08500 mov al, byte ptr [$0085F030]
0085ECCF 50 push eax
0085ECD0 8D45EC lea eax, [ebp-$14]
0085ECD3 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085ECD5 E88AA0BBFF call 00418D64
0085ECDA 8D4DEC lea ecx, [ebp-$14]
0085ECDD 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085ECE0 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0085ECE6 BA3CF08500 mov edx, $0085F03C
0085ECEB 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0085ECED FF9344020000 call dword ptr [ebx+$0244]
0085ECF3 84C0 test al, al
0085ECF5 751D jnz 0085ED14
0085ECF7 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085ECF9 B944F08500 mov ecx, $0085F044
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0085ECFE BA4CF08500 mov edx, $0085F04C
*)
end;
procedure TfrmYSCRPB_QT.CheckBox1Click(Sender : TObject);
begin
(*
0085F10C 55 push ebp
0085F10D 8BEC mov ebp, esp
0085F10F 33C9 xor ecx, ecx
0085F111 51 push ecx
0085F112 51 push ecx
0085F113 51 push ecx
0085F114 51 push ecx
0085F115 51 push ecx
0085F116 51 push ecx
0085F117 51 push ecx
0085F118 51 push ecx
0085F119 53 push ebx
0085F11A 56 push esi
0085F11B 57 push edi
0085F11C 8BF0 mov esi, eax
0085F11E 33C0 xor eax, eax
0085F120 55 push ebp
* Possible String Reference to: '<27><>X<EFBFBD><58><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085F121 6849F28500 push $0085F249
***** TRY
|
0085F126 64FF30 push dword ptr fs:[eax]
0085F129 648920 mov fs:[eax], esp
0085F12C BA60F28500 mov edx, $0085F260
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
0085F131 8B86B0030000 mov eax, [esi+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0085F137 E8E494C2FF call 00488620
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F13C 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085F142 E8798DC6FF call 004C7EC0
0085F147 84C0 test al, al
0085F149 0F85D4000000 jnz 0085F223
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F14F 8B9E5C030000 mov ebx, [esi+$035C]
0085F155 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
0085F157 E8F883C6FF call 004C7554
0085F15C 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
0085F15E E8CD8EC6FF call 004C8030
0085F163 E9A0000000 jmp 0085F208
0085F168 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085F16A E8D192C6FF call 004C8440
* Reference to control TfrmYSCRPB_QT.CheckBox1 : TCheckBox
|
0085F16F 8B8688030000 mov eax, [esi+$0388]
0085F175 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
0085F177 FF92C8000000 call dword ptr [edx+$00C8]
0085F17D 8BD0 mov edx, eax
0085F17F 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085F182 E8DD9BBBFF call 00418D64
0085F187 8D45F0 lea eax, [ebp-$10]
0085F18A 50 push eax
* Possible String Reference to: 'ssel'
|
0085F18B BA6CF28500 mov edx, $0085F26C
0085F190 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085F192 E81D7AC6FF call 004C6BB4
0085F197 5A pop edx
0085F198 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0085F19A FF91B4000000 call dword ptr [ecx+$00B4]
* Possible String Reference to: 'Money'
|
0085F1A0 BA7CF28500 mov edx, $0085F27C
0085F1A5 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085F1A7 E8087AC6FF call 004C6BB4
0085F1AC 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_4C
|
0085F1AE FF524C call dword ptr [edx+$4C]
0085F1B1 DF7DE4 fistp qword ptr [ebp-$1C]
0085F1B4 9B wait
0085F1B5 8D55E0 lea edx, [ebp-$20]
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
0085F1B8 8BBEB0030000 mov edi, [esi+$03B0]
0085F1BE 8BC7 mov eax, edi
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0085F1C0 E82B94C2FF call 004885F0
0085F1C5 8B45E0 mov eax, [ebp-$20]
* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
0085F1C8 E85FE5BAFF call 0040D72C
0085F1CD D80D84F28500 fmul dword ptr [$0085F284]
0085F1D3 DF6DE4 fild qword ptr [ebp-$1C]
0085F1D6 DEC1 faddp st(1), st(0)
0085F1D8 D83584F28500 fdiv dword ptr [$0085F284]
0085F1DE 83C4F4 add esp, -$0C
0085F1E1 DB3C24 fstp tbyte ptr [esp]
0085F1E4 9B wait
0085F1E5 8D45EC lea eax, [ebp-$14]
|
0085F1E8 E8BFE3BAFF call 0040D5AC
0085F1ED 8B55EC mov edx, [ebp-$14]
0085F1F0 8BC7 mov eax, edi
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0085F1F2 E82994C2FF call 00488620
0085F1F7 8BC3 mov eax, ebx
0085F1F9 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0085F1FB FF924C020000 call dword ptr [edx+$024C]
0085F201 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Next(TDataSet);
|
0085F203 E84491C6FF call 004C834C
* Reference to field TClientDataSet.Eof : Boolean
|
0085F208 80BBA100000000 cmp byte ptr [ebx+$00A1], $00
0085F20F 0F8453FFFFFF jz 0085F168
0085F215 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
0085F217 E8148EC6FF call 004C8030
0085F21C 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
0085F21E E85183C6FF call 004C7574
0085F223 33C0 xor eax, eax
0085F225 5A pop edx
0085F226 59 pop ecx
0085F227 59 pop ecx
0085F228 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[<5B><>]<5D>'
|
0085F22B 6850F28500 push $0085F250
0085F230 8D45E0 lea eax, [ebp-$20]
* Reference to: System.@LStrClr(void;void);
|
0085F233 E8EC60BAFF call 00405324
0085F238 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
0085F23B E8E460BAFF call 00405324
0085F240 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
0085F243 E82C54BBFF call 00414674
0085F248 C3 ret
* Reference to: System.@HandleFinally;
|
0085F249 E9A658BAFF jmp 00404AF4
0085F24E EBE0 jmp 0085F230
****** END
|
0085F250 5F pop edi
0085F251 5E pop esi
0085F252 5B pop ebx
0085F253 8BE5 mov esp, ebp
0085F255 5D pop ebp
0085F256 C3 ret
*)
end;
procedure TfrmYSCRPB_QT.cxTabControl1Change(Sender : TObject);
begin
(*
0085F288 53 push ebx
0085F289 8BD8 mov ebx, eax
0085F28B 8BC3 mov eax, ebx
|
0085F28D E836AFFFFF call 0085A1C8
0085F292 8BC3 mov eax, ebx
|
0085F294 E87BB0FFFF call 0085A314
0085F299 5B pop ebx
0085F29A C3 ret
*)
end;
procedure TfrmYSCRPB_QT.FormCreate(Sender : TObject);
begin
(*
0085F29C 55 push ebp
0085F29D 8BEC mov ebp, esp
0085F29F 6A00 push $00
0085F2A1 6A00 push $00
0085F2A3 53 push ebx
0085F2A4 8BD8 mov ebx, eax
0085F2A6 33C0 xor eax, eax
0085F2A8 55 push ebp
0085F2A9 6816F38500 push $0085F316
***** TRY
|
0085F2AE 64FF30 push dword ptr fs:[eax]
0085F2B1 648920 mov fs:[eax], esp
0085F2B4 B205 mov dl, $05
* Reference to control TfrmYSCRPB_QT.cxGrid2 : TcxGrid
|
0085F2B6 8B8330030000 mov eax, [ebx+$0330]
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
0085F2BC E81B88C2FF call 00487ADC
0085F2C1 8D55FC lea edx, [ebp-$04]
*)
end;
procedure TfrmYSCRPB_QT.TchkClick(Sender : TObject);
begin
(*
0085F324 55 push ebp
0085F325 8BEC mov ebp, esp
0085F327 B904000000 mov ecx, $00000004
0085F32C 6A00 push $00
0085F32E 6A00 push $00
0085F330 49 dec ecx
0085F331 75F9 jnz 0085F32C
0085F333 51 push ecx
0085F334 53 push ebx
0085F335 56 push esi
0085F336 57 push edi
0085F337 8945FC mov [ebp-$04], eax
0085F33A 33C0 xor eax, eax
0085F33C 55 push ebp
* Possible String Reference to: '<27><>U<EFBFBD><55><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085F33D 6823F58500 push $0085F523
***** TRY
|
0085F342 64FF30 push dword ptr fs:[eax]
0085F345 648920 mov fs:[eax], esp
0085F348 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F34B 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085F351 E86A8BC6FF call 004C7EC0
0085F356 84C0 test al, al
0085F358 0F85A2010000 jnz 0085F500
0085F35E A034F58500 mov al, byte ptr [$0085F534]
0085F363 50 push eax
0085F364 8D45EC lea eax, [ebp-$14]
0085F367 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085F369 E8F699BBFF call 00418D64
0085F36E 8D4DEC lea ecx, [ebp-$14]
0085F371 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F374 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0085F37A BA40F58500 mov edx, $0085F540
0085F37F 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0085F381 FF9344020000 call dword ptr [ebx+$0244]
0085F387 84C0 test al, al
0085F389 751D jnz 0085F3A8
0085F38B 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085F38D B948F58500 mov ecx, $0085F548
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0085F392 BA50F58500 mov edx, $0085F550
*)
end;
procedure TfrmYSCRPB_QT.TnochkClick(Sender : TObject);
begin
(*
0085F5CC 55 push ebp
0085F5CD 8BEC mov ebp, esp
0085F5CF B904000000 mov ecx, $00000004
0085F5D4 6A00 push $00
0085F5D6 6A00 push $00
0085F5D8 49 dec ecx
0085F5D9 75F9 jnz 0085F5D4
0085F5DB 51 push ecx
0085F5DC 53 push ebx
0085F5DD 56 push esi
0085F5DE 57 push edi
0085F5DF 8945FC mov [ebp-$04], eax
0085F5E2 33C0 xor eax, eax
0085F5E4 55 push ebp
* Possible String Reference to: '<27>$S<><53><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085F5E5 68CBF78500 push $0085F7CB
***** TRY
|
0085F5EA 64FF30 push dword ptr fs:[eax]
0085F5ED 648920 mov fs:[eax], esp
0085F5F0 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F5F3 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085F5F9 E8C288C6FF call 004C7EC0
0085F5FE 84C0 test al, al
0085F600 0F85A2010000 jnz 0085F7A8
0085F606 A0DCF78500 mov al, byte ptr [$0085F7DC]
0085F60B 50 push eax
0085F60C 8D45EC lea eax, [ebp-$14]
0085F60F B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085F611 E84E97BBFF call 00418D64
0085F616 8D4DEC lea ecx, [ebp-$14]
0085F619 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085F61C 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0085F622 BAE8F78500 mov edx, $0085F7E8
0085F627 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0085F629 FF9344020000 call dword ptr [ebx+$0244]
0085F62F 84C0 test al, al
0085F631 751D jnz 0085F650
0085F633 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085F635 B9F0F78500 mov ecx, $0085F7F0
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0085F63A BAF8F78500 mov edx, $0085F7F8
*)
end;
procedure TfrmYSCRPB_QT.v2ComTaitouPropertiesButtonClick(Sender : TObject);
begin
(*
0085F874 55 push ebp
0085F875 8BEC mov ebp, esp
0085F877 51 push ecx
0085F878 B906000000 mov ecx, $00000006
0085F87D 6A00 push $00
0085F87F 6A00 push $00
0085F881 49 dec ecx
0085F882 75F9 jnz 0085F87D
0085F884 51 push ecx
0085F885 874DFC xchg [ebp-$04], ecx
0085F888 53 push ebx
0085F889 56 push esi
0085F88A 8BF0 mov esi, eax
0085F88C 33C0 xor eax, eax
0085F88E 55 push ebp
0085F88F 68CBFA8500 push $0085FACB
***** TRY
|
0085F894 64FF30 push dword ptr fs:[eax]
0085F897 648920 mov fs:[eax], esp
0085F89A 33C0 xor eax, eax
0085F89C 55 push ebp
0085F89D 68A1FA8500 push $0085FAA1
***** TRY
|
0085F8A2 64FF30 push dword ptr fs:[eax]
0085F8A5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.VBZPropertiesButtonClick(Sender : TObject);
begin
(*
0085FBB0 55 push ebp
0085FBB1 8BEC mov ebp, esp
0085FBB3 51 push ecx
0085FBB4 B906000000 mov ecx, $00000006
0085FBB9 6A00 push $00
0085FBBB 6A00 push $00
0085FBBD 49 dec ecx
0085FBBE 75F9 jnz 0085FBB9
0085FBC0 51 push ecx
0085FBC1 874DFC xchg [ebp-$04], ecx
0085FBC4 53 push ebx
0085FBC5 56 push esi
0085FBC6 8BF0 mov esi, eax
0085FBC8 33C0 xor eax, eax
0085FBCA 55 push ebp
* Possible String Reference to: '<27><>L<EFBFBD><4C><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085FBCB 6809FE8500 push $0085FE09
***** TRY
|
0085FBD0 64FF30 push dword ptr fs:[eax]
0085FBD3 648920 mov fs:[eax], esp
0085FBD6 33C0 xor eax, eax
0085FBD8 55 push ebp
0085FBD9 68DFFD8500 push $0085FDDF
***** TRY
|
0085FBDE 64FF30 push dword ptr fs:[eax]
0085FBE1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2Column4PropertiesButtonClick(Sender : TObject);
begin
(*
0085FEF4 55 push ebp
0085FEF5 8BEC mov ebp, esp
0085FEF7 51 push ecx
0085FEF8 B906000000 mov ecx, $00000006
0085FEFD 6A00 push $00
0085FEFF 6A00 push $00
0085FF01 49 dec ecx
0085FF02 75F9 jnz 0085FEFD
0085FF04 51 push ecx
0085FF05 874DFC xchg [ebp-$04], ecx
0085FF08 53 push ebx
0085FF09 56 push esi
0085FF0A 8BF0 mov esi, eax
0085FF0C 33C0 xor eax, eax
0085FF0E 55 push ebp
* Possible String Reference to: '<27><>I<EFBFBD><49><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085FF0F 684D018600 push $0086014D
***** TRY
|
0085FF14 64FF30 push dword ptr fs:[eax]
0085FF17 648920 mov fs:[eax], esp
0085FF1A 33C0 xor eax, eax
0085FF1C 55 push ebp
0085FF1D 6823018600 push $00860123
***** TRY
|
0085FF22 64FF30 push dword ptr fs:[eax]
0085FF25 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2Column5PropertiesChange(Sender : TObject);
begin
(*
00860248 53 push ebx
00860249 56 push esi
0086024A 8BD8 mov ebx, eax
* Possible String Reference to: 'Money'
|
0086024C BA88028600 mov edx, $00860288
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00860251 8BB35C030000 mov esi, [ebx+$035C]
00860257 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00860259 E85669C6FF call 004C6BB4
0086025E 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_4C
|
00860260 FF524C call dword ptr [edx+$4C]
00860263 D83590028600 fdiv dword ptr [$00860290]
00860269 83C4F8 add esp, -$08
0086026C DD1C24 fstp qword ptr [esp]
0086026F 9B wait
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
00860270 8B93B0030000 mov edx, [ebx+$03B0]
00860276 8BC6 mov eax, esi
* Reference to : TfrmSelExportField._PROC_007B6D90()
|
00860278 E8136BF5FF call 007B6D90
0086027D 5E pop esi
0086027E 5B pop ebx
0086027F C3 ret
*)
end;
procedure TfrmYSCRPB_QT.v2ConNoHZPropertiesButtonClick(Sender : TObject);
begin
(*
00860294 55 push ebp
00860295 8BEC mov ebp, esp
00860297 51 push ecx
00860298 B90B000000 mov ecx, $0000000B
0086029D 6A00 push $00
0086029F 6A00 push $00
008602A1 49 dec ecx
008602A2 75F9 jnz 0086029D
008602A4 874DFC xchg [ebp-$04], ecx
008602A7 53 push ebx
008602A8 56 push esi
008602A9 8BF0 mov esi, eax
008602AB 33C0 xor eax, eax
008602AD 55 push ebp
* Possible String Reference to: '<27><>E<EFBFBD><45><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
008602AE 6869058600 push $00860569
***** TRY
|
008602B3 64FF30 push dword ptr fs:[eax]
008602B6 648920 mov fs:[eax], esp
008602B9 8BCE mov ecx, esi
008602BB B201 mov dl, $01
* Reference to class TfrmJYorderConCX
|
008602BD A164DF7D00 mov eax, dword ptr [$007DDF64]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
008602C2 E8091BC4FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QT.v2GYSNamePropertiesButtonClick(Sender : TObject);
begin
(*
00860674 55 push ebp
00860675 8BEC mov ebp, esp
00860677 51 push ecx
00860678 B905000000 mov ecx, $00000005
0086067D 6A00 push $00
0086067F 6A00 push $00
00860681 49 dec ecx
00860682 75F9 jnz 0086067D
00860684 51 push ecx
00860685 874DFC xchg [ebp-$04], ecx
00860688 53 push ebx
00860689 56 push esi
0086068A 8BF0 mov esi, eax
0086068C 33C0 xor eax, eax
0086068E 55 push ebp
* Possible String Reference to: '<27><>B<EFBFBD><42><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0086068F 6854088600 push $00860854
***** TRY
|
00860694 64FF30 push dword ptr fs:[eax]
00860697 648920 mov fs:[eax], esp
0086069A 33C0 xor eax, eax
0086069C 55 push ebp
0086069D 682A088600 push $0086082A
***** TRY
|
008606A2 64FF30 push dword ptr fs:[eax]
008606A5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2Column6PropertiesButtonClick(Sender : TObject);
begin
(*
008608EC 55 push ebp
008608ED 8BEC mov ebp, esp
008608EF 51 push ecx
008608F0 B905000000 mov ecx, $00000005
008608F5 6A00 push $00
008608F7 6A00 push $00
008608F9 49 dec ecx
008608FA 75F9 jnz 008608F5
008608FC 51 push ecx
008608FD 874DFC xchg [ebp-$04], ecx
00860900 53 push ebx
00860901 56 push esi
00860902 8BF0 mov esi, eax
00860904 33C0 xor eax, eax
00860906 55 push ebp
* Possible String Reference to: '<27>#@<40><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00860907 68CC0A8600 push $00860ACC
***** TRY
|
0086090C 64FF30 push dword ptr fs:[eax]
0086090F 648920 mov fs:[eax], esp
00860912 33C0 xor eax, eax
00860914 55 push ebp
00860915 68A20A8600 push $00860AA2
***** TRY
|
0086091A 64FF30 push dword ptr fs:[eax]
0086091D 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.ConNoKeyPress(Sender : TObject);
begin
(*
00860B6C 55 push ebp
00860B6D 8BEC mov ebp, esp
00860B6F 6A00 push $00
00860B71 6A00 push $00
00860B73 6A00 push $00
00860B75 53 push ebx
00860B76 56 push esi
00860B77 8BF0 mov esi, eax
00860B79 33C0 xor eax, eax
00860B7B 55 push ebp
00860B7C 68D10C8600 push $00860CD1
***** TRY
|
00860B81 64FF30 push dword ptr fs:[eax]
00860B84 648920 mov fs:[eax], esp
00860B87 80390D cmp byte ptr [ecx], $0D
00860B8A 0F851E010000 jnz 00860CAE
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00860B90 8B9E20030000 mov ebx, [esi+$0320]
00860B96 33D2 xor edx, edx
00860B98 8BC3 mov eax, ebx
00860B9A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_0190
|
00860B9C FF9190010000 call dword ptr [ecx+$0190]
00860BA2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00860BA4 E82B4DC6FF call 004C58D4
00860BA9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BAB E8FCD3C7FF call 004DDFAC
00860BB0 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
00860BB2 FF5244 call dword ptr [edx+$44]
00860BB5 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BB7 E8F0D3C7FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
00860BBC BAE80C8600 mov edx, $00860CE8
00860BC1 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860BC3 FF5138 call dword ptr [ecx+$38]
00860BC6 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BC8 E8DFD3C7FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
00860BCD BA480D8600 mov edx, $00860D48
00860BD2 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860BD4 FF5138 call dword ptr [ecx+$38]
00860BD7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BD9 E8CED3C7FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
00860BDE BAA40D8600 mov edx, $00860DA4
00860BE3 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860BE5 FF5138 call dword ptr [ecx+$38]
00860BE8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BEA E8BDD3C7FF call 004DDFAC
* Possible String Reference to: ',isnull((select JM.PRTColor from JY
| Order_Sub JM inner join CK_SXPB_CR
| F on JM.Subid=F.ORDSubIdRK where F.
| SPID=A.YFTypeId),'') PRTColor,'
|
00860BEF BA000E8600 mov edx, $00860E00
00860BF4 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860BF6 FF5138 call dword ptr [ecx+$38]
00860BF9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860BFB E8ACD3C7FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
00860C00 BA900E8600 mov edx, $00860E90
00860C05 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860C07 FF5138 call dword ptr [ecx+$38]
00860C0A 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860C0C E89BD3C7FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
00860C11 BA9C0E8600 mov edx, $00860E9C
00860C16 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860C18 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.ConNO like '%'
|
00860C1B 68B80E8600 push $00860EB8
00860C20 8D55F4 lea edx, [ebp-$0C]
* Reference to control TfrmYSCRPB_QT.ConNo : TEdit
|
00860C23 8B86B8030000 mov eax, [esi+$03B8]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00860C29 E8C279C2FF call 004885F0
00860C2E 8B45F4 mov eax, [ebp-$0C]
00860C31 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00860C34 E8B39CBAFF call 0040A8EC
00860C39 FF75F8 push dword ptr [ebp-$08]
00860C3C 68D80E8600 push $00860ED8
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
00860C41 68E40E8600 push $00860EE4
00860C46 8D45FC lea eax, [ebp-$04]
00860C49 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
00860C4E E8614ABAFF call 004056B4
00860C53 8B45FC mov eax, [ebp-$04]
00860C56 50 push eax
00860C57 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860C59 E84ED3C7FF call 004DDFAC
00860C5E 5A pop edx
00860C5F 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860C61 FF5138 call dword ptr [ecx+$38]
00860C64 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860C66 E841D3C7FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
00860C6B BA0C0F8600 mov edx, $00860F0C
00860C70 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860C72 FF5138 call dword ptr [ecx+$38]
00860C75 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
00860C77 E84C4CC6FF call 004C58C8
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00860C7C 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00860C82 8B8620030000 mov eax, [esi+$0320]
|
00860C88 E80362F5FF call 007B6E90
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00860C8D 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00860C93 8B8620030000 mov eax, [esi+$0320]
|
00860C99 E87A63F5FF call 007B7018
00860C9E BA380F8600 mov edx, $00860F38
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
00860CA3 8B86B0030000 mov eax, [esi+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00860CA9 E87279C2FF call 00488620
00860CAE 33C0 xor eax, eax
00860CB0 5A pop edx
00860CB1 59 pop ecx
00860CB2 59 pop ecx
00860CB3 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
00860CB6 68D80C8600 push $00860CD8
00860CBB 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
00860CBE E86146BAFF call 00405324
00860CC3 8D45F8 lea eax, [ebp-$08]
00860CC6 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
00860CCB E87846BAFF call 00405348
00860CD0 C3 ret
* Reference to: System.@HandleFinally;
|
00860CD1 E91E3EBAFF jmp 00404AF4
00860CD6 EBE3 jmp 00860CBB
****** END
|
00860CD8 5E pop esi
00860CD9 5B pop ebx
00860CDA 8BE5 mov esp, ebp
00860CDC 5D pop ebp
00860CDD C3 ret
*)
end;
procedure TfrmYSCRPB_QT.OrderNoKeyPress(Sender : TObject);
begin
(*
00860F3C 55 push ebp
00860F3D 8BEC mov ebp, esp
00860F3F 6A00 push $00
00860F41 6A00 push $00
00860F43 6A00 push $00
00860F45 53 push ebx
00860F46 56 push esi
00860F47 8BF0 mov esi, eax
00860F49 33C0 xor eax, eax
00860F4B 55 push ebp
* Possible String Reference to: '<27>N:<3A><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00860F4C 68A1108600 push $008610A1
***** TRY
|
00860F51 64FF30 push dword ptr fs:[eax]
00860F54 648920 mov fs:[eax], esp
00860F57 80390D cmp byte ptr [ecx], $0D
00860F5A 0F851E010000 jnz 0086107E
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00860F60 8B9E20030000 mov ebx, [esi+$0320]
00860F66 33D2 xor edx, edx
00860F68 8BC3 mov eax, ebx
00860F6A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_0190
|
00860F6C FF9190010000 call dword ptr [ecx+$0190]
00860F72 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00860F74 E85B49C6FF call 004C58D4
00860F79 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860F7B E82CD0C7FF call 004DDFAC
00860F80 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
00860F82 FF5244 call dword ptr [edx+$44]
00860F85 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860F87 E820D0C7FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
00860F8C BAB8108600 mov edx, $008610B8
00860F91 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860F93 FF5138 call dword ptr [ecx+$38]
00860F96 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860F98 E80FD0C7FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
00860F9D BA18118600 mov edx, $00861118
00860FA2 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860FA4 FF5138 call dword ptr [ecx+$38]
00860FA7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860FA9 E8FECFC7FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
00860FAE BA74118600 mov edx, $00861174
00860FB3 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860FB5 FF5138 call dword ptr [ecx+$38]
00860FB8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860FBA E8EDCFC7FF call 004DDFAC
* Possible String Reference to: ',isnull((select JM.PRTColor from JY
| Order_Sub JM inner join CK_SXPB_CR
| F on JM.Subid=F.ORDSubIdRK where F.
| SPID=A.YFTypeId),'') PRTColor,'
|
00860FBF BAD0118600 mov edx, $008611D0
00860FC4 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860FC6 FF5138 call dword ptr [ecx+$38]
00860FC9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860FCB E8DCCFC7FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
00860FD0 BA60128600 mov edx, $00861260
00860FD5 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860FD7 FF5138 call dword ptr [ecx+$38]
00860FDA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00860FDC E8CBCFC7FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
00860FE1 BA6C128600 mov edx, $0086126C
00860FE6 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00860FE8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.OrderNO like '%'
|
00860FEB 6888128600 push $00861288
00860FF0 8D55F4 lea edx, [ebp-$0C]
* Reference to control TfrmYSCRPB_QT.OrderNo : TEdit
|
00860FF3 8B868C030000 mov eax, [esi+$038C]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00860FF9 E8F275C2FF call 004885F0
00860FFE 8B45F4 mov eax, [ebp-$0C]
00861001 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00861004 E8E398BAFF call 0040A8EC
00861009 FF75F8 push dword ptr [ebp-$08]
0086100C 68AC128600 push $008612AC
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
00861011 68B8128600 push $008612B8
00861016 8D45FC lea eax, [ebp-$04]
00861019 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0086101E E89146BAFF call 004056B4
00861023 8B45FC mov eax, [ebp-$04]
00861026 50 push eax
00861027 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00861029 E87ECFC7FF call 004DDFAC
0086102E 5A pop edx
0086102F 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00861031 FF5138 call dword ptr [ecx+$38]
00861034 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00861036 E871CFC7FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0086103B BAE0128600 mov edx, $008612E0
00861040 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00861042 FF5138 call dword ptr [ecx+$38]
00861045 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
00861047 E87C48C6FF call 004C58C8
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0086104C 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00861052 8B8620030000 mov eax, [esi+$0320]
|
00861058 E8335EF5FF call 007B6E90
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0086105D 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
00861063 8B8620030000 mov eax, [esi+$0320]
|
00861069 E8AA5FF5FF call 007B7018
0086106E BA0C138600 mov edx, $0086130C
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
00861073 8B86B0030000 mov eax, [esi+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00861079 E8A275C2FF call 00488620
0086107E 33C0 xor eax, eax
00861080 5A pop edx
00861081 59 pop ecx
00861082 59 pop ecx
00861083 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
00861086 68A8108600 push $008610A8
0086108B 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0086108E E89142BAFF call 00405324
00861093 8D45F8 lea eax, [ebp-$08]
00861096 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0086109B E8A842BAFF call 00405348
008610A0 C3 ret
* Reference to: System.@HandleFinally;
|
008610A1 E94E3ABAFF jmp 00404AF4
008610A6 EBE3 jmp 0086108B
****** END
|
008610A8 5E pop esi
008610A9 5B pop ebx
008610AA 8BE5 mov esp, ebp
008610AC 5D pop ebp
008610AD C3 ret
*)
end;
procedure TfrmYSCRPB_QT.Tv2StylesGetContentStyle(Sender : TObject);
begin
(*
00861310 55 push ebp
00861311 8BEC mov ebp, esp
00861313 5D pop ebp
00861314 C20800 ret $0008
*)
end;
procedure TfrmYSCRPB_QT.TZDSCClick(Sender : TObject);
begin
(*
00861318 55 push ebp
00861319 8BEC mov ebp, esp
0086131B 33C9 xor ecx, ecx
0086131D 51 push ecx
0086131E 51 push ecx
0086131F 51 push ecx
00861320 51 push ecx
00861321 53 push ebx
00861322 56 push esi
00861323 8945FC mov [ebp-$04], eax
00861326 33C0 xor eax, eax
00861328 55 push ebp
* Possible String Reference to: '<27><>6<EFBFBD><36><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00861329 6844148600 push $00861444
***** TRY
|
0086132E 64FF30 push dword ptr fs:[eax]
00861331 648920 mov fs:[eax], esp
00861334 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00861337 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0086133D E87E6BC6FF call 004C7EC0
00861342 84C0 test al, al
00861344 0F85DF000000 jnz 00861429
0086134A 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0086134D 8B985C030000 mov ebx, [eax+$035C]
00861353 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
00861355 E8D66CC6FF call 004C8030
0086135A E9A5000000 jmp 00861404
* Possible String Reference to: 'Ssel'
|
0086135F BA5C148600 mov edx, $0086145C
00861364 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00861366 E84958C6FF call 004C6BB4
0086136B 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_44
|
0086136D FF5244 call dword ptr [edx+$44]
00861370 3C01 cmp al, $01
00861372 0F8585000000 jnz 008613FD
00861378 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0086137B 8BB00C030000 mov esi, [eax+$030C]
00861381 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Close(TDataSet);
|
00861383 E84C45C6FF call 004C58D4
00861388 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0086138A E81DCCC7FF call 004DDFAC
0086138F 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
00861391 FF5244 call dword ptr [edx+$44]
00861394 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00861396 E811CCC7FF call 004DDFAC
* Possible String Reference to: 'update YF_Money_CR set FeeType='' '
|
0086139B BA6C148600 mov edx, $0086146C
008613A0 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
008613A2 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: 'where YFID=''
|
008613A5 6898148600 push $00861498
008613AA 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
008613AD 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'YFID'
|
008613B3 BAB0148600 mov edx, $008614B0
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008613B8 E8F757C6FF call 004C6BB4
008613BD 8D55F0 lea edx, [ebp-$10]
008613C0 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
008613C2 FF5160 call dword ptr [ecx+$60]
008613C5 8B45F0 mov eax, [ebp-$10]
008613C8 8D55F4 lea edx, [ebp-$0C]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008613CB E81C95BAFF call 0040A8EC
008613D0 FF75F4 push dword ptr [ebp-$0C]
* Possible String Reference to: '' '
|
008613D3 68C0148600 push $008614C0
008613D8 8D45F8 lea eax, [ebp-$08]
008613DB BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
008613E0 E8CF42BAFF call 004056B4
008613E5 8B45F8 mov eax, [ebp-$08]
008613E8 50 push eax
008613E9 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
008613EB E8BCCBC7FF call 004DDFAC
008613F0 5A pop edx
008613F1 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
008613F3 FF5138 call dword ptr [ecx+$38]
008613F6 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer;
|
008613F8 E8D7CAC7FF call 004DDED4
008613FD 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Next(TDataSet);
|
008613FF E8486FC6FF call 004C834C
* Reference to field TClientDataSet.Eof : Boolean
|
00861404 80BBA100000000 cmp byte ptr [ebx+$00A1], $00
0086140B 0F844EFFFFFF jz 0086135F
00861411 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
00861413 B9C4148600 mov ecx, $008614C4
* Possible String Reference to: 'ת<>Ƴɹ<C6B3>'
|
00861418 BACC148600 mov edx, $008614CC
*)
end;
procedure TfrmYSCRPB_QT.ToolButton4Click(Sender : TObject);
begin
(*
008614D8 55 push ebp
008614D9 8BEC mov ebp, esp
008614DB B925000000 mov ecx, $00000025
008614E0 6A00 push $00
008614E2 6A00 push $00
008614E4 49 dec ecx
008614E5 75F9 jnz 008614E0
008614E7 53 push ebx
008614E8 56 push esi
008614E9 8945FC mov [ebp-$04], eax
008614EC 33C0 xor eax, eax
008614EE 55 push ebp
008614EF 68401B8600 push $00861B40
***** TRY
|
008614F4 64FF30 push dword ptr fs:[eax]
008614F7 648920 mov fs:[eax], esp
008614FA 33C0 xor eax, eax
008614FC 55 push ebp
008614FD 683A1A8600 push $00861A3A
***** TRY
|
00861502 64FF30 push dword ptr fs:[eax]
00861505 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.TYJTHClick(Sender : TObject);
begin
(*
00861CA8 55 push ebp
00861CA9 8BEC mov ebp, esp
00861CAB B918000000 mov ecx, $00000018
00861CB0 6A00 push $00
00861CB2 6A00 push $00
00861CB4 49 dec ecx
00861CB5 75F9 jnz 00861CB0
00861CB7 51 push ecx
00861CB8 53 push ebx
00861CB9 56 push esi
00861CBA 8BF0 mov esi, eax
00861CBC 33C0 xor eax, eax
00861CBE 55 push ebp
* Possible String Reference to: '<27>1*<2A><><EFBFBD>l<EFBFBD><6C><EFBFBD>^[<5B><>]<5D>'
|
00861CBF 68BE208600 push $008620BE
***** TRY
|
00861CC4 64FF30 push dword ptr fs:[eax]
00861CC7 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QT.ToolBar1 : TToolBar
|
00861CCA 8B86F8020000 mov eax, [esi+$02F8]
00861CD0 8B10 mov edx, [eax]
* Reference to method TToolBar.SetFocus()
|
00861CD2 FF92C4000000 call dword ptr [edx+$00C4]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00861CD8 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
00861CDE E8DD61C6FF call 004C7EC0
00861CE3 84C0 test al, al
00861CE5 0F853C030000 jnz 00862027
00861CEB A0D0208600 mov al, byte ptr [$008620D0]
00861CF0 50 push eax
00861CF1 8D45D4 lea eax, [ebp-$2C]
00861CF4 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
00861CF6 E86970BBFF call 00418D64
00861CFB 8D4DD4 lea ecx, [ebp-$2C]
* Possible String Reference to: 'Ssel'
|
00861CFE BADC208600 mov edx, $008620DC
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00861D03 8B865C030000 mov eax, [esi+$035C]
00861D09 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
00861D0B FF9344020000 call dword ptr [ebx+$0244]
00861D11 84C0 test al, al
00861D13 751D jnz 00861D32
00861D15 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
00861D17 B9E4208600 mov ecx, $008620E4
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
00861D1C BAEC208600 mov edx, $008620EC
*)
end;
procedure TfrmYSCRPB_QT.v2QtyUnitPropertiesButtonClick(Sender : TObject);
begin
(*
00862180 55 push ebp
00862181 8BEC mov ebp, esp
00862183 51 push ecx
00862184 B906000000 mov ecx, $00000006
00862189 6A00 push $00
0086218B 6A00 push $00
0086218D 49 dec ecx
0086218E 75F9 jnz 00862189
00862190 51 push ecx
00862191 874DFC xchg [ebp-$04], ecx
00862194 53 push ebx
00862195 56 push esi
00862196 8BF0 mov esi, eax
00862198 33C0 xor eax, eax
0086219A 55 push ebp
0086219B 68D9238600 push $008623D9
***** TRY
|
008621A0 64FF30 push dword ptr fs:[eax]
008621A3 648920 mov fs:[eax], esp
008621A6 33C0 xor eax, eax
008621A8 55 push ebp
008621A9 68AF238600 push $008623AF
***** TRY
|
008621AE 64FF30 push dword ptr fs:[eax]
008621B1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT.v2QtyPropertiesEditValueChanged(Sender : TObject);
begin
(*
008624C8 55 push ebp
008624C9 8BEC mov ebp, esp
008624CB B90C000000 mov ecx, $0000000C
008624D0 6A00 push $00
008624D2 6A00 push $00
008624D4 49 dec ecx
008624D5 75F9 jnz 008624D0
008624D7 53 push ebx
008624D8 56 push esi
008624D9 8BDA mov ebx, edx
008624DB 8BF0 mov esi, eax
008624DD 33C0 xor eax, eax
008624DF 55 push ebp
* Possible String Reference to: '<27><>#<23><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
008624E0 6865278600 push $00862765
***** TRY
|
008624E5 64FF30 push dword ptr fs:[eax]
008624E8 648920 mov fs:[eax], esp
008624EB 8D55FC lea edx, [ebp-$04]
008624EE 8BC3 mov eax, ebx
* 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;
|
008624F0 E8C7D1D2FF call 0058F6BC
* Reference to control TfrmYSCRPB_QT.Tv2 : TcxGridDBTableView
|
008624F5 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
008624FB E84C9EDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
00862500 E85FF6DEFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
00862505 8B4050 mov eax, [eax+$50]
00862508 8D55F8 lea edx, [ebp-$08]
0086250B 8B08 mov ecx, [eax]
0086250D FF5110 call dword ptr [ecx+$10]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00862510 8B9E5C030000 mov ebx, [esi+$035C]
00862516 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
00862518 E8235FC6FF call 004C8440
0086251D 8B55F8 mov edx, [ebp-$08]
00862520 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862522 E88D46C6FF call 004C6BB4
00862527 50 push eax
00862528 8D45E8 lea eax, [ebp-$18]
0086252B 8B55FC mov edx, [ebp-$04]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0086252E E89568BBFF call 00418DC8
00862533 8D55E8 lea edx, [ebp-$18]
00862536 58 pop eax
00862537 8B08 mov ecx, [eax]
00862539 FF91B4000000 call dword ptr [ecx+$00B4]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0086253F 8B9E5C030000 mov ebx, [esi+$035C]
00862545 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
00862547 E8F45EC6FF call 004C8440
* Possible String Reference to: 'price'
|
0086254C BA7C278600 mov edx, $0086277C
00862551 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862553 E85C46C6FF call 004C6BB4
00862558 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_54
|
0086255A FF5254 call dword ptr [edx+$54]
0086255D DD5DD0 fstp qword ptr [ebp-$30]
00862560 9B wait
* Possible String Reference to: 'Qty'
|
00862561 BA8C278600 mov edx, $0086278C
00862566 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862568 E84746C6FF call 004C6BB4
0086256D 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_54
|
0086256F FF5254 call dword ptr [edx+$54]
00862572 DC4DD0 fmul qword ptr [ebp-$30]
00862575 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromReal;
|
00862578 E80F68BBFF call 00418D8C
0086257D 8D45D8 lea eax, [ebp-$28]
00862580 50 push eax
* Possible String Reference to: 'Money'
|
00862581 BA98278600 mov edx, $00862798
00862586 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862588 E82746C6FF call 004C6BB4
0086258D 5A pop edx
0086258E 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
00862590 FF91B4000000 call dword ptr [ecx+$00B4]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
00862596 8B9E0C030000 mov ebx, [esi+$030C]
0086259C 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0086259E E83133C6FF call 004C58D4
008625A3 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
008625A5 E802BAC7FF call 004DDFAC
008625AA 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
008625AC FF5244 call dword ptr [edx+$44]
008625AF 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
008625B1 E8F6B9C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
008625B6 BAA8278600 mov edx, $008627A8
008625BB 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
008625BD FF5138 call dword ptr [ecx+$38]
008625C0 8D55CC lea edx, [ebp-$34]
008625C3 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008625C6 E82183BAFF call 0040A8EC
008625CB 837DCC00 cmp dword ptr [ebp-$34], +$00
008625CF 7440 jz 00862611
* Possible String Reference to: ' Set '
|
008625D1 68C4278600 push $008627C4
008625D6 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
008625D9 68D4278600 push $008627D4
008625DE 8D55C4 lea edx, [ebp-$3C]
008625E1 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008625E4 E80383BAFF call 0040A8EC
008625E9 FF75C4 push dword ptr [ebp-$3C]
008625EC 68E0278600 push $008627E0
008625F1 8D45C8 lea eax, [ebp-$38]
008625F4 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
008625F9 E8B630BAFF call 004056B4
008625FE 8B45C8 mov eax, [ebp-$38]
00862601 50 push eax
00862602 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00862604 E8A3B9C7FF call 004DDFAC
00862609 5A pop edx
0086260A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0086260C FF5138 call dword ptr [ecx+$38]
0086260F EB2B jmp 0086263C
00862611 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
00862613 E894B9C7FF call 004DDFAC
00862618 50 push eax
* Possible String Reference to: ' Set '
|
00862619 68C4278600 push $008627C4
0086261E FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
00862621 68EC278600 push $008627EC
00862626 8D45C0 lea eax, [ebp-$40]
00862629 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0086262E E88130BAFF call 004056B4
00862633 8B55C0 mov edx, [ebp-$40]
00862636 58 pop eax
00862637 8B08 mov ecx, [eax]
00862639 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Money=''
|
0086263C 68FC278600 push $008627FC
* Possible String Reference to: 'Money'
|
00862641 BA98278600 mov edx, $00862798
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
00862646 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0086264C E86345C6FF call 004C6BB4
00862651 8D55B4 lea edx, [ebp-$4C]
00862654 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
00862656 FF5160 call dword ptr [ecx+$60]
00862659 8B45B4 mov eax, [ebp-$4C]
0086265C 8D55B8 lea edx, [ebp-$48]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0086265F E88882BAFF call 0040A8EC
00862664 FF75B8 push dword ptr [ebp-$48]
00862667 68E0278600 push $008627E0
0086266C 8D45BC lea eax, [ebp-$44]
0086266F BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
00862674 E83B30BAFF call 004056B4
00862679 8B45BC mov eax, [ebp-$44]
0086267C 50 push eax
0086267D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0086267F E828B9C7FF call 004DDFAC
00862684 5A pop edx
00862685 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00862687 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0086268A 6810288600 push $00862810
0086268F 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QT.TZDClick(Sender : TObject);
begin
(*
00862864 53 push ebx
00862865 8BD8 mov ebx, eax
* Reference to control TfrmYSCRPB_QT.cxTabControl1 : TcxTabControl
|
00862867 8B839C030000 mov eax, [ebx+$039C]
* Reference to control ADOTemp : N.A.
|
0086286D 83B83C03000000 cmp dword ptr [eax+$033C], +$00
00862874 753C jnz 008628B2
00862876 8BCB mov ecx, ebx
00862878 B201 mov dl, $01
* Reference to class TfrmSXCKNewList
|
0086287A A128417D00 mov eax, dword ptr [$007D4128]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0086287F E84CF5C3FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QT.v2PayMentPropertiesButtonClick(Sender : TObject);
begin
(*
008628C0 55 push ebp
008628C1 8BEC mov ebp, esp
008628C3 51 push ecx
008628C4 B906000000 mov ecx, $00000006
008628C9 6A00 push $00
008628CB 6A00 push $00
008628CD 49 dec ecx
008628CE 75F9 jnz 008628C9
008628D0 51 push ecx
008628D1 874DFC xchg [ebp-$04], ecx
008628D4 53 push ebx
008628D5 56 push esi
008628D6 8BF0 mov esi, eax
008628D8 33C0 xor eax, eax
008628DA 55 push ebp
008628DB 68192B8600 push $00862B19
***** TRY
|
008628E0 64FF30 push dword ptr fs:[eax]
008628E3 648920 mov fs:[eax], esp
008628E6 33C0 xor eax, eax
008628E8 55 push ebp
008628E9 68EF2A8600 push $00862AEF
***** TRY
|
008628EE 64FF30 push dword ptr fs:[eax]
008628F1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085A315(Sender : TObject);
begin
(*
0085A315 8BEC mov ebp, esp
0085A317 33C9 xor ecx, ecx
0085A319 51 push ecx
0085A31A 51 push ecx
0085A31B 51 push ecx
0085A31C 51 push ecx
0085A31D 51 push ecx
0085A31E 53 push ebx
0085A31F 56 push esi
0085A320 8945FC mov [ebp-$04], eax
0085A323 33C0 xor eax, eax
0085A325 55 push ebp
* Possible String Reference to: '<27>ʥ<EFBFBD><CAA5><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085A326 6825A58500 push $0085A525
***** TRY
|
0085A32B 64FF30 push dword ptr fs:[eax]
0085A32E 648920 mov fs:[eax], esp
0085A331 33C0 xor eax, eax
0085A333 55 push ebp
0085A334 6803A58500 push $0085A503
***** TRY
|
0085A339 64FF30 push dword ptr fs:[eax]
0085A33C 648920 mov fs:[eax], esp
0085A33F 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085A342 8B8020030000 mov eax, [eax+$0320]
* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
0085A348 E807D2C6FF call 004C7554
0085A34D 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085A350 8B9820030000 mov ebx, [eax+$0320]
0085A356 33D2 xor edx, edx
0085A358 8BC3 mov eax, ebx
0085A35A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_0190
|
0085A35C FF9190010000 call dword ptr [ecx+$0190]
0085A362 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085A364 E86BB5C6FF call 004C58D4
0085A369 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A36B E83C3CC8FF call 004DDFAC
0085A370 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0085A372 FF5244 call dword ptr [edx+$44]
0085A375 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A377 E8303CC8FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
0085A37C BA3CA58500 mov edx, $0085A53C
0085A381 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A383 FF5138 call dword ptr [ecx+$38]
0085A386 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A388 E81F3CC8FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
0085A38D BA9CA58500 mov edx, $0085A59C
0085A392 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A394 FF5138 call dword ptr [ecx+$38]
0085A397 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A399 E80E3CC8FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
0085A39E BAF8A58500 mov edx, $0085A5F8
0085A3A3 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A3A5 FF5138 call dword ptr [ecx+$38]
0085A3A8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A3AA E8FD3BC8FF call 004DDFAC
* Possible String Reference to: ',isnull((select JM.PRTColor from JY
| Order_Sub JM inner join CK_SXPB_CR
| F on JM.Subid=F.ORDSubIdRK where F.
| SPID=A.YFTypeId),'') PRTColor,'
|
0085A3AF BA54A68500 mov edx, $0085A654
0085A3B4 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A3B6 FF5138 call dword ptr [ecx+$38]
0085A3B9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A3BB E8EC3BC8FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
0085A3C0 BAE4A68500 mov edx, $0085A6E4
0085A3C5 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A3C7 FF5138 call dword ptr [ecx+$38]
0085A3CA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A3CC E8DB3BC8FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
0085A3D1 BAF0A68500 mov edx, $0085A6F0
0085A3D6 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A3D8 FF5138 call dword ptr [ecx+$38]
0085A3DB 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A3DD E8CA3BC8FF call 004DDFAC
* Possible String Reference to: ' where A.CRType='<27><><EFBFBD><EFBFBD><EFBFBD>ӷ<EFBFBD>' '
|
0085A3E2 BA0CA78500 mov edx, $0085A70C
0085A3E7 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A3E9 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' and A.CRTime>=''
|
0085A3EC 6834A78500 push $0085A734
0085A3F1 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.begdate : TDateTimePicker
|
0085A3F4 8B804C030000 mov eax, [eax+$034C]
0085A3FA FFB014020000 push dword ptr [eax+$0214]
0085A400 FFB010020000 push dword ptr [eax+$0210]
0085A406 8D55F4 lea edx, [ebp-$0C]
* Possible String Reference to: 'yyyy-MM-dd'
|
0085A409 B850A78500 mov eax, $0085A750
|
0085A40E E8A947BBFF call 0040EBBC
0085A413 FF75F4 push dword ptr [ebp-$0C]
* Possible String Reference to: '' '
|
0085A416 6864A78500 push $0085A764
0085A41B 8D45F8 lea eax, [ebp-$08]
0085A41E BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085A423 E88CB2BAFF call 004056B4
0085A428 8B45F8 mov eax, [ebp-$08]
0085A42B 50 push eax
0085A42C 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A42E E8793BC8FF call 004DDFAC
0085A433 5A pop edx
0085A434 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A436 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' and A.CRTime<''
|
0085A439 6870A78500 push $0085A770
0085A43E 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.Enddate : TDateTimePicker
|
0085A441 8B8050030000 mov eax, [eax+$0350]
0085A447 DD8010020000 fld qword ptr [eax+$0210]
0085A44D D80580A78500 fadd dword ptr [$0085A780]
0085A453 83C4F8 add esp, -$08
0085A456 DD1C24 fstp qword ptr [esp]
0085A459 9B wait
0085A45A 8D55EC lea edx, [ebp-$14]
* Possible String Reference to: 'yyyy-MM-dd'
|
0085A45D B850A78500 mov eax, $0085A750
|
0085A462 E85547BBFF call 0040EBBC
0085A467 FF75EC push dword ptr [ebp-$14]
* Possible String Reference to: '' '
|
0085A46A 6864A78500 push $0085A764
0085A46F 8D45F0 lea eax, [ebp-$10]
0085A472 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085A477 E838B2BAFF call 004056B4
0085A47C 8B45F0 mov eax, [ebp-$10]
0085A47F 50 push eax
0085A480 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0085A482 E8253BC8FF call 004DDFAC
0085A487 5A pop edx
0085A488 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0085A48A FF5138 call dword ptr [ecx+$38]
0085A48D 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0085A48F E834B4C6FF call 004C58C8
0085A494 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085A497 8B905C030000 mov edx, [eax+$035C]
0085A49D 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085A4A0 8B8020030000 mov eax, [eax+$0320]
|
0085A4A6 E8E5C9F5FF call 007B6E90
0085A4AB 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.CDS_HZ : TClientDataSet
|
0085A4AE 8B905C030000 mov edx, [eax+$035C]
0085A4B4 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085A4B7 8B8020030000 mov eax, [eax+$0320]
|
0085A4BD E856CBF5FF call 007B7018
0085A4C2 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.Label13 : TLabel
|
0085A4C5 8B80B0030000 mov eax, [eax+$03B0]
0085A4CB BA8CA78500 mov edx, $0085A78C
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0085A4D0 E84BE1C2FF call 00488620
0085A4D5 33C0 xor eax, eax
0085A4D7 5A pop edx
0085A4D8 59 pop ecx
0085A4D9 59 pop ecx
0085A4DA 648910 mov fs:[eax], edx
****** FINALLY
|
0085A4DD 680AA58500 push $0085A50A
0085A4E2 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryMain : TADOQuery
|
0085A4E5 8B8020030000 mov eax, [eax+$0320]
* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
0085A4EB E884D0C6FF call 004C7574
0085A4F0 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ToolButton2 : TToolButton
|
0085A4F3 8B8014030000 mov eax, [eax+$0314]
0085A4F9 66BEEBFF mov si, $FFEB
* Reference to: System.@CallDynaInst;
|
0085A4FD E852A0BAFF call 00404554
0085A502 C3 ret
* Reference to: System.@HandleFinally;
|
0085A503 E9ECA5BAFF jmp 00404AF4
0085A508 EBD8 jmp 0085A4E2
****** END
|
0085A50A 33C0 xor eax, eax
0085A50C 5A pop edx
0085A50D 59 pop ecx
0085A50E 59 pop ecx
0085A50F 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
0085A512 682CA58500 push $0085A52C
0085A517 8D45EC lea eax, [ebp-$14]
0085A51A BA04000000 mov edx, $00000004
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0085A51F E824AEBAFF call 00405348
0085A524 C3 ret
* Reference to: System.@HandleFinally;
|
0085A525 E9CAA5BAFF jmp 00404AF4
0085A52A EBEB jmp 0085A517
****** END
|
0085A52C 5E pop esi
0085A52D 5B pop ebx
0085A52E 8BE5 mov esp, ebp
0085A530 5D pop ebp
0085A531 C3 ret
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085A539(Sender : TObject);
begin
(*
0085A539 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085A5D1(Sender : TObject);
begin
(*
0085A5D1 53 push ebx
0085A5D2 44 inc esp
0085A5D3 27 daa
0085A5D4 2920 sub dword ptr [eax], esp
0085A5D6 7468 jz 0085A640
0085A5D8 656E outsb
0085A5DA 204D6F and [ebp+$6F], cl
0085A5DD 6E outsb
0085A5DE 657920 jns 0085A601
0085A5E1 656C insb
0085A5E3 7365 jnb 0085A64A
0085A5E5 2030 and [eax], dh
0085A5E7 20656E and [ebp+$6E], ah
0085A5EA 642900 sub dword ptr fs:[eax], eax
0085A5ED 0000 add [eax], al
0085A5EF 00FF add bh, bh
0085A5F1 FFFF DB $FF, $FF //
0085A5F3 FF5200 call dword ptr [edx+$00]
0085A5F6 0000 add [eax], al
0085A5F8 2C55 sub al, $55
0085A5FA 53 push ebx
0085A5FB 44 inc esp
0085A5FC 4D dec ebp
0085A5FD 6F outsd
0085A5FE 6E outsb
0085A5FF 65793D jns 0085A63F
0085A602 286361 sub [ebx+$61], ah
0085A605 7365 jnb 0085A66C
0085A607 207768 and [edi+$68], dh
0085A60A 656E outsb
0085A60C 2028 and [eax], ch
0085A60E 41 inc ecx
0085A60F 2E42 inc edx
0085A611 5A pop edx
0085A612 54 push esp
0085A613 7970 jns 0085A685
0085A615 653C3E cmp al, $3E
0085A618 27 daa
0085A619 A3A4272920 mov dword ptr [$202927A4], eax
0085A61E 61 popa
0085A61F 6E outsb
0085A620 642028 and fs:[eax], ch
0085A623 41 inc ecx
0085A624 2E42 inc edx
0085A626 5A pop edx
0085A627 54 push esp
0085A628 7970 jns 0085A69A
0085A62A 653C3E cmp al, $3E
0085A62D 27 daa
0085A62E 52 push edx
0085A62F 4D dec ebp
0085A630 42 inc edx
0085A631 27 daa
0085A632 2920 sub dword ptr [eax], esp
0085A634 7468 jz 0085A69E
0085A636 656E outsb
0085A638 204D6F and [ebp+$6F], cl
0085A63B 6E outsb
0085A63C 657920 jns 0085A65F
0085A63F 656C insb
0085A641 7365 jnb 0085A6A8
0085A643 2030 and [eax], dh
0085A645 20656E and [ebp+$6E], ah
0085A648 642900 sub dword ptr fs:[eax], eax
0085A64B 00FF add bh, bh
0085A64D FFFF DB $FF, $FF //
0085A64F FF870000002C inc dword ptr [edi+$2C000000]
0085A655 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
0085A65C 287365 sub [ebx+$65], dh
0085A65F 6C insb
0085A660 656374204A arpl gs:[eax+$4A], si
0085A665 4D dec ebp
0085A666 2E50 push eax
0085A668 52 push edx
0085A669 54 push esp
0085A66A 43 inc ebx
0085A66B 6F outsd
0085A66C 6C insb
0085A66D 6F outsd
0085A66E 7220 jb 0085A690
0085A670 66726F jb 0085A6E2
0085A673 6D insd
0085A674 204A59 and [edx+$59], cl
0085A677 4F dec edi
0085A678 7264 jb 0085A6DE
0085A67A 65725F jb 0085A6DC
0085A67D 53 push ebx
0085A67E 7562 jnz 0085A6E2
0085A680 204A4D and [edx+$4D], cl
0085A683 20696E and [ecx+$6E], ch
0085A686 6E outsb
0085A687 657220 jb 0085A6AA
0085A68A 6A6F push $6F
0085A68C 696E20434B5F53 imul ebp, [esi+$20], $535F4B43
0085A693 58 pop eax
0085A694 50 push eax
0085A695 42 inc edx
0085A696 5F pop edi
0085A697 43 inc ebx
0085A698 52 push edx
0085A699 204620 and [esi+$20], al
0085A69C 6F outsd
0085A69D 6E outsb
0085A69E 204A4D and [edx+$4D], cl
0085A6A1 2E53 push ebx
0085A6A3 7562 jnz 0085A707
0085A6A5 69643D462E4F5244 imul esp, [ebp+edi+$46], $44524F2E
0085A6AD 53 push ebx
0085A6AE 7562 jnz 0085A712
0085A6B0 49 dec ecx
0085A6B1 6452 push edx
0085A6B3 4B dec ebx
0085A6B4 207768 and [edi+$68], dh
0085A6B7 657265 jb 0085A71F
0085A6BA 20462E and [esi+$2E], al
0085A6BD 53 push ebx
0085A6BE 50 push eax
0085A6BF 49 dec ecx
0085A6C0 44 inc esp
0085A6C1 3D412E5946 cmp eax, $46592E41
0085A6C6 54 push esp
0085A6C7 7970 jns 0085A739
0085A6C9 6549 dec ecx
0085A6CB 64292C27 sub dword ptr fs:[edi], ebp
0085A6CF 27 daa
0085A6D0 2920 sub dword ptr [eax], esp
0085A6D2 50 push eax
0085A6D3 52 push edx
0085A6D4 54 push esp
0085A6D5 43 inc ebx
0085A6D6 6F outsd
0085A6D7 6C insb
0085A6D8 6F outsd
0085A6D9 722C jb 0085A707
0085A6DB 00FF add bh, bh
0085A6DD FFFF DB $FF, $FF //
0085A6DF FF03 inc dword ptr [ebx]
0085A6E1 0000 add [eax], al
0085A6E3 00412E add [ecx+$2E], al
0085A6E6 2A00 sub al, byte ptr [eax]
0085A6E8 FFFF DB $FF, $FF //
0085A6EA FFFF DB $FF, $FF //
0085A6EC 1300 adc eax, [eax]
0085A6EE 0000 add [eax], al
0085A6F0 206672 and [esi+$72], ah
0085A6F3 6F outsd
0085A6F4 6D insd
0085A6F5 205946 and [ecx+$46], bl
0085A6F8 5F pop edi
0085A6F9 4D dec ebp
0085A6FA 6F outsd
0085A6FB 6E outsb
0085A6FC 65795F jns 0085A75E
0085A6FF 43 inc ebx
0085A700 52 push edx
0085A701 204100 and [ecx+$00], al
0085A704 FFFF DB $FF, $FF //
0085A706 FFFF DB $FF, $FF //
0085A708 1C00 sbb al, $00
0085A70A 0000 add [eax], al
0085A70C 207768 and [edi+$68], dh
0085A70F 657265 jb 0085A777
0085A712 20412E and [ecx+$2E], al
0085A715 43 inc ebx
0085A716 52 push edx
0085A717 54 push esp
0085A718 7970 jns 0085A78A
0085A71A 653D27B8B6BF cmp eax, $BFB6B827
0085A720 EE out dx, al
0085A721 D4 aam
0085A722 D3B7D1272020 DB $D3, $B7, $D1, $27, $20, $20 // dword ptr [edi+$202027D1], cl
0085A728 0000 add [eax], al
0085A72A 0000 add [eax], al
0085A72C FFFF DB $FF, $FF //
0085A72E FFFF DB $FF, $FF //
0085A730 1000 adc [eax], al
0085A732 0000 add [eax], al
0085A734 20616E and [ecx+$6E], ah
0085A737 6420412E and fs:[ecx+$2E], al
0085A73B 43 inc ebx
0085A73C 52 push edx
0085A73D 54 push esp
0085A73E 696D653E3D2700 imul ebp, [ebp+$65], $00273D3E
0085A745 0000 add [eax], al
0085A747 00FF add bh, bh
0085A749 FFFF DB $FF, $FF //
0085A74B FF0A dec dword ptr [edx]
0085A74D 0000 add [eax], al
0085A74F 007979 add [ecx+$79], bh
0085A752 7979 jns 0085A7CD
0085A754 2D4D4D2D64 sub eax, $642D4D4D
0085A759 640000 add fs:[eax], al
0085A75C FFFF DB $FF, $FF //
0085A75E FFFF DB $FF, $FF //
0085A760 0200 add al, byte ptr [eax]
0085A762 0000 add [eax], al
0085A764 27 daa
0085A765 2000 and [eax], al
0085A767 00FF add bh, bh
0085A769 FFFF DB $FF, $FF //
0085A76B FF0F dec dword ptr [edi]
0085A76D 0000 add [eax], al
0085A76F 0020 add [eax], ah
0085A771 61 popa
0085A772 6E outsb
0085A773 6420412E and fs:[ecx+$2E], al
0085A777 43 inc ebx
0085A778 52 push edx
0085A779 54 push esp
0085A77A 696D653C270000 imul ebp, [ebp+$65], $0000273C
0085A781 00803FFFFFFF add [eax+$FFFFFF3F], al
0085A787 FF01 inc dword ptr [ecx]
0085A789 0000 add [eax], al
0085A78B 0030 add [eax], dh
0085A78D 0000 add [eax], al
0085A78F 0033 add [ebx], dh
0085A791 C0A39C5A8900C3 shl byte ptr [ebx+$895A9C], $C3
0085A798 C60102 mov byte ptr [ecx], $02
0085A79B C3 ret
0085A79C 53 push ebx
0085A79D 8BD8 mov ebx, eax
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0085A79F B9C8A78500 mov ecx, $0085A7C8
* Reference to control v1PRTColor : N.A.
|
0085A7A4 8B9334030000 mov edx, [ebx+$0334]
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>Ǽ<EFBFBD>4'
|
0085A7AA B8DCA78500 mov eax, $0085A7DC
|
0085A7AF E8ECD3F5FF call 007B7BA0
0085A7B4 8BC3 mov eax, ebx
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
0085A7B6 E8DDB7C4FF call 004A5F98
0085A7BB 5B pop ebx
0085A7BC C3 ret
0085A7BD 0000 add [eax], al
0085A7BF 00FF add bh, bh
0085A7C1 FFFF DB $FF, $FF //
0085A7C3 FF08 dec dword ptr [eax]
0085A7C5 0000 add [eax], al
0085A7C7 00B2C6CEF1B9 add [edx+$B9F1CEC6], dh
0085A7CD DCC0 fadd st(0), st(0)
0085A7CF ED in eax, dx
0085A7D0 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085AE01(Sender : TObject);
begin
(*
0085AE01 8BEC mov ebp, esp
0085AE03 B93E000000 mov ecx, $0000003E
0085AE08 6A00 push $00
0085AE0A 6A00 push $00
0085AE0C 49 dec ecx
0085AE0D 75F9 jnz 0085AE08
0085AE0F 51 push ecx
0085AE10 53 push ebx
0085AE11 56 push esi
0085AE12 57 push edi
0085AE13 8945FC mov [ebp-$04], eax
0085AE16 33C0 xor eax, eax
0085AE18 55 push ebp
* Possible String Reference to: '鬒<><E9AC92><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085AE19 6843B88500 push $0085B843
***** TRY
|
0085AE1E 64FF30 push dword ptr fs:[eax]
0085AE21 648920 mov fs:[eax], esp
0085AE24 33C0 xor eax, eax
0085AE26 55 push ebp
0085AE27 688BB68500 push $0085B68B
***** TRY
|
0085AE2C 64FF30 push dword ptr fs:[eax]
0085AE2F 648920 mov fs:[eax], esp
0085AE32 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085AE35 8B800C030000 mov eax, [eax+$030C]
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
0085AE3B E8EC0FC8FF call 004DBE2C
* Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer;
|
0085AE40 E84F74C7FF call 004D2294
* Possible String Reference to: 'YF_Money_CR'
|
0085AE45 6860B88500 push $0085B860
0085AE4A 6A04 push $04
0085AE4C 6A01 push $01
0085AE4E 8D55F8 lea edx, [ebp-$08]
0085AE51 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085AE54 8B800C030000 mov eax, [eax+$030C]
* Possible String Reference to: 'YC'
|
0085AE5A B974B88500 mov ecx, $0085B874
* Reference to : TfrmSelExportField._PROC_007B7708()
|
0085AE5F E8A4C8F5FF call 007B7708
0085AE64 84C0 test al, al
0085AE66 753A jnz 0085AEA2
0085AE68 33DB xor ebx, ebx
0085AE6A 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QT.ADOQueryCmd : TADOQuery
|
0085AE6D 8B800C030000 mov eax, [eax+$030C]
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
0085AE73 E8B40FC8FF call 004DBE2C
* Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection);
|
0085AE78 E86374C7FF call 004D22E0
0085AE7D 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085AE7F B978B88500 mov ecx, $0085B878
* Possible String Reference to: 'ȡ<><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧ<EFBFBD>ܣ<EFBFBD>'
|
0085AE84 BA80B88500 mov edx, $0085B880
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085B901(Sender : TObject);
begin
(*
0085B901 7064 jo 0085B967
0085B903 61 popa
0085B904 7465 jz 0085B96B
0085B906 205946 and [ecx+$46], bl
0085B909 5F pop edi
0085B90A 4D dec ebp
0085B90B 6F outsd
0085B90C 6E outsb
0085B90D 65795F jns 0085B96F
0085B910 43 inc ebx
0085B911 52 push edx
0085B912 49 dec ecx
0085B913 44 inc esp
0085B914 207365 and [ebx+$65], dh
0085B917 7420 jz 0085B939
0085B919 43 inc ebx
0085B91A 52 push edx
0085B91B 49 dec ecx
0085B91C 44 inc esp
0085B91D 3D43524944 cmp eax, $44495243
0085B922 2B31 sub esi, dword ptr [ecx]
0085B924 0000 add [eax], al
0085B926 0000 add [eax], al
0085B928 FFFF DB $FF, $FF //
0085B92A FFFF DB $FF, $FF //
0085B92C 1C00 sbb al, $00
0085B92E 0000 add [eax], al
0085B930 7365 jnb 0085B997
0085B932 6C insb
0085B933 656374202A arpl gs:[eax+$2A], si
0085B938 206672 and [esi+$72], ah
0085B93B 6F outsd
0085B93C 6D insd
0085B93D 205946 and [ecx+$46], bl
0085B940 5F pop edi
0085B941 4D dec ebp
0085B942 6F outsd
0085B943 6E outsb
0085B944 65795F jns 0085B9A6
0085B947 43 inc ebx
0085B948 52 push edx
0085B949 49 dec ecx
0085B94A 44 inc esp
0085B94B 2000 and [eax], al
0085B94D 0000 add [eax], al
0085B94F 00FF add bh, bh
0085B951 FFFF DB $FF, $FF //
0085B953 FF23 jmp dword ptr [ebx]
0085B955 0000 add [eax], al
0085B957 007365 add [ebx+$65], dh
0085B95A 6C insb
0085B95B 656374202A arpl gs:[eax+$2A], si
0085B960 206672 and [esi+$72], ah
0085B963 6F outsd
0085B964 6D insd
0085B965 205946 and [ecx+$46], bl
0085B968 5F pop edi
0085B969 4D dec ebp
0085B96A 6F outsd
0085B96B 6E outsb
0085B96C 65795F jns 0085B9CE
0085B96F 4B dec ebx
0085B970 43 inc ebx
0085B971 207768 and [edi+$68], dh
0085B974 657265 jb 0085B9DC
0085B977 2031 and [ecx], dh
0085B979 3D3200FFFF cmp eax, $FFFF0032
0085B97E FFFF DB $FF, $FF //
0085B980 0900 or [eax], eax
0085B982 0000 add [eax], al
0085B984 46 inc esi
0085B985 61 popa
0085B986 63746F72 arpl [edi+ebp*2+$72], si
0085B98A 794E jns 0085B9DA
0085B98C 6F outsd
0085B98D 0000 add [eax], al
0085B98F 00FF add bh, bh
0085B991 FFFF DB $FF, $FF //
0085B993 FF07 inc dword ptr [edi]
0085B995 0000 add [eax], al
0085B997 005A64 add [edx+$64], bl
0085B99A 7953 jns 0085B9EF
0085B99C 7472 jz 0085BA10
0085B99E 3100 xor [eax], eax
0085B9A0 FFFF DB $FF, $FF //
0085B9A2 FFFF DB $FF, $FF //
0085B9A4 06 push es
0085B9A5 0000 add [eax], al
0085B9A7 00D3 add bl, dl
0085B9A9 A6 cmpsb
0085B9AA B8B6B8B600 mov eax, $00B6B8B6
0085B9AF 00FF add bh, bh
0085B9B1 FFFF DB $FF, $FF //
0085B9B3 FF23 jmp dword ptr [ebx]
0085B9B5 0000 add [eax], al
0085B9B7 007365 add [ebx+$65], dh
0085B9BA 6C insb
0085B9BB 656374202A arpl gs:[eax+$2A], si
0085B9C0 206672 and [esi+$72], ah
0085B9C3 6F outsd
0085B9C4 6D insd
0085B9C5 205946 and [ecx+$46], bl
0085B9C8 5F pop edi
0085B9C9 4D dec ebp
0085B9CA 6F outsd
0085B9CB 6E outsb
0085B9CC 65795F jns 0085BA2E
0085B9CF 43 inc ebx
0085B9D0 52 push edx
0085B9D1 207768 and [edi+$68], dh
0085B9D4 657265 jb 0085BA3C
0085B9D7 2031 and [ecx], dh
0085B9D9 3D3200FFFF cmp eax, $FFFF0032
0085B9DE FFFF DB $FF, $FF //
0085B9E0 0400 add al, +$00
0085B9E2 0000 add [eax], al
0085B9E4 59 pop ecx
0085B9E5 46 inc esi
0085B9E6 49 dec ecx
0085B9E7 44 inc esp
0085B9E8 0000 add [eax], al
0085B9EA 0000 add [eax], al
0085B9EC FFFF DB $FF, $FF //
0085B9EE FFFF DB $FF, $FF //
0085B9F0 06 push es
0085B9F1 0000 add [eax], al
0085B9F3 004669 add [esi+$69], al
0085B9F6 6C insb
0085B9F7 6C insb
0085B9F8 657200 jb 0085B9FB
0085B9FB 00FF add bh, bh
0085B9FD FFFF DB $FF, $FF //
0085B9FF FF06 inc dword ptr [esi]
0085BA01 0000 add [eax], al
0085BA03 004352 add [ebx+$52], al
0085BA06 54 push esp
0085BA07 7970 jns 0085BA79
0085BA09 650000 add gs:[eax], al
0085BA0C FFFF DB $FF, $FF //
0085BA0E FFFF DB $FF, $FF //
0085BA10 0800 or [eax], al
0085BA12 0000 add [eax], al
0085BA14 B8B6BFEED4 mov eax, $D4EEBFB6
0085BA19 D3B7D1000000 DB $D3, $B7, $D1, $00, $00, $00 // dword ptr [edi+$00D1], cl
0085BA1F 00FF add bh, bh
0085BA21 FFFF DB $FF, $FF //
0085BA23 FF06 inc dword ptr [esi]
0085BA25 0000 add [eax], al
0085BA27 004352 add [ebx+$52], al
0085BA2A 46 inc esi
0085BA2B 6C insb
0085BA2C 61 popa
0085BA2D 670000 add [bx+si], al
0085BA30 FFFF DB $FF, $FF //
0085BA32 FFFF DB $FF, $FF //
0085BA34 07 pop es
0085BA35 0000 add [eax], al
0085BA37 005174 add [ecx+$74], dl
0085BA3A 7946 jns 0085BA82
0085BA3C 6C insb
0085BA3D 61 popa
0085BA3E 6700FF add bh, bh
0085BA41 FFFF DB $FF, $FF //
0085BA43 FF06 inc dword ptr [esi]
0085BA45 0000 add [eax], al
0085BA47 005946 add [ecx+$46], bl
0085BA4A 4E dec esi
0085BA4B 61 popa
0085BA4C 6D insd
0085BA4D 650000 add gs:[eax], al
0085BA50 FFFF DB $FF, $FF //
0085BA52 FFFF DB $FF, $FF //
0085BA54 07 pop es
0085BA55 0000 add [eax], al
0085BA57 004665 add [esi+$65], al
0085BA5A 6554 push esp
0085BA5C 7970 jns 0085BACE
0085BA5E 6500FF add bh, bh
0085BA61 FFFF DB $FF, $FF //
0085BA63 FF06 inc dword ptr [esi]
0085BA65 0000 add [eax], al
0085BA67 004352 add [ebx+$52], al
0085BA6A 54 push esp
0085BA6B 696D650000FFFF imul ebp, [ebp+$65], $FFFF0000
0085BA72 FFFF DB $FF, $FF //
0085BA74 07 pop es
0085BA75 0000 add [eax], al
0085BA77 006368 add [ebx+$68], ah
0085BA7A 6B6E6F74 imul ebp, [esi+$6F], $74
0085BA7E 6500FF add bh, bh
0085BA81 FFFF DB $FF, $FF //
0085BA83 FF0A dec dword ptr [edx]
0085BA85 0000 add [eax], al
0085BA87 005946 add [ecx+$46], bl
0085BA8A 44 inc esp
0085BA8B 656646 inc si
0085BA8E 6C insb
0085BA8F 61 popa
0085BA90 673100 xor [bx+si], eax
0085BA93 00FF add bh, bh
0085BA95 FFFF DB $FF, $FF //
0085BA97 FF06 inc dword ptr [esi]
0085BA99 0000 add [eax], al
0085BA9B 007374 add [ebx+$74], dh
0085BA9E 61 popa
0085BA9F 7475 jz 0085BB16
0085BAA1 7300 jnb 0085BAA3
0085BAA3 00FF add bh, bh
0085BAA5 FFFF DB $FF, $FF //
0085BAA7 FF0500000048 inc dword ptr [$48000000]
0085BAAD 7569 jnz 0085BB18
0085BAAF 4C dec esp
0085BAB0 7600 jbe 0085BAB2
0085BAB2 0000 add [eax], al
0085BAB4 FFFF DB $FF, $FF //
0085BAB6 FFFF DB $FF, $FF //
0085BAB8 050000004D add eax, +$4D000000
0085BABD 6F outsd
0085BABE 6E outsb
0085BABF 657900 jns 0085BAC2
0085BAC2 0000 add [eax], al
0085BAC4 FFFF DB $FF, $FF //
0085BAC6 FFFF DB $FF, $FF //
0085BAC8 0300 add eax, [eax]
0085BACA 0000 add [eax], al
0085BACC 53 push ebx
0085BACD 4C dec esp
0085BACE 56 push esi
0085BACF 00FF add bh, bh
0085BAD1 FFFF DB $FF, $FF //
0085BAD3 FF06 inc dword ptr [esi]
0085BAD5 0000 add [eax], al
0085BAD7 00425A add [edx+$5A], al
0085BADA 54 push esp
0085BADB 7970 jns 0085BB4D
0085BADD 650000 add gs:[eax], al
0085BAE0 FFFF DB $FF, $FF //
0085BAE2 FFFF DB $FF, $FF //
0085BAE4 0200 add al, byte ptr [eax]
0085BAE6 0000 add [eax], al
0085BAE8 A3A40000FF mov dword ptr [$FF0000A4], eax
0085BAED FFFF DB $FF, $FF //
0085BAEF FF09 dec dword ptr [ecx]
0085BAF1 0000 add [eax], al
0085BAF3 00436F add [ebx+$6F], al
0085BAF6 6D insd
0085BAF7 54 push esp
0085BAF8 61 popa
0085BAF9 69746F75000000FF imul esi, [edi+ebp*2+$75], $FF000000
0085BB01 FFFF DB $FF, $FF //
0085BB03 FF06 inc dword ptr [esi]
0085BB05 0000 add [eax], al
0085BB07 00535A add [ebx+$5A], dl
0085BB0A 59 pop ecx
0085BB0B 46 inc esi
0085BB0C 49 dec ecx
0085BB0D 44 inc esp
0085BB0E 0000 add [eax], al
0085BB10 FFFF DB $FF, $FF //
0085BB12 FFFF DB $FF, $FF //
0085BB14 0400 add al, +$00
0085BB16 0000 add [eax], al
0085BB18 59 pop ecx
0085BB19 46 inc esi
0085BB1A 49 dec ecx
0085BB1B 640000 add fs:[eax], al
0085BB1E 0000 add [eax], al
0085BB20 D4 aam
0085BB21 F6D0 not al
0085BB23 D0CA ror dl, 1
0085BB25 A7 cmpsd
0085BB26 B0DC mov al, $DC
0085BB28 2100 and [eax], eax
0085BB2A 0000 add [eax], al
0085BB2C 55 push ebp
0085BB2D 8BEC mov ebp, esp
0085BB2F B908000000 mov ecx, $00000008
0085BB34 6A00 push $00
0085BB36 6A00 push $00
0085BB38 49 dec ecx
0085BB39 75F9 jnz 0085BB34
0085BB3B 51 push ecx
0085BB3C 53 push ebx
0085BB3D 56 push esi
0085BB3E 8BDA mov ebx, edx
0085BB40 8BF0 mov esi, eax
0085BB42 33C0 xor eax, eax
0085BB44 55 push ebp
* Possible String Reference to: '鵍<><E9B58D><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085BB45 683ABD8500 push $0085BD3A
***** TRY
|
0085BB4A 64FF30 push dword ptr fs:[eax]
0085BB4D 648920 mov fs:[eax], esp
0085BB50 8D55FC lea edx, [ebp-$04]
0085BB53 8BC3 mov eax, ebx
* 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;
|
0085BB55 E8623BD3FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
0085BB5A 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085BB60 E8E707E0FF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BB65 E8FA5FDFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085BB6A 8B4050 mov eax, [eax+$50]
0085BB6D 8D55F4 lea edx, [ebp-$0C]
0085BB70 8B08 mov ecx, [eax]
0085BB72 FF5110 call dword ptr [ecx+$10]
0085BB75 8B45F4 mov eax, [ebp-$0C]
0085BB78 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BB7B E86CEDBAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085BB80 8B9E5C030000 mov ebx, [esi+$035C]
0085BB86 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085BB88 E8B3C8C6FF call 004C8440
0085BB8D 8D55E0 lea edx, [ebp-$20]
0085BB90 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BB93 E854EDBAFF call 0040A8EC
0085BB98 8B55E0 mov edx, [ebp-$20]
0085BB9B 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085BB9E E825D2BBFF call 00418DC8
0085BBA3 8D45E4 lea eax, [ebp-$1C]
0085BBA6 50 push eax
0085BBA7 8B55F8 mov edx, [ebp-$08]
0085BBAA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085BBAC E803B0C6FF call 004C6BB4
0085BBB1 5A pop edx
0085BBB2 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085BBB4 FF91B4000000 call dword ptr [ecx+$00B4]
0085BBBA 8BC3 mov eax, ebx
0085BBBC 8B10 mov edx, [eax]
* Possible reference to virtual method TLabel.OFFS_024C
|
0085BBBE FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0085BBC4 8B9E0C030000 mov ebx, [esi+$030C]
0085BBCA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085BBCC E8039DC6FF call 004C58D4
0085BBD1 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BBD3 E8D423C8FF call 004DDFAC
0085BBD8 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0085BBDA FF5244 call dword ptr [edx+$44]
0085BBDD 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BBDF E8C823C8FF call 004DDFAC
* Possible String Reference to: 'UPdate YCL_SG_HZ '
|
0085BBE4 BA50BD8500 mov edx, $0085BD50
0085BBE9 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085BBEB FF5138 call dword ptr [ecx+$38]
0085BBEE 8D55DC lea edx, [ebp-$24]
0085BBF1 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BBF4 E8F3ECBAFF call 0040A8EC
0085BBF9 837DDC00 cmp dword ptr [ebp-$24], +$00
0085BBFD 7440 jz 0085BC3F
* Possible String Reference to: ' Set '
|
0085BBFF 686CBD8500 push $0085BD6C
0085BC04 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085BC07 687CBD8500 push $0085BD7C
0085BC0C 8D55D4 lea edx, [ebp-$2C]
0085BC0F 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BC12 E8D5ECBAFF call 0040A8EC
0085BC17 FF75D4 push dword ptr [ebp-$2C]
0085BC1A 6888BD8500 push $0085BD88
0085BC1F 8D45D8 lea eax, [ebp-$28]
0085BC22 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085BC27 E8889ABAFF call 004056B4
0085BC2C 8B45D8 mov eax, [ebp-$28]
0085BC2F 50 push eax
0085BC30 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BC32 E87523C8FF call 004DDFAC
0085BC37 5A pop edx
0085BC38 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085BC3A FF5138 call dword ptr [ecx+$38]
0085BC3D EB2B jmp 0085BC6A
0085BC3F 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BC41 E86623C8FF call 004DDFAC
0085BC46 50 push eax
* Possible String Reference to: ' Set '
|
0085BC47 686CBD8500 push $0085BD6C
0085BC4C FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0085BC4F 6894BD8500 push $0085BD94
0085BC54 8D45D0 lea eax, [ebp-$30]
0085BC57 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085BC5C E8539ABAFF call 004056B4
0085BC61 8B55D0 mov edx, [ebp-$30]
0085BC64 58 pop eax
0085BC65 8B08 mov ecx, [eax]
0085BC67 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085BC6A 68A4BD8500 push $0085BDA4
0085BC6F 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085BD51(Sender : TObject);
begin
(*
0085BD51 50 push eax
0085BD52 6461 popa
0085BD54 7465 jz 0085BDBB
0085BD56 205943 and [ecx+$43], bl
0085BD59 4C dec esp
0085BD5A 5F pop edi
0085BD5B 53 push ebx
0085BD5C 47 inc edi
0085BD5D 5F pop edi
0085BD5E 48 dec eax
0085BD5F 5A pop edx
0085BD60 2000 and [eax], al
0085BD62 0000 add [eax], al
0085BD64 FFFF DB $FF, $FF //
0085BD66 FFFF DB $FF, $FF //
0085BD68 0500000020 add eax, +$20000000
0085BD6D 53 push ebx
0085BD6E 657420 jz 0085BD91
0085BD71 0000 add [eax], al
0085BD73 00FF add bh, bh
0085BD75 FFFF DB $FF, $FF //
0085BD77 FF02 inc dword ptr [edx]
0085BD79 0000 add [eax], al
0085BD7B 003D270000FF add [$FF000027], bh
0085BD81 FFFF DB $FF, $FF //
0085BD83 FF01 inc dword ptr [ecx]
0085BD85 0000 add [eax], al
0085BD87 0027 add [edi], ah
0085BD89 0000 add [eax], al
0085BD8B 00FF add bh, bh
0085BD8D FFFF DB $FF, $FF //
0085BD8F FF050000003D inc dword ptr [$3D000000]
0085BD95 4E dec esi
0085BD96 55 push ebp
0085BD97 4C dec esp
0085BD98 4C dec esp
0085BD99 0000 add [eax], al
0085BD9B 00FF add bh, bh
0085BD9D FFFF DB $FF, $FF //
0085BD9F FF09 dec dword ptr [ecx]
0085BDA1 0000 add [eax], al
0085BDA3 002C4564697465 add [$65746964+eax*2], ch
0085BDAA 723D jb 0085BDE9
0085BDAC 27 daa
0085BDAD 0000 add [eax], al
0085BDAF 00FF add bh, bh
0085BDB1 FFFF DB $FF, $FF //
0085BDB3 FF1400 call dword ptr [eax+eax]
0085BDB6 0000 add [eax], al
0085BDB8 2C45 sub al, $45
0085BDBA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085BDC3 657464 jz 0085BE2A
0085BDC6 61 popa
0085BDC7 7465 jz 0085BE2E
0085BDC9 2829 sub [ecx], ch
0085BDCB 2000 and [eax], al
0085BDCD 0000 add [eax], al
0085BDCF 00FF add bh, bh
0085BDD1 FFFF DB $FF, $FF //
0085BDD3 FF0E dec dword ptr [esi]
0085BDD5 0000 add [eax], al
0085BDD7 0020 add [eax], ah
0085BDD9 7768 jnbe 0085BE43
0085BDDB 657265 jb 0085BE43
0085BDDE 205375 and [ebx+$75], dl
0085BDE1 624964 bound ecx, qword ptr [ecx+$64]
0085BDE4 3D270000FF cmp eax, $FF000027
0085BDE9 FFFF DB $FF, $FF //
0085BDEB FF0500000053 inc dword ptr [$53000000]
0085BDF1 7562 jnz 0085BE55
0085BDF3 49 dec ecx
0085BDF4 640000 add fs:[eax], al
0085BDF7 00558B add [ebp-$75], dl
0085BDFA EC in al, dx
0085BDFB B924000000 mov ecx, $00000024
0085BE00 6A00 push $00
0085BE02 6A00 push $00
0085BE04 49 dec ecx
0085BE05 75F9 jnz 0085BE00
0085BE07 53 push ebx
0085BE08 56 push esi
0085BE09 8BF2 mov esi, edx
0085BE0B 8BD8 mov ebx, eax
0085BE0D 33C0 xor eax, eax
0085BE0F 55 push ebp
* Possible String Reference to: '<27>.<2E><><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085BE10 68C1C58500 push $0085C5C1
***** TRY
|
0085BE15 64FF30 push dword ptr fs:[eax]
0085BE18 648920 mov fs:[eax], esp
0085BE1B 8D55FC lea edx, [ebp-$04]
0085BE1E 8BC6 mov eax, esi
* Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem;
| or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient;
| or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem;
| or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem;
| or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar;
| or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter;
|
0085BE20 E89738D3FF call 0058F6BC
0085BE25 8D55D8 lea edx, [ebp-$28]
0085BE28 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE2B E8BCEABAFF call 0040A8EC
0085BE30 837DD800 cmp dword ptr [ebp-$28], +$00
0085BE34 7513 jnz 0085BE49
0085BE36 8D45C8 lea eax, [ebp-$38]
* Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word;
| or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte;
| or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl);
| or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient);
| or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem);
| or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter);
|
0085BE39 E82215BCFF call 0041D360
0085BE3E 8D55C8 lea edx, [ebp-$38]
0085BE41 8D45FC lea eax, [ebp-$04]
* Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData);
|
0085BE44 E8C7BEBBFF call 00417D10
* Reference to control v1PRTColor : N.A.
|
0085BE49 8B8334030000 mov eax, [ebx+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085BE4F E8F804E0FF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085BE54 E80B5DDFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085BE59 8B4050 mov eax, [eax+$50]
0085BE5C 8D55C4 lea edx, [ebp-$3C]
0085BE5F 8B08 mov ecx, [eax]
0085BE61 FF5110 call dword ptr [ecx+$10]
0085BE64 8B45C4 mov eax, [ebp-$3C]
0085BE67 8D55E0 lea edx, [ebp-$20]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE6A E87DEABAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085BE6F 8BB35C030000 mov esi, [ebx+$035C]
0085BE75 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085BE77 E8C4C5C6FF call 004C8440
0085BE7C 8D55B0 lea edx, [ebp-$50]
0085BE7F 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085BE82 E865EABAFF call 0040A8EC
0085BE87 8B55B0 mov edx, [ebp-$50]
0085BE8A 8D45B4 lea eax, [ebp-$4C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085BE8D E836CFBBFF call 00418DC8
0085BE92 8D45B4 lea eax, [ebp-$4C]
0085BE95 50 push eax
0085BE96 8B55E0 mov edx, [ebp-$20]
0085BE99 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085BE9B E814ADC6FF call 004C6BB4
0085BEA0 5A pop edx
0085BEA1 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085BEA3 FF91B4000000 call dword ptr [ecx+$00B4]
0085BEA9 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085C6BD(Sender : TObject);
begin
(*
0085C6BD 50 push eax
0085C6BE 6461 popa
0085C6C0 7465 jz 0085C727
0085C6C2 205946 and [ecx+$46], bl
0085C6C5 5F pop edi
0085C6C6 4D dec ebp
0085C6C7 6F outsd
0085C6C8 6E outsb
0085C6C9 65795F jns 0085C72B
0085C6CC 43 inc ebx
0085C6CD 52 push edx
0085C6CE 2000 and [eax], al
0085C6D0 FFFF DB $FF, $FF //
0085C6D2 FFFF DB $FF, $FF //
0085C6D4 0500000020 add eax, +$20000000
0085C6D9 53 push ebx
0085C6DA 657420 jz 0085C6FD
0085C6DD 0000 add [eax], al
0085C6DF 00FF add bh, bh
0085C6E1 FFFF DB $FF, $FF //
0085C6E3 FF01 inc dword ptr [ecx]
0085C6E5 0000 add [eax], al
0085C6E7 003D000000FF add [$FF000000], bh
0085C6ED FFFF DB $FF, $FF //
0085C6EF FF07 inc dword ptr [edi]
0085C6F1 0000 add [eax], al
0085C6F3 002C4D6F6E6579 add [$79656E6F+ecx*2], ch
0085C6FA 3D00FFFFFF cmp eax, $FFFFFF00
0085C6FF FF09 dec dword ptr [ecx]
0085C701 0000 add [eax], al
0085C703 002C42 add [edx+eax*2], ch
0085C706 42 inc edx
0085C707 4D dec ebp
0085C708 6F outsd
0085C709 6E outsb
0085C70A 65793D jns 0085C74A
0085C70D 0000 add [eax], al
0085C70F 00FF add bh, bh
0085C711 FFFF DB $FF, $FF //
0085C713 FF09 dec dword ptr [ecx]
0085C715 0000 add [eax], al
0085C717 002C4564697465 add [$65746964+eax*2], ch
0085C71E 723D jb 0085C75D
0085C720 27 daa
0085C721 0000 add [eax], al
0085C723 00FF add bh, bh
0085C725 FFFF DB $FF, $FF //
0085C727 FF1400 call dword ptr [eax+eax]
0085C72A 0000 add [eax], al
0085C72C 2C45 sub al, $45
0085C72E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085C737 657464 jz 0085C79E
0085C73A 61 popa
0085C73B 7465 jz 0085C7A2
0085C73D 2829 sub [ecx], ch
0085C73F 2000 and [eax], al
0085C741 0000 add [eax], al
0085C743 00FF add bh, bh
0085C745 FFFF DB $FF, $FF //
0085C747 FF0D00000020 dec dword ptr [$20000000]
0085C74D 7768 jnbe 0085C7B7
0085C74F 657265 jb 0085C7B7
0085C752 205946 and [ecx+$46], bl
0085C755 49 dec ecx
0085C756 643D27000000 cmp eax, $00000027
0085C75C FFFF DB $FF, $FF //
0085C75E FFFF DB $FF, $FF //
0085C760 0400 add al, +$00
0085C762 0000 add [eax], al
0085C764 59 pop ecx
0085C765 46 inc esi
0085C766 49 dec ecx
0085C767 640000 add fs:[eax], al
0085C76A 0000 add [eax], al
0085C76C FFFF DB $FF, $FF //
0085C76E FFFF DB $FF, $FF //
0085C770 2B00 sub eax, dword ptr [eax]
0085C772 0000 add [eax], al
0085C774 55 push ebp
0085C775 7064 jo 0085C7DB
0085C777 61 popa
0085C778 7465 jz 0085C7DF
0085C77A 205946 and [ecx+$46], bl
0085C77D 5F pop edi
0085C77E 4D dec ebp
0085C77F 6F outsd
0085C780 6E outsb
0085C781 65795F jns 0085C7E3
0085C784 4B dec ebx
0085C785 43 inc ebx
0085C786 205365 and [ebx+$65], dl
0085C789 7420 jz 0085C7AB
0085C78B 4B dec ebx
0085C78C 43 inc ebx
0085C78D 42 inc edx
0085C78E 42 inc edx
0085C78F 4D dec ebp
0085C790 6F outsd
0085C791 6E outsb
0085C792 65793D jns 0085C7D2
0085C795 4B dec ebx
0085C796 43 inc ebx
0085C797 42 inc edx
0085C798 42 inc edx
0085C799 4D dec ebp
0085C79A 6F outsd
0085C79B 6E outsb
0085C79C 65792D jns 0085C7CC
0085C79F 00FF add bh, bh
0085C7A1 FFFF DB $FF, $FF //
0085C7A3 FF01 inc dword ptr [ecx]
0085C7A5 0000 add [eax], al
0085C7A7 002B add [ebx], ch
0085C7A9 0000 add [eax], al
0085C7AB 00FF add bh, bh
0085C7AD FFFF DB $FF, $FF //
0085C7AF FF0D00000020 dec dword ptr [$20000000]
0085C7B5 7768 jnbe 0085C81F
0085C7B7 657265 jb 0085C81F
0085C7BA 204352 and [ebx+$52], al
0085C7BD 49 dec ecx
0085C7BE 44 inc esp
0085C7BF 3D27000000 cmp eax, $00000027
0085C7C4 FFFF DB $FF, $FF //
0085C7C6 FFFF DB $FF, $FF //
0085C7C8 0400 add al, +$00
0085C7CA 0000 add [eax], al
0085C7CC 43 inc ebx
0085C7CD 52 push edx
0085C7CE 49 dec ecx
0085C7CF 44 inc esp
0085C7D0 0000 add [eax], al
0085C7D2 0000 add [eax], al
0085C7D4 55 push ebp
0085C7D5 8BEC mov ebp, esp
0085C7D7 B908000000 mov ecx, $00000008
0085C7DC 6A00 push $00
0085C7DE 6A00 push $00
0085C7E0 49 dec ecx
0085C7E1 75F9 jnz 0085C7DC
0085C7E3 51 push ecx
0085C7E4 53 push ebx
0085C7E5 56 push esi
0085C7E6 8BDA mov ebx, edx
0085C7E8 8BF0 mov esi, eax
0085C7EA 33C0 xor eax, eax
0085C7EC 55 push ebp
* Possible String Reference to: '遺<><E981BA><EFBFBD>^[<5B><>]<5D>'
|
0085C7ED 68E2C98500 push $0085C9E2
***** TRY
|
0085C7F2 64FF30 push dword ptr fs:[eax]
0085C7F5 648920 mov fs:[eax], esp
0085C7F8 8D55FC lea edx, [ebp-$04]
0085C7FB 8BC3 mov eax, ebx
* 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;
|
0085C7FD E8BA2ED3FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
0085C802 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085C808 E83FFBDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C80D E85253DFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085C812 8B4050 mov eax, [eax+$50]
0085C815 8D55F4 lea edx, [ebp-$0C]
0085C818 8B08 mov ecx, [eax]
0085C81A FF5110 call dword ptr [ecx+$10]
0085C81D 8B45F4 mov eax, [ebp-$0C]
0085C820 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C823 E8C4E0BAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085C828 8B9E5C030000 mov ebx, [esi+$035C]
0085C82E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085C830 E80BBCC6FF call 004C8440
0085C835 8D55E0 lea edx, [ebp-$20]
0085C838 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C83B E8ACE0BAFF call 0040A8EC
0085C840 8B55E0 mov edx, [ebp-$20]
0085C843 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085C846 E87DC5BBFF call 00418DC8
0085C84B 8D45E4 lea eax, [ebp-$1C]
0085C84E 50 push eax
0085C84F 8B55F8 mov edx, [ebp-$08]
0085C852 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085C854 E85BA3C6FF call 004C6BB4
0085C859 5A pop edx
0085C85A 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085C85C FF91B4000000 call dword ptr [ecx+$00B4]
0085C862 8BC3 mov eax, ebx
0085C864 8B10 mov edx, [eax]
* Possible reference to virtual method TLabel.OFFS_024C
|
0085C866 FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0085C86C 8B9E0C030000 mov ebx, [esi+$030C]
0085C872 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085C874 E85B90C6FF call 004C58D4
0085C879 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C87B E82C17C8FF call 004DDFAC
0085C880 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0085C882 FF5244 call dword ptr [edx+$44]
0085C885 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C887 E82017C8FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085C88C BAF8C98500 mov edx, $0085C9F8
0085C891 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085C893 FF5138 call dword ptr [ecx+$38]
0085C896 8D55DC lea edx, [ebp-$24]
0085C899 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C89C E84BE0BAFF call 0040A8EC
0085C8A1 837DDC00 cmp dword ptr [ebp-$24], +$00
0085C8A5 7440 jz 0085C8E7
* Possible String Reference to: ' Set '
|
0085C8A7 6814CA8500 push $0085CA14
0085C8AC FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085C8AF 6824CA8500 push $0085CA24
0085C8B4 8D55D4 lea edx, [ebp-$2C]
0085C8B7 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085C8BA E82DE0BAFF call 0040A8EC
0085C8BF FF75D4 push dword ptr [ebp-$2C]
0085C8C2 6830CA8500 push $0085CA30
0085C8C7 8D45D8 lea eax, [ebp-$28]
0085C8CA BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085C8CF E8E08DBAFF call 004056B4
0085C8D4 8B45D8 mov eax, [ebp-$28]
0085C8D7 50 push eax
0085C8D8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C8DA E8CD16C8FF call 004DDFAC
0085C8DF 5A pop edx
0085C8E0 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085C8E2 FF5138 call dword ptr [ecx+$38]
0085C8E5 EB2B jmp 0085C912
0085C8E7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085C8E9 E8BE16C8FF call 004DDFAC
0085C8EE 50 push eax
* Possible String Reference to: ' Set '
|
0085C8EF 6814CA8500 push $0085CA14
0085C8F4 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0085C8F7 683CCA8500 push $0085CA3C
0085C8FC 8D45D0 lea eax, [ebp-$30]
0085C8FF BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085C904 E8AB8DBAFF call 004056B4
0085C909 8B55D0 mov edx, [ebp-$30]
0085C90C 58 pop eax
0085C90D 8B08 mov ecx, [eax]
0085C90F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085C912 684CCA8500 push $0085CA4C
0085C917 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085C9F9(Sender : TObject);
begin
(*
0085C9F9 50 push eax
0085C9FA 6461 popa
0085C9FC 7465 jz 0085CA63
0085C9FE 205946 and [ecx+$46], bl
0085CA01 5F pop edi
0085CA02 4D dec ebp
0085CA03 6F outsd
0085CA04 6E outsb
0085CA05 65795F jns 0085CA67
0085CA08 43 inc ebx
0085CA09 52 push edx
0085CA0A 2000 and [eax], al
0085CA0C FFFF DB $FF, $FF //
0085CA0E FFFF DB $FF, $FF //
0085CA10 0500000020 add eax, +$20000000
0085CA15 53 push ebx
0085CA16 657420 jz 0085CA39
0085CA19 0000 add [eax], al
0085CA1B 00FF add bh, bh
0085CA1D FFFF DB $FF, $FF //
0085CA1F FF02 inc dword ptr [edx]
0085CA21 0000 add [eax], al
0085CA23 003D270000FF add [$FF000027], bh
0085CA29 FFFF DB $FF, $FF //
0085CA2B FF01 inc dword ptr [ecx]
0085CA2D 0000 add [eax], al
0085CA2F 0027 add [edi], ah
0085CA31 0000 add [eax], al
0085CA33 00FF add bh, bh
0085CA35 FFFF DB $FF, $FF //
0085CA37 FF050000003D inc dword ptr [$3D000000]
0085CA3D 4E dec esi
0085CA3E 55 push ebp
0085CA3F 4C dec esp
0085CA40 4C dec esp
0085CA41 0000 add [eax], al
0085CA43 00FF add bh, bh
0085CA45 FFFF DB $FF, $FF //
0085CA47 FF09 dec dword ptr [ecx]
0085CA49 0000 add [eax], al
0085CA4B 002C4564697465 add [$65746964+eax*2], ch
0085CA52 723D jb 0085CA91
0085CA54 27 daa
0085CA55 0000 add [eax], al
0085CA57 00FF add bh, bh
0085CA59 FFFF DB $FF, $FF //
0085CA5B FF1400 call dword ptr [eax+eax]
0085CA5E 0000 add [eax], al
0085CA60 2C45 sub al, $45
0085CA62 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085CA6B 657464 jz 0085CAD2
0085CA6E 61 popa
0085CA6F 7465 jz 0085CAD6
0085CA71 2829 sub [ecx], ch
0085CA73 2000 and [eax], al
0085CA75 0000 add [eax], al
0085CA77 00FF add bh, bh
0085CA79 FFFF DB $FF, $FF //
0085CA7B FF0D00000020 dec dword ptr [$20000000]
0085CA81 7768 jnbe 0085CAEB
0085CA83 657265 jb 0085CAEB
0085CA86 205946 and [ecx+$46], bl
0085CA89 49 dec ecx
0085CA8A 643D27000000 cmp eax, $00000027
0085CA90 FFFF DB $FF, $FF //
0085CA92 FFFF DB $FF, $FF //
0085CA94 0400 add al, +$00
0085CA96 0000 add [eax], al
0085CA98 59 pop ecx
0085CA99 46 inc esi
0085CA9A 49 dec ecx
0085CA9B 640000 add fs:[eax], al
0085CA9E 0000 add [eax], al
0085CAA0 55 push ebp
0085CAA1 8BEC mov ebp, esp
0085CAA3 B916000000 mov ecx, $00000016
0085CAA8 6A00 push $00
0085CAAA 6A00 push $00
0085CAAC 49 dec ecx
0085CAAD 75F9 jnz 0085CAA8
0085CAAF 51 push ecx
0085CAB0 56 push esi
0085CAB1 57 push edi
0085CAB2 8BF8 mov edi, eax
0085CAB4 33C0 xor eax, eax
0085CAB6 55 push ebp
0085CAB7 68D5CD8500 push $0085CDD5
***** TRY
|
0085CABC 64FF30 push dword ptr fs:[eax]
0085CABF 648920 mov fs:[eax], esp
0085CAC2 33C0 xor eax, eax
0085CAC4 55 push ebp
0085CAC5 6865CD8500 push $0085CD65
***** TRY
|
0085CACA 64FF30 push dword ptr fs:[eax]
0085CACD 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085D30D(Sender : TObject);
begin
(*
0085D30D 50 push eax
0085D30E 6461 popa
0085D310 7465 jz 0085D377
0085D312 205946 and [ecx+$46], bl
0085D315 5F pop edi
0085D316 4D dec ebp
0085D317 6F outsd
0085D318 6E outsb
0085D319 65795F jns 0085D37B
0085D31C 43 inc ebx
0085D31D 52 push edx
0085D31E 2000 and [eax], al
0085D320 FFFF DB $FF, $FF //
0085D322 FFFF DB $FF, $FF //
0085D324 0D00000020 or eax, $20000000
0085D329 53 push ebx
0085D32A 657420 jz 0085D34D
0085D32D 59 pop ecx
0085D32E 46 inc esi
0085D32F 43 inc ebx
0085D330 6F outsd
0085D331 64653D27000000 cmp eax, $00000027
0085D338 FFFF DB $FF, $FF //
0085D33A FFFF DB $FF, $FF //
0085D33C 0100 add [eax], eax
0085D33E 0000 add [eax], al
0085D340 27 daa
0085D341 0000 add [eax], al
0085D343 00FF add bh, bh
0085D345 FFFF DB $FF, $FF //
0085D347 FF0A dec dword ptr [edx]
0085D349 0000 add [eax], al
0085D34B 0020 add [eax], ah
0085D34D 2C59 sub al, $59
0085D34F 46 inc esi
0085D350 4E dec esi
0085D351 61 popa
0085D352 6D insd
0085D353 653D270000FF cmp eax, $FF000027
0085D359 FFFF DB $FF, $FF //
0085D35B FF09 dec dword ptr [ecx]
0085D35D 0000 add [eax], al
0085D35F 002C4564697465 add [$65746964+eax*2], ch
0085D366 723D jb 0085D3A5
0085D368 27 daa
0085D369 0000 add [eax], al
0085D36B 00FF add bh, bh
0085D36D FFFF DB $FF, $FF //
0085D36F FF1400 call dword ptr [eax+eax]
0085D372 0000 add [eax], al
0085D374 2C45 sub al, $45
0085D376 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085D37F 657464 jz 0085D3E6
0085D382 61 popa
0085D383 7465 jz 0085D3EA
0085D385 2829 sub [ecx], ch
0085D387 2000 and [eax], al
0085D389 0000 add [eax], al
0085D38B 00FF add bh, bh
0085D38D FFFF DB $FF, $FF //
0085D38F FF0D00000020 dec dword ptr [$20000000]
0085D395 7768 jnbe 0085D3FF
0085D397 657265 jb 0085D3FF
0085D39A 205946 and [ecx+$46], bl
0085D39D 49 dec ecx
0085D39E 643D27000000 cmp eax, $00000027
0085D3A4 FFFF DB $FF, $FF //
0085D3A6 FFFF DB $FF, $FF //
0085D3A8 0400 add al, +$00
0085D3AA 0000 add [eax], al
0085D3AC 59 pop ecx
0085D3AD 46 inc esi
0085D3AE 49 dec ecx
0085D3AF 640000 add fs:[eax], al
0085D3B2 0000 add [eax], al
0085D3B4 55 push ebp
0085D3B5 8BEC mov ebp, esp
0085D3B7 51 push ecx
0085D3B8 B906000000 mov ecx, $00000006
0085D3BD 6A00 push $00
0085D3BF 6A00 push $00
0085D3C1 49 dec ecx
0085D3C2 75F9 jnz 0085D3BD
0085D3C4 51 push ecx
0085D3C5 874DFC xchg [ebp-$04], ecx
0085D3C8 53 push ebx
0085D3C9 56 push esi
0085D3CA 8BF0 mov esi, eax
0085D3CC 33C0 xor eax, eax
0085D3CE 55 push ebp
* Possible String Reference to: '<27><>t<EFBFBD><74><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085D3CF 680DD68500 push $0085D60D
***** TRY
|
0085D3D4 64FF30 push dword ptr fs:[eax]
0085D3D7 648920 mov fs:[eax], esp
0085D3DA 33C0 xor eax, eax
0085D3DC 55 push ebp
0085D3DD 68E3D58500 push $0085D5E3
***** TRY
|
0085D3E2 64FF30 push dword ptr fs:[eax]
0085D3E5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085D62A(Sender : TObject);
begin
(*
0085D62A 6E outsb
0085D62B 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00
0085D633 FF08 dec dword ptr [eax]
0085D635 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085D660(Sender : TObject);
begin
(*
0085D660 6E outsb
0085D661 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF
0085D669 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085D66D(Sender : TObject);
begin
(*
0085D66D 50 push eax
0085D66E 6461 popa
0085D670 7465 jz 0085D6D7
0085D672 205946 and [ecx+$46], bl
0085D675 5F pop edi
0085D676 4D dec ebp
0085D677 6F outsd
0085D678 6E outsb
0085D679 65795F jns 0085D6DB
0085D67C 43 inc ebx
0085D67D 52 push edx
0085D67E 2000 and [eax], al
0085D680 FFFF DB $FF, $FF //
0085D682 FFFF DB $FF, $FF //
0085D684 0E push cs
0085D685 0000 add [eax], al
0085D687 0020 add [eax], ah
0085D689 53 push ebx
0085D68A 657420 jz 0085D6AD
0085D68D 51 push ecx
0085D68E 7479 jz 0085D709
0085D690 55 push ebp
0085D691 6E outsb
0085D692 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000
0085D69A FFFF DB $FF, $FF //
0085D69C 07 pop es
0085D69D 0000 add [eax], al
0085D69F 005A64 add [edx+$64], bl
0085D6A2 794E jns 0085D6F2
0085D6A4 61 popa
0085D6A5 6D insd
0085D6A6 6500FF add bh, bh
0085D6A9 FFFF DB $FF, $FF //
0085D6AB FF01 inc dword ptr [ecx]
0085D6AD 0000 add [eax], al
0085D6AF 0027 add [edi], ah
0085D6B1 0000 add [eax], al
0085D6B3 00FF add bh, bh
0085D6B5 FFFF DB $FF, $FF //
0085D6B7 FF09 dec dword ptr [ecx]
0085D6B9 0000 add [eax], al
0085D6BB 002C4564697465 add [$65746964+eax*2], ch
0085D6C2 723D jb 0085D701
0085D6C4 27 daa
0085D6C5 0000 add [eax], al
0085D6C7 00FF add bh, bh
0085D6C9 FFFF DB $FF, $FF //
0085D6CB FF1400 call dword ptr [eax+eax]
0085D6CE 0000 add [eax], al
0085D6D0 2C45 sub al, $45
0085D6D2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085D6DB 657464 jz 0085D742
0085D6DE 61 popa
0085D6DF 7465 jz 0085D746
0085D6E1 2829 sub [ecx], ch
0085D6E3 2000 and [eax], al
0085D6E5 0000 add [eax], al
0085D6E7 00FF add bh, bh
0085D6E9 FFFF DB $FF, $FF //
0085D6EB FF0D00000020 dec dword ptr [$20000000]
0085D6F1 7768 jnbe 0085D75B
0085D6F3 657265 jb 0085D75B
0085D6F6 205946 and [ecx+$46], bl
0085D6F9 49 dec ecx
0085D6FA 643D27000000 cmp eax, $00000027
0085D700 FFFF DB $FF, $FF //
0085D702 FFFF DB $FF, $FF //
0085D704 0400 add al, +$00
0085D706 0000 add [eax], al
0085D708 59 pop ecx
0085D709 46 inc esi
0085D70A 49 dec ecx
0085D70B 640000 add fs:[eax], al
0085D70E 0000 add [eax], al
0085D710 55 push ebp
0085D711 8BEC mov ebp, esp
0085D713 51 push ecx
0085D714 B906000000 mov ecx, $00000006
0085D719 6A00 push $00
0085D71B 6A00 push $00
0085D71D 49 dec ecx
0085D71E 75F9 jnz 0085D719
0085D720 51 push ecx
0085D721 874DFC xchg [ebp-$04], ecx
0085D724 53 push ebx
0085D725 56 push esi
0085D726 8BF0 mov esi, eax
0085D728 33C0 xor eax, eax
0085D72A 55 push ebp
* Possible String Reference to: '<27><>q<EFBFBD><71><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085D72B 6869D98500 push $0085D969
***** TRY
|
0085D730 64FF30 push dword ptr fs:[eax]
0085D733 648920 mov fs:[eax], esp
0085D736 33C0 xor eax, eax
0085D738 55 push ebp
0085D739 683FD98500 push $0085D93F
***** TRY
|
0085D73E 64FF30 push dword ptr fs:[eax]
0085D741 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085D9C9(Sender : TObject);
begin
(*
0085D9C9 50 push eax
0085D9CA 6461 popa
0085D9CC 7465 jz 0085DA33
0085D9CE 205946 and [ecx+$46], bl
0085D9D1 5F pop edi
0085D9D2 4D dec ebp
0085D9D3 6F outsd
0085D9D4 6E outsb
0085D9D5 65795F jns 0085DA37
0085D9D8 43 inc ebx
0085D9D9 52 push edx
0085D9DA 2000 and [eax], al
0085D9DC FFFF DB $FF, $FF //
0085D9DE FFFF DB $FF, $FF //
0085D9E0 1100 adc [eax], eax
0085D9E2 0000 add [eax], al
0085D9E4 205365 and [ebx+$65], dl
0085D9E7 7420 jz 0085DA09
0085D9E9 50 push eax
0085D9EA 5F pop edi
0085D9EB 43 inc ebx
0085D9EC 6F outsd
0085D9ED 64654E dec esi
0085D9F0 61 popa
0085D9F1 6D insd
0085D9F2 653D27000000 cmp eax, $00000027
0085D9F8 FFFF DB $FF, $FF //
0085D9FA FFFF DB $FF, $FF //
0085D9FC 07 pop es
0085D9FD 0000 add [eax], al
0085D9FF 005A64 add [edx+$64], bl
0085DA02 794E jns 0085DA52
0085DA04 61 popa
0085DA05 6D insd
0085DA06 6500FF add bh, bh
0085DA09 FFFF DB $FF, $FF //
0085DA0B FF01 inc dword ptr [ecx]
0085DA0D 0000 add [eax], al
0085DA0F 0027 add [edi], ah
0085DA11 0000 add [eax], al
0085DA13 00FF add bh, bh
0085DA15 FFFF DB $FF, $FF //
0085DA17 FF09 dec dword ptr [ecx]
0085DA19 0000 add [eax], al
0085DA1B 002C4564697465 add [$65746964+eax*2], ch
0085DA22 723D jb 0085DA61
0085DA24 27 daa
0085DA25 0000 add [eax], al
0085DA27 00FF add bh, bh
0085DA29 FFFF DB $FF, $FF //
0085DA2B FF1400 call dword ptr [eax+eax]
0085DA2E 0000 add [eax], al
0085DA30 2C45 sub al, $45
0085DA32 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085DA3B 657464 jz 0085DAA2
0085DA3E 61 popa
0085DA3F 7465 jz 0085DAA6
0085DA41 2829 sub [ecx], ch
0085DA43 2000 and [eax], al
0085DA45 0000 add [eax], al
0085DA47 00FF add bh, bh
0085DA49 FFFF DB $FF, $FF //
0085DA4B FF0D00000020 dec dword ptr [$20000000]
0085DA51 7768 jnbe 0085DABB
0085DA53 657265 jb 0085DABB
0085DA56 205946 and [ecx+$46], bl
0085DA59 49 dec ecx
0085DA5A 643D27000000 cmp eax, $00000027
0085DA60 FFFF DB $FF, $FF //
0085DA62 FFFF DB $FF, $FF //
0085DA64 0400 add al, +$00
0085DA66 0000 add [eax], al
0085DA68 59 pop ecx
0085DA69 46 inc esi
0085DA6A 49 dec ecx
0085DA6B 640000 add fs:[eax], al
0085DA6E 0000 add [eax], al
0085DA70 53 push ebx
0085DA71 8BD8 mov ebx, eax
* Reference to control ToolButton1 : TToolButton
|
0085DA73 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085DA79 E842A4C6FF call 004C7EC0
0085DA7E 84C0 test al, al
0085DA80 7516 jnz 0085DA98
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>б<EFBFBD>'
|
0085DA82 B9A4DA8500 mov ecx, $0085DAA4
* Reference to control ToolButton1 : TToolButton
|
0085DA87 8B9320030000 mov edx, [ebx+$0320]
* Reference to control v1PRTColor : N.A.
|
0085DA8D 8B8334030000 mov eax, [ebx+$0334]
|
0085DA93 E898A7F5FF call 007B8230
0085DA98 5B pop ebx
0085DA99 C3 ret
0085DA9A 0000 add [eax], al
0085DA9C FFFF DB $FF, $FF //
0085DA9E FFFF DB $FF, $FF //
0085DAA0 0A00 or al, byte ptr [eax]
0085DAA2 0000 add [eax], al
0085DAA4 D3A6CAD5BFEE shl dword ptr [esi+$EEBFD5CA], cl
0085DAAA C1D0B1 rcl eax, $B1
0085DAAD ED in eax, dx
0085DAAE 0000 add [eax], al
0085DAB0 55 push ebp
0085DAB1 8BEC mov ebp, esp
0085DAB3 51 push ecx
0085DAB4 B91D000000 mov ecx, $0000001D
0085DAB9 6A00 push $00
0085DABB 6A00 push $00
0085DABD 49 dec ecx
0085DABE 75F9 jnz 0085DAB9
0085DAC0 51 push ecx
0085DAC1 874DFC xchg [ebp-$04], ecx
0085DAC4 53 push ebx
0085DAC5 8945FC mov [ebp-$04], eax
0085DAC8 33C0 xor eax, eax
0085DACA 55 push ebp
* Possible String Reference to: '<27><>i<EFBFBD><69><EFBFBD>q<EFBFBD><71><EFBFBD>[<5B><>]<5D>'
|
0085DACB 6828E18500 push $0085E128
***** TRY
|
0085DAD0 64FF30 push dword ptr fs:[eax]
0085DAD3 648920 mov fs:[eax], esp
0085DAD6 33C0 xor eax, eax
0085DAD8 55 push ebp
0085DAD9 688FE08500 push $0085E08F
***** TRY
|
0085DADE 64FF30 push dword ptr fs:[eax]
0085DAE1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085E1D1(Sender : TObject);
begin
(*
0085E1D1 50 push eax
0085E1D2 6461 popa
0085E1D4 7465 jz 0085E23B
0085E1D6 205946 and [ecx+$46], bl
0085E1D9 5F pop edi
0085E1DA 4D dec ebp
0085E1DB 6F outsd
0085E1DC 6E outsb
0085E1DD 65795F jns 0085E23F
0085E1E0 43 inc ebx
0085E1E1 52 push edx
0085E1E2 2000 and [eax], al
0085E1E4 FFFF DB $FF, $FF //
0085E1E6 FFFF DB $FF, $FF //
0085E1E8 0D00000020 or eax, $20000000
0085E1ED 53 push ebx
0085E1EE 657420 jz 0085E211
0085E1F1 4D dec ebp
0085E1F2 61 popa
0085E1F3 696E49643D2700 imul ebp, [esi+$49], $00273D64
0085E1FA 0000 add [eax], al
0085E1FC FFFF DB $FF, $FF //
0085E1FE FFFF DB $FF, $FF //
0085E200 0100 add [eax], eax
0085E202 0000 add [eax], al
0085E204 27 daa
0085E205 0000 add [eax], al
0085E207 00FF add bh, bh
0085E209 FFFF DB $FF, $FF //
0085E20B FF09 dec dword ptr [ecx]
0085E20D 0000 add [eax], al
0085E20F 0020 add [eax], ah
0085E211 2C53 sub al, $53
0085E213 7562 jnz 0085E277
0085E215 49 dec ecx
0085E216 643D27000000 cmp eax, $00000027
0085E21C FFFF DB $FF, $FF //
0085E21E FFFF DB $FF, $FF //
0085E220 0500000053 add eax, +$53000000
0085E225 7562 jnz 0085E289
0085E227 49 dec ecx
0085E228 640000 add fs:[eax], al
0085E22B 00FF add bh, bh
0085E22D FFFF DB $FF, $FF //
0085E22F FF0E dec dword ptr [esi]
0085E231 0000 add [eax], al
0085E233 0020 add [eax], ah
0085E235 2C70 sub al, $70
0085E237 5F pop edi
0085E238 43 inc ebx
0085E239 6F outsd
0085E23A 64654E dec esi
0085E23D 61 popa
0085E23E 6D insd
0085E23F 653D270000FF cmp eax, $FF000027
0085E245 FFFF DB $FF, $FF //
0085E247 FF0A dec dword ptr [edx]
0085E249 0000 add [eax], al
0085E24B 0020 add [eax], ah
0085E24D 2C50 sub al, $50
0085E24F 5F pop edi
0085E250 53 push ebx
0085E251 7065 jo 0085E2B8
0085E253 633D270000FF arpl [$FF000027], di
0085E259 FFFF DB $FF, $FF //
0085E25B FF0B dec dword ptr [ebx]
0085E25D 0000 add [eax], al
0085E25F 0020 add [eax], ah
0085E261 2C4F sub al, $4F
0085E263 7264 jb 0085E2C9
0085E265 65724E jb 0085E2B6
0085E268 6F outsd
0085E269 3D2700FFFF cmp eax, $FFFF0027
0085E26E FFFF DB $FF, $FF //
0085E270 0900 or [eax], eax
0085E272 0000 add [eax], al
0085E274 202C43 and [ebx+eax*2], ch
0085E277 6F outsd
0085E278 6E outsb
0085E279 4E dec esi
0085E27A 4F dec edi
0085E27B 3D27000000 cmp eax, $00000027
0085E280 FFFF DB $FF, $FF //
0085E282 FFFF DB $FF, $FF //
0085E284 0500000043 add eax, +$43000000
0085E289 6F outsd
0085E28A 6E outsb
0085E28B 4E dec esi
0085E28C 4F dec edi
0085E28D 0000 add [eax], al
0085E28F 00FF add bh, bh
0085E291 FFFF DB $FF, $FF //
0085E293 FF09 dec dword ptr [ecx]
0085E295 0000 add [eax], al
0085E297 002C4564697465 add [$65746964+eax*2], ch
0085E29E 723D jb 0085E2DD
0085E2A0 27 daa
0085E2A1 0000 add [eax], al
0085E2A3 00FF add bh, bh
0085E2A5 FFFF DB $FF, $FF //
0085E2A7 FF1400 call dword ptr [eax+eax]
0085E2AA 0000 add [eax], al
0085E2AC 2C45 sub al, $45
0085E2AE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085E2B7 657464 jz 0085E31E
0085E2BA 61 popa
0085E2BB 7465 jz 0085E322
0085E2BD 2829 sub [ecx], ch
0085E2BF 2000 and [eax], al
0085E2C1 0000 add [eax], al
0085E2C3 00FF add bh, bh
0085E2C5 FFFF DB $FF, $FF //
0085E2C7 FF0D00000020 dec dword ptr [$20000000]
0085E2CD 7768 jnbe 0085E337
0085E2CF 657265 jb 0085E337
0085E2D2 205946 and [ecx+$46], bl
0085E2D5 49 dec ecx
0085E2D6 643D27000000 cmp eax, $00000027
0085E2DC FFFF DB $FF, $FF //
0085E2DE FFFF DB $FF, $FF //
0085E2E0 0400 add al, +$00
0085E2E2 0000 add [eax], al
0085E2E4 59 pop ecx
0085E2E5 46 inc esi
0085E2E6 49 dec ecx
0085E2E7 640000 add fs:[eax], al
0085E2EA 0000 add [eax], al
0085E2EC 55 push ebp
0085E2ED 8BEC mov ebp, esp
0085E2EF B908000000 mov ecx, $00000008
0085E2F4 6A00 push $00
0085E2F6 6A00 push $00
0085E2F8 49 dec ecx
0085E2F9 75F9 jnz 0085E2F4
0085E2FB 53 push ebx
0085E2FC 56 push esi
0085E2FD 8BDA mov ebx, edx
0085E2FF 8BF0 mov esi, eax
0085E301 33C0 xor eax, eax
0085E303 55 push ebp
0085E304 68D4E48500 push $0085E4D4
***** TRY
|
0085E309 64FF30 push dword ptr fs:[eax]
0085E30C 648920 mov fs:[eax], esp
0085E30F 8D55FC lea edx, [ebp-$04]
0085E312 8BC3 mov eax, ebx
* 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;
|
0085E314 E8A313D3FF call 0058F6BC
0085E319 8D55F4 lea edx, [ebp-$0C]
0085E31C 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E31F E8C8C5BAFF call 0040A8EC
0085E324 837DF400 cmp dword ptr [ebp-$0C], +$00
0085E328 750D jnz 0085E337
0085E32A 8D45FC lea eax, [ebp-$04]
0085E32D BAECE48500 mov edx, $0085E4EC
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0085E332 E88570BAFF call 004053BC
* Reference to control v1PRTColor : N.A.
|
0085E337 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E33D E80AE0DFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E342 E81D38DFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085E347 8B4050 mov eax, [eax+$50]
0085E34A 8D55F0 lea edx, [ebp-$10]
0085E34D 8B08 mov ecx, [eax]
0085E34F FF5110 call dword ptr [ecx+$10]
0085E352 8B45F0 mov eax, [ebp-$10]
0085E355 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E358 E88FC5BAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085E35D 8B9E5C030000 mov ebx, [esi+$035C]
0085E363 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E365 E8D6A0C6FF call 004C8440
0085E36A 8D55DC lea edx, [ebp-$24]
0085E36D 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E370 E877C5BAFF call 0040A8EC
0085E375 8B55DC mov edx, [ebp-$24]
0085E378 8D45E0 lea eax, [ebp-$20]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E37B E848AABBFF call 00418DC8
0085E380 8D45E0 lea eax, [ebp-$20]
0085E383 50 push eax
0085E384 8B55F8 mov edx, [ebp-$08]
0085E387 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E389 E82688C6FF call 004C6BB4
0085E38E 5A pop edx
0085E38F 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085E391 FF91B4000000 call dword ptr [ecx+$00B4]
0085E397 8BC3 mov eax, ebx
0085E399 8B10 mov edx, [eax]
* Possible reference to virtual method TLabel.OFFS_024C
|
0085E39B FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0085E3A1 8B9E0C030000 mov ebx, [esi+$030C]
0085E3A7 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E3A9 E82675C6FF call 004C58D4
0085E3AE 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E3B0 E8F7FBC7FF call 004DDFAC
0085E3B5 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0085E3B7 FF5244 call dword ptr [edx+$44]
0085E3BA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E3BC E8EBFBC7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E3C1 BAF8E48500 mov edx, $0085E4F8
0085E3C6 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E3C8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E3CB 6814E58500 push $0085E514
0085E3D0 FF75F8 push dword ptr [ebp-$08]
0085E3D3 6824E58500 push $0085E524
0085E3D8 8D55D4 lea edx, [ebp-$2C]
0085E3DB 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E3DE E809C5BAFF call 0040A8EC
0085E3E3 FF75D4 push dword ptr [ebp-$2C]
0085E3E6 8D45D8 lea eax, [ebp-$28]
0085E3E9 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0085E3EE E8C172BAFF call 004056B4
0085E3F3 8B45D8 mov eax, [ebp-$28]
0085E3F6 50 push eax
0085E3F7 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E3F9 E8AEFBC7FF call 004DDFAC
0085E3FE 5A pop edx
0085E3FF 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E401 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E404 6830E58500 push $0085E530
0085E409 8D55CC lea edx, [ebp-$34]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085E4F9(Sender : TObject);
begin
(*
0085E4F9 50 push eax
0085E4FA 6461 popa
0085E4FC 7465 jz 0085E563
0085E4FE 205946 and [ecx+$46], bl
0085E501 5F pop edi
0085E502 4D dec ebp
0085E503 6F outsd
0085E504 6E outsb
0085E505 65795F jns 0085E567
0085E508 43 inc ebx
0085E509 52 push edx
0085E50A 2000 and [eax], al
0085E50C FFFF DB $FF, $FF //
0085E50E FFFF DB $FF, $FF //
0085E510 0500000020 add eax, +$20000000
0085E515 53 push ebx
0085E516 657420 jz 0085E539
0085E519 0000 add [eax], al
0085E51B 00FF add bh, bh
0085E51D FFFF DB $FF, $FF //
0085E51F FF01 inc dword ptr [ecx]
0085E521 0000 add [eax], al
0085E523 003D000000FF add [$FF000000], bh
0085E529 FFFF DB $FF, $FF //
0085E52B FF09 dec dword ptr [ecx]
0085E52D 0000 add [eax], al
0085E52F 002C4564697465 add [$65746964+eax*2], ch
0085E536 723D jb 0085E575
0085E538 27 daa
0085E539 0000 add [eax], al
0085E53B 00FF add bh, bh
0085E53D FFFF DB $FF, $FF //
0085E53F FF01 inc dword ptr [ecx]
0085E541 0000 add [eax], al
0085E543 0027 add [edi], ah
0085E545 0000 add [eax], al
0085E547 00FF add bh, bh
0085E549 FFFF DB $FF, $FF //
0085E54B FF1400 call dword ptr [eax+eax]
0085E54E 0000 add [eax], al
0085E550 2C45 sub al, $45
0085E552 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085E55B 657464 jz 0085E5C2
0085E55E 61 popa
0085E55F 7465 jz 0085E5C6
0085E561 2829 sub [ecx], ch
0085E563 2000 and [eax], al
0085E565 0000 add [eax], al
0085E567 00FF add bh, bh
0085E569 FFFF DB $FF, $FF //
0085E56B FF0D00000020 dec dword ptr [$20000000]
0085E571 7768 jnbe 0085E5DB
0085E573 657265 jb 0085E5DB
0085E576 205946 and [ecx+$46], bl
0085E579 49 dec ecx
0085E57A 643D27000000 cmp eax, $00000027
0085E580 FFFF DB $FF, $FF //
0085E582 FFFF DB $FF, $FF //
0085E584 0400 add al, +$00
0085E586 0000 add [eax], al
0085E588 59 pop ecx
0085E589 46 inc esi
0085E58A 49 dec ecx
0085E58B 640000 add fs:[eax], al
0085E58E 0000 add [eax], al
0085E590 55 push ebp
0085E591 8BEC mov ebp, esp
0085E593 B907000000 mov ecx, $00000007
0085E598 6A00 push $00
0085E59A 6A00 push $00
0085E59C 49 dec ecx
0085E59D 75F9 jnz 0085E598
0085E59F 51 push ecx
0085E5A0 53 push ebx
0085E5A1 56 push esi
0085E5A2 8BDA mov ebx, edx
0085E5A4 8BF0 mov esi, eax
0085E5A6 33C0 xor eax, eax
0085E5A8 55 push ebp
* Possible String Reference to: '<27><>c<EFBFBD><63><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085E5A9 6860E78500 push $0085E760
***** TRY
|
0085E5AE 64FF30 push dword ptr fs:[eax]
0085E5B1 648920 mov fs:[eax], esp
0085E5B4 8D55FC lea edx, [ebp-$04]
0085E5B7 8BC3 mov eax, ebx
* 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;
|
0085E5B9 E8FE10D3FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
0085E5BE 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E5C4 E883DDDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E5C9 E89635DFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085E5CE 8B4050 mov eax, [eax+$50]
0085E5D1 8D55F4 lea edx, [ebp-$0C]
0085E5D4 8B08 mov ecx, [eax]
0085E5D6 FF5110 call dword ptr [ecx+$10]
0085E5D9 8B45F4 mov eax, [ebp-$0C]
0085E5DC 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E5DF E808C3BAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085E5E4 8B9E5C030000 mov ebx, [esi+$035C]
0085E5EA 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E5EC E84F9EC6FF call 004C8440
0085E5F1 8D55E0 lea edx, [ebp-$20]
0085E5F4 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E5F7 E8F0C2BAFF call 0040A8EC
0085E5FC 8B55E0 mov edx, [ebp-$20]
0085E5FF 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E602 E8C1A7BBFF call 00418DC8
0085E607 8D45E4 lea eax, [ebp-$1C]
0085E60A 50 push eax
0085E60B 8B55F8 mov edx, [ebp-$08]
0085E60E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E610 E89F85C6FF call 004C6BB4
0085E615 5A pop edx
0085E616 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085E618 FF91B4000000 call dword ptr [ecx+$00B4]
0085E61E 8BC3 mov eax, ebx
0085E620 8B10 mov edx, [eax]
* Possible reference to virtual method TLabel.OFFS_024C
|
0085E622 FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0085E628 8B9E0C030000 mov ebx, [esi+$030C]
0085E62E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E630 E89F72C6FF call 004C58D4
0085E635 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E637 E870F9C7FF call 004DDFAC
0085E63C 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0085E63E FF5244 call dword ptr [edx+$44]
0085E641 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E643 E864F9C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E648 BA78E78500 mov edx, $0085E778
0085E64D 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E64F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E652 6894E78500 push $0085E794
0085E657 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0085E65A 68A4E78500 push $0085E7A4
0085E65F 8D55D8 lea edx, [ebp-$28]
0085E662 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E665 E882C2BAFF call 0040A8EC
0085E66A FF75D8 push dword ptr [ebp-$28]
0085E66D 68B0E78500 push $0085E7B0
0085E672 8D45DC lea eax, [ebp-$24]
0085E675 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0085E67A E83570BAFF call 004056B4
0085E67F 8B45DC mov eax, [ebp-$24]
0085E682 50 push eax
0085E683 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E685 E822F9C7FF call 004DDFAC
0085E68A 5A pop edx
0085E68B 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E68D FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E690 68BCE78500 push $0085E7BC
0085E695 8D55D0 lea edx, [ebp-$30]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085E779(Sender : TObject);
begin
(*
0085E779 50 push eax
0085E77A 6461 popa
0085E77C 7465 jz 0085E7E3
0085E77E 205946 and [ecx+$46], bl
0085E781 5F pop edi
0085E782 4D dec ebp
0085E783 6F outsd
0085E784 6E outsb
0085E785 65795F jns 0085E7E7
0085E788 43 inc ebx
0085E789 52 push edx
0085E78A 2000 and [eax], al
0085E78C FFFF DB $FF, $FF //
0085E78E FFFF DB $FF, $FF //
0085E790 0500000020 add eax, +$20000000
0085E795 53 push ebx
0085E796 657420 jz 0085E7B9
0085E799 0000 add [eax], al
0085E79B 00FF add bh, bh
0085E79D FFFF DB $FF, $FF //
0085E79F FF02 inc dword ptr [edx]
0085E7A1 0000 add [eax], al
0085E7A3 003D270000FF add [$FF000027], bh
0085E7A9 FFFF DB $FF, $FF //
0085E7AB FF01 inc dword ptr [ecx]
0085E7AD 0000 add [eax], al
0085E7AF 0027 add [edi], ah
0085E7B1 0000 add [eax], al
0085E7B3 00FF add bh, bh
0085E7B5 FFFF DB $FF, $FF //
0085E7B7 FF09 dec dword ptr [ecx]
0085E7B9 0000 add [eax], al
0085E7BB 002C4564697465 add [$65746964+eax*2], ch
0085E7C2 723D jb 0085E801
0085E7C4 27 daa
0085E7C5 0000 add [eax], al
0085E7C7 00FF add bh, bh
0085E7C9 FFFF DB $FF, $FF //
0085E7CB FF1400 call dword ptr [eax+eax]
0085E7CE 0000 add [eax], al
0085E7D0 2C45 sub al, $45
0085E7D2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085E7DB 657464 jz 0085E842
0085E7DE 61 popa
0085E7DF 7465 jz 0085E846
0085E7E1 2829 sub [ecx], ch
0085E7E3 2000 and [eax], al
0085E7E5 0000 add [eax], al
0085E7E7 00FF add bh, bh
0085E7E9 FFFF DB $FF, $FF //
0085E7EB FF0D00000020 dec dword ptr [$20000000]
0085E7F1 7768 jnbe 0085E85B
0085E7F3 657265 jb 0085E85B
0085E7F6 205946 and [ecx+$46], bl
0085E7F9 49 dec ecx
0085E7FA 643D27000000 cmp eax, $00000027
0085E800 FFFF DB $FF, $FF //
0085E802 FFFF DB $FF, $FF //
0085E804 0400 add al, +$00
0085E806 0000 add [eax], al
0085E808 59 pop ecx
0085E809 46 inc esi
0085E80A 49 dec ecx
0085E80B 640000 add fs:[eax], al
0085E80E 0000 add [eax], al
0085E810 55 push ebp
0085E811 8BEC mov ebp, esp
0085E813 B90C000000 mov ecx, $0000000C
0085E818 6A00 push $00
0085E81A 6A00 push $00
0085E81C 49 dec ecx
0085E81D 75F9 jnz 0085E818
0085E81F 53 push ebx
0085E820 56 push esi
0085E821 8BDA mov ebx, edx
0085E823 8BF0 mov esi, eax
0085E825 33C0 xor eax, eax
0085E827 55 push ebp
0085E828 6807EB8500 push $0085EB07
***** TRY
|
0085E82D 64FF30 push dword ptr fs:[eax]
0085E830 648920 mov fs:[eax], esp
0085E833 8D55FC lea edx, [ebp-$04]
0085E836 8BC3 mov eax, ebx
* 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;
|
0085E838 E87F0ED3FF call 0058F6BC
0085E83D 8D55EC lea edx, [ebp-$14]
0085E840 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E843 E8A4C0BAFF call 0040A8EC
0085E848 837DEC00 cmp dword ptr [ebp-$14], +$00
0085E84C 750D jnz 0085E85B
0085E84E 8D45FC lea eax, [ebp-$04]
0085E851 BA1CEB8500 mov edx, $0085EB1C
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0085E856 E8616BBAFF call 004053BC
* Reference to control v1PRTColor : N.A.
|
0085E85B 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
0085E861 E8E6DADFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E866 E8F932DFFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0085E86B 8B4050 mov eax, [eax+$50]
0085E86E 8D55E8 lea edx, [ebp-$18]
0085E871 8B08 mov ecx, [eax]
0085E873 FF5110 call dword ptr [ecx+$10]
0085E876 8B45E8 mov eax, [ebp-$18]
0085E879 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E87C E86BC0BAFF call 0040A8EC
* Reference to control Label10 : TLabel
|
0085E881 8B9E5C030000 mov ebx, [esi+$035C]
0085E887 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0085E889 E8B29BC6FF call 004C8440
0085E88E 8D55D4 lea edx, [ebp-$2C]
0085E891 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E894 E853C0BAFF call 0040A8EC
0085E899 8B55D4 mov edx, [ebp-$2C]
0085E89C 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0085E89F E824A5BBFF call 00418DC8
0085E8A4 8D45D8 lea eax, [ebp-$28]
0085E8A7 50 push eax
0085E8A8 8B55F0 mov edx, [ebp-$10]
0085E8AB 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E8AD E80283C6FF call 004C6BB4
0085E8B2 5A pop edx
0085E8B3 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
0085E8B5 FF91B4000000 call dword ptr [ecx+$00B4]
0085E8BB 8BC3 mov eax, ebx
0085E8BD 8B10 mov edx, [eax]
* Possible reference to virtual method TLabel.OFFS_024C
|
0085E8BF FF924C020000 call dword ptr [edx+$024C]
* Reference to control Label3 : TLabel
|
0085E8C5 8B9E08030000 mov ebx, [esi+$0308]
0085E8CB 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E8CD E80270C6FF call 004C58D4
0085E8D2 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0085E8D4 E8D3F6C7FF call 004DDFAC
0085E8D9 8B10 mov edx, [eax]
* Reference to method TLabel.GetClientRect()
|
0085E8DB FF5244 call dword ptr [edx+$44]
* Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr
| om YF_Money_CR where YFID=''
|
0085E8DE 6828EB8500 push $0085EB28
* Possible String Reference to: 'YFID'
|
0085E8E3 BA70EB8500 mov edx, $0085EB70
* Reference to control Label10 : TLabel
|
0085E8E8 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E8EE E8C182C6FF call 004C6BB4
0085E8F3 8D55CC lea edx, [ebp-$34]
0085E8F6 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
0085E8F8 FF5160 call dword ptr [ecx+$60]
0085E8FB FF75CC push dword ptr [ebp-$34]
0085E8FE 6880EB8500 push $0085EB80
0085E903 8D45D0 lea eax, [ebp-$30]
0085E906 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0085E90B E8A46DBAFF call 004056B4
0085E910 8B45D0 mov eax, [ebp-$30]
0085E913 50 push eax
0085E914 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0085E916 E891F6C7FF call 004DDFAC
0085E91B 5A pop edx
0085E91C 8B08 mov ecx, [eax]
* Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0085E91E FF5138 call dword ptr [ecx+$38]
0085E921 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0085E923 E8A06FC6FF call 004C58C8
* Possible String Reference to: 'KPMoney'
|
0085E928 BA8CEB8500 mov edx, $0085EB8C
* Reference to control Label3 : TLabel
|
0085E92D 8B8608030000 mov eax, [esi+$0308]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E933 E87C82C6FF call 004C6BB4
0085E938 8D55F4 lea edx, [ebp-$0C]
0085E93B 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
0085E93D FF5160 call dword ptr [ecx+$60]
* Possible String Reference to: 'KPMoney'
|
0085E940 BA8CEB8500 mov edx, $0085EB8C
* Reference to control Label10 : TLabel
|
0085E945 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0085E94B E86482C6FF call 004C6BB4
0085E950 8D55F8 lea edx, [ebp-$08]
0085E953 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
0085E955 FF5160 call dword ptr [ecx+$60]
* Reference to control OrdDate : N.A.
|
0085E958 8B9E0C030000 mov ebx, [esi+$030C]
0085E95E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0085E960 E86F6FC6FF call 004C58D4
0085E965 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E967 E840F6C7FF call 004DDFAC
0085E96C 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0085E96E FF5244 call dword ptr [edx+$44]
0085E971 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E973 E834F6C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0085E978 BA9CEB8500 mov edx, $0085EB9C
0085E97D 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E97F FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0085E982 68B8EB8500 push $0085EBB8
0085E987 FF75F0 push dword ptr [ebp-$10]
0085E98A 68C8EB8500 push $0085EBC8
0085E98F 8D55C4 lea edx, [ebp-$3C]
0085E992 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0085E995 E852BFBAFF call 0040A8EC
0085E99A FF75C4 push dword ptr [ebp-$3C]
0085E99D 8D45C8 lea eax, [ebp-$38]
0085E9A0 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0085E9A5 E80A6DBAFF call 004056B4
0085E9AA 8B45C8 mov eax, [ebp-$38]
0085E9AD 50 push eax
0085E9AE 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0085E9B0 E8F7F5C7FF call 004DDFAC
0085E9B5 5A pop edx
0085E9B6 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0085E9B8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0085E9BB 68D4EB8500 push $0085EBD4
0085E9C0 8D55BC lea edx, [ebp-$44]
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085EB9D(Sender : TObject);
begin
(*
0085EB9D 50 push eax
0085EB9E 6461 popa
0085EBA0 7465 jz 0085EC07
0085EBA2 205946 and [ecx+$46], bl
0085EBA5 5F pop edi
0085EBA6 4D dec ebp
0085EBA7 6F outsd
0085EBA8 6E outsb
0085EBA9 65795F jns 0085EC0B
0085EBAC 43 inc ebx
0085EBAD 52 push edx
0085EBAE 2000 and [eax], al
0085EBB0 FFFF DB $FF, $FF //
0085EBB2 FFFF DB $FF, $FF //
0085EBB4 0500000020 add eax, +$20000000
0085EBB9 53 push ebx
0085EBBA 657420 jz 0085EBDD
0085EBBD 0000 add [eax], al
0085EBBF 00FF add bh, bh
0085EBC1 FFFF DB $FF, $FF //
0085EBC3 FF01 inc dword ptr [ecx]
0085EBC5 0000 add [eax], al
0085EBC7 003D000000FF add [$FF000000], bh
0085EBCD FFFF DB $FF, $FF //
0085EBCF FF09 dec dword ptr [ecx]
0085EBD1 0000 add [eax], al
0085EBD3 002C4564697465 add [$65746964+eax*2], ch
0085EBDA 723D jb 0085EC19
0085EBDC 27 daa
0085EBDD 0000 add [eax], al
0085EBDF 00FF add bh, bh
0085EBE1 FFFF DB $FF, $FF //
0085EBE3 FF1400 call dword ptr [eax+eax]
0085EBE6 0000 add [eax], al
0085EBE8 2C45 sub al, $45
0085EBEA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085EBF3 657464 jz 0085EC5A
0085EBF6 61 popa
0085EBF7 7465 jz 0085EC5E
0085EBF9 2829 sub [ecx], ch
0085EBFB 2000 and [eax], al
0085EBFD 0000 add [eax], al
0085EBFF 00FF add bh, bh
0085EC01 FFFF DB $FF, $FF //
0085EC03 FF0D00000020 dec dword ptr [$20000000]
0085EC09 7768 jnbe 0085EC73
0085EC0B 657265 jb 0085EC73
0085EC0E 205946 and [ecx+$46], bl
0085EC11 49 dec ecx
0085EC12 643D27000000 cmp eax, $00000027
0085EC18 FFFF DB $FF, $FF //
0085EC1A FFFF DB $FF, $FF //
0085EC1C 0400 add al, +$00
0085EC1E 0000 add [eax], al
0085EC20 59 pop ecx
0085EC21 46 inc esi
0085EC22 49 dec ecx
0085EC23 640000 add fs:[eax], al
0085EC26 0000 add [eax], al
0085EC28 FFFF DB $FF, $FF //
0085EC2A FFFF DB $FF, $FF //
0085EC2C 2B00 sub eax, dword ptr [eax]
0085EC2E 0000 add [eax], al
0085EC30 55 push ebp
0085EC31 7064 jo 0085EC97
0085EC33 61 popa
0085EC34 7465 jz 0085EC9B
0085EC36 205946 and [ecx+$46], bl
0085EC39 5F pop edi
0085EC3A 4D dec ebp
0085EC3B 6F outsd
0085EC3C 6E outsb
0085EC3D 65795F jns 0085EC9F
0085EC40 4B dec ebx
0085EC41 43 inc ebx
0085EC42 205365 and [ebx+$65], dl
0085EC45 7420 jz 0085EC67
0085EC47 4B dec ebx
0085EC48 43 inc ebx
0085EC49 4B dec ebx
0085EC4A 50 push eax
0085EC4B 4D dec ebp
0085EC4C 6F outsd
0085EC4D 6E outsb
0085EC4E 65793D jns 0085EC8E
0085EC51 4B dec ebx
0085EC52 43 inc ebx
0085EC53 4B dec ebx
0085EC54 50 push eax
0085EC55 4D dec ebp
0085EC56 6F outsd
0085EC57 6E outsb
0085EC58 65792D jns 0085EC88
0085EC5B 00FF add bh, bh
0085EC5D FFFF DB $FF, $FF //
0085EC5F FF01 inc dword ptr [ecx]
0085EC61 0000 add [eax], al
0085EC63 002B add [ebx], ch
0085EC65 0000 add [eax], al
0085EC67 00FF add bh, bh
0085EC69 FFFF DB $FF, $FF //
0085EC6B FF0D00000020 dec dword ptr [$20000000]
0085EC71 7768 jnbe 0085ECDB
0085EC73 657265 jb 0085ECDB
0085EC76 204352 and [ebx+$52], al
0085EC79 49 dec ecx
0085EC7A 44 inc esp
0085EC7B 3D27000000 cmp eax, $00000027
0085EC80 FFFF DB $FF, $FF //
0085EC82 FFFF DB $FF, $FF //
0085EC84 0400 add al, +$00
0085EC86 0000 add [eax], al
0085EC88 43 inc ebx
0085EC89 52 push edx
0085EC8A 49 dec ecx
0085EC8B 44 inc esp
0085EC8C 0000 add [eax], al
0085EC8E 0000 add [eax], al
0085EC90 55 push ebp
0085EC91 8BEC mov ebp, esp
0085EC93 B910000000 mov ecx, $00000010
0085EC98 6A00 push $00
0085EC9A 6A00 push $00
0085EC9C 49 dec ecx
0085EC9D 75F9 jnz 0085EC98
0085EC9F 51 push ecx
0085ECA0 53 push ebx
0085ECA1 56 push esi
0085ECA2 57 push edi
0085ECA3 8945FC mov [ebp-$04], eax
0085ECA6 33C0 xor eax, eax
0085ECA8 55 push ebp
* Possible String Reference to: '<27><>Z<EFBFBD><5A><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0085ECA9 6821F08500 push $0085F021
***** TRY
|
0085ECAE 64FF30 push dword ptr fs:[eax]
0085ECB1 648920 mov fs:[eax], esp
0085ECB4 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : TLabel
|
0085ECB7 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0085ECBD E8FE91C6FF call 004C7EC0
0085ECC2 84C0 test al, al
0085ECC4 0F85F1020000 jnz 0085EFBB
0085ECCA A030F08500 mov al, byte ptr [$0085F030]
0085ECCF 50 push eax
0085ECD0 8D45EC lea eax, [ebp-$14]
0085ECD3 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0085ECD5 E88AA0BBFF call 00418D64
0085ECDA 8D4DEC lea ecx, [ebp-$14]
0085ECDD 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : TLabel
|
0085ECE0 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0085ECE6 BA3CF08500 mov edx, $0085F03C
0085ECEB 8B18 mov ebx, [eax]
* Possible reference to virtual method TLabel.OFFS_0244
|
0085ECED FF9344020000 call dword ptr [ebx+$0244]
0085ECF3 84C0 test al, al
0085ECF5 751D jnz 0085ED14
0085ECF7 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0085ECF9 B944F08500 mov ecx, $0085F044
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0085ECFE BA4CF08500 mov edx, $0085F04C
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085FB19(Sender : TObject);
begin
(*
0085FB19 50 push eax
0085FB1A 6461 popa
0085FB1C 7465 jz 0085FB83
0085FB1E 205946 and [ecx+$46], bl
0085FB21 5F pop edi
0085FB22 4D dec ebp
0085FB23 6F outsd
0085FB24 6E outsb
0085FB25 65795F jns 0085FB87
0085FB28 43 inc ebx
0085FB29 52 push edx
0085FB2A 2000 and [eax], al
0085FB2C FFFF DB $FF, $FF //
0085FB2E FFFF DB $FF, $FF //
0085FB30 1000 adc [eax], al
0085FB32 0000 add [eax], al
0085FB34 205365 and [ebx+$65], dl
0085FB37 7420 jz 0085FB59
0085FB39 43 inc ebx
0085FB3A 6F outsd
0085FB3B 6D insd
0085FB3C 54 push esp
0085FB3D 61 popa
0085FB3E 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D
0085FB46 0000 add [eax], al
0085FB48 FFFF DB $FF, $FF //
0085FB4A FFFF DB $FF, $FF //
0085FB4C 0100 add [eax], eax
0085FB4E 0000 add [eax], al
0085FB50 27 daa
0085FB51 0000 add [eax], al
0085FB53 00FF add bh, bh
0085FB55 FFFF DB $FF, $FF //
0085FB57 FF09 dec dword ptr [ecx]
0085FB59 0000 add [eax], al
0085FB5B 002C4564697465 add [$65746964+eax*2], ch
0085FB62 723D jb 0085FBA1
0085FB64 27 daa
0085FB65 0000 add [eax], al
0085FB67 00FF add bh, bh
0085FB69 FFFF DB $FF, $FF //
0085FB6B FF1400 call dword ptr [eax+eax]
0085FB6E 0000 add [eax], al
0085FB70 2C45 sub al, $45
0085FB72 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085FB7B 657464 jz 0085FBE2
0085FB7E 61 popa
0085FB7F 7465 jz 0085FBE6
0085FB81 2829 sub [ecx], ch
0085FB83 2000 and [eax], al
0085FB85 0000 add [eax], al
0085FB87 00FF add bh, bh
0085FB89 FFFF DB $FF, $FF //
0085FB8B FF0D00000020 dec dword ptr [$20000000]
0085FB91 7768 jnbe 0085FBFB
0085FB93 657265 jb 0085FBFB
0085FB96 205946 and [ecx+$46], bl
0085FB99 49 dec ecx
0085FB9A 643D27000000 cmp eax, $00000027
0085FBA0 FFFF DB $FF, $FF //
0085FBA2 FFFF DB $FF, $FF //
0085FBA4 0400 add al, +$00
0085FBA6 0000 add [eax], al
0085FBA8 59 pop ecx
0085FBA9 46 inc esi
0085FBAA 49 dec ecx
0085FBAB 640000 add fs:[eax], al
0085FBAE 0000 add [eax], al
0085FBB0 55 push ebp
0085FBB1 8BEC mov ebp, esp
0085FBB3 51 push ecx
0085FBB4 B906000000 mov ecx, $00000006
0085FBB9 6A00 push $00
0085FBBB 6A00 push $00
0085FBBD 49 dec ecx
0085FBBE 75F9 jnz 0085FBB9
0085FBC0 51 push ecx
0085FBC1 874DFC xchg [ebp-$04], ecx
0085FBC4 53 push ebx
0085FBC5 56 push esi
0085FBC6 8BF0 mov esi, eax
0085FBC8 33C0 xor eax, eax
0085FBCA 55 push ebp
* Possible String Reference to: '<27><>L<EFBFBD><4C><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085FBCB 6809FE8500 push $0085FE09
***** TRY
|
0085FBD0 64FF30 push dword ptr fs:[eax]
0085FBD3 648920 mov fs:[eax], esp
0085FBD6 33C0 xor eax, eax
0085FBD8 55 push ebp
0085FBD9 68DFFD8500 push $0085FDDF
***** TRY
|
0085FBDE 64FF30 push dword ptr fs:[eax]
0085FBE1 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0085FE51(Sender : TObject);
begin
(*
0085FE51 50 push eax
0085FE52 6461 popa
0085FE54 7465 jz 0085FEBB
0085FE56 205946 and [ecx+$46], bl
0085FE59 5F pop edi
0085FE5A 4D dec ebp
0085FE5B 6F outsd
0085FE5C 6E outsb
0085FE5D 65795F jns 0085FEBF
0085FE60 43 inc ebx
0085FE61 52 push edx
0085FE62 2000 and [eax], al
0085FE64 FFFF DB $FF, $FF //
0085FE66 FFFF DB $FF, $FF //
0085FE68 0D00000020 or eax, $20000000
0085FE6D 53 push ebx
0085FE6E 657420 jz 0085FE91
0085FE71 42 inc edx
0085FE72 5A pop edx
0085FE73 54 push esp
0085FE74 7970 jns 0085FEE6
0085FE76 653D27000000 cmp eax, $00000027
0085FE7C FFFF DB $FF, $FF //
0085FE7E FFFF DB $FF, $FF //
0085FE80 07 pop es
0085FE81 0000 add [eax], al
0085FE83 005A64 add [edx+$64], bl
0085FE86 794E jns 0085FED6
0085FE88 61 popa
0085FE89 6D insd
0085FE8A 6500FF add bh, bh
0085FE8D FFFF DB $FF, $FF //
0085FE8F FF01 inc dword ptr [ecx]
0085FE91 0000 add [eax], al
0085FE93 0027 add [edi], ah
0085FE95 0000 add [eax], al
0085FE97 00FF add bh, bh
0085FE99 FFFF DB $FF, $FF //
0085FE9B FF09 dec dword ptr [ecx]
0085FE9D 0000 add [eax], al
0085FE9F 002C4564697465 add [$65746964+eax*2], ch
0085FEA6 723D jb 0085FEE5
0085FEA8 27 daa
0085FEA9 0000 add [eax], al
0085FEAB 00FF add bh, bh
0085FEAD FFFF DB $FF, $FF //
0085FEAF FF1400 call dword ptr [eax+eax]
0085FEB2 0000 add [eax], al
0085FEB4 2C45 sub al, $45
0085FEB6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0085FEBF 657464 jz 0085FF26
0085FEC2 61 popa
0085FEC3 7465 jz 0085FF2A
0085FEC5 2829 sub [ecx], ch
0085FEC7 2000 and [eax], al
0085FEC9 0000 add [eax], al
0085FECB 00FF add bh, bh
0085FECD FFFF DB $FF, $FF //
0085FECF FF0D00000020 dec dword ptr [$20000000]
0085FED5 7768 jnbe 0085FF3F
0085FED7 657265 jb 0085FF3F
0085FEDA 205946 and [ecx+$46], bl
0085FEDD 49 dec ecx
0085FEDE 643D27000000 cmp eax, $00000027
0085FEE4 FFFF DB $FF, $FF //
0085FEE6 FFFF DB $FF, $FF //
0085FEE8 0400 add al, +$00
0085FEEA 0000 add [eax], al
0085FEEC 59 pop ecx
0085FEED 46 inc esi
0085FEEE 49 dec ecx
0085FEEF 640000 add fs:[eax], al
0085FEF2 0000 add [eax], al
0085FEF4 55 push ebp
0085FEF5 8BEC mov ebp, esp
0085FEF7 51 push ecx
0085FEF8 B906000000 mov ecx, $00000006
0085FEFD 6A00 push $00
0085FEFF 6A00 push $00
0085FF01 49 dec ecx
0085FF02 75F9 jnz 0085FEFD
0085FF04 51 push ecx
0085FF05 874DFC xchg [ebp-$04], ecx
0085FF08 53 push ebx
0085FF09 56 push esi
0085FF0A 8BF0 mov esi, eax
0085FF0C 33C0 xor eax, eax
0085FF0E 55 push ebp
* Possible String Reference to: '<27><>I<EFBFBD><49><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0085FF0F 684D018600 push $0086014D
***** TRY
|
0085FF14 64FF30 push dword ptr fs:[eax]
0085FF17 648920 mov fs:[eax], esp
0085FF1A 33C0 xor eax, eax
0085FF1C 55 push ebp
0085FF1D 6823018600 push $00860123
***** TRY
|
0085FF22 64FF30 push dword ptr fs:[eax]
0085FF25 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_008601A5(Sender : TObject);
begin
(*
008601A5 50 push eax
008601A6 6461 popa
008601A8 7465 jz 0086020F
008601AA 205946 and [ecx+$46], bl
008601AD 5F pop edi
008601AE 4D dec ebp
008601AF 6F outsd
008601B0 6E outsb
008601B1 65795F jns 00860213
008601B4 43 inc ebx
008601B5 52 push edx
008601B6 2000 and [eax], al
008601B8 FFFF DB $FF, $FF //
008601BA FFFF DB $FF, $FF //
008601BC 0D00000020 or eax, $20000000
008601C1 53 push ebx
008601C2 657420 jz 008601E5
008601C5 50 push eax
008601C6 5F pop edi
008601C7 53 push ebx
008601C8 7065 jo 0086022F
008601CA 633D27000000 arpl [$00000027], di
008601D0 FFFF DB $FF, $FF //
008601D2 FFFF DB $FF, $FF //
008601D4 07 pop es
008601D5 0000 add [eax], al
008601D7 005A64 add [edx+$64], bl
008601DA 794E jns 0086022A
008601DC 61 popa
008601DD 6D insd
008601DE 6500FF add bh, bh
008601E1 FFFF DB $FF, $FF //
008601E3 FF01 inc dword ptr [ecx]
008601E5 0000 add [eax], al
008601E7 0027 add [edi], ah
008601E9 0000 add [eax], al
008601EB 00FF add bh, bh
008601ED FFFF DB $FF, $FF //
008601EF FF09 dec dword ptr [ecx]
008601F1 0000 add [eax], al
008601F3 002C4564697465 add [$65746964+eax*2], ch
008601FA 723D jb 00860239
008601FC 27 daa
008601FD 0000 add [eax], al
008601FF 00FF add bh, bh
00860201 FFFF DB $FF, $FF //
00860203 FF1400 call dword ptr [eax+eax]
00860206 0000 add [eax], al
00860208 2C45 sub al, $45
0086020A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
00860213 657464 jz 0086027A
00860216 61 popa
00860217 7465 jz 0086027E
00860219 2829 sub [ecx], ch
0086021B 2000 and [eax], al
0086021D 0000 add [eax], al
0086021F 00FF add bh, bh
00860221 FFFF DB $FF, $FF //
00860223 FF0D00000020 dec dword ptr [$20000000]
00860229 7768 jnbe 00860293
0086022B 657265 jb 00860293
0086022E 205946 and [ecx+$46], bl
00860231 49 dec ecx
00860232 643D27000000 cmp eax, $00000027
00860238 FFFF DB $FF, $FF //
0086023A FFFF DB $FF, $FF //
0086023C 0400 add al, +$00
0086023E 0000 add [eax], al
00860240 59 pop ecx
00860241 46 inc esi
00860242 49 dec ecx
00860243 640000 add fs:[eax], al
00860246 0000 add [eax], al
00860248 53 push ebx
00860249 56 push esi
0086024A 8BD8 mov ebx, eax
* Possible String Reference to: 'Money'
|
0086024C BA88028600 mov edx, $00860288
* Reference to control Label10 : TLabel
|
00860251 8BB35C030000 mov esi, [ebx+$035C]
00860257 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00860259 E85669C6FF call 004C6BB4
0086025E 8B10 mov edx, [eax]
* Reference to method TLabel.GetDragImages()
|
00860260 FF524C call dword ptr [edx+$4C]
00860263 D83590028600 fdiv dword ptr [$00860290]
00860269 83C4F8 add esp, -$08
0086026C DD1C24 fstp qword ptr [esp]
0086026F 9B wait
* Reference to control BankNo : N.A.
|
00860270 8B93B0030000 mov edx, [ebx+$03B0]
00860276 8BC6 mov eax, esi
* Reference to : TfrmSelExportField._PROC_007B6D90()
|
00860278 E8136BF5FF call 007B6D90
0086027D 5E pop esi
0086027E 5B pop ebx
0086027F C3 ret
00860280 FFFF DB $FF, $FF //
00860282 FFFF DB $FF, $FF //
00860284 050000004D add eax, +$4D000000
00860289 6F outsd
0086028A 6E outsb
0086028B 657900 jns 0086028E
0086028E 0000 add [eax], al
00860290 00401C add [eax+$1C], al
00860293 46 inc esi
00860294 55 push ebp
00860295 8BEC mov ebp, esp
00860297 51 push ecx
00860298 B90B000000 mov ecx, $0000000B
0086029D 6A00 push $00
0086029F 6A00 push $00
008602A1 49 dec ecx
008602A2 75F9 jnz 0086029D
008602A4 874DFC xchg [ebp-$04], ecx
008602A7 53 push ebx
008602A8 56 push esi
008602A9 8BF0 mov esi, eax
008602AB 33C0 xor eax, eax
008602AD 55 push ebp
* Possible String Reference to: '<27><>E<EFBFBD><45><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
008602AE 6869058600 push $00860569
***** TRY
|
008602B3 64FF30 push dword ptr fs:[eax]
008602B6 648920 mov fs:[eax], esp
008602B9 8BCE mov ecx, esi
008602BB B201 mov dl, $01
* Reference to class TfrmJYorderConCX
|
008602BD A164DF7D00 mov eax, dword ptr [$007DDF64]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
008602C2 E8091BC4FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QT._PROC_008605BD(Sender : TObject);
begin
(*
008605BD 50 push eax
008605BE 6461 popa
008605C0 7465 jz 00860627
008605C2 205946 and [ecx+$46], bl
008605C5 5F pop edi
008605C6 4D dec ebp
008605C7 6F outsd
008605C8 6E outsb
008605C9 65795F jns 0086062B
008605CC 43 inc ebx
008605CD 52 push edx
008605CE 2000 and [eax], al
008605D0 FFFF DB $FF, $FF //
008605D2 FFFF DB $FF, $FF //
008605D4 0C00 or al, $00
008605D6 0000 add [eax], al
008605D8 205365 and [ebx+$65], dl
008605DB 7420 jz 008605FD
008605DD 43 inc ebx
008605DE 6F outsd
008605DF 6E outsb
008605E0 69643D2700000000 imul esp, [ebp+edi+$27], $00000000
008605E8 FFFF DB $FF, $FF //
008605EA FFFF DB $FF, $FF //
008605EC 0100 add [eax], eax
008605EE 0000 add [eax], al
008605F0 27 daa
008605F1 0000 add [eax], al
008605F3 00FF add bh, bh
008605F5 FFFF DB $FF, $FF //
008605F7 FF08 dec dword ptr [eax]
008605F9 0000 add [eax], al
008605FB 002C43 add [ebx+eax*2], ch
008605FE 6F outsd
008605FF 6E outsb
00860600 4E dec esi
00860601 4F dec edi
00860602 3D27000000 cmp eax, $00000027
00860607 00FF add bh, bh
00860609 FFFF DB $FF, $FF //
0086060B FF0500000043 inc dword ptr [$43000000]
00860611 6F outsd
00860612 6E outsb
00860613 4E dec esi
00860614 4F dec edi
00860615 0000 add [eax], al
00860617 00FF add bh, bh
00860619 FFFF DB $FF, $FF //
0086061B FF09 dec dword ptr [ecx]
0086061D 0000 add [eax], al
0086061F 002C4564697465 add [$65746964+eax*2], ch
00860626 723D jb 00860665
00860628 27 daa
00860629 0000 add [eax], al
0086062B 00FF add bh, bh
0086062D FFFF DB $FF, $FF //
0086062F FF1400 call dword ptr [eax+eax]
00860632 0000 add [eax], al
00860634 2C45 sub al, $45
00860636 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0086063F 657464 jz 008606A6
00860642 61 popa
00860643 7465 jz 008606AA
00860645 2829 sub [ecx], ch
00860647 2000 and [eax], al
00860649 0000 add [eax], al
0086064B 00FF add bh, bh
0086064D FFFF DB $FF, $FF //
0086064F FF0D00000020 dec dword ptr [$20000000]
00860655 7768 jnbe 008606BF
00860657 657265 jb 008606BF
0086065A 205946 and [ecx+$46], bl
0086065D 49 dec ecx
0086065E 643D27000000 cmp eax, $00000027
00860664 FFFF DB $FF, $FF //
00860666 FFFF DB $FF, $FF //
00860668 0400 add al, +$00
0086066A 0000 add [eax], al
0086066C 59 pop ecx
0086066D 46 inc esi
0086066E 49 dec ecx
0086066F 640000 add fs:[eax], al
00860672 0000 add [eax], al
00860674 55 push ebp
00860675 8BEC mov ebp, esp
00860677 51 push ecx
00860678 B905000000 mov ecx, $00000005
0086067D 6A00 push $00
0086067F 6A00 push $00
00860681 49 dec ecx
00860682 75F9 jnz 0086067D
00860684 51 push ecx
00860685 874DFC xchg [ebp-$04], ecx
00860688 53 push ebx
00860689 56 push esi
0086068A 8BF0 mov esi, eax
0086068C 33C0 xor eax, eax
0086068E 55 push ebp
* Possible String Reference to: '<27><>B<EFBFBD><42><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0086068F 6854088600 push $00860854
***** TRY
|
00860694 64FF30 push dword ptr fs:[eax]
00860697 648920 mov fs:[eax], esp
0086069A 33C0 xor eax, eax
0086069C 55 push ebp
0086069D 682A088600 push $0086082A
***** TRY
|
008606A2 64FF30 push dword ptr fs:[eax]
008606A5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_0086088D(Sender : TObject);
begin
(*
0086088D 50 push eax
0086088E 6461 popa
00860890 7465 jz 008608F7
00860892 205946 and [ecx+$46], bl
00860895 5F pop edi
00860896 4D dec ebp
00860897 6F outsd
00860898 6E outsb
00860899 65795F jns 008608FB
0086089C 43 inc ebx
0086089D 52 push edx
0086089E 2000 and [eax], al
008608A0 FFFF DB $FF, $FF //
008608A2 FFFF DB $FF, $FF //
008608A4 0E push cs
008608A5 0000 add [eax], al
008608A7 0020 add [eax], ah
008608A9 53 push ebx
008608AA 657420 jz 008608CD
008608AD 47 inc edi
008608AE 59 pop ecx
008608AF 53 push ebx
008608B0 4E dec esi
008608B1 61 popa
008608B2 6D insd
008608B3 653D270000FF cmp eax, $FF000027
008608B9 FFFF DB $FF, $FF //
008608BB FF01 inc dword ptr [ecx]
008608BD 0000 add [eax], al
008608BF 0027 add [edi], ah
008608C1 0000 add [eax], al
008608C3 00FF add bh, bh
008608C5 FFFF DB $FF, $FF //
008608C7 FF0D00000020 dec dword ptr [$20000000]
008608CD 7768 jnbe 00860937
008608CF 657265 jb 00860937
008608D2 205946 and [ecx+$46], bl
008608D5 49 dec ecx
008608D6 643D27000000 cmp eax, $00000027
008608DC FFFF DB $FF, $FF //
008608DE FFFF DB $FF, $FF //
008608E0 0400 add al, +$00
008608E2 0000 add [eax], al
008608E4 59 pop ecx
008608E5 46 inc esi
008608E6 49 dec ecx
008608E7 640000 add fs:[eax], al
008608EA 0000 add [eax], al
008608EC 55 push ebp
008608ED 8BEC mov ebp, esp
008608EF 51 push ecx
008608F0 B905000000 mov ecx, $00000005
008608F5 6A00 push $00
008608F7 6A00 push $00
008608F9 49 dec ecx
008608FA 75F9 jnz 008608F5
008608FC 51 push ecx
008608FD 874DFC xchg [ebp-$04], ecx
00860900 53 push ebx
00860901 56 push esi
00860902 8BF0 mov esi, eax
00860904 33C0 xor eax, eax
00860906 55 push ebp
* Possible String Reference to: '<27>#@<40><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00860907 68CC0A8600 push $00860ACC
***** TRY
|
0086090C 64FF30 push dword ptr fs:[eax]
0086090F 648920 mov fs:[eax], esp
00860912 33C0 xor eax, eax
00860914 55 push ebp
00860915 68A20A8600 push $00860AA2
***** TRY
|
0086091A 64FF30 push dword ptr fs:[eax]
0086091D 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QT._PROC_00860B09(Sender : TObject);
begin
(*
00860B09 50 push eax
00860B0A 6461 popa
00860B0C 7465 jz 00860B73
00860B0E 205946 and [ecx+$46], bl
00860B11 5F pop edi
00860B12 4D dec ebp
00860B13 6F outsd
00860B14 6E outsb
00860B15 65795F jns 00860B77
00860B18 43 inc ebx
00860B19 52 push edx
00860B1A 2000 and [eax], al
00860B1C FFFF DB $FF, $FF //
00860B1E FFFF DB $FF, $FF //
00860B20 1200 adc al, byte ptr [eax]
00860B22 0000 add [eax], al
00860B24 205365 and [ebx+$65], dl
00860B27 7420 jz 00860B49
00860B29 46 inc esi
00860B2A 61 popa
00860B2B 63746F72 arpl [edi+ebp*2+$72], si
00860B2F 794E jns 00860B7F
00860B31 61 popa
00860B32 6D insd
00860B33 653D270000FF cmp eax, $FF000027
00860B39 FFFF DB $FF, $FF //
00860B3B FF01 inc dword ptr [ecx]
00860B3D 0000 add [eax], al
00860B3F 0027 add [edi], ah
00860B41 0000 add [eax], al
00860B43 00FF add bh, bh
00860B45 FFFF DB $FF, $FF //
00860B47 FF0D00000020 dec dword ptr [$20000000]
00860B4D 7768 jnbe 00860BB7
00860B4F 657265 jb 00860BB7
00860B52 205946 and [ecx+$46], bl
00860B55 49 dec ecx
00860B56 643D27000000 cmp eax, $00000027
00860B5C FFFF DB $FF, $FF //
00860B5E FFFF DB $FF, $FF //
00860B60 0400 add al, +$00
00860B62 0000 add [eax], al
00860B64 59 pop ecx
00860B65 46 inc esi
00860B66 49 dec ecx
00860B67 640000 add fs:[eax], al
00860B6A 0000 add [eax], al
00860B6C 55 push ebp
00860B6D 8BEC mov ebp, esp
00860B6F 6A00 push $00
00860B71 6A00 push $00
00860B73 6A00 push $00
00860B75 53 push ebx
00860B76 56 push esi
00860B77 8BF0 mov esi, eax
00860B79 33C0 xor eax, eax
00860B7B 55 push ebp
00860B7C 68D10C8600 push $00860CD1
***** TRY
|
00860B81 64FF30 push dword ptr fs:[eax]
00860B84 648920 mov fs:[eax], esp
00860B87 80390D cmp byte ptr [ecx], $0D
00860B8A 0F851E010000 jnz 00860CAE
* Reference to control ToolButton1 : TToolButton
|
00860B90 8B9E20030000 mov ebx, [esi+$0320]
00860B96 33D2 xor edx, edx
00860B98 8BC3 mov eax, ebx
00860B9A 8B08 mov ecx, [eax]
* Possible reference to virtual method TToolButton.OFFS_0190
|
00860B9C FF9190010000 call dword ptr [ecx+$0190]
00860BA2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00860BA4 E82B4DC6FF call 004C58D4
00860BA9 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BAB E8FCD3C7FF call 004DDFAC
00860BB0 8B10 mov edx, [eax]
* Reference to method TToolButton.GetClientRect()
|
00860BB2 FF5244 call dword ptr [edx+$44]
00860BB5 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BB7 E8F0D3C7FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
00860BBC BAE80C8600 mov edx, $00860CE8
00860BC1 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860BC3 FF5138 call dword ptr [ecx+$38]
00860BC6 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BC8 E8DFD3C7FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
00860BCD BA480D8600 mov edx, $00860D48
00860BD2 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860BD4 FF5138 call dword ptr [ecx+$38]
00860BD7 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BD9 E8CED3C7FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
00860BDE BAA40D8600 mov edx, $00860DA4
00860BE3 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860BE5 FF5138 call dword ptr [ecx+$38]
00860BE8 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BEA E8BDD3C7FF call 004DDFAC
* Possible String Reference to: ',isnull((select JM.PRTColor from JY
| Order_Sub JM inner join CK_SXPB_CR
| F on JM.Subid=F.ORDSubIdRK where F.
| SPID=A.YFTypeId),'') PRTColor,'
|
00860BEF BA000E8600 mov edx, $00860E00
00860BF4 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860BF6 FF5138 call dword ptr [ecx+$38]
00860BF9 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860BFB E8ACD3C7FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
00860C00 BA900E8600 mov edx, $00860E90
00860C05 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860C07 FF5138 call dword ptr [ecx+$38]
00860C0A 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860C0C E89BD3C7FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
00860C11 BA9C0E8600 mov edx, $00860E9C
00860C16 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860C18 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.ConNO like '%'
|
00860C1B 68B80E8600 push $00860EB8
00860C20 8D55F4 lea edx, [ebp-$0C]
* Reference to control Label19 : N.A.
|
00860C23 8B86B8030000 mov eax, [esi+$03B8]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00860C29 E8C279C2FF call 004885F0
00860C2E 8B45F4 mov eax, [ebp-$0C]
00860C31 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00860C34 E8B39CBAFF call 0040A8EC
00860C39 FF75F8 push dword ptr [ebp-$08]
00860C3C 68D80E8600 push $00860ED8
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
00860C41 68E40E8600 push $00860EE4
00860C46 8D45FC lea eax, [ebp-$04]
00860C49 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
00860C4E E8614ABAFF call 004056B4
00860C53 8B45FC mov eax, [ebp-$04]
00860C56 50 push eax
00860C57 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860C59 E84ED3C7FF call 004DDFAC
00860C5E 5A pop edx
00860C5F 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860C61 FF5138 call dword ptr [ecx+$38]
00860C64 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860C66 E841D3C7FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
00860C6B BA0C0F8600 mov edx, $00860F0C
00860C70 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860C72 FF5138 call dword ptr [ecx+$38]
00860C75 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
00860C77 E84C4CC6FF call 004C58C8
* Reference to control Label10 : TLabel
|
00860C7C 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
00860C82 8B8620030000 mov eax, [esi+$0320]
|
00860C88 E80362F5FF call 007B6E90
* Reference to control Label10 : TLabel
|
00860C8D 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
00860C93 8B8620030000 mov eax, [esi+$0320]
|
00860C99 E87A63F5FF call 007B7018
00860C9E BA380F8600 mov edx, $00860F38
* Reference to control BankNo : N.A.
|
00860CA3 8B86B0030000 mov eax, [esi+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00860CA9 E87279C2FF call 00488620
00860CAE 33C0 xor eax, eax
00860CB0 5A pop edx
00860CB1 59 pop ecx
00860CB2 59 pop ecx
00860CB3 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
00860CB6 68D80C8600 push $00860CD8
00860CBB 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
00860CBE E86146BAFF call 00405324
00860CC3 8D45F8 lea eax, [ebp-$08]
00860CC6 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
00860CCB E87846BAFF call 00405348
00860CD0 C3 ret
*)
end;
procedure TfrmYSCRPB_QT._PROC_00860CE5(Sender : TObject);
begin
(*
00860CE5 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_00860D7D(Sender : TObject);
begin
(*
00860D7D 53 push ebx
00860D7E 44 inc esp
00860D7F 27 daa
00860D80 2920 sub dword ptr [eax], esp
00860D82 7468 jz 00860DEC
00860D84 656E outsb
00860D86 204D6F and [ebp+$6F], cl
00860D89 6E outsb
00860D8A 657920 jns 00860DAD
00860D8D 656C insb
00860D8F 7365 jnb 00860DF6
00860D91 2030 and [eax], dh
00860D93 20656E and [ebp+$6E], ah
00860D96 642900 sub dword ptr fs:[eax], eax
00860D99 0000 add [eax], al
00860D9B 00FF add bh, bh
00860D9D FFFF DB $FF, $FF //
00860D9F FF5200 call dword ptr [edx+$00]
00860DA2 0000 add [eax], al
00860DA4 2C55 sub al, $55
00860DA6 53 push ebx
00860DA7 44 inc esp
00860DA8 4D dec ebp
00860DA9 6F outsd
00860DAA 6E outsb
00860DAB 65793D jns 00860DEB
00860DAE 286361 sub [ebx+$61], ah
00860DB1 7365 jnb 00860E18
00860DB3 207768 and [edi+$68], dh
00860DB6 656E outsb
00860DB8 2028 and [eax], ch
00860DBA 41 inc ecx
00860DBB 2E42 inc edx
00860DBD 5A pop edx
00860DBE 54 push esp
00860DBF 7970 jns 00860E31
00860DC1 653C3E cmp al, $3E
00860DC4 27 daa
00860DC5 A3A4272920 mov dword ptr [$202927A4], eax
00860DCA 61 popa
00860DCB 6E outsb
00860DCC 642028 and fs:[eax], ch
00860DCF 41 inc ecx
00860DD0 2E42 inc edx
00860DD2 5A pop edx
00860DD3 54 push esp
00860DD4 7970 jns 00860E46
00860DD6 653C3E cmp al, $3E
00860DD9 27 daa
00860DDA 52 push edx
00860DDB 4D dec ebp
00860DDC 42 inc edx
00860DDD 27 daa
00860DDE 2920 sub dword ptr [eax], esp
00860DE0 7468 jz 00860E4A
00860DE2 656E outsb
00860DE4 204D6F and [ebp+$6F], cl
00860DE7 6E outsb
00860DE8 657920 jns 00860E0B
00860DEB 656C insb
00860DED 7365 jnb 00860E54
00860DEF 2030 and [eax], dh
00860DF1 20656E and [ebp+$6E], ah
00860DF4 642900 sub dword ptr fs:[eax], eax
00860DF7 00FF add bh, bh
00860DF9 FFFF DB $FF, $FF //
00860DFB FF870000002C inc dword ptr [edi+$2C000000]
00860E01 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
00860E08 287365 sub [ebx+$65], dh
00860E0B 6C insb
00860E0C 656374204A arpl gs:[eax+$4A], si
00860E11 4D dec ebp
00860E12 2E50 push eax
00860E14 52 push edx
00860E15 54 push esp
00860E16 43 inc ebx
00860E17 6F outsd
00860E18 6C insb
00860E19 6F outsd
00860E1A 7220 jb 00860E3C
00860E1C 66726F jb 00860E8E
00860E1F 6D insd
00860E20 204A59 and [edx+$59], cl
00860E23 4F dec edi
00860E24 7264 jb 00860E8A
00860E26 65725F jb 00860E88
00860E29 53 push ebx
00860E2A 7562 jnz 00860E8E
00860E2C 204A4D and [edx+$4D], cl
00860E2F 20696E and [ecx+$6E], ch
00860E32 6E outsb
00860E33 657220 jb 00860E56
00860E36 6A6F push $6F
00860E38 696E20434B5F53 imul ebp, [esi+$20], $535F4B43
00860E3F 58 pop eax
00860E40 50 push eax
00860E41 42 inc edx
00860E42 5F pop edi
00860E43 43 inc ebx
00860E44 52 push edx
00860E45 204620 and [esi+$20], al
00860E48 6F outsd
00860E49 6E outsb
00860E4A 204A4D and [edx+$4D], cl
00860E4D 2E53 push ebx
00860E4F 7562 jnz 00860EB3
00860E51 69643D462E4F5244 imul esp, [ebp+edi+$46], $44524F2E
00860E59 53 push ebx
00860E5A 7562 jnz 00860EBE
00860E5C 49 dec ecx
00860E5D 6452 push edx
00860E5F 4B dec ebx
00860E60 207768 and [edi+$68], dh
00860E63 657265 jb 00860ECB
00860E66 20462E and [esi+$2E], al
00860E69 53 push ebx
00860E6A 50 push eax
00860E6B 49 dec ecx
00860E6C 44 inc esp
00860E6D 3D412E5946 cmp eax, $46592E41
00860E72 54 push esp
00860E73 7970 jns 00860EE5
00860E75 6549 dec ecx
00860E77 64292C27 sub dword ptr fs:[edi], ebp
00860E7B 27 daa
00860E7C 2920 sub dword ptr [eax], esp
00860E7E 50 push eax
00860E7F 52 push edx
00860E80 54 push esp
00860E81 43 inc ebx
00860E82 6F outsd
00860E83 6C insb
00860E84 6F outsd
00860E85 722C jb 00860EB3
00860E87 00FF add bh, bh
00860E89 FFFF DB $FF, $FF //
00860E8B FF03 inc dword ptr [ebx]
00860E8D 0000 add [eax], al
00860E8F 00412E add [ecx+$2E], al
00860E92 2A00 sub al, byte ptr [eax]
00860E94 FFFF DB $FF, $FF //
00860E96 FFFF DB $FF, $FF //
00860E98 1300 adc eax, [eax]
00860E9A 0000 add [eax], al
00860E9C 206672 and [esi+$72], ah
00860E9F 6F outsd
00860EA0 6D insd
00860EA1 205946 and [ecx+$46], bl
00860EA4 5F pop edi
00860EA5 4D dec ebp
00860EA6 6F outsd
00860EA7 6E outsb
00860EA8 65795F jns 00860F0A
00860EAB 43 inc ebx
00860EAC 52 push edx
00860EAD 204100 and [ecx+$00], al
00860EB0 FFFF DB $FF, $FF //
00860EB2 FFFF DB $FF, $FF //
00860EB4 16 push ss
00860EB5 0000 add [eax], al
00860EB7 0020 add [eax], ah
00860EB9 7768 jnbe 00860F23
00860EBB 657265 jb 00860F23
00860EBE 20412E and [ecx+$2E], al
00860EC1 43 inc ebx
00860EC2 6F outsd
00860EC3 6E outsb
00860EC4 4E dec esi
00860EC5 4F dec edi
00860EC6 206C696B and [ecx+ebp*2+$6B], ch
00860ECA 652027 and gs:[edi], ah
00860ECD 250000FFFF and eax, $FFFF0000
00860ED2 FFFF DB $FF, $FF //
00860ED4 0100 add [eax], eax
00860ED6 0000 add [eax], al
00860ED8 25000000FF and eax, $FF000000
00860EDD FFFF DB $FF, $FF //
00860EDF FF1D00000027 call [$27000000]
00860EE5 20616E and [ecx+$6E], ah
00860EE8 6420412E and fs:[ecx+$2E], al
00860EEC 43 inc ebx
00860EED 52 push edx
00860EEE 54 push esp
00860EEF 7970 jns 00860F61
00860EF1 653D27D3A6B8 cmp eax, $B8A6D327
00860EF7 B6BF mov dh, $BF
00860EF9 EE out dx, al
00860EFA B5C7 mov ch, $C7
00860EFC BCC7272020 mov esp, $202027C7
00860F01 0000 add [eax], al
00860F03 00FF add bh, bh
00860F05 FFFF DB $FF, $FF //
00860F07 FF22 jmp dword ptr [edx]
00860F09 0000 add [eax], al
00860F0B 0020 add [eax], ah
00860F0D 61 popa
00860F0E 6E outsb
00860F0F 64206973 and fs:[ecx+$73], ch
00860F13 6E outsb
00860F14 756C jnz 00860F82
00860F16 6C insb
00860F17 284665 sub [esi+$65], al
00860F1A 6554 push esp
00860F1C 7970 jns 00860F8E
00860F1E 652C27 sub al, $27
00860F21 27 daa
00860F22 293D27D0E9C4 sub dword ptr [$C4E9D027], edi
00860F28 E2B7 loop -$49
00860F2A D1D3 rcl ebx, 1
00860F2C C3 ret
00860F2D 27 daa
00860F2E 0000 add [eax], al
00860F30 FFFF DB $FF, $FF //
00860F32 FFFF DB $FF, $FF //
00860F34 0100 add [eax], eax
00860F36 0000 add [eax], al
00860F38 3000 xor [eax], al
00860F3A 0000 add [eax], al
00860F3C 55 push ebp
00860F3D 8BEC mov ebp, esp
00860F3F 6A00 push $00
00860F41 6A00 push $00
00860F43 6A00 push $00
00860F45 53 push ebx
00860F46 56 push esi
00860F47 8BF0 mov esi, eax
00860F49 33C0 xor eax, eax
00860F4B 55 push ebp
* Possible String Reference to: '<27>N:<3A><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00860F4C 68A1108600 push $008610A1
***** TRY
|
00860F51 64FF30 push dword ptr fs:[eax]
00860F54 648920 mov fs:[eax], esp
00860F57 80390D cmp byte ptr [ecx], $0D
00860F5A 0F851E010000 jnz 0086107E
* Reference to control ToolButton1 : TToolButton
|
00860F60 8B9E20030000 mov ebx, [esi+$0320]
00860F66 33D2 xor edx, edx
00860F68 8BC3 mov eax, ebx
00860F6A 8B08 mov ecx, [eax]
* Possible reference to virtual method TToolButton.OFFS_0190
|
00860F6C FF9190010000 call dword ptr [ecx+$0190]
00860F72 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00860F74 E85B49C6FF call 004C58D4
00860F79 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860F7B E82CD0C7FF call 004DDFAC
00860F80 8B10 mov edx, [eax]
* Reference to method TToolButton.GetClientRect()
|
00860F82 FF5244 call dword ptr [edx+$44]
00860F85 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860F87 E820D0C7FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
00860F8C BAB8108600 mov edx, $008610B8
00860F91 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860F93 FF5138 call dword ptr [ecx+$38]
00860F96 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860F98 E80FD0C7FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
00860F9D BA18118600 mov edx, $00861118
00860FA2 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860FA4 FF5138 call dword ptr [ecx+$38]
00860FA7 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860FA9 E8FECFC7FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
00860FAE BA74118600 mov edx, $00861174
00860FB3 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860FB5 FF5138 call dword ptr [ecx+$38]
00860FB8 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860FBA E8EDCFC7FF call 004DDFAC
* Possible String Reference to: ',isnull((select JM.PRTColor from JY
| Order_Sub JM inner join CK_SXPB_CR
| F on JM.Subid=F.ORDSubIdRK where F.
| SPID=A.YFTypeId),'') PRTColor,'
|
00860FBF BAD0118600 mov edx, $008611D0
00860FC4 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860FC6 FF5138 call dword ptr [ecx+$38]
00860FC9 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860FCB E8DCCFC7FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
00860FD0 BA60128600 mov edx, $00861260
00860FD5 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860FD7 FF5138 call dword ptr [ecx+$38]
00860FDA 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00860FDC E8CBCFC7FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
00860FE1 BA6C128600 mov edx, $0086126C
00860FE6 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00860FE8 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.OrderNO like '%'
|
00860FEB 6888128600 push $00861288
00860FF0 8D55F4 lea edx, [ebp-$0C]
* Reference to control PriceNote : N.A.
|
00860FF3 8B868C030000 mov eax, [esi+$038C]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00860FF9 E8F275C2FF call 004885F0
00860FFE 8B45F4 mov eax, [ebp-$0C]
00861001 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00861004 E8E398BAFF call 0040A8EC
00861009 FF75F8 push dword ptr [ebp-$08]
0086100C 68AC128600 push $008612AC
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
00861011 68B8128600 push $008612B8
00861016 8D45FC lea eax, [ebp-$04]
00861019 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0086101E E89146BAFF call 004056B4
00861023 8B45FC mov eax, [ebp-$04]
00861026 50 push eax
00861027 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00861029 E87ECFC7FF call 004DDFAC
0086102E 5A pop edx
0086102F 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00861031 FF5138 call dword ptr [ecx+$38]
00861034 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
00861036 E871CFC7FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0086103B BAE0128600 mov edx, $008612E0
00861040 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
00861042 FF5138 call dword ptr [ecx+$38]
00861045 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
00861047 E87C48C6FF call 004C58C8
* Reference to control Label10 : TLabel
|
0086104C 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
00861052 8B8620030000 mov eax, [esi+$0320]
|
00861058 E8335EF5FF call 007B6E90
* Reference to control Label10 : TLabel
|
0086105D 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
00861063 8B8620030000 mov eax, [esi+$0320]
|
00861069 E8AA5FF5FF call 007B7018
0086106E BA0C138600 mov edx, $0086130C
* Reference to control BankNo : N.A.
|
00861073 8B86B0030000 mov eax, [esi+$03B0]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00861079 E8A275C2FF call 00488620
0086107E 33C0 xor eax, eax
00861080 5A pop edx
00861081 59 pop ecx
00861082 59 pop ecx
00861083 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
00861086 68A8108600 push $008610A8
0086108B 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0086108E E89142BAFF call 00405324
00861093 8D45F8 lea eax, [ebp-$08]
00861096 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0086109B E8A842BAFF call 00405348
008610A0 C3 ret
*)
end;
procedure TfrmYSCRPB_QT._PROC_008610B5(Sender : TObject);
begin
(*
008610B5 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_0086114D(Sender : TObject);
begin
(*
0086114D 53 push ebx
0086114E 44 inc esp
0086114F 27 daa
00861150 2920 sub dword ptr [eax], esp
00861152 7468 jz 008611BC
00861154 656E outsb
00861156 204D6F and [ebp+$6F], cl
00861159 6E outsb
0086115A 657920 jns 0086117D
0086115D 656C insb
0086115F 7365 jnb 008611C6
00861161 2030 and [eax], dh
00861163 20656E and [ebp+$6E], ah
00861166 642900 sub dword ptr fs:[eax], eax
00861169 0000 add [eax], al
0086116B 00FF add bh, bh
0086116D FFFF DB $FF, $FF //
0086116F FF5200 call dword ptr [edx+$00]
00861172 0000 add [eax], al
00861174 2C55 sub al, $55
00861176 53 push ebx
00861177 44 inc esp
00861178 4D dec ebp
00861179 6F outsd
0086117A 6E outsb
0086117B 65793D jns 008611BB
0086117E 286361 sub [ebx+$61], ah
00861181 7365 jnb 008611E8
00861183 207768 and [edi+$68], dh
00861186 656E outsb
00861188 2028 and [eax], ch
0086118A 41 inc ecx
0086118B 2E42 inc edx
0086118D 5A pop edx
0086118E 54 push esp
0086118F 7970 jns 00861201
00861191 653C3E cmp al, $3E
00861194 27 daa
00861195 A3A4272920 mov dword ptr [$202927A4], eax
0086119A 61 popa
0086119B 6E outsb
0086119C 642028 and fs:[eax], ch
0086119F 41 inc ecx
008611A0 2E42 inc edx
008611A2 5A pop edx
008611A3 54 push esp
008611A4 7970 jns 00861216
008611A6 653C3E cmp al, $3E
008611A9 27 daa
008611AA 52 push edx
008611AB 4D dec ebp
008611AC 42 inc edx
008611AD 27 daa
008611AE 2920 sub dword ptr [eax], esp
008611B0 7468 jz 0086121A
008611B2 656E outsb
008611B4 204D6F and [ebp+$6F], cl
008611B7 6E outsb
008611B8 657920 jns 008611DB
008611BB 656C insb
008611BD 7365 jnb 00861224
008611BF 2030 and [eax], dh
008611C1 20656E and [ebp+$6E], ah
008611C4 642900 sub dword ptr fs:[eax], eax
008611C7 00FF add bh, bh
008611C9 FFFF DB $FF, $FF //
008611CB FF870000002C inc dword ptr [edi+$2C000000]
008611D1 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
008611D8 287365 sub [ebx+$65], dh
008611DB 6C insb
008611DC 656374204A arpl gs:[eax+$4A], si
008611E1 4D dec ebp
008611E2 2E50 push eax
008611E4 52 push edx
008611E5 54 push esp
008611E6 43 inc ebx
008611E7 6F outsd
008611E8 6C insb
008611E9 6F outsd
008611EA 7220 jb 0086120C
008611EC 66726F jb 0086125E
008611EF 6D insd
008611F0 204A59 and [edx+$59], cl
008611F3 4F dec edi
008611F4 7264 jb 0086125A
008611F6 65725F jb 00861258
008611F9 53 push ebx
008611FA 7562 jnz 0086125E
008611FC 204A4D and [edx+$4D], cl
008611FF 20696E and [ecx+$6E], ch
00861202 6E outsb
00861203 657220 jb 00861226
00861206 6A6F push $6F
00861208 696E20434B5F53 imul ebp, [esi+$20], $535F4B43
0086120F 58 pop eax
00861210 50 push eax
00861211 42 inc edx
00861212 5F pop edi
00861213 43 inc ebx
00861214 52 push edx
00861215 204620 and [esi+$20], al
00861218 6F outsd
00861219 6E outsb
0086121A 204A4D and [edx+$4D], cl
0086121D 2E53 push ebx
0086121F 7562 jnz 00861283
00861221 69643D462E4F5244 imul esp, [ebp+edi+$46], $44524F2E
00861229 53 push ebx
0086122A 7562 jnz 0086128E
0086122C 49 dec ecx
0086122D 6452 push edx
0086122F 4B dec ebx
00861230 207768 and [edi+$68], dh
00861233 657265 jb 0086129B
00861236 20462E and [esi+$2E], al
00861239 53 push ebx
0086123A 50 push eax
0086123B 49 dec ecx
0086123C 44 inc esp
0086123D 3D412E5946 cmp eax, $46592E41
00861242 54 push esp
00861243 7970 jns 008612B5
00861245 6549 dec ecx
00861247 64292C27 sub dword ptr fs:[edi], ebp
0086124B 27 daa
0086124C 2920 sub dword ptr [eax], esp
0086124E 50 push eax
0086124F 52 push edx
00861250 54 push esp
00861251 43 inc ebx
00861252 6F outsd
00861253 6C insb
00861254 6F outsd
00861255 722C jb 00861283
00861257 00FF add bh, bh
00861259 FFFF DB $FF, $FF //
0086125B FF03 inc dword ptr [ebx]
0086125D 0000 add [eax], al
0086125F 00412E add [ecx+$2E], al
00861262 2A00 sub al, byte ptr [eax]
00861264 FFFF DB $FF, $FF //
00861266 FFFF DB $FF, $FF //
00861268 1300 adc eax, [eax]
0086126A 0000 add [eax], al
0086126C 206672 and [esi+$72], ah
0086126F 6F outsd
00861270 6D insd
00861271 205946 and [ecx+$46], bl
00861274 5F pop edi
00861275 4D dec ebp
00861276 6F outsd
00861277 6E outsb
00861278 65795F jns 008612DA
0086127B 43 inc ebx
0086127C 52 push edx
0086127D 204100 and [ecx+$00], al
00861280 FFFF DB $FF, $FF //
00861282 FFFF DB $FF, $FF //
00861284 1800 sbb [eax], al
00861286 0000 add [eax], al
00861288 207768 and [edi+$68], dh
0086128B 657265 jb 008612F3
0086128E 20412E and [ecx+$2E], al
00861291 4F dec edi
00861292 7264 jb 008612F8
00861294 65724E jb 008612E5
00861297 4F dec edi
00861298 206C696B and [ecx+ebp*2+$6B], ch
0086129C 652027 and gs:[edi], ah
0086129F 2500000000 and eax, $00000000
008612A4 FFFF DB $FF, $FF //
008612A6 FFFF DB $FF, $FF //
008612A8 0100 add [eax], eax
008612AA 0000 add [eax], al
008612AC 25000000FF and eax, $FF000000
008612B1 FFFF DB $FF, $FF //
008612B3 FF1D00000027 call [$27000000]
008612B9 20616E and [ecx+$6E], ah
008612BC 6420412E and fs:[ecx+$2E], al
008612C0 43 inc ebx
008612C1 52 push edx
008612C2 54 push esp
008612C3 7970 jns 00861335
008612C5 653D27D3A6B8 cmp eax, $B8A6D327
008612CB B6BF mov dh, $BF
008612CD EE out dx, al
008612CE B5C7 mov ch, $C7
008612D0 BCC7272020 mov esp, $202027C7
008612D5 0000 add [eax], al
008612D7 00FF add bh, bh
008612D9 FFFF DB $FF, $FF //
008612DB FF22 jmp dword ptr [edx]
008612DD 0000 add [eax], al
008612DF 0020 add [eax], ah
008612E1 61 popa
008612E2 6E outsb
008612E3 64206973 and fs:[ecx+$73], ch
008612E7 6E outsb
008612E8 756C jnz 00861356
008612EA 6C insb
008612EB 284665 sub [esi+$65], al
008612EE 6554 push esp
008612F0 7970 jns 00861362
008612F2 652C27 sub al, $27
008612F5 27 daa
008612F6 293D27D0E9C4 sub dword ptr [$C4E9D027], edi
008612FC E2B7 loop -$49
008612FE D1D3 rcl ebx, 1
00861300 C3 ret
00861301 27 daa
00861302 0000 add [eax], al
00861304 FFFF DB $FF, $FF //
00861306 FFFF DB $FF, $FF //
00861308 0100 add [eax], eax
0086130A 0000 add [eax], al
0086130C 3000 xor [eax], al
0086130E 0000 add [eax], al
00861310 55 push ebp
00861311 8BEC mov ebp, esp
00861313 5D pop ebp
00861314 C20800 ret $0008
00861317 90 nop
00861318 55 push ebp
00861319 8BEC mov ebp, esp
0086131B 33C9 xor ecx, ecx
0086131D 51 push ecx
0086131E 51 push ecx
0086131F 51 push ecx
00861320 51 push ecx
00861321 53 push ebx
00861322 56 push esi
00861323 8945FC mov [ebp-$04], eax
00861326 33C0 xor eax, eax
00861328 55 push ebp
* Possible String Reference to: '<27><>6<EFBFBD><36><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00861329 6844148600 push $00861444
***** TRY
|
0086132E 64FF30 push dword ptr fs:[eax]
00861331 648920 mov fs:[eax], esp
00861334 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : TLabel
|
00861337 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0086133D E87E6BC6FF call 004C7EC0
00861342 84C0 test al, al
00861344 0F85DF000000 jnz 00861429
0086134A 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : TLabel
|
0086134D 8B985C030000 mov ebx, [eax+$035C]
00861353 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
00861355 E8D66CC6FF call 004C8030
0086135A E9A5000000 jmp 00861404
* Possible String Reference to: 'Ssel'
|
0086135F BA5C148600 mov edx, $0086145C
00861364 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00861366 E84958C6FF call 004C6BB4
0086136B 8B10 mov edx, [eax]
* Reference to method TLabel.GetClientRect()
|
0086136D FF5244 call dword ptr [edx+$44]
00861370 3C01 cmp al, $01
00861372 0F8585000000 jnz 008613FD
00861378 8B45FC mov eax, [ebp-$04]
* Reference to control OrdDate : N.A.
|
0086137B 8BB00C030000 mov esi, [eax+$030C]
00861381 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Close(TDataSet);
|
00861383 E84C45C6FF call 004C58D4
00861388 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0086138A E81DCCC7FF call 004DDFAC
0086138F 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
00861391 FF5244 call dword ptr [edx+$44]
00861394 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
00861396 E811CCC7FF call 004DDFAC
* Possible String Reference to: 'update YF_Money_CR set FeeType='' '
|
0086139B BA6C148600 mov edx, $0086146C
008613A0 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
008613A2 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: 'where YFID=''
|
008613A5 6898148600 push $00861498
008613AA 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : TLabel
|
008613AD 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'YFID'
|
008613B3 BAB0148600 mov edx, $008614B0
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008613B8 E8F757C6FF call 004C6BB4
008613BD 8D55F0 lea edx, [ebp-$10]
008613C0 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
008613C2 FF5160 call dword ptr [ecx+$60]
008613C5 8B45F0 mov eax, [ebp-$10]
008613C8 8D55F4 lea edx, [ebp-$0C]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008613CB E81C95BAFF call 0040A8EC
008613D0 FF75F4 push dword ptr [ebp-$0C]
* Possible String Reference to: '' '
|
008613D3 68C0148600 push $008614C0
008613D8 8D45F8 lea eax, [ebp-$08]
008613DB BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
008613E0 E8CF42BAFF call 004056B4
008613E5 8B45F8 mov eax, [ebp-$08]
008613E8 50 push eax
008613E9 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
008613EB E8BCCBC7FF call 004DDFAC
008613F0 5A pop edx
008613F1 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
008613F3 FF5138 call dword ptr [ecx+$38]
008613F6 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer;
|
008613F8 E8D7CAC7FF call 004DDED4
008613FD 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Next(TDataSet);
|
008613FF E8486FC6FF call 004C834C
* Reference to field TLabel.OFFS_00A1
|
00861404 80BBA100000000 cmp byte ptr [ebx+$00A1], $00
0086140B 0F844EFFFFFF jz 0086135F
00861411 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
00861413 B9C4148600 mov ecx, $008614C4
* Possible String Reference to: 'ת<>Ƴɹ<C6B3>'
|
00861418 BACC148600 mov edx, $008614CC
*)
end;
procedure TfrmYSCRPB_QT._PROC_008623F4(Sender : TObject);
begin
(*
008623F4 6E outsb
008623F5 697400FFFFFFFF08 imul esi, [eax+eax-$01], $08FFFFFF
008623FD 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_00862425(Sender : TObject);
begin
(*
00862425 50 push eax
00862426 6461 popa
00862428 7465 jz 0086248F
0086242A 205946 and [ecx+$46], bl
0086242D 5F pop edi
0086242E 4D dec ebp
0086242F 6F outsd
00862430 6E outsb
00862431 65795F jns 00862493
00862434 43 inc ebx
00862435 52 push edx
00862436 2000 and [eax], al
00862438 FFFF DB $FF, $FF //
0086243A FFFF DB $FF, $FF //
0086243C 0E push cs
0086243D 0000 add [eax], al
0086243F 0020 add [eax], ah
00862441 53 push ebx
00862442 657420 jz 00862465
00862445 51 push ecx
00862446 7479 jz 008624C1
00862448 55 push ebp
00862449 6E outsb
0086244A 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000
00862452 FFFF DB $FF, $FF //
00862454 07 pop es
00862455 0000 add [eax], al
00862457 005A64 add [edx+$64], bl
0086245A 794E jns 008624AA
0086245C 61 popa
0086245D 6D insd
0086245E 6500FF add bh, bh
00862461 FFFF DB $FF, $FF //
00862463 FF01 inc dword ptr [ecx]
00862465 0000 add [eax], al
00862467 0027 add [edi], ah
00862469 0000 add [eax], al
0086246B 00FF add bh, bh
0086246D FFFF DB $FF, $FF //
0086246F FF09 dec dword ptr [ecx]
00862471 0000 add [eax], al
00862473 002C4564697465 add [$65746964+eax*2], ch
0086247A 723D jb 008624B9
0086247C 27 daa
0086247D 0000 add [eax], al
0086247F 00FF add bh, bh
00862481 FFFF DB $FF, $FF //
00862483 FF1400 call dword ptr [eax+eax]
00862486 0000 add [eax], al
00862488 2C45 sub al, $45
0086248A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
00862493 657464 jz 008624FA
00862496 61 popa
00862497 7465 jz 008624FE
00862499 2829 sub [ecx], ch
0086249B 2000 and [eax], al
0086249D 0000 add [eax], al
0086249F 00FF add bh, bh
008624A1 FFFF DB $FF, $FF //
008624A3 FF0D00000020 dec dword ptr [$20000000]
008624A9 7768 jnbe 00862513
008624AB 657265 jb 00862513
008624AE 205946 and [ecx+$46], bl
008624B1 49 dec ecx
008624B2 643D27000000 cmp eax, $00000027
008624B8 FFFF DB $FF, $FF //
008624BA FFFF DB $FF, $FF //
008624BC 0400 add al, +$00
008624BE 0000 add [eax], al
008624C0 59 pop ecx
008624C1 46 inc esi
008624C2 49 dec ecx
008624C3 640000 add fs:[eax], al
008624C6 0000 add [eax], al
008624C8 55 push ebp
008624C9 8BEC mov ebp, esp
008624CB B90C000000 mov ecx, $0000000C
008624D0 6A00 push $00
008624D2 6A00 push $00
008624D4 49 dec ecx
008624D5 75F9 jnz 008624D0
008624D7 53 push ebx
008624D8 56 push esi
008624D9 8BDA mov ebx, edx
008624DB 8BF0 mov esi, eax
008624DD 33C0 xor eax, eax
008624DF 55 push ebp
* Possible String Reference to: '<27><>#<23><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
008624E0 6865278600 push $00862765
***** TRY
|
008624E5 64FF30 push dword ptr fs:[eax]
008624E8 648920 mov fs:[eax], esp
008624EB 8D55FC lea edx, [ebp-$04]
008624EE 8BC3 mov eax, ebx
* 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;
|
008624F0 E8C7D1D2FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
008624F5 8B8634030000 mov eax, [esi+$0334]
* Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager;
| or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem;
| or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem;
| or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar;
| or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel;
| or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea;
|
008624FB E84C9EDFFF call 0065C34C
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
00862500 E85FF6DEFF call 00651B64
* Reference to field N.A..OFFS_0050
|
00862505 8B4050 mov eax, [eax+$50]
00862508 8D55F8 lea edx, [ebp-$08]
0086250B 8B08 mov ecx, [eax]
0086250D FF5110 call dword ptr [ecx+$10]
* Reference to control Label10 : TLabel
|
00862510 8B9E5C030000 mov ebx, [esi+$035C]
00862516 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
00862518 E8235FC6FF call 004C8440
0086251D 8B55F8 mov edx, [ebp-$08]
00862520 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862522 E88D46C6FF call 004C6BB4
00862527 50 push eax
00862528 8D45E8 lea eax, [ebp-$18]
0086252B 8B55FC mov edx, [ebp-$04]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0086252E E89568BBFF call 00418DC8
00862533 8D55E8 lea edx, [ebp-$18]
00862536 58 pop eax
00862537 8B08 mov ecx, [eax]
00862539 FF91B4000000 call dword ptr [ecx+$00B4]
* Reference to control Label10 : TLabel
|
0086253F 8B9E5C030000 mov ebx, [esi+$035C]
00862545 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
00862547 E8F45EC6FF call 004C8440
* Possible String Reference to: 'price'
|
0086254C BA7C278600 mov edx, $0086277C
00862551 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862553 E85C46C6FF call 004C6BB4
00862558 8B10 mov edx, [eax]
* Reference to method TLabel.GetFloating()
|
0086255A FF5254 call dword ptr [edx+$54]
0086255D DD5DD0 fstp qword ptr [ebp-$30]
00862560 9B wait
* Possible String Reference to: 'Qty'
|
00862561 BA8C278600 mov edx, $0086278C
00862566 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862568 E84746C6FF call 004C6BB4
0086256D 8B10 mov edx, [eax]
* Reference to method TLabel.GetFloating()
|
0086256F FF5254 call dword ptr [edx+$54]
00862572 DC4DD0 fmul qword ptr [ebp-$30]
00862575 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromReal;
|
00862578 E80F68BBFF call 00418D8C
0086257D 8D45D8 lea eax, [ebp-$28]
00862580 50 push eax
* Possible String Reference to: 'Money'
|
00862581 BA98278600 mov edx, $00862798
00862586 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00862588 E82746C6FF call 004C6BB4
0086258D 5A pop edx
0086258E 8B08 mov ecx, [eax]
* Possible reference to virtual method TLabel.OFFS_00B4
|
00862590 FF91B4000000 call dword ptr [ecx+$00B4]
* Reference to control OrdDate : N.A.
|
00862596 8B9E0C030000 mov ebx, [esi+$030C]
0086259C 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0086259E E83133C6FF call 004C58D4
008625A3 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
008625A5 E802BAC7FF call 004DDFAC
008625AA 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
008625AC FF5244 call dword ptr [edx+$44]
008625AF 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
008625B1 E8F6B9C7FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
008625B6 BAA8278600 mov edx, $008627A8
008625BB 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
008625BD FF5138 call dword ptr [ecx+$38]
008625C0 8D55CC lea edx, [ebp-$34]
008625C3 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008625C6 E82183BAFF call 0040A8EC
008625CB 837DCC00 cmp dword ptr [ebp-$34], +$00
008625CF 7440 jz 00862611
* Possible String Reference to: ' Set '
|
008625D1 68C4278600 push $008627C4
008625D6 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
008625D9 68D4278600 push $008627D4
008625DE 8D55C4 lea edx, [ebp-$3C]
008625E1 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008625E4 E80383BAFF call 0040A8EC
008625E9 FF75C4 push dword ptr [ebp-$3C]
008625EC 68E0278600 push $008627E0
008625F1 8D45C8 lea eax, [ebp-$38]
008625F4 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
008625F9 E8B630BAFF call 004056B4
008625FE 8B45C8 mov eax, [ebp-$38]
00862601 50 push eax
00862602 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
00862604 E8A3B9C7FF call 004DDFAC
00862609 5A pop edx
0086260A 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0086260C FF5138 call dword ptr [ecx+$38]
0086260F EB2B jmp 0086263C
00862611 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
00862613 E894B9C7FF call 004DDFAC
00862618 50 push eax
* Possible String Reference to: ' Set '
|
00862619 68C4278600 push $008627C4
0086261E FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
00862621 68EC278600 push $008627EC
00862626 8D45C0 lea eax, [ebp-$40]
00862629 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0086262E E88130BAFF call 004056B4
00862633 8B55C0 mov edx, [ebp-$40]
00862636 58 pop eax
00862637 8B08 mov ecx, [eax]
00862639 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Money=''
|
0086263C 68FC278600 push $008627FC
* Possible String Reference to: 'Money'
|
00862641 BA98278600 mov edx, $00862798
* Reference to control Label10 : TLabel
|
00862646 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0086264C E86345C6FF call 004C6BB4
00862651 8D55B4 lea edx, [ebp-$4C]
00862654 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
00862656 FF5160 call dword ptr [ecx+$60]
00862659 8B45B4 mov eax, [ebp-$4C]
0086265C 8D55B8 lea edx, [ebp-$48]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0086265F E88882BAFF call 0040A8EC
00862664 FF75B8 push dword ptr [ebp-$48]
00862667 68E0278600 push $008627E0
0086266C 8D45BC lea eax, [ebp-$44]
0086266F BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
00862674 E83B30BAFF call 004056B4
00862679 8B45BC mov eax, [ebp-$44]
0086267C 50 push eax
0086267D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
0086267F E828B9C7FF call 004DDFAC
00862684 5A pop edx
00862685 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
00862687 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0086268A 6810288600 push $00862810
0086268F 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QT._PROC_008627A9(Sender : TObject);
begin
(*
008627A9 50 push eax
008627AA 6461 popa
008627AC 7465 jz 00862813
008627AE 205946 and [ecx+$46], bl
008627B1 5F pop edi
008627B2 4D dec ebp
008627B3 6F outsd
008627B4 6E outsb
008627B5 65795F jns 00862817
008627B8 43 inc ebx
008627B9 52 push edx
008627BA 2000 and [eax], al
008627BC FFFF DB $FF, $FF //
008627BE FFFF DB $FF, $FF //
008627C0 0500000020 add eax, +$20000000
008627C5 53 push ebx
008627C6 657420 jz 008627E9
008627C9 0000 add [eax], al
008627CB 00FF add bh, bh
008627CD FFFF DB $FF, $FF //
008627CF FF02 inc dword ptr [edx]
008627D1 0000 add [eax], al
008627D3 003D270000FF add [$FF000027], bh
008627D9 FFFF DB $FF, $FF //
008627DB FF01 inc dword ptr [ecx]
008627DD 0000 add [eax], al
008627DF 0027 add [edi], ah
008627E1 0000 add [eax], al
008627E3 00FF add bh, bh
008627E5 FFFF DB $FF, $FF //
008627E7 FF050000003D inc dword ptr [$3D000000]
008627ED 4E dec esi
008627EE 55 push ebp
008627EF 4C dec esp
008627F0 4C dec esp
008627F1 0000 add [eax], al
008627F3 00FF add bh, bh
008627F5 FFFF DB $FF, $FF //
008627F7 FF08 dec dword ptr [eax]
008627F9 0000 add [eax], al
008627FB 002C4D6F6E6579 add [$79656E6F+ecx*2], ch
00862802 3D27000000 cmp eax, $00000027
00862807 00FF add bh, bh
00862809 FFFF DB $FF, $FF //
0086280B FF09 dec dword ptr [ecx]
0086280D 0000 add [eax], al
0086280F 002C4564697465 add [$65746964+eax*2], ch
00862816 723D jb 00862855
00862818 27 daa
00862819 0000 add [eax], al
0086281B 00FF add bh, bh
0086281D FFFF DB $FF, $FF //
0086281F FF1400 call dword ptr [eax+eax]
00862822 0000 add [eax], al
00862824 2C45 sub al, $45
00862826 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0086282F 657464 jz 00862896
00862832 61 popa
00862833 7465 jz 0086289A
00862835 2829 sub [ecx], ch
00862837 2000 and [eax], al
00862839 0000 add [eax], al
0086283B 00FF add bh, bh
0086283D FFFF DB $FF, $FF //
0086283F FF0D00000020 dec dword ptr [$20000000]
00862845 7768 jnbe 008628AF
00862847 657265 jb 008628AF
0086284A 205946 and [ecx+$46], bl
0086284D 49 dec ecx
0086284E 643D27000000 cmp eax, $00000027
00862854 FFFF DB $FF, $FF //
00862856 FFFF DB $FF, $FF //
00862858 0400 add al, +$00
0086285A 0000 add [eax], al
0086285C 59 pop ecx
0086285D 46 inc esi
0086285E 49 dec ecx
0086285F 640000 add fs:[eax], al
00862862 0000 add [eax], al
00862864 53 push ebx
00862865 8BD8 mov ebx, eax
* Reference to control Payment : N.A.
|
00862867 8B839C030000 mov eax, [ebx+$039C]
* Reference to control ADOTemp : N.A.
|
0086286D 83B83C03000000 cmp dword ptr [eax+$033C], +$00
00862874 753C jnz 008628B2
00862876 8BCB mov ecx, ebx
00862878 B201 mov dl, $01
* Reference to class TfrmSXCKNewList
|
0086287A A128417D00 mov eax, dword ptr [$007D4128]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0086287F E84CF5C3FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QT._PROC_00862B65(Sender : TObject);
begin
(*
00862B65 50 push eax
00862B66 6461 popa
00862B68 7465 jz 00862BCF
00862B6A 205946 and [ecx+$46], bl
00862B6D 5F pop edi
00862B6E 4D dec ebp
00862B6F 6F outsd
00862B70 6E outsb
00862B71 65795F jns 00862BD3
00862B74 43 inc ebx
00862B75 52 push edx
00862B76 2000 and [eax], al
00862B78 FFFF DB $FF, $FF //
00862B7A FFFF DB $FF, $FF //
00862B7C 0E push cs
00862B7D 0000 add [eax], al
00862B7F 0020 add [eax], ah
00862B81 53 push ebx
00862B82 657420 jz 00862BA5
00862B85 50 push eax
00862B86 61 popa
00862B87 794D jns 00862BD6
00862B89 656E outsb
00862B8B 743D jz 00862BCA
00862B8D 27 daa
00862B8E 0000 add [eax], al
00862B90 FFFF DB $FF, $FF //
00862B92 FFFF DB $FF, $FF //
00862B94 07 pop es
00862B95 0000 add [eax], al
00862B97 005A64 add [edx+$64], bl
00862B9A 794E jns 00862BEA
00862B9C 61 popa
00862B9D 6D insd
00862B9E 6500FF add bh, bh
00862BA1 FFFF DB $FF, $FF //
00862BA3 FF01 inc dword ptr [ecx]
00862BA5 0000 add [eax], al
00862BA7 0027 add [edi], ah
00862BA9 0000 add [eax], al
00862BAB 00FF add bh, bh
00862BAD FFFF DB $FF, $FF //
00862BAF FF09 dec dword ptr [ecx]
00862BB1 0000 add [eax], al
00862BB3 002C4564697465 add [$65746964+eax*2], ch
00862BBA 723D jb 00862BF9
00862BBC 27 daa
00862BBD 0000 add [eax], al
00862BBF 00FF add bh, bh
00862BC1 FFFF DB $FF, $FF //
00862BC3 FF1400 call dword ptr [eax+eax]
00862BC6 0000 add [eax], al
00862BC8 2C45 sub al, $45
00862BCA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
00862BD3 657464 jz 00862C3A
00862BD6 61 popa
00862BD7 7465 jz 00862C3E
00862BD9 2829 sub [ecx], ch
00862BDB 2000 and [eax], al
00862BDD 0000 add [eax], al
00862BDF 00FF add bh, bh
00862BE1 FFFF DB $FF, $FF //
00862BE3 FF0D00000020 dec dword ptr [$20000000]
00862BE9 7768 jnbe 00862C53
00862BEB 657265 jb 00862C53
00862BEE 205946 and [ecx+$46], bl
00862BF1 49 dec ecx
00862BF2 643D27000000 cmp eax, $00000027
00862BF8 FFFF DB $FF, $FF //
00862BFA FFFF DB $FF, $FF //
00862BFC 0400 add al, +$00
00862BFE 0000 add [eax], al
00862C00 59 pop ecx
00862C01 46 inc esi
00862C02 49 dec ecx
00862C03 640000 add fs:[eax], al
00862C06 0000 add [eax], al
00862C08 55 push ebp
00862C09 8BEC mov ebp, esp
00862C0B 33C0 xor eax, eax
00862C0D 55 push ebp
00862C0E 682D2C8600 push $00862C2D
***** TRY
|
00862C13 64FF30 push dword ptr fs:[eax]
00862C16 648920 mov fs:[eax], esp
00862C19 FF05A05A8900 inc dword ptr [$00895AA0]
00862C1F 33C0 xor eax, eax
00862C21 5A pop edx
00862C22 59 pop ecx
00862C23 59 pop ecx
00862C24 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: ']Ë<><C38B>-<2D>Z<EFBFBD>'
|
00862C27 68342C8600 push $00862C34
00862C2C C3 ret
* Reference to: System.@HandleFinally;
|
00862C2D E9C21EBAFF jmp 00404AF4
00862C32 EBF8 jmp 00862C2C
****** END
|
00862C34 5D pop ebp
00862C35 C3 ret
00862C36 8BC0 mov eax, eax
00862C38 832DA05A890001 sub dword ptr [$00895AA0], +$01
00862C3F C3 ret
00862C40 8C2C86 mov word ptr [esi+eax*4], gs
00862C43 0000 add [eax], al
00862C45 0000 add [eax], al
00862C47 0000 add [eax], al
00862C49 0000 add [eax], al
00862C4B 00802D86009C add [eax+$9C00862D], al
00862C51 37 aaa
00862C52 8600 xchg [eax], al
00862C54 B22D mov dl, $2D
00862C56 8600 xchg [eax], al
00862C58 DD32 fsave ???? ptr [edx]
00862C5A 8600 xchg [eax], al
00862C5C 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QT._PROC_00862CA6(Sender : TObject);
begin
(*
00862CA6 48 dec eax
00862CA7 0050D4 add [eax-$2C], dl
00862CAA 42 inc edx
00862CAB 0008 add [eax], cl
00862CAD 2D4A007CD0 sub eax, $D07C004A
00862CB2 42 inc edx
00862CB3 00F4 add ah, dh
00862CB5 6B4A00D0 imul ecx, [edx+$00], $D0
00862CB9 1D4A0030F6 sbb eax, $F630004A
00862CBE 48 dec eax
00862CBF 004CFB48 add [ebx+edi*8+$48], cl
00862CC3 0098FA48000C add [eax+$C0048FA], bl
00862CC9 7948 jns 00862D13
00862CCB 00ACF04800E829 add [eax+esi*8+$29E80048], ch
00862CD2 4A dec edx
00862CD3 00E4 add ah, ah
00862CD5 ED in eax, dx
00862CD6 48 dec eax
00862CD7 00547848 add [eax+edi*2+$48], dl
00862CDB 005878 add [eax+$78], bl
00862CDE 48 dec eax
00862CDF 00DC add ah, bl
00862CE1 2A4A00 sub cl, byte ptr [edx+$00]
00862CE4 3CA9 cmp al, $A9
00862CE6 48 dec eax
00862CE7 00C0 add al, al
00862CE9 834800D0 or dword ptr [eax+$00], -$30
00862CED 7948 jns 00862D37
00862CEF 004C8548 add [ebp+eax*4+$48], cl
00862CF3 00D0 add al, dl
00862CF5 2C4A sub al, $4A
00862CF7 009C2B4A008486 add [ebx+ebp+$8684004A], bl
00862CFE 48 dec eax
00862CFF 00482D add [eax+$2D], cl
00862D02 4A dec edx
00862D03 00C0 add al, al
00862D05 A9480038EE test eax, $EE380048
00862D0A 48 dec eax
00862D0B 00F4 add ah, dh
00862D0D EE out dx, al
00862D0E 48 dec eax
00862D0F 00F0 add al, dh
00862D11 E94800D8EE jmp EF5E2D5E
00862D16 48 dec eax
00862D17 00D8 add al, bl
00862D19 1B4A00 sbb ecx, [edx+$00]
00862D1C EC in al, dx
00862D1D 334A00 xor ecx, [edx+$00]
00862D20 20C4 and ah, al
00862D22 48 dec eax
00862D23 00B0404A0010 add [eax+$10004A40], dh
00862D29 44 inc esp
00862D2A 4A dec edx
00862D2B 00CC add ah, cl
00862D2D 42 inc edx
00862D2E 4A dec edx
00862D2F 00B8C44800BC add [eax+$BC0048C4], bh
00862D35 C44800 les ecx, [eax+$00]
00862D38 48 dec eax
00862D39 45 inc ebp
00862D3A 4A dec edx
00862D3B 001CC3 add [ebx+eax*8], bl
00862D3E 48 dec eax
00862D3F 0018 add [eax], bl
00862D41 F0 lock
00862D42 48 dec eax
00862D43 00444C4A add [esp+ecx*2+$4A], al
00862D47 000C02 add [edx+eax], cl
00862D4A 49 dec ecx
00862D4B 0094EC48009C64 add [esp+ebp*8+$649C0048], dl
00862D52 4A dec edx
00862D53 008C154A003C18 add [ebp+edx+$183C004A], cl
00862D5A 4A dec edx
00862D5B 0038 add [eax], bh
00862D5D 52 push edx
00862D5E 4A dec edx
00862D5F 005C224A add [edx+$4A], bl
00862D63 00D8 add al, bl
00862D65 224A00 and cl, byte ptr [edx+$00]
00862D68 7C68 jl 00862DD2
00862D6A 4A dec edx
00862D6B 00941F4A003C60 add [edi+ebx+$603C004A], dl
00862D72 4A dec edx
00862D73 001447 add [edi+eax*2], dl
00862D76 4A dec edx
00862D77 0034654A00CC2C add [$2CCC004A], dh
00862D7E 4A dec edx
00862D7F 000E add [esi], cl
00862D81 0000 add [eax], al
00862D83 0000 add [eax], al
00862D85 000500000020 add [$20000000], al
00862D8B 114000 adc [eax+$00], eax
00862D8E 58 pop eax
00862D8F 0400 add al, +$00
00862D91 0020 add [eax], ah
00862D93 114000 adc [eax+$00], eax
00862D96 5C pop esp
00862D97 0400 add al, +$00
00862D99 0020 add [eax], ah
00862D9B 114000 adc [eax+$00], eax
00862D9E 60 pusha
00862D9F 0400 add al, +$00
00862DA1 0020 add [eax], ah
00862DA3 114000 adc [eax+$00], eax
00862DA6 640400 add al, +$00
00862DA9 0020 add [eax], ah
00862DAB 114000 adc [eax+$00], eax
00862DAE 6804000057 push $57000004
00862DB3 0035378600F8 add [$F8008637], dh
00862DB9 0200 add al, byte ptr [eax]
00862DBB 0000 add [eax], al
00862DBD 0008 add [eax], cl
00862DBF 54 push esp
00862DC0 6F outsd
00862DC1 6F outsd
00862DC2 6C insb
00862DC3 42 inc edx
00862DC4 61 popa
00862DC5 7231 jb 00862DF8
00862DC7 FC cld
00862DC8 0200 add al, byte ptr [eax]
00862DCA 0001 add [ecx], al
00862DCC 0009 add [ecx], cl
00862DCE 54 push esp
00862DCF 42 inc edx
00862DD0 52 push edx
00862DD1 61 popa
00862DD2 667265 jb 00862E3A
00862DD5 7368 jnb 00862E3F
00862DD7 0003 add [ebx], al
00862DD9 0000 add [eax], al
00862DDB 0100 add [eax], eax
00862DDD 0554424465 add eax, +$65444254
00862DE2 6C insb
00862DE3 0403 add al, +$03
00862DE5 0000 add [eax], al
00862DE7 0100 add [eax], eax
00862DE9 07 pop es
00862DEA 54 push esp
00862DEB 42 inc edx
00862DEC 43 inc ebx
00862DED 6C insb
00862DEE 6F outsd
00862DEF 7365 jnb 00862E56
00862DF1 0803 or [ebx], al
00862DF3 0000 add [eax], al
00862DF5 0200 add al, byte ptr [eax]
00862DF7 0C41 or al, $41
00862DF9 44 inc esp
00862DFA 4F dec edi
00862DFB 51 push ecx
00862DFC 7565 jnz 00862E63
00862DFE 7279 jb 00862E79
00862E00 54 push esp
00862E01 656D insd
00862E03 700C jo 00862E11
00862E05 0300 add eax, [eax]
00862E07 0002 add [edx], al
00862E09 000B add [ebx], cl
00862E0B 41 inc ecx
00862E0C 44 inc esp
00862E0D 4F dec edi
00862E0E 51 push ecx
00862E0F 7565 jnz 00862E76
00862E11 7279 jb 00862E8C
00862E13 43 inc ebx
00862E14 6D insd
00862E15 641003 adc fs:[ebx], al
00862E18 0000 add [eax], al
00862E1A 0300 add eax, [eax]
00862E1C 06 push es
00862E1D 50 push eax
00862E1E 61 popa
00862E1F 6E outsb
00862E20 656C insb
00862E22 311403 xor [ebx+eax], edx
00862E25 0000 add [eax], al
00862E27 0100 add [eax], eax
00862E29 0B546F6F or edx, [edi+ebp*2+$6F]
00862E2D 6C insb
00862E2E 42 inc edx
00862E2F 7574 jnz 00862EA5
00862E31 746F jz 00862EA2
00862E33 6E outsb
00862E34 3218 xor bl, byte ptr [eax]
00862E36 0300 add eax, [eax]
00862E38 000400 add [eax+eax], al
00862E3B 06 push es
00862E3C 4C dec esp
00862E3D 61 popa
00862E3E 62656C bound esp, qword ptr [ebp+$6C]
00862E41 311C03 xor [ebx+eax], ebx
00862E44 0000 add [eax], al
00862E46 0500065946 add eax, +$46590600
00862E4B 4E dec esi
00862E4C 61 popa
00862E4D 6D insd
00862E4E 652003 and gs:[ebx], al
00862E51 0000 add [eax], al
00862E53 0200 add al, byte ptr [eax]
00862E55 0C41 or al, $41
00862E57 44 inc esp
00862E58 4F dec edi
00862E59 51 push ecx
00862E5A 7565 jnz 00862EC1
00862E5C 7279 jb 00862ED7
00862E5E 4D dec ebp
00862E5F 61 popa
00862E60 696E2403000001 imul ebp, [esi+$24], $01000003
00862E67 000B add [ebx], cl
00862E69 54 push esp
00862E6A 6F outsd
00862E6B 6F outsd
00862E6C 6C insb
00862E6D 42 inc edx
00862E6E 7574 jnz 00862EE4
00862E70 746F jz 00862EE1
00862E72 6E outsb
00862E73 3128 xor [eax], ebp
00862E75 0300 add eax, [eax]
00862E77 0006 add [esi], al
00862E79 0003 add [ebx], al
00862E7B 52 push edx
00862E7C 4D dec ebp
00862E7D 312C03 xor [ebx+eax], ebp
00862E80 0000 add [eax], al
00862E82 07 pop es
00862E83 0009 add [ecx], cl
00862E85 52 push edx
00862E86 4D dec ebp
00862E87 44 inc esp
00862E88 42 inc edx
00862E89 5F pop edi
00862E8A 4D dec ebp
00862E8B 61 popa
00862E8C 696E3003000004 imul ebp, [esi+$30], $04000003
00862E93 0006 add [esi], al
00862E95 4C dec esp
00862E96 61 popa
00862E97 62656C bound esp, qword ptr [ebp+$6C]
00862E9A 333403 xor esi, [ebx+eax]
00862E9D 0000 add [eax], al
00862E9F 05000B4661 add eax, +$61460B00
00862EA4 63746F72 arpl [edi+ebp*2+$72], si
00862EA8 794E jns 00862EF8
00862EAA 61 popa
00862EAB 6D insd
00862EAC 653803 cmp gs:[ebx], al
00862EAF 0000 add [eax], al
00862EB1 0800 or [eax], al
00862EB3 07 pop es
00862EB4 637847 arpl [eax+$47], di
00862EB7 7269 jb 00862F22
00862EB9 64323C03 xor bh, byte ptr fs:[ebx+eax]
00862EBD 0000 add [eax], al
00862EBF 0900 or [eax], eax
00862EC1 03547632 add edx, [esi+esi*2+$32]
00862EC5 40 inc eax
00862EC6 0300 add eax, [eax]
00862EC8 000A add [edx], cl
00862ECA 000F add [edi], cl
00862ECC 637847 arpl [eax+$47], di
00862ECF 7269 jb 00862F3A
00862ED1 6444 inc esp
00862ED3 42 inc edx
00862ED4 43 inc ebx
00862ED5 6F outsd
00862ED6 6C insb
00862ED7 756D jnz 00862F46
00862ED9 6E outsb
00862EDA 31440300 xor [ebx+eax+$00], eax
00862EDE 000A add [edx], cl
00862EE0 000F add [edi], cl
00862EE2 637847 arpl [eax+$47], di
00862EE5 7269 jb 00862F50
00862EE7 6444 inc esp
00862EE9 42 inc edx
00862EEA 43 inc ebx
00862EEB 6F outsd
00862EEC 6C insb
00862EED 756D jnz 00862F5C
00862EEF 6E outsb
00862EF0 334803 xor ecx, [eax+$03]
00862EF3 0000 add [eax], al
00862EF5 0A00 or al, byte ptr [eax]
00862EF7 0F637847 packusdw MM7, [eax+$47]
00862EFB 7269 jb 00862F66
00862EFD 6444 inc esp
00862EFF 42 inc edx
00862F00 43 inc ebx
00862F01 6F outsd
00862F02 6C insb
00862F03 756D jnz 00862F72
00862F05 6E outsb
00862F06 354C030000 xor eax, $0000034C
00862F0B 0A00 or al, byte ptr [eax]
00862F0D 0F637847 packusdw MM7, [eax+$47]
00862F11 7269 jb 00862F7C
00862F13 6444 inc esp
00862F15 42 inc edx
00862F16 43 inc ebx
00862F17 6F outsd
00862F18 6C insb
00862F19 756D jnz 00862F88
00862F1B 6E outsb
00862F1C 3650 push eax
00862F1E 0300 add eax, [eax]
00862F20 000B add [ebx], cl
00862F22 000C63 add [ebx], cl
00862F25 7847 js 00862F6E
00862F27 7269 jb 00862F92
00862F29 644C dec esp
00862F2B 657665 jbe 00862F93
00862F2E 6C insb
00862F2F 31540300 xor [ebx+eax+$00], edx
00862F33 000400 add [eax+eax], al
00862F36 06 push es
00862F37 4C dec esp
00862F38 61 popa
00862F39 62656C bound esp, qword ptr [ebp+$6C]
00862F3C 325803 xor bl, byte ptr [eax+$03]
00862F3F 0000 add [eax], al
00862F41 0400 add al, +$00
00862F43 06 push es
00862F44 4C dec esp
00862F45 61 popa
00862F46 62656C bound esp, qword ptr [ebp+$6C]
00862F49 365C pop esp
00862F4B 0300 add eax, [eax]
00862F4D 000C00 add [eax+eax], cl
00862F50 07 pop es
00862F51 626567 bound esp, qword ptr [ebp+$67]
00862F54 6461 popa
00862F56 7465 jz 00862FBD
00862F58 60 pusha
00862F59 0300 add eax, [eax]
00862F5B 000C00 add [eax+eax], cl
00862F5E 07 pop es
00862F5F 45 inc ebp
00862F60 6E outsb
00862F61 646461 popa
00862F64 7465 jz 00862FCB
00862F66 640300 add eax, fs:[eax]
00862F69 000D00106378 add [$78631000], cl
00862F6F 47 inc edi
00862F70 7269 jb 00862FDB
00862F72 6450 push eax
00862F74 6F outsd
00862F75 7075 jo 00862FEC
00862F77 704D jo 00862FC6
00862F79 656E outsb
00862F7B 7532 jnz 00862FAF
00862F7D 680300000E push $0E000003
00862F82 000544535F48 add [$485F5344], al
00862F88 5A pop edx
00862F89 6C insb
00862F8A 0300 add eax, [eax]
00862F8C 000F add [edi], cl
00862F8E 0006 add [esi], al
00862F90 43 inc ebx
00862F91 44 inc esp
00862F92 53 push ebx
00862F93 5F pop edi
00862F94 48 dec eax
00862F95 5A pop edx
00862F96 7003 jo 00862F9B
00862F98 0000 add [eax], al
00862F9A 0100 add [eax], eax
00862F9C 0B546F6F or edx, [edi+ebp*2+$6F]
00862FA0 6C insb
00862FA1 42 inc edx
00862FA2 7574 jnz 00863018
00862FA4 746F jz 00863015
00862FA6 6E outsb
00862FA7 33740300 xor esi, [ebx+eax+$00]
00862FAB 000A add [edx], cl
00862FAD 0009 add [ecx], cl
00862FAF 7632 jbe 00862FE3
00862FB1 43 inc ebx
00862FB2 6F outsd
00862FB3 6C insb
00862FB4 756D jnz 00863023
00862FB6 6E outsb
00862FB7 317803 xor [eax+$03], edi
00862FBA 0000 add [eax], al
00862FBC 0A00 or al, byte ptr [eax]
00862FBE 035642 add edx, [esi+$42]
00862FC1 5A pop edx
00862FC2 7C03 jl 00862FC7
00862FC4 0000 add [eax], al
00862FC6 0A00 or al, byte ptr [eax]
00862FC8 035659 add edx, [esi+$59]
00862FCB 42 inc edx
00862FCC 800300 add byte ptr [ebx], $00
00862FCF 000A add [edx], cl
00862FD1 0009 add [ecx], cl
00862FD3 7632 jbe 00863007
00862FD5 43 inc ebx
00862FD6 6F outsd
00862FD7 6C insb
00862FD8 756D jnz 00863047
00862FDA 6E outsb
00862FDB 368403 test ss:[ebx], al
00862FDE 0000 add [eax], al
00862FE0 0A00 or al, byte ptr [eax]
00862FE2 09564D or [esi+$4D], edx
00862FE5 4F dec edi
00862FE6 7264 jb 0086304C
00862FE8 65724E jb 00863039
00862FEB 6F outsd
00862FEC 8803 mov [ebx], al
00862FEE 0000 add [eax], al
00862FF0 0A00 or al, byte ptr [eax]
00862FF2 0476 add al, +$76
00862FF4 325053 xor dl, byte ptr [eax+$53]
00862FF7 8C03 mov word ptr [ebx], es
00862FF9 0000 add [eax], al
00862FFB 0A00 or al, byte ptr [eax]
00862FFD 097632 or [esi+$32], esi
00863000 43 inc ebx
00863001 6F outsd
00863002 6C insb
00863003 756D jnz 00863072
00863005 6E outsb
00863006 32900300000A xor dl, byte ptr [eax+$A000003]
0086300C 000476 add [esi+esi*2], al
0086300F 324B50 xor cl, byte ptr [ebx+$50]
00863012 94 xchg eax, esp
00863013 0300 add eax, [eax]
00863015 000A add [edx], cl
00863017 000D76324D50 add [$504D3276], cl
0086301D 5F pop edi
0086301E 43 inc ebx
0086301F 6F outsd
00863020 64654E dec esi
00863023 61 popa
00863024 6D insd
00863025 6598 cwde
00863027 0300 add eax, [eax]
00863029 000A add [edx], cl
0086302B 0009 add [ecx], cl
0086302D 7632 jbe 00863061
0086302F 43 inc ebx
00863030 6F outsd
00863031 6C insb
00863032 756D jnz 008630A1
00863034 6E outsb
00863035 349C xor al, $9C
00863037 0300 add eax, [eax]
00863039 000A add [edx], cl
0086303B 0009 add [ecx], cl
0086303D 7632 jbe 00863071
0086303F 43 inc ebx
00863040 6F outsd
00863041 6C insb
00863042 756D jnz 008630B1
00863044 6E outsb
00863045 35A0030000 xor eax, $000003A0
0086304A 05000B4D50 add eax, +$504D0B00
0086304F 5F pop edi
00863050 43 inc ebx
00863051 6F outsd
00863052 64654E dec esi
00863055 61 popa
00863056 6D insd
00863057 65A4 movsb
00863059 0300 add eax, [eax]
0086305B 000400 add [eax+eax], al
0086305E 06 push es
0086305F 4C dec esp
00863060 61 popa
00863061 62656C bound esp, qword ptr [ebp+$6C]
00863064 34A8 xor al, $A8
00863066 0300 add eax, [eax]
00863068 000500074D50 add [$504D0700], al
0086306E 5F pop edi
0086306F 53 push ebx
00863070 7065 jo 008630D7
00863072 63AC0300000400 arpl [ebx+eax+$40000], bp
00863079 06 push es
0086307A 4C dec esp
0086307B 61 popa
0086307C 62656C bound esp, qword ptr [ebp+$6C]
0086307F 35B0030000 xor eax, $000003B0
00863084 0400 add al, +$00
00863086 06 push es
00863087 4C dec esp
00863088 61 popa
00863089 62656C bound esp, qword ptr [ebp+$6C]
0086308C 37 aaa
0086308D B403 mov ah, $03
0086308F 0000 add [eax], al
00863091 0500054564 add eax, +$64450500
00863096 697431B803000010 imul esi, [ecx+esi-$48], $10000003
0086309E 0007 add [edi], al
008630A0 42 inc edx
008630A1 7574 jnz 00863117
008630A3 746F jz 00863114
008630A5 6E outsb
008630A6 31BC0300001100 xor [ebx+eax+$110000], edi
008630AD 094368 or [ebx+$68], eax
008630B0 65636B42 arpl gs:[ebx+$42], bp
008630B4 6F outsd
008630B5 7831 js 008630E8
008630B7 C00300 rol byte ptr [ebx], $00
008630BA 000500084D4F add [$4F4D0800], al
008630C0 7264 jb 00863126
008630C2 65724E jb 00863113
008630C5 6F outsd
008630C6 C403 les eax, [ebx]
008630C8 0000 add [eax], al
008630CA 0400 add al, +$00
008630CC 06 push es
008630CD 4C dec esp
008630CE 61 popa
008630CF 62656C bound esp, qword ptr [ebp+$6C]
008630D2 38C8 cmp al, cl
008630D4 0300 add eax, [eax]
008630D6 0001 add [ecx], al
008630D8 000454 add [esp+edx*2], al
008630DB 63686B arpl [eax+$6B], bp
008630DE CC int 3
008630DF 0300 add eax, [eax]
008630E1 0001 add [ecx], al
008630E3 0006 add [esi], al
008630E5 54 push esp
008630E6 6E outsb
008630E7 6F outsd
008630E8 63686B arpl [eax+$6B], bp
008630EB D003 rol byte ptr [ebx], 1
008630ED 0000 add [eax], al
008630EF 1200 adc al, byte ptr [eax]
008630F1 0D63785461 or eax, $61547863
008630F6 62436F bound eax, qword ptr [ebx+$6F]
008630F9 6E outsb
008630FA 7472 jz 0086316E
008630FC 6F outsd
008630FD 6C insb
008630FE 31D4 xor esp, edx
00863100 0300 add eax, [eax]
00863102 000A add [edx], cl
00863104 000B add [ebx], cl
00863106 7632 jbe 0086313A
00863108 43 inc ebx
00863109 6F outsd
0086310A 6D insd
0086310B 54 push esp
0086310C 61 popa
0086310D 69746F75D8030000 imul esi, [edi+ebp*2+$75], $000003D8
00863115 0100 add [eax], eax
00863117 05545A4453 add eax, +$53445A54
0086311C 43 inc ebx
0086311D DC03 fadd qword ptr [ebx]
0086311F 0000 add [eax], al
00863121 0A00 or al, byte ptr [eax]
00863123 087632 or [esi+$32], dh
00863126 4D dec ebp
00863127 61 popa
00863128 6F outsd
00863129 51 push ecx
0086312A 7479 jz 008631A5
0086312C E003 loopn +$03
0086312E 0000 add [eax], al
00863130 0A00 or al, byte ptr [eax]
00863132 07 pop es
00863133 7632 jbe 00863167
00863135 4A dec edx
00863136 5A pop edx
00863137 51 push ecx
00863138 7479 jz 008631B3
0086313A E403 in al, $03
0086313C 0000 add [eax], al
0086313E 0A00 or al, byte ptr [eax]
00863140 097632 or [esi+$32], esi
00863143 43 inc ebx
00863144 6F outsd
00863145 6E outsb
00863146 4E dec esi
00863147 6F outsd
00863148 48 dec eax
00863149 5A pop edx
0086314A E80300000A call 0A863152
0086314F 000A add [edx], cl
00863151 7632 jbe 00863185
00863153 50 push eax
00863154 52 push edx
00863155 54 push esp
00863156 43 inc ebx
00863157 6F outsd
00863158 6C insb
00863159 6F outsd
0086315A 72EC jb 00863148
0086315C 0300 add eax, [eax]
0086315E 000400 add [eax+eax], al
00863161 06 push es
00863162 4C dec esp
00863163 61 popa
00863164 62656C bound esp, qword ptr [ebp+$6C]
00863167 39F0 cmp eax, esi
00863169 0300 add eax, [eax]
0086316B 000500085052 add [$52500800], al
00863171 54 push esp
00863172 43 inc ebx
00863173 6F outsd
00863174 6C insb
00863175 6F outsd
00863176 72F4 jb 0086316C
00863178 0300 add eax, [eax]
0086317A 000A add [edx], cl
0086317C 0008 add [eax], cl
0086317E 7632 jbe 008631B2
00863180 50 push eax
00863181 42 inc edx
00863182 4E dec esi
00863183 6F outsd
00863184 7465 jz 008631EB
00863186 F8 clc
00863187 0300 add eax, [eax]
00863189 000A add [edx], cl
0086318B 0006 add [esi], al
0086318D 7632 jbe 008631C1
0086318F 4D dec ebp
00863190 51 push ecx
00863191 7479 jz 0086320C
00863193 FC cld
00863194 0300 add eax, [eax]
00863196 000400 add [eax+eax], al
00863199 07 pop es
0086319A 4C dec esp
0086319B 61 popa
0086319C 62656C bound esp, qword ptr [ebp+$6C]
0086319F 3130 xor [eax], esi
008631A1 000400 add [eax+eax], al
008631A4 000400 add [eax+eax], al
008631A7 07 pop es
008631A8 4C dec esp
008631A9 61 popa
008631AA 62656C bound esp, qword ptr [ebp+$6C]
008631AD 3131 xor [ecx], esi
008631AF 0404 add al, +$04
008631B1 0000 add [eax], al
008631B3 0400 add al, +$00
008631B5 07 pop es
008631B6 4C dec esp
008631B7 61 popa
008631B8 62656C bound esp, qword ptr [ebp+$6C]
008631BB 3132 xor [edx], esi
008631BD 080400 or [eax+eax], al
008631C0 000400 add [eax+eax], al
008631C3 07 pop es
008631C4 4C dec esp
008631C5 61 popa
008631C6 62656C bound esp, qword ptr [ebp+$6C]
008631C9 3133 xor [ebx], esi
008631CB 0C04 or al, $04
008631CD 0000 add [eax], al
008631CF 0A00 or al, byte ptr [eax]
008631D1 097632 or [esi+$32], esi
008631D4 46 inc esi
008631D5 656554 push esp
008631D8 7970 jns 0086324A
008631DA 65100400 adc gs:[eax+eax], al
008631DE 000400 add [eax+eax], al
008631E1 07 pop es
008631E2 4C dec esp
008631E3 61 popa
008631E4 62656C bound esp, qword ptr [ebp+$6C]
008631E7 313414 xor [esp+edx], esi
008631EA 0400 add al, +$00
008631EC 00050007436F add [$6F430700], al
008631F2 6E outsb
008631F3 4E dec esi
008631F4 6F outsd
008631F5 48 dec eax
008631F6 5A pop edx
008631F7 180400 sbb [eax+eax], al
008631FA 000A add [edx], cl
008631FC 000B add [ebx], cl
008631FE 7632 jbe 00863232
00863200 63686B arpl [eax+$6B], bp
00863203 7374 jnb 00863279
00863205 61 popa
00863206 7475 jz 0086327D
00863208 731C jnb 00863226
0086320A 0400 add al, +$00
0086320C 0013 add [ebx], dl
0086320E 000A add [edx], cl
00863210 50 push eax
00863211 6F outsd
00863212 7075 jo 00863289
00863214 704D jo 00863263
00863216 656E outsb
00863218 7531 jnz 0086324B
0086321A 200400 and [eax+eax], al
0086321D 001400 add [eax+eax], dl
00863220 024E31 add cl, byte ptr [esi+$31]
00863223 2404 and al, $04
00863225 0000 add [eax], al
00863227 1400 adc al, $00
00863229 024E32 add cl, byte ptr [esi+$32]
0086322C 280400 sub [eax+eax], al
0086322F 0001 add [ecx], al
00863231 000B add [ebx], cl
00863233 54 push esp
00863234 6F outsd
00863235 6F outsd
00863236 6C insb
00863237 42 inc edx
00863238 7574 jnz 008632AE
0086323A 746F jz 008632AB
0086323C 6E outsb
0086323D 342C xor al, $2C
0086323F 0400 add al, +$00
00863241 0001 add [ecx], al
00863243 000B add [ebx], cl
00863245 54 push esp
00863246 6F outsd
00863247 6F outsd
00863248 6C insb
00863249 42 inc edx
0086324A 7574 jnz 008632C0
0086324C 746F jz 008632BD
0086324E 6E outsb
0086324F 3530040000 xor eax, $00000430
00863254 0A00 or al, byte ptr [eax]
00863256 087632 or [esi+$32], dh
00863259 4B dec ebx
0086325A 50 push eax
0086325B 54 push esp
0086325C 7970 jns 008632CE
0086325E 653404 xor al, $04
00863261 0000 add [eax], al
00863263 1500126378 adc eax, $78631200
00863268 53 push ebx
00863269 7479 jz 008632E4
0086326B 6C insb
0086326C 6552 push edx
0086326E 65706F jo 008632E0
00863271 7369 jnb 008632DC
00863273 746F jz 008632E4
00863275 7279 jb 008632F0
00863277 3138 xor [eax], edi
00863279 0400 add al, +$00
0086327B 0016 add [esi], dl
0086327D 0008 add [eax], cl
0086327F 637853 arpl [eax+$53], di
00863282 7479 jz 008632FD
00863284 6C insb
00863285 65313C04 xor gs:[esp+eax], edi
00863289 0000 add [eax], al
0086328B 0A00 or al, byte ptr [eax]
0086328D 0D7632534F or eax, $4F533276
00863292 7264 jb 008632F8
00863294 44 inc esp
00863295 656653 push bx
00863298 7472 jz 0086330C
0086329A 3440 xor al, $40
0086329C 0400 add al, +$00
0086329E 000400 add [eax+eax], al
008632A1 07 pop es
008632A2 4C dec esp
008632A3 61 popa
008632A4 62656C bound esp, qword ptr [ebp+$6C]
008632A7 3137 xor [edi], esi
008632A9 44 inc esp
008632AA 0400 add al, +$00
008632AC 0017 add [edi], dl
008632AE 0006 add [esi], al
008632B0 4B dec ebx
008632B1 50 push eax
008632B2 54 push esp
008632B3 7970 jns 00863325
008632B5 6548 dec eax
008632B7 0400 add al, +$00
008632B9 000400 add [eax+eax], al
008632BC 07 pop es
008632BD 4C dec esp
008632BE 61 popa
008632BF 62656C bound esp, qword ptr [ebp+$6C]
008632C2 31354C040000 xor [$0000044C], esi
008632C8 0500044E6F add eax, +$6F4E0400
008632CD 7465 jz 00863334
008632CF 50 push eax
008632D0 0400 add al, +$00
008632D2 000A add [edx], cl
008632D4 0007 add [edi], al
008632D6 7632 jbe 0086330A
008632D8 48 dec eax
008632D9 7569 jnz 00863344
008632DB 6C insb
008632DC 7627 jbe 00863305
008632DE 0012 add [edx], dl
008632E0 00AC3F86000B46 add [edi+edi+$460B0086], ch
008632E7 6F outsd
008632E8 726D jb 00863357
008632EA 44 inc esp
008632EB 657374 jnb 00863362
008632EE 726F jb 0086335F
008632F0 7910 jns 00863302
008632F2 00B43F86000946 add [edi+edi+$46090086], dh
008632F9 6F outsd
008632FA 726D jb 00863369
008632FC 43 inc ebx
008632FD 6C insb
008632FE 6F outsd
008632FF 7365 jnb 00863366
00863301 1300 adc eax, [eax]
00863303 B83F86000C mov eax, $0C00863F
00863308 54 push esp
00863309 42 inc edx
0086330A 43 inc ebx
0086330B 6C insb
0086330C 6F outsd
0086330D 7365 jnb 00863374
0086330F 43 inc ebx
00863310 6C insb
00863311 69636B11000440 imul esp, [ebx+$6B], $40040011
00863318 8600 xchg [eax], al
0086331A 0A544244 or dl, byte ptr [edx+eax*2+$44]
0086331E 656C insb
00863320 43 inc ebx
00863321 6C insb
00863322 69636B0F00B842 imul esp, [ebx+$6B], $42B8000F
00863329 8600 xchg [eax], al
0086332B 08466F or [esi+$6F], al
0086332E 726D jb 0086339D
00863330 53 push ebx
00863331 686F771500 push $0015776F
00863336 4C dec esp
00863337 43 inc ebx
00863338 8600 xchg [eax], al
0086333A 0E push cs
0086333B 54 push esp
0086333C 42 inc edx
0086333D 52 push edx
0086333E 61 popa
0086333F 667265 jb 008633A7
00863342 7368 jnb 008633AC
00863344 43 inc ebx
00863345 6C insb
00863346 69636B17006843 imul esp, [ebx+$6B], $43680017
0086334D 8600 xchg [eax], al
0086334F 10546F6F adc [edi+ebp*2+$6F], dl
00863353 6C insb
00863354 42 inc edx
00863355 7574 jnz 008633CB
00863357 746F jz 008633C8
00863359 6E outsb
0086335A 32436C xor al, byte ptr [ebx+$6C]
0086335D 69636B18002444 imul esp, [ebx+$6B], $44240018
00863364 8600 xchg [eax], al
00863366 114661 adc [esi+$61], eax
00863369 63746F72 arpl [edi+ebp*2+$72], si
0086336D 794E jns 008633BD
0086336F 61 popa
00863370 6D insd
00863371 6543 inc ebx
00863373 68616E6765 push $65676E61
00863378 1300 adc eax, [eax]
0086337A 38448600 cmp [esi+eax*4+$00], al
0086337E 0C42 or al, $42
00863380 7574 jnz 008633F6
00863382 746F jz 008633F3
00863384 6E outsb
00863385 32436C xor al, byte ptr [ebx+$6C]
00863388 69636B30004453 imul esp, [ebx+$6B], $53440030
0086338F 8600 xchg [eax], al
00863391 296378 sub dword ptr [ebx+$78], esp
00863394 47 inc edi
00863395 7269 jb 00863400
00863397 6444 inc esp
00863399 42 inc edx
0086339A 43 inc ebx
0086339B 6F outsd
0086339C 6C insb
0086339D 756D jnz 0086340C
0086339F 6E outsb
008633A0 385072 cmp [eax+$72], dl
008633A3 6F outsd
008633A4 7065 jo 0086340B
008633A6 7274 jb 0086341C
008633A8 69657345646974 imul esp, [ebp+$73], $74696445
008633AF 56 push esi
008633B0 61 popa
008633B1 6C insb
008633B2 7565 jnz 00863419
008633B4 43 inc ebx
008633B5 68616E6765 push $65676E61
008633BA 643000 xor fs:[eax], al
008633BD 105686 adc [esi-$7A], dl
008633C0 0029 add [ecx], ch
008633C2 637847 arpl [eax+$47], di
008633C5 7269 jb 00863430
008633C7 6444 inc esp
008633C9 42 inc edx
008633CA 43 inc ebx
008633CB 6F outsd
008633CC 6C insb
008633CD 756D jnz 0086343C
008633CF 6E outsb
008633D0 3550726F70 xor eax, $706F7250
008633D5 657274 jb 0086344C
008633D8 69657345646974 imul esp, [ebp+$73], $74696445
008633DF 56 push esi
008633E0 61 popa
008633E1 6C insb
008633E2 7565 jnz 00863449
008633E4 43 inc ebx
008633E5 68616E6765 push $65676E61
008633EA 643000 xor fs:[eax], al
008633ED D06186 shl byte ptr [ecx-$7A], 1
008633F0 0029 add [ecx], ch
008633F2 637847 arpl [eax+$47], di
008633F5 7269 jb 00863460
008633F7 6444 inc esp
008633F9 42 inc edx
008633FA 43 inc ebx
008633FB 6F outsd
008633FC 6C insb
008633FD 756D jnz 0086346C
008633FF 6E outsb
00863400 315072 xor [eax+$72], edx
00863403 6F outsd
00863404 7065 jo 0086346B
00863406 7274 jb 0086347C
00863408 69657345646974 imul esp, [ebp+$73], $74696445
0086340F 56 push esi
00863410 61 popa
00863411 6C insb
00863412 7565 jnz 00863479
00863414 43 inc ebx
00863415 68616E6765 push $65676E61
0086341A 6417 pop ss
0086341C 00146586001054 add [$54100086], dl
00863423 6F outsd
00863424 6F outsd
00863425 6C insb
00863426 42 inc edx
00863427 7574 jnz 0086349D
00863429 746F jz 0086349A
0086342B 6E outsb
0086342C 33436C xor eax, [ebx+$6C]
0086342F 69636B2B002C6B imul esp, [ebx+$6B], $6B2C002B
00863436 8600 xchg [eax], al
00863438 2463 and al, $63
0086343A 7847 js 00863483
0086343C 7269 jb 008634A7
0086343E 6444 inc esp
00863440 42 inc edx
00863441 43 inc ebx
00863442 6F outsd
00863443 6C insb
00863444 756D jnz 008634B3
00863446 6E outsb
00863447 335072 xor edx, [eax+$72]
0086344A 6F outsd
0086344B 7065 jo 008634B2
0086344D 7274 jb 008634C3
0086344F 69657342757474 imul esp, [ebp+$73], $74747542
00863456 6F outsd
00863457 6E outsb
00863458 43 inc ebx
00863459 6C insb
0086345A 69636B2B009870 imul esp, [ebx+$6B], $7098002B
00863461 8600 xchg [eax], al
00863463 2463 and al, $63
00863465 7847 js 008634AE
00863467 7269 jb 008634D2
00863469 6444 inc esp
0086346B 42 inc edx
0086346C 43 inc ebx
0086346D 6F outsd
0086346E 6C insb
0086346F 756D jnz 008634DE
00863471 6E outsb
00863472 3650 push eax
00863474 726F jb 008634E5
00863476 7065 jo 008634DD
00863478 7274 jb 008634EE
0086347A 69657342757474 imul esp, [ebp+$73], $74747542
00863481 6F outsd
00863482 6E outsb
00863483 43 inc ebx
00863484 6C insb
00863485 69636B2500F473 imul esp, [ebx+$6B], $73F40025
0086348C 8600 xchg [eax], al
0086348E 1E push ds
0086348F 7632 jbe 008634C3
00863491 43 inc ebx
00863492 6F outsd
00863493 6C insb
00863494 756D jnz 00863503
00863496 6E outsb
00863497 335072 xor edx, [eax+$72]
0086349A 6F outsd
0086349B 7065 jo 00863502
0086349D 7274 jb 00863513
0086349F 69657342757474 imul esp, [ebp+$73], $74747542
008634A6 6F outsd
008634A7 6E outsb
008634A8 43 inc ebx
008634A9 6C insb
008634AA 69636B1700E077 imul esp, [ebx+$6B], $77E00017
008634B1 8600 xchg [eax], al
008634B3 10546F6F adc [edi+ebp*2+$6F], dl
008634B7 6C insb
008634B8 42 inc edx
008634B9 7574 jnz 0086352F
008634BB 746F jz 0086352C
008634BD 6E outsb
008634BE 31436C xor [ebx+$6C], eax
008634C1 69636B25002078 imul esp, [ebx+$6B], $78200025
008634C8 8600 xchg [eax], al
008634CA 1E push ds
008634CB 7632 jbe 008634FF
008634CD 43 inc ebx
008634CE 6F outsd
008634CF 6C insb
008634D0 756D jnz 0086353F
008634D2 6E outsb
008634D3 37 aaa
008634D4 50 push eax
008634D5 726F jb 00863546
008634D7 7065 jo 0086353E
008634D9 7274 jb 0086354F
008634DB 69657342757474 imul esp, [ebp+$73], $74747542
008634E2 6F outsd
008634E3 6E outsb
008634E4 43 inc ebx
008634E5 6C insb
008634E6 69636B2500947F imul esp, [ebx+$6B], $7F940025
008634ED 8600 xchg [eax], al
008634EF 1E push ds
008634F0 7632 jbe 00863524
008634F2 50 push eax
008634F3 53 push ebx
008634F4 50 push eax
008634F5 726F jb 00863566
008634F7 7065 jo 0086355E
008634F9 7274 jb 0086356F
008634FB 69657345646974 imul esp, [ebp+$73], $74696445
00863502 56 push esi
00863503 61 popa
00863504 6C insb
00863505 7565 jnz 0086356C
00863507 43 inc ebx
00863508 68616E6765 push $65676E61
0086350D 642A00 sub al, byte ptr fs:[eax]
00863510 C882 enter , $82
00863512 8600 xchg [eax], al
00863514 237632 and esi, [esi+$32]
00863517 43 inc ebx
00863518 6F outsd
00863519 6C insb
0086351A 756D jnz 00863589
0086351C 6E outsb
0086351D 325072 xor dl, byte ptr [eax+$72]
00863520 6F outsd
00863521 7065 jo 00863588
00863523 7274 jb 00863599
00863525 69657345646974 imul esp, [ebp+$73], $74696445
0086352C 56 push esi
0086352D 61 popa
0086352E 6C insb
0086352F 7565 jnz 00863596
00863531 43 inc ebx
00863532 68616E6765 push $65676E61
00863537 642A00 sub al, byte ptr fs:[eax]
0086353A 48 dec eax
0086353B 858600237632 test [esi+$32762300], eax
00863541 4B dec ebx
00863542 50 push eax
00863543 4D dec ebp
00863544 6F outsd
00863545 6E outsb
00863546 657950 jns 00863599
00863549 726F jb 008635BA
0086354B 7065 jo 008635B2
0086354D 7274 jb 008635C3
0086354F 69657345646974 imul esp, [ebp+$73], $74696445
00863556 56 push esi
00863557 61 popa
00863558 6C insb
00863559 7565 jnz 008635C0
0086355B 43 inc ebx
0086355C 68616E6765 push $65676E61
00863561 641300 adc eax, fs:[eax]
00863564 C889 enter , $89
00863566 8600 xchg [eax], al
00863568 0C42 or al, $42
0086356A 7574 jnz 008635E0
0086356C 746F jz 008635DD
0086356E 6E outsb
0086356F 31436C xor [ebx+$6C], eax
00863572 69636B1500448E imul esp, [ebx+$6B], $8E440015
00863579 8600 xchg [eax], al
0086357B 0E push cs
0086357C 43 inc ebx
0086357D 6865636B42 push $426B6365
00863582 6F outsd
00863583 7831 js 008635B6
00863585 43 inc ebx
00863586 6C insb
00863587 69636B1A005C90 imul esp, [ebx+$6B], $905C001A
0086358E 8600 xchg [eax], al
00863590 136378 adc esp, [ebx+$78]
00863593 54 push esp
00863594 61 popa
00863595 62436F bound eax, qword ptr [ebx+$6F]
00863598 6E outsb
00863599 7472 jz 0086360D
0086359B 6F outsd
0086359C 6C insb
0086359D 314368 xor [ebx+$68], eax
008635A0 61 popa
008635A1 6E outsb
008635A2 67651100 adc gs:[bx+si], eax
008635A6 7090 jo 00863538
008635A8 8600 xchg [eax], al
008635AA 0A466F or al, byte ptr [esi+$6F]
008635AD 726D jb 0086361C
008635AF 43 inc ebx
008635B0 7265 jb 00863617
008635B2 61 popa
008635B3 7465 jz 0086361A
008635B5 1000 adc [eax], al
008635B7 D4 aam
008635B8 90 nop
008635B9 8600 xchg [eax], al
008635BB 09546368 or [ebx+$68], edx
008635BF 6B436C69 imul eax, [ebx+$6C], $69
008635C3 636B12 arpl [ebx+$12], bp
008635C6 00549386 add [ebx+edx*4-$7A], dl
008635CA 000B add [ebx], cl
008635CC 54 push esp
008635CD 6E outsb
008635CE 6F outsd
008635CF 63686B arpl [eax+$6B], bp
008635D2 43 inc ebx
008635D3 6C insb
008635D4 69636B2700FC95 imul esp, [ebx+$6B], $95FC0027
008635DB 8600 xchg [eax], al
008635DD 207632 and [esi+$32], dh
008635E0 43 inc ebx
008635E1 6F outsd
008635E2 6D insd
008635E3 54 push esp
008635E4 61 popa
008635E5 69746F7550726F70 imul esi, [edi+ebp*2+$75], $706F7250
008635ED 657274 jb 00863664
008635F0 69657342757474 imul esp, [ebp+$73], $74747542
008635F7 6F outsd
008635F8 6E outsb
008635F9 43 inc ebx
008635FA 6C insb
008635FB 69636B11003899 imul esp, [ebx+$6B], $99380011
00863602 8600 xchg [eax], al
00863604 0A545A44 or dl, byte ptr [edx+ebx*2+$44]
00863608 53 push ebx
00863609 43 inc ebx
0086360A 43 inc ebx
0086360B 6C insb
0086360C 69636B1F006099 imul esp, [ebx+$6B], $9960001F
00863613 8600 xchg [eax], al
00863615 185642 sbb [esi+$42], dl
00863618 5A pop edx
00863619 50 push eax
0086361A 726F jb 0086368B
0086361C 7065 jo 00863683
0086361E 7274 jb 00863694
00863620 69657342757474 imul esp, [ebp+$73], $74747542
00863627 6F outsd
00863628 6E outsb
00863629 43 inc ebx
0086362A 6C insb
0086362B 69636B2500A49C imul esp, [ebx+$6B], $9CA40025
00863632 8600 xchg [eax], al
00863634 1E push ds
00863635 7632 jbe 00863669
00863637 43 inc ebx
00863638 6F outsd
00863639 6C insb
0086363A 756D jnz 008636A9
0086363C 6E outsb
0086363D 3450 xor al, $50
0086363F 726F jb 008636B0
00863641 7065 jo 008636A8
00863643 7274 jb 008636B9
00863645 69657342757474 imul esp, [ebp+$73], $74747542
0086364C 6F outsd
0086364D 6E outsb
0086364E 43 inc ebx
0086364F 6C insb
00863650 69636B200088A0 imul esp, [ebx+$6B], $A0880020
00863657 8600 xchg [eax], al
00863659 197632 sbb [esi+$32], esi
0086365C 43 inc ebx
0086365D 6F outsd
0086365E 6C insb
0086365F 756D jnz 008636CE
00863661 6E outsb
00863662 3550726F70 xor eax, $706F7250
00863667 657274 jb 008636DE
0086366A 6965734368616E imul esp, [ebp+$73], $6E616843
00863671 6765250020A186 and eax, $86A12000
00863678 001E add [esi], bl
0086367A 7632 jbe 008636AE
0086367C 43 inc ebx
0086367D 6F outsd
0086367E 6E outsb
0086367F 4E dec esi
00863680 6F outsd
00863681 48 dec eax
00863682 5A pop edx
00863683 50 push eax
00863684 726F jb 008636F5
00863686 7065 jo 008636ED
00863688 7274 jb 008636FE
0086368A 69657342757474 imul esp, [ebp+$73], $74747542
00863691 6F outsd
00863692 6E outsb
00863693 43 inc ebx
00863694 6C insb
00863695 69636B1F00C0A5 imul esp, [ebx+$6B], $A5C0001F
0086369C 8600 xchg [eax], al
0086369E 18547632 sbb [esi+esi*2+$32], dl
008636A2 53 push ebx
008636A3 7479 jz 0086371E
008636A5 6C insb
008636A6 657347 jnb 008636F0
008636A9 657443 jz 008636EF
008636AC 6F outsd
008636AD 6E outsb
008636AE 7465 jz 00863715
008636B0 6E outsb
008636B1 7453 jz 00863706
008636B3 7479 jz 0086372E
008636B5 6C insb
008636B6 650E push cs
008636B8 00C8 add al, cl
008636BA A5 movsd
008636BB 8600 xchg [eax], al
008636BD 07 pop es
008636BE 4E dec esi
008636BF 31436C xor [ebx+$6C], eax
008636C2 69636B0E00D8A5 imul esp, [ebx+$6B], $A5D8000E
008636C9 8600 xchg [eax], al
008636CB 07 pop es
008636CC 4E dec esi
008636CD 32436C xor al, byte ptr [ebx+$6C]
008636D0 69636B1700E8A5 imul esp, [ebx+$6B], $A5E80017
008636D7 8600 xchg [eax], al
008636D9 10546F6F adc [edi+ebp*2+$6F], dl
008636DD 6C insb
008636DE 42 inc edx
008636DF 7574 jnz 00863755
008636E1 746F jz 00863752
008636E3 6E outsb
008636E4 3443 xor al, $43
008636E6 6C insb
008636E7 69636B1700BCA8 imul esp, [ebx+$6B], $A8BC0017
008636EE 8600 xchg [eax], al
008636F0 10546F6F adc [edi+ebp*2+$6F], dl
008636F4 6C insb
008636F5 42 inc edx
008636F6 7574 jnz 0086376C
008636F8 746F jz 00863769
008636FA 6E outsb
008636FB 35436C6963 xor eax, $63696C43
00863700 6B2900 imul ebp, [ecx], $00
00863703 88AB86002276 mov [ebx+$76220086], ch
00863709 324B50 xor cl, byte ptr [ebx+$50]
0086370C 54 push esp
0086370D 7970 jns 0086377F
0086370F 6550 push eax
00863711 726F jb 00863782
00863713 7065 jo 0086377A
00863715 7274 jb 0086378B
00863717 69657345646974 imul esp, [ebp+$73], $74696445
0086371E 56 push esi
0086371F 61 popa
00863720 6C insb
00863721 7565 jnz 00863788
00863723 43 inc ebx
00863724 68616E6765 push $65676E61
00863729 640A546672 or dl, byte ptr fs:[esi+$72]
0086372E 6D insd
0086372F 59 pop ecx
00863730 53 push ebx
00863731 43 inc ebx
00863732 52 push edx
00863733 4B dec ebx
00863734 50 push eax
00863735 1800 sbb [eax], al
00863737 28944500648A45 sub [ebp+eax*2+$458A6400], dl
0086373E 00B8124D0020 add [eax+$20004D12], bh
00863744 42 inc edx
00863745 44 inc esp
00863746 001C5F add [edi+ebx*2], bl
00863749 47 inc edi
0086374A 00B867470064 add [eax+$64004767], bh
00863750 D37800 sar dword ptr [eax+$00], cl
00863753 A80A test al, $0A
00863755 7800 js 00863757
00863757 0016 add [esi], dl
00863759 6300 arpl [eax], ax
0086375B F4 hlt
0086375C B466 mov ah, $66
0086375E 0034B1 add [ecx+esi*4], dh
00863761 6600A40E6400E0A5 add [esi+ecx+$A5E00064], ah
00863769 45 inc ebp
0086376A 005876 add [eax+$76], bl
0086376D 7C00 jl 0086376F
0086376F 087F4B or [edi+$4B], bh
00863772 0088996A0000 add [eax+$6A99], cl
00863778 8E4700 mov es, word ptr [edi+$00]
0086377B C0964700645D57 rcl byte ptr [esi+$5D640047], $57
00863782 00887E49008C add [eax+$8C00497E], cl
00863788 7649 jbe 008637D3
0086378A 009C6D4F005070 add [ebp+ebp*2+$7050004F], bl
00863791 4F dec edi
00863792 00F4 add ah, dh
00863794 814700909C3786 add dword ptr [edi+$00], $86379C90
0086379B 0007 add [edi], al
0086379D 0A546672 or dl, byte ptr [esi+$72]
008637A1 6D insd
008637A2 59 pop ecx
008637A3 53 push ebx
008637A4 43 inc ebx
008637A5 52 push edx
008637A6 4B dec ebx
008637A7 50 push eax
008637A8 8C2C86 mov word ptr [esi+eax*4], gs
008637AB 00D0 add al, dl
008637AD F2 repne
008637AE 49 dec ecx
008637AF 005E00 add [esi+$00], bl
008637B2 08555F or [ebp+$5F], dl
008637B5 59 pop ecx
008637B6 53 push ebx
008637B7 43 inc ebx
008637B8 52 push edx
008637B9 4B dec ebx
008637BA 50 push eax
008637BB 0000 add [eax], al
008637BD 8D4000 lea eax, [eax+$00]
008637C0 53 push ebx
008637C1 8BD8 mov ebx, eax
008637C3 33D2 xor edx, edx
* Reference to control conDefstr3 : N.A.
|
008637C5 8B8328040000 mov eax, [ebx+$0428]
008637CB 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_64
|
008637CD FF5164 call dword ptr [ecx+$64]
008637D0 33D2 xor edx, edx
* Reference to control Label33 : N.A.
|
008637D2 8B832C040000 mov eax, [ebx+$042C]
008637D8 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_64
|
008637DA FF5164 call dword ptr [ecx+$64]
* Reference to control conDefstr5 : N.A.
|
008637DD 8B8330040000 mov eax, [ebx+$0430]
|
008637E3 E8E869DFFF call 0065A1D0
008637E8 33D2 xor edx, edx
* Reference to : TcxCustomGridTableView._PROC_00628F60()
|
008637EA E87157DCFF call 00628F60
* Reference to control v1Column3 : N.A.
|
008637EF 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to control ADOTemp : N.A.
|
008637F5 83B83C03000000 cmp dword ptr [eax+$033C], +$00
008637FC 751F jnz 0086381D
008637FE B201 mov dl, $01
* Reference to control conDefstr3 : N.A.
|
00863800 8B8328040000 mov eax, [ebx+$0428]
00863806 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_64
|
00863808 FF5164 call dword ptr [ecx+$64]
* Reference to control conDefstr5 : N.A.
|
0086380B 8B8330040000 mov eax, [ebx+$0430]
|
00863811 E8BA69DFFF call 0065A1D0
00863816 B201 mov dl, $01
* Reference to : TcxCustomGridTableView._PROC_00628F60()
|
00863818 E84357DCFF call 00628F60
* Reference to control v1Column3 : N.A.
|
0086381D 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to control ADOTemp : N.A.
|
00863823 83B83C03000001 cmp dword ptr [eax+$033C], +$01
0086382A 750D jnz 00863839
0086382C B201 mov dl, $01
* Reference to control Label33 : N.A.
|
0086382E 8B832C040000 mov eax, [ebx+$042C]
00863834 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_64
|
00863836 FF5164 call dword ptr [ecx+$64]
00863839 5B pop ebx
0086383A C3 ret
*)
end;
end.