Group_99/D7myChuangpin
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
main
D7myChuangpin/YSYF/U_YSCRPB_QTTJ.pas
“ddf” ece69a5ac1 1
2024-07-23 20:18:14 +08:00

10422 lines
408 KiB
ObjectPascal
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

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_QTTJ;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmYSCRPB_QTTJ=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;
v2Column2: TcxGridDBColumn;
Label7: TLabel;
Edit1: TEdit;
Button1: TToolButton;
CheckBox1: TCheckBox;
OrderNo: TEdit;
Label8: TLabel;
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;
cxTabControl2: TcxTabControl;
RadioGroup1: TRadioGroup;
TPrint: TToolButton;
Order_FYZC: TClientDataSet;
v2RMBMoney: TcxGridDBColumn;
v2Huilv: TcxGridDBColumn;
v2PayMent: TcxGridDBColumn;
v2Qty: TcxGridDBColumn;
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 TZDSCClick(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 cxTabControl2Change(Sender : TObject);
procedure RadioGroup1Click(Sender : TObject);
procedure TPrintClick(Sender : TObject);
procedure _PROC_008787D1(Sender : TObject);
procedure _PROC_00879259(Sender : TObject);
procedure _PROC_0087969D(Sender : TObject);
procedure _PROC_0087A009(Sender : TObject);
procedure _PROC_0087A345(Sender : TObject);
procedure _PROC_0087ACFD(Sender : TObject);
procedure _PROC_0087B01A(Sender : TObject);
procedure _PROC_0087B050(Sender : TObject);
procedure _PROC_0087B05D(Sender : TObject);
procedure _PROC_0087B3B9(Sender : TObject);
procedure _PROC_0087BACD(Sender : TObject);
procedure _PROC_0087BDD1(Sender : TObject);
procedure _PROC_0087C051(Sender : TObject);
procedure _PROC_0087C475(Sender : TObject);
procedure _PROC_0087D3F1(Sender : TObject);
procedure _PROC_0087DC95(Sender : TObject);
procedure _PROC_0087DFE9(Sender : TObject);
procedure _PROC_0087E401(Sender : TObject);
procedure _PROC_0087E6D1(Sender : TObject);
procedure _PROC_0087E94D(Sender : TObject);
procedure _PROC_0087EB29(Sender : TObject);
procedure _PROC_0087EBC1(Sender : TObject);
procedure _PROC_0087EEF9(Sender : TObject);
procedure _PROC_0087EF91(Sender : TObject);
procedure _PROC_0087FC13(Sender : TObject);
procedure _PROC_008805A1(Sender : TObject);
procedure _PROC_008805D0(Sender : TObject);
procedure _PROC_008805D8(Sender : TObject);
procedure _PROC_0088063E(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmYSCRPB_QTTJ: TfrmYSCRPB_QTTJ;
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmYSCRPB_QTTJ.FormDestroy(Sender : TObject);
begin
(*
0087819C 33C0 xor eax, eax
* Reference to GlobalVar_00895ACC
|
0087819E A3CC5A8900 mov dword ptr [$00895ACC], eax
008781A3 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.FormClose(Sender : TObject);
begin
(*
008781A4 C60102 mov byte ptr [ecx], $02
008781A7 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.TBCloseClick(Sender : TObject);
begin
(*
008781A8 53 push ebx
008781A9 8BD8 mov ebx, eax
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
008781AB B9D4818700 mov ecx, $008781D4
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
008781B0 8B9334030000 mov edx, [ebx+$0334]
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>Ǽ<EFBFBD>4'
|
008781B6 B8E8818700 mov eax, $008781E8
|
008781BB E8E0F9F3FF call 007B7BA0
008781C0 8BC3 mov eax, ebx
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
008781C2 E8D1DDC2FF call 004A5F98
008781C7 5B pop ebx
008781C8 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.TBDelClick(Sender : TObject);
begin
(*
008781F4 55 push ebp
008781F5 8BEC mov ebp, esp
008781F7 33C9 xor ecx, ecx
008781F9 51 push ecx
008781FA 51 push ecx
008781FB 51 push ecx
008781FC 51 push ecx
008781FD 51 push ecx
008781FE 51 push ecx
008781FF 51 push ecx
00878200 51 push ecx
00878201 53 push ebx
00878202 56 push esi
00878203 57 push edi
00878204 8945FC mov [ebp-$04], eax
00878207 33C0 xor eax, eax
00878209 55 push ebp
* Possible String Reference to: '<27><>Ƹ<EFBFBD><C6B8><EFBFBD>_^[<5B><>]<5D>'
|
0087820A 68FB838700 push $008783FB
***** TRY
|
0087820F 64FF30 push dword ptr fs:[eax]
00878212 648920 mov fs:[eax], esp
00878215 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
00878218 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087821E E89DFCC4FF call 004C7EC0
00878223 84C0 test al, al
00878225 0F85AD010000 jnz 008783D8
0087822B A00C848700 mov al, byte ptr [$0087840C]
00878230 50 push eax
00878231 8D45EC lea eax, [ebp-$14]
00878234 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
00878236 E8290BBAFF call 00418D64
0087823B 8D4DEC lea ecx, [ebp-$14]
0087823E 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
00878241 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
00878247 BA18848700 mov edx, $00878418
0087824C 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0087824E FF9344020000 call dword ptr [ebx+$0244]
00878254 84C0 test al, al
00878256 751D jnz 00878275
00878258 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087825A B920848700 mov ecx, $00878420
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0087825F BA28848700 mov edx, $00878428
*)
end;
procedure TfrmYSCRPB_QTTJ.FormShow(Sender : TObject);
begin
(*
008784A8 53 push ebx
008784A9 8BD8 mov ebx, eax
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
008784AB B938858700 mov ecx, $00878538
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
008784B0 8B9334030000 mov edx, [ebx+$0334]
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>Ǽ<EFBFBD>4'
|
008784B6 B84C858700 mov eax, $0087854C
|
008784BB E8E4F4F3FF call 007B79A4
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryTemp : TADOQuery
|
008784C0 8B8308030000 mov eax, [ebx+$0308]
|
008784C6 E8BDC4F3FF call 007B4988
008784CB 83C4F8 add esp, -$08
008784CE DD1C24 fstp qword ptr [esp]
008784D1 9B wait
* Reference to control TfrmYSCRPB_QTTJ.Enddate : TDateTimePicker
|
008784D2 8B8350030000 mov eax, [ebx+$0350]
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
008784D8 E84F9DBFFF call 0047222C
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryTemp : TADOQuery
|
008784DD 8B8308030000 mov eax, [ebx+$0308]
|
008784E3 E8A0C4F3FF call 007B4988
008784E8 83C4F8 add esp, -$08
008784EB DD1C24 fstp qword ptr [esp]
008784EE 9B wait
* Reference to control TfrmYSCRPB_QTTJ.begdate : TDateTimePicker
|
008784EF 8B834C030000 mov eax, [ebx+$034C]
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
008784F5 E8329DBFFF call 0047222C
008784FA 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.TZDSC : TToolButton
|
008784FC 8B8390030000 mov eax, [ebx+$0390]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
00878502 E80900C1FF call 00488510
* Reference to field TfrmYSCRPB_QTTJ.OFFS_03F8
|
00878507 8B83F8030000 mov eax, [ebx+$03F8]
* Possible String Reference to: '<27>ӷ<EFBFBD>'
|
0087850D BA60858700 mov edx, $00878560
* Reference to: System.@LStrCmp;
|
00878512 E829D2B8FF call 00405740
00878517 750D jnz 00878526
00878519 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.TZDSC : TToolButton
|
0087851B 8B8390030000 mov eax, [ebx+$0390]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
00878521 E8EAFFC0FF call 00488510
00878526 8BC3 mov eax, ebx
|
00878528 E81FF2FFFF call 0087774C
0087852D 5B pop ebx
0087852E C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.TBRafreshClick(Sender : TObject);
begin
(*
00878568 53 push ebx
00878569 8BD8 mov ebx, eax
* Reference to control TfrmYSCRPB_QTTJ.begdate : TDateTimePicker
|
0087856B 8B834C030000 mov eax, [ebx+$034C]
00878571 8B10 mov edx, [eax]
* Reference to method TDateTimePicker.SetFocus()
|
00878573 FF92C4000000 call dword ptr [edx+$00C4]
00878579 8BC3 mov eax, ebx
|
0087857B E8CCF1FFFF call 0087774C
00878580 5B pop ebx
00878581 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.ToolButton2Click(Sender : TObject);
begin
(*
00878584 55 push ebp
00878585 8BEC mov ebp, esp
00878587 6A00 push $00
00878589 53 push ebx
0087858A 8BD8 mov ebx, eax
0087858C 33C0 xor eax, eax
0087858E 55 push ebp
* Possible String Reference to: '<27><>ĸ<EFBFBD><C4B8><EFBFBD>[Y]<5D>'
|
0087858F 6818868700 push $00878618
***** TRY
|
00878594 64FF30 push dword ptr fs:[eax]
00878597 648920 mov fs:[eax], esp
0087859A BA2C868700 mov edx, $0087862C
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087859F 8B839C030000 mov eax, [ebx+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
008785A5 E87600C1FF call 00488620
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
008785AA 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.GetActive(TDataSet):Boolean;
|
008785B0 E85FD4C4FF call 004C5A14
008785B5 84C0 test al, al
008785B7 7449 jz 00878602
008785B9 8D45FC lea eax, [ebp-$04]
008785BC 50 push eax
008785BD B902000000 mov ecx, $00000002
008785C2 BA01000000 mov edx, $00000001
* Reference to control TfrmYSCRPB_QTTJ.Panel1 : TPanel
|
008785C7 8B8310030000 mov eax, [ebx+$0310]
|
008785CD E8DEDAF3FF call 007B60B0
008785D2 8B55FC mov edx, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
008785D5 8B8320030000 mov eax, [ebx+$0320]
|
008785DB E8E8E6F3FF call 007B6CC8
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
008785E0 8B935C030000 mov edx, [ebx+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
008785E6 8B8320030000 mov eax, [ebx+$0320]
|
008785EC E89FE8F3FF call 007B6E90
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
008785F1 8B935C030000 mov edx, [ebx+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
008785F7 8B8320030000 mov eax, [ebx+$0320]
|
008785FD E816EAF3FF call 007B7018
00878602 33C0 xor eax, eax
00878604 5A pop edx
00878605 59 pop ecx
00878606 59 pop ecx
00878607 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[Y]<5D>'
|
0087860A 681F868700 push $0087861F
0087860F 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrClr(void;void);
|
00878612 E80DCDB8FF call 00405324
00878617 C3 ret
* Reference to: System.@HandleFinally;
|
00878618 E9D7C4B8FF jmp 00404AF4
0087861D EBF0 jmp 0087860F
****** END
|
0087861F 5B pop ebx
00878620 59 pop ecx
00878621 5D pop ebp
00878622 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.ComTaitouChange(Sender : TObject);
begin
(*
00878630 56 push esi
* Reference to control TfrmYSCRPB_QTTJ.RadioGroup1 : TRadioGroup
|
00878631 8B90CC030000 mov edx, [eax+$03CC]
* Reference to field TRadioGroup.ItemIndex : Integer
|
00878637 83BA1802000002 cmp dword ptr [edx+$0218], +$02
0087863E 750F jnz 0087864F
* Reference to control TfrmYSCRPB_QTTJ.ToolButton2 : TToolButton
|
00878640 8B8014030000 mov eax, [eax+$0314]
00878646 66BEEBFF mov si, $FFEB
* Reference to: System.@CallDynaInst;
|
0087864A E805BFB8FF call 00404554
0087864F 5E pop esi
00878650 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.Button2Click(Sender : TObject);
begin
(*
00878654 55 push ebp
00878655 8BEC mov ebp, esp
00878657 33C9 xor ecx, ecx
00878659 51 push ecx
0087865A 51 push ecx
0087865B 51 push ecx
0087865C 51 push ecx
0087865D 51 push ecx
0087865E 53 push ebx
0087865F 56 push esi
00878660 8BD8 mov ebx, eax
00878662 33C0 xor eax, eax
00878664 55 push ebp
* Possible String Reference to: '<27><>ø<EFBFBD><C3B8><EFBFBD>^[<5B><>]<5D>'
|
00878665 6861878700 push $00878761
***** TRY
|
0087866A 64FF30 push dword ptr fs:[eax]
0087866D 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
00878670 8B835C030000 mov eax, [ebx+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
00878676 E845F8C4FF call 004C7EC0
0087867B 84C0 test al, al
0087867D 0F85C3000000 jnz 00878746
00878683 6A24 push $24
* Possible String Reference to: '<27><>ʾ'
|
00878685 B970878700 mov ecx, $00878770
* Possible String Reference to: 'ȷ<><C8B7>Ҫɾ<D2AA><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0087868A BA78878700 mov edx, $00878778
*)
end;
procedure TfrmYSCRPB_QTTJ.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject);
begin
(*
00879478 55 push ebp
00879479 8BEC mov ebp, esp
0087947B B908000000 mov ecx, $00000008
00879480 6A00 push $00
00879482 6A00 push $00
00879484 49 dec ecx
00879485 75F9 jnz 00879480
00879487 51 push ecx
00879488 53 push ebx
00879489 56 push esi
0087948A 8BDA mov ebx, edx
0087948C 8BF0 mov esi, eax
0087948E 33C0 xor eax, eax
00879490 55 push ebp
* Possible String Reference to: '<27>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00879491 6886968700 push $00879686
***** TRY
|
00879496 64FF30 push dword ptr fs:[eax]
00879499 648920 mov fs:[eax], esp
0087949C 8D55FC lea edx, [ebp-$04]
0087949F 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;
|
008794A1 E81662D1FF call 0058F6BC
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
008794A6 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;
|
008794AC E89B2EDEFF 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;
|
008794B1 E8AE86DDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
008794B6 8B4050 mov eax, [eax+$50]
008794B9 8D55F4 lea edx, [ebp-$0C]
008794BC 8B08 mov ecx, [eax]
008794BE FF5110 call dword ptr [ecx+$10]
008794C1 8B45F4 mov eax, [ebp-$0C]
008794C4 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008794C7 E82014B9FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
008794CC 8B9E5C030000 mov ebx, [esi+$035C]
008794D2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
008794D4 E867EFC4FF call 004C8440
008794D9 8D55E0 lea edx, [ebp-$20]
008794DC 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008794DF E80814B9FF call 0040A8EC
008794E4 8B55E0 mov edx, [ebp-$20]
008794E7 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
008794EA E8D9F8B9FF call 00418DC8
008794EF 8D45E4 lea eax, [ebp-$1C]
008794F2 50 push eax
008794F3 8B55F8 mov edx, [ebp-$08]
008794F6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008794F8 E8B7D6C4FF call 004C6BB4
008794FD 5A pop edx
008794FE 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
00879500 FF91B4000000 call dword ptr [ecx+$00B4]
00879506 8BC3 mov eax, ebx
00879508 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087950A FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
00879510 8B9E0C030000 mov ebx, [esi+$030C]
00879516 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00879518 E8B7C3C4FF call 004C58D4
0087951D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087951F E8884AC6FF call 004DDFAC
00879524 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
00879526 FF5244 call dword ptr [edx+$44]
00879529 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087952B E87C4AC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YCL_SG_HZ '
|
00879530 BA9C968700 mov edx, $0087969C
00879535 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00879537 FF5138 call dword ptr [ecx+$38]
0087953A 8D55DC lea edx, [ebp-$24]
0087953D 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00879540 E8A713B9FF call 0040A8EC
00879545 837DDC00 cmp dword ptr [ebp-$24], +$00
00879549 7440 jz 0087958B
* Possible String Reference to: ' Set '
|
0087954B 68B8968700 push $008796B8
00879550 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
00879553 68C8968700 push $008796C8
00879558 8D55D4 lea edx, [ebp-$2C]
0087955B 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087955E E88913B9FF call 0040A8EC
00879563 FF75D4 push dword ptr [ebp-$2C]
00879566 68D4968700 push $008796D4
0087956B 8D45D8 lea eax, [ebp-$28]
0087956E BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
00879573 E83CC1B8FF call 004056B4
00879578 8B45D8 mov eax, [ebp-$28]
0087957B 50 push eax
0087957C 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087957E E8294AC6FF call 004DDFAC
00879583 5A pop edx
00879584 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
00879586 FF5138 call dword ptr [ecx+$38]
00879589 EB2B jmp 008795B6
0087958B 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087958D E81A4AC6FF call 004DDFAC
00879592 50 push eax
* Possible String Reference to: ' Set '
|
00879593 68B8968700 push $008796B8
00879598 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0087959B 68E0968700 push $008796E0
008795A0 8D45D0 lea eax, [ebp-$30]
008795A3 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
008795A8 E807C1B8FF call 004056B4
008795AD 8B55D0 mov edx, [ebp-$30]
008795B0 58 pop eax
008795B1 8B08 mov ecx, [eax]
008795B3 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
008795B6 68F0968700 push $008796F0
008795BB 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QTTJ.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject);
begin
(*
00879744 55 push ebp
00879745 8BEC mov ebp, esp
00879747 B924000000 mov ecx, $00000024
0087974C 6A00 push $00
0087974E 6A00 push $00
00879750 49 dec ecx
00879751 75F9 jnz 0087974C
00879753 53 push ebx
00879754 56 push esi
00879755 8BF2 mov esi, edx
00879757 8BD8 mov ebx, eax
00879759 33C0 xor eax, eax
0087975B 55 push ebp
* Possible String Reference to: '<27>⫸<EFBFBD><E2ABB8><EFBFBD>^[<5B><>]<5D>'
|
0087975C 680D9F8700 push $00879F0D
***** TRY
|
00879761 64FF30 push dword ptr fs:[eax]
00879764 648920 mov fs:[eax], esp
00879767 8D55FC lea edx, [ebp-$04]
0087976A 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;
|
0087976C E84B5FD1FF call 0058F6BC
00879771 8D55D8 lea edx, [ebp-$28]
00879774 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00879777 E87011B9FF call 0040A8EC
0087977C 837DD800 cmp dword ptr [ebp-$28], +$00
00879780 7513 jnz 00879795
00879782 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);
|
00879785 E8D63BBAFF call 0041D360
0087978A 8D55C8 lea edx, [ebp-$38]
0087978D 8D45FC lea eax, [ebp-$04]
* Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData);
|
00879790 E87BE5B9FF call 00417D10
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
00879795 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;
|
0087979B E8AC2BDEFF 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;
|
008797A0 E8BF83DDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
008797A5 8B4050 mov eax, [eax+$50]
008797A8 8D55C4 lea edx, [ebp-$3C]
008797AB 8B08 mov ecx, [eax]
008797AD FF5110 call dword ptr [ecx+$10]
008797B0 8B45C4 mov eax, [ebp-$3C]
008797B3 8D55E0 lea edx, [ebp-$20]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008797B6 E83111B9FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
008797BB 8BB35C030000 mov esi, [ebx+$035C]
008797C1 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Edit(TDataSet);
|
008797C3 E878ECC4FF call 004C8440
008797C8 8D55B0 lea edx, [ebp-$50]
008797CB 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008797CE E81911B9FF call 0040A8EC
008797D3 8B55B0 mov edx, [ebp-$50]
008797D6 8D45B4 lea eax, [ebp-$4C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
008797D9 E8EAF5B9FF call 00418DC8
008797DE 8D45B4 lea eax, [ebp-$4C]
008797E1 50 push eax
008797E2 8B55E0 mov edx, [ebp-$20]
008797E5 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008797E7 E8C8D3C4FF call 004C6BB4
008797EC 5A pop edx
008797ED 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
008797EF FF91B4000000 call dword ptr [ecx+$00B4]
008797F5 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QTTJ.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject);
begin
(*
0087A120 55 push ebp
0087A121 8BEC mov ebp, esp
0087A123 B908000000 mov ecx, $00000008
0087A128 6A00 push $00
0087A12A 6A00 push $00
0087A12C 49 dec ecx
0087A12D 75F9 jnz 0087A128
0087A12F 51 push ecx
0087A130 53 push ebx
0087A131 56 push esi
0087A132 8BDA mov ebx, edx
0087A134 8BF0 mov esi, eax
0087A136 33C0 xor eax, eax
0087A138 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087A139 682EA38700 push $0087A32E
***** TRY
|
0087A13E 64FF30 push dword ptr fs:[eax]
0087A141 648920 mov fs:[eax], esp
0087A144 8D55FC lea edx, [ebp-$04]
0087A147 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;
|
0087A149 E86E55D1FF call 0058F6BC
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
0087A14E 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;
|
0087A154 E8F321DEFF 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;
|
0087A159 E8067ADDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0087A15E 8B4050 mov eax, [eax+$50]
0087A161 8D55F4 lea edx, [ebp-$0C]
0087A164 8B08 mov ecx, [eax]
0087A166 FF5110 call dword ptr [ecx+$10]
0087A169 8B45F4 mov eax, [ebp-$0C]
0087A16C 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A16F E87807B9FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087A174 8B9E5C030000 mov ebx, [esi+$035C]
0087A17A 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087A17C E8BFE2C4FF call 004C8440
0087A181 8D55E0 lea edx, [ebp-$20]
0087A184 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A187 E86007B9FF call 0040A8EC
0087A18C 8B55E0 mov edx, [ebp-$20]
0087A18F 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087A192 E831ECB9FF call 00418DC8
0087A197 8D45E4 lea eax, [ebp-$1C]
0087A19A 50 push eax
0087A19B 8B55F8 mov edx, [ebp-$08]
0087A19E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087A1A0 E80FCAC4FF call 004C6BB4
0087A1A5 5A pop edx
0087A1A6 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0087A1A8 FF91B4000000 call dword ptr [ecx+$00B4]
0087A1AE 8BC3 mov eax, ebx
0087A1B0 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087A1B2 FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
0087A1B8 8B9E0C030000 mov ebx, [esi+$030C]
0087A1BE 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087A1C0 E80FB7C4FF call 004C58D4
0087A1C5 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087A1C7 E8E03DC6FF call 004DDFAC
0087A1CC 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087A1CE FF5244 call dword ptr [edx+$44]
0087A1D1 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087A1D3 E8D43DC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087A1D8 BA44A38700 mov edx, $0087A344
0087A1DD 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087A1DF FF5138 call dword ptr [ecx+$38]
0087A1E2 8D55DC lea edx, [ebp-$24]
0087A1E5 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A1E8 E8FF06B9FF call 0040A8EC
0087A1ED 837DDC00 cmp dword ptr [ebp-$24], +$00
0087A1F1 7440 jz 0087A233
* Possible String Reference to: ' Set '
|
0087A1F3 6860A38700 push $0087A360
0087A1F8 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0087A1FB 6870A38700 push $0087A370
0087A200 8D55D4 lea edx, [ebp-$2C]
0087A203 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A206 E8E106B9FF call 0040A8EC
0087A20B FF75D4 push dword ptr [ebp-$2C]
0087A20E 687CA38700 push $0087A37C
0087A213 8D45D8 lea eax, [ebp-$28]
0087A216 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0087A21B E894B4B8FF call 004056B4
0087A220 8B45D8 mov eax, [ebp-$28]
0087A223 50 push eax
0087A224 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087A226 E8813DC6FF call 004DDFAC
0087A22B 5A pop edx
0087A22C 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087A22E FF5138 call dword ptr [ecx+$38]
0087A231 EB2B jmp 0087A25E
0087A233 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087A235 E8723DC6FF call 004DDFAC
0087A23A 50 push eax
* Possible String Reference to: ' Set '
|
0087A23B 6860A38700 push $0087A360
0087A240 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0087A243 6888A38700 push $0087A388
0087A248 8D45D0 lea eax, [ebp-$30]
0087A24B BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0087A250 E85FB4B8FF call 004056B4
0087A255 8B55D0 mov edx, [ebp-$30]
0087A258 58 pop eax
0087A259 8B08 mov ecx, [eax]
0087A25B FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087A25E 6898A38700 push $0087A398
0087A263 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QTTJ.ToolButton3Click(Sender : TObject);
begin
(*
0087A3EC 55 push ebp
0087A3ED 8BEC mov ebp, esp
0087A3EF B916000000 mov ecx, $00000016
0087A3F4 6A00 push $00
0087A3F6 6A00 push $00
0087A3F8 49 dec ecx
0087A3F9 75F9 jnz 0087A3F4
0087A3FB 51 push ecx
0087A3FC 53 push ebx
0087A3FD 56 push esi
0087A3FE 8945FC mov [ebp-$04], eax
0087A401 33C0 xor eax, eax
0087A403 55 push ebp
* Possible String Reference to: '那<><E982A3><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087A404 686DA78700 push $0087A76D
***** TRY
|
0087A409 64FF30 push dword ptr fs:[eax]
0087A40C 648920 mov fs:[eax], esp
0087A40F 33C0 xor eax, eax
0087A411 55 push ebp
0087A412 68F0A68700 push $0087A6F0
***** TRY
|
0087A417 64FF30 push dword ptr fs:[eax]
0087A41A 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.cxGridDBColumn3PropertiesButtonClick(Sender : TObject);
begin
(*
0087A8DC 55 push ebp
0087A8DD 8BEC mov ebp, esp
0087A8DF 51 push ecx
0087A8E0 B90C000000 mov ecx, $0000000C
0087A8E5 6A00 push $00
0087A8E7 6A00 push $00
0087A8E9 49 dec ecx
0087A8EA 75F9 jnz 0087A8E5
0087A8EC 51 push ecx
0087A8ED 874DFC xchg [ebp-$04], ecx
0087A8F0 53 push ebx
0087A8F1 56 push esi
0087A8F2 8BF0 mov esi, eax
0087A8F4 33C0 xor eax, eax
0087A8F6 55 push ebp
* Possible String Reference to: '鎞<><E98E9E><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087A8F7 6861AC8700 push $0087AC61
***** TRY
|
0087A8FC 64FF30 push dword ptr fs:[eax]
0087A8FF 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087A902 8B865C030000 mov eax, [esi+$035C]
* Possible String Reference to: 'YFType'
|
0087A908 BA78AC8700 mov edx, $0087AC78
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087A90D E8A2C2C4FF call 004C6BB4
0087A912 8D55F8 lea edx, [ebp-$08]
0087A915 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0087A917 FF5160 call dword ptr [ecx+$60]
0087A91A 8B45F8 mov eax, [ebp-$08]
0087A91D 8D55FC lea edx, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A920 E8C7FFB8FF call 0040A8EC
0087A925 837DFC00 cmp dword ptr [ebp-$04], +$00
0087A929 741D jz 0087A948
0087A92B 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087A92D B980AC8700 mov ecx, $0087AC80
* Possible String Reference to: '<27>Զ<EFBFBD><D4B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݲ<EFBFBD><DDB2>ܸ<EFBFBD><DCB8><EFBFBD>!'
|
0087A932 BA88AC8700 mov edx, $0087AC88
*)
end;
procedure TfrmYSCRPB_QTTJ.cxGridDBColumn6PropertiesButtonClick(Sender : TObject);
begin
(*
0087ADA4 55 push ebp
0087ADA5 8BEC mov ebp, esp
0087ADA7 51 push ecx
0087ADA8 B906000000 mov ecx, $00000006
0087ADAD 6A00 push $00
0087ADAF 6A00 push $00
0087ADB1 49 dec ecx
0087ADB2 75F9 jnz 0087ADAD
0087ADB4 51 push ecx
0087ADB5 874DFC xchg [ebp-$04], ecx
0087ADB8 53 push ebx
0087ADB9 56 push esi
0087ADBA 8BF0 mov esi, eax
0087ADBC 33C0 xor eax, eax
0087ADBE 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087ADBF 68FDAF8700 push $0087AFFD
***** TRY
|
0087ADC4 64FF30 push dword ptr fs:[eax]
0087ADC7 648920 mov fs:[eax], esp
0087ADCA 33C0 xor eax, eax
0087ADCC 55 push ebp
0087ADCD 68D3AF8700 push $0087AFD3
***** TRY
|
0087ADD2 64FF30 push dword ptr fs:[eax]
0087ADD5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column3PropertiesButtonClick(Sender : TObject);
begin
(*
0087B100 55 push ebp
0087B101 8BEC mov ebp, esp
0087B103 51 push ecx
0087B104 B906000000 mov ecx, $00000006
0087B109 6A00 push $00
0087B10B 6A00 push $00
0087B10D 49 dec ecx
0087B10E 75F9 jnz 0087B109
0087B110 51 push ecx
0087B111 874DFC xchg [ebp-$04], ecx
0087B114 53 push ebx
0087B115 56 push esi
0087B116 8BF0 mov esi, eax
0087B118 33C0 xor eax, eax
0087B11A 55 push ebp
* Possible String Reference to: '閗<><E99697><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087B11B 6859B38700 push $0087B359
***** TRY
|
0087B120 64FF30 push dword ptr fs:[eax]
0087B123 648920 mov fs:[eax], esp
0087B126 33C0 xor eax, eax
0087B128 55 push ebp
0087B129 682FB38700 push $0087B32F
***** TRY
|
0087B12E 64FF30 push dword ptr fs:[eax]
0087B131 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.ToolButton1Click(Sender : TObject);
begin
(*
0087B460 53 push ebx
0087B461 8BD8 mov ebx, eax
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087B463 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087B469 E852CAC4FF call 004C7EC0
0087B46E 84C0 test al, al
0087B470 7516 jnz 0087B488
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>б<EFBFBD>'
|
0087B472 B994B48700 mov ecx, $0087B494
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087B477 8B9320030000 mov edx, [ebx+$0320]
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
0087B47D 8B8334030000 mov eax, [ebx+$0334]
|
0087B483 E8A8CDF3FF call 007B8230
0087B488 5B pop ebx
0087B489 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column7PropertiesButtonClick(Sender : TObject);
begin
(*
0087B4A0 55 push ebp
0087B4A1 8BEC mov ebp, esp
0087B4A3 51 push ecx
0087B4A4 B919000000 mov ecx, $00000019
0087B4A9 6A00 push $00
0087B4AB 6A00 push $00
0087B4AD 49 dec ecx
0087B4AE 75F9 jnz 0087B4A9
0087B4B0 874DFC xchg [ebp-$04], ecx
0087B4B3 53 push ebx
0087B4B4 8945FC mov [ebp-$04], eax
0087B4B7 33C0 xor eax, eax
0087B4B9 55 push ebp
* Possible String Reference to: '鹐<><E9B990><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
0087B4BA 6836BA8700 push $0087BA36
***** TRY
|
0087B4BF 64FF30 push dword ptr fs:[eax]
0087B4C2 648920 mov fs:[eax], esp
0087B4C5 33C0 xor eax, eax
0087B4C7 55 push ebp
0087B4C8 68B5B98700 push $0087B9B5
***** TRY
|
0087B4CD 64FF30 push dword ptr fs:[eax]
0087B4D0 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.v2PSPropertiesEditValueChanged(Sender : TObject);
begin
(*
0087BBC4 55 push ebp
0087BBC5 8BEC mov ebp, esp
0087BBC7 B908000000 mov ecx, $00000008
0087BBCC 6A00 push $00
0087BBCE 6A00 push $00
0087BBD0 49 dec ecx
0087BBD1 75F9 jnz 0087BBCC
0087BBD3 53 push ebx
0087BBD4 56 push esi
0087BBD5 8BDA mov ebx, edx
0087BBD7 8BF0 mov esi, eax
0087BBD9 33C0 xor eax, eax
0087BBDB 55 push ebp
* Possible String Reference to: '<27>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087BBDC 68ACBD8700 push $0087BDAC
***** TRY
|
0087BBE1 64FF30 push dword ptr fs:[eax]
0087BBE4 648920 mov fs:[eax], esp
0087BBE7 8D55FC lea edx, [ebp-$04]
0087BBEA 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;
|
0087BBEC E8CB3AD1FF call 0058F6BC
0087BBF1 8D55F4 lea edx, [ebp-$0C]
0087BBF4 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BBF7 E8F0ECB8FF call 0040A8EC
0087BBFC 837DF400 cmp dword ptr [ebp-$0C], +$00
0087BC00 750D jnz 0087BC0F
0087BC02 8D45FC lea eax, [ebp-$04]
0087BC05 BAC4BD8700 mov edx, $0087BDC4
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0087BC0A E8AD97B8FF call 004053BC
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
0087BC0F 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;
|
0087BC15 E83207DEFF 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;
|
0087BC1A E8455FDDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0087BC1F 8B4050 mov eax, [eax+$50]
0087BC22 8D55F0 lea edx, [ebp-$10]
0087BC25 8B08 mov ecx, [eax]
0087BC27 FF5110 call dword ptr [ecx+$10]
0087BC2A 8B45F0 mov eax, [ebp-$10]
0087BC2D 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BC30 E8B7ECB8FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087BC35 8B9E5C030000 mov ebx, [esi+$035C]
0087BC3B 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087BC3D E8FEC7C4FF call 004C8440
0087BC42 8D55DC lea edx, [ebp-$24]
0087BC45 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BC48 E89FECB8FF call 0040A8EC
0087BC4D 8B55DC mov edx, [ebp-$24]
0087BC50 8D45E0 lea eax, [ebp-$20]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087BC53 E870D1B9FF call 00418DC8
0087BC58 8D45E0 lea eax, [ebp-$20]
0087BC5B 50 push eax
0087BC5C 8B55F8 mov edx, [ebp-$08]
0087BC5F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087BC61 E84EAFC4FF call 004C6BB4
0087BC66 5A pop edx
0087BC67 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0087BC69 FF91B4000000 call dword ptr [ecx+$00B4]
0087BC6F 8BC3 mov eax, ebx
0087BC71 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087BC73 FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
0087BC79 8B9E0C030000 mov ebx, [esi+$030C]
0087BC7F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087BC81 E84E9CC4FF call 004C58D4
0087BC86 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BC88 E81F23C6FF call 004DDFAC
0087BC8D 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087BC8F FF5244 call dword ptr [edx+$44]
0087BC92 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BC94 E81323C6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087BC99 BAD0BD8700 mov edx, $0087BDD0
0087BC9E 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087BCA0 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087BCA3 68ECBD8700 push $0087BDEC
0087BCA8 FF75F8 push dword ptr [ebp-$08]
0087BCAB 68FCBD8700 push $0087BDFC
0087BCB0 8D55D4 lea edx, [ebp-$2C]
0087BCB3 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BCB6 E831ECB8FF call 0040A8EC
0087BCBB FF75D4 push dword ptr [ebp-$2C]
0087BCBE 8D45D8 lea eax, [ebp-$28]
0087BCC1 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087BCC6 E8E999B8FF call 004056B4
0087BCCB 8B45D8 mov eax, [ebp-$28]
0087BCCE 50 push eax
0087BCCF 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BCD1 E8D622C6FF call 004DDFAC
0087BCD6 5A pop edx
0087BCD7 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087BCD9 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087BCDC 6808BE8700 push $0087BE08
0087BCE1 8D55CC lea edx, [ebp-$34]
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column2PropertiesEditValueChanged(Sender : TObject);
begin
(*
0087BE68 55 push ebp
0087BE69 8BEC mov ebp, esp
0087BE6B B907000000 mov ecx, $00000007
0087BE70 6A00 push $00
0087BE72 6A00 push $00
0087BE74 49 dec ecx
0087BE75 75F9 jnz 0087BE70
0087BE77 51 push ecx
0087BE78 53 push ebx
0087BE79 56 push esi
0087BE7A 8BDA mov ebx, edx
0087BE7C 8BF0 mov esi, eax
0087BE7E 33C0 xor eax, eax
0087BE80 55 push ebp
* Possible String Reference to: '鷊<><E9B78A><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087BE81 6838C08700 push $0087C038
***** TRY
|
0087BE86 64FF30 push dword ptr fs:[eax]
0087BE89 648920 mov fs:[eax], esp
0087BE8C 8D55FC lea edx, [ebp-$04]
0087BE8F 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;
|
0087BE91 E82638D1FF call 0058F6BC
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
0087BE96 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;
|
0087BE9C E8AB04DEFF 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;
|
0087BEA1 E8BE5CDDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0087BEA6 8B4050 mov eax, [eax+$50]
0087BEA9 8D55F4 lea edx, [ebp-$0C]
0087BEAC 8B08 mov ecx, [eax]
0087BEAE FF5110 call dword ptr [ecx+$10]
0087BEB1 8B45F4 mov eax, [ebp-$0C]
0087BEB4 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BEB7 E830EAB8FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087BEBC 8B9E5C030000 mov ebx, [esi+$035C]
0087BEC2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087BEC4 E877C5C4FF call 004C8440
0087BEC9 8D55E0 lea edx, [ebp-$20]
0087BECC 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BECF E818EAB8FF call 0040A8EC
0087BED4 8B55E0 mov edx, [ebp-$20]
0087BED7 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087BEDA E8E9CEB9FF call 00418DC8
0087BEDF 8D45E4 lea eax, [ebp-$1C]
0087BEE2 50 push eax
0087BEE3 8B55F8 mov edx, [ebp-$08]
0087BEE6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087BEE8 E8C7ACC4FF call 004C6BB4
0087BEED 5A pop edx
0087BEEE 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0087BEF0 FF91B4000000 call dword ptr [ecx+$00B4]
0087BEF6 8BC3 mov eax, ebx
0087BEF8 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087BEFA FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
0087BF00 8B9E0C030000 mov ebx, [esi+$030C]
0087BF06 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087BF08 E8C799C4FF call 004C58D4
0087BF0D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BF0F E89820C6FF call 004DDFAC
0087BF14 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087BF16 FF5244 call dword ptr [edx+$44]
0087BF19 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BF1B E88C20C6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087BF20 BA50C08700 mov edx, $0087C050
0087BF25 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087BF27 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087BF2A 686CC08700 push $0087C06C
0087BF2F FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0087BF32 687CC08700 push $0087C07C
0087BF37 8D55D8 lea edx, [ebp-$28]
0087BF3A 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BF3D E8AAE9B8FF call 0040A8EC
0087BF42 FF75D8 push dword ptr [ebp-$28]
0087BF45 6888C08700 push $0087C088
0087BF4A 8D45DC lea eax, [ebp-$24]
0087BF4D BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0087BF52 E85D97B8FF call 004056B4
0087BF57 8B45DC mov eax, [ebp-$24]
0087BF5A 50 push eax
0087BF5B 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087BF5D E84A20C6FF call 004DDFAC
0087BF62 5A pop edx
0087BF63 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087BF65 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087BF68 6894C08700 push $0087C094
0087BF6D 8D55D0 lea edx, [ebp-$30]
*)
end;
procedure TfrmYSCRPB_QTTJ.v2KPMoneyPropertiesEditValueChanged(Sender : TObject);
begin
(*
0087C0E8 55 push ebp
0087C0E9 8BEC mov ebp, esp
0087C0EB B90C000000 mov ecx, $0000000C
0087C0F0 6A00 push $00
0087C0F2 6A00 push $00
0087C0F4 49 dec ecx
0087C0F5 75F9 jnz 0087C0F0
0087C0F7 53 push ebx
0087C0F8 56 push esi
0087C0F9 8BDA mov ebx, edx
0087C0FB 8BF0 mov esi, eax
0087C0FD 33C0 xor eax, eax
0087C0FF 55 push ebp
0087C100 68DFC38700 push $0087C3DF
***** TRY
|
0087C105 64FF30 push dword ptr fs:[eax]
0087C108 648920 mov fs:[eax], esp
0087C10B 8D55FC lea edx, [ebp-$04]
0087C10E 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;
|
0087C110 E8A735D1FF call 0058F6BC
0087C115 8D55EC lea edx, [ebp-$14]
0087C118 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C11B E8CCE7B8FF call 0040A8EC
0087C120 837DEC00 cmp dword ptr [ebp-$14], +$00
0087C124 750D jnz 0087C133
0087C126 8D45FC lea eax, [ebp-$04]
0087C129 BAF4C38700 mov edx, $0087C3F4
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0087C12E E88992B8FF call 004053BC
* Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView
|
0087C133 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;
|
0087C139 E80E02DEFF 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;
|
0087C13E E8215ADDFF call 00651B64
* Reference to field TcxGridDBTableView.OFFS_0050
|
0087C143 8B4050 mov eax, [eax+$50]
0087C146 8D55E8 lea edx, [ebp-$18]
0087C149 8B08 mov ecx, [eax]
0087C14B FF5110 call dword ptr [ecx+$10]
0087C14E 8B45E8 mov eax, [ebp-$18]
0087C151 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C154 E893E7B8FF call 0040A8EC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087C159 8B9E5C030000 mov ebx, [esi+$035C]
0087C15F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087C161 E8DAC2C4FF call 004C8440
0087C166 8D55D4 lea edx, [ebp-$2C]
0087C169 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C16C E87BE7B8FF call 0040A8EC
0087C171 8B55D4 mov edx, [ebp-$2C]
0087C174 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087C177 E84CCCB9FF call 00418DC8
0087C17C 8D45D8 lea eax, [ebp-$28]
0087C17F 50 push eax
0087C180 8B55F0 mov edx, [ebp-$10]
0087C183 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C185 E82AAAC4FF call 004C6BB4
0087C18A 5A pop edx
0087C18B 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0087C18D FF91B4000000 call dword ptr [ecx+$00B4]
0087C193 8BC3 mov eax, ebx
0087C195 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087C197 FF924C020000 call dword ptr [edx+$024C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryTemp : TADOQuery
|
0087C19D 8B9E08030000 mov ebx, [esi+$0308]
0087C1A3 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087C1A5 E82A97C4FF call 004C58D4
0087C1AA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087C1AC E8FB1DC6FF call 004DDFAC
0087C1B1 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087C1B3 FF5244 call dword ptr [edx+$44]
* Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr
| om YF_Money_CR where YFID=''
|
0087C1B6 6800C48700 push $0087C400
* Possible String Reference to: 'YFID'
|
0087C1BB BA48C48700 mov edx, $0087C448
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087C1C0 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C1C6 E8E9A9C4FF call 004C6BB4
0087C1CB 8D55CC lea edx, [ebp-$34]
0087C1CE 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0087C1D0 FF5160 call dword ptr [ecx+$60]
0087C1D3 FF75CC push dword ptr [ebp-$34]
0087C1D6 6858C48700 push $0087C458
0087C1DB 8D45D0 lea eax, [ebp-$30]
0087C1DE BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0087C1E3 E8CC94B8FF call 004056B4
0087C1E8 8B45D0 mov eax, [ebp-$30]
0087C1EB 50 push eax
0087C1EC 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087C1EE E8B91DC6FF call 004DDFAC
0087C1F3 5A pop edx
0087C1F4 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087C1F6 FF5138 call dword ptr [ecx+$38]
0087C1F9 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087C1FB E8C896C4FF call 004C58C8
* Possible String Reference to: 'KPMoney'
|
0087C200 BA64C48700 mov edx, $0087C464
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryTemp : TADOQuery
|
0087C205 8B8608030000 mov eax, [esi+$0308]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C20B E8A4A9C4FF call 004C6BB4
0087C210 8D55F4 lea edx, [ebp-$0C]
0087C213 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_60
|
0087C215 FF5160 call dword ptr [ecx+$60]
* Possible String Reference to: 'KPMoney'
|
0087C218 BA64C48700 mov edx, $0087C464
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087C21D 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C223 E88CA9C4FF call 004C6BB4
0087C228 8D55F8 lea edx, [ebp-$08]
0087C22B 8B08 mov ecx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_60
|
0087C22D FF5160 call dword ptr [ecx+$60]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
0087C230 8B9E0C030000 mov ebx, [esi+$030C]
0087C236 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087C238 E89796C4FF call 004C58D4
0087C23D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087C23F E8681DC6FF call 004DDFAC
0087C244 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087C246 FF5244 call dword ptr [edx+$44]
0087C249 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087C24B E85C1DC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087C250 BA74C48700 mov edx, $0087C474
0087C255 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087C257 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087C25A 6890C48700 push $0087C490
0087C25F FF75F0 push dword ptr [ebp-$10]
0087C262 68A0C48700 push $0087C4A0
0087C267 8D55C4 lea edx, [ebp-$3C]
0087C26A 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C26D E87AE6B8FF call 0040A8EC
0087C272 FF75C4 push dword ptr [ebp-$3C]
0087C275 8D45C8 lea eax, [ebp-$38]
0087C278 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087C27D E83294B8FF call 004056B4
0087C282 8B45C8 mov eax, [ebp-$38]
0087C285 50 push eax
0087C286 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087C288 E81F1DC6FF call 004DDFAC
0087C28D 5A pop edx
0087C28E 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087C290 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087C293 68ACC48700 push $0087C4AC
0087C298 8D55BC lea edx, [ebp-$44]
*)
end;
procedure TfrmYSCRPB_QTTJ.Button1Click(Sender : TObject);
begin
(*
0087C568 55 push ebp
0087C569 8BEC mov ebp, esp
0087C56B B910000000 mov ecx, $00000010
0087C570 6A00 push $00
0087C572 6A00 push $00
0087C574 49 dec ecx
0087C575 75F9 jnz 0087C570
0087C577 51 push ecx
0087C578 53 push ebx
0087C579 56 push esi
0087C57A 57 push edi
0087C57B 8945FC mov [ebp-$04], eax
0087C57E 33C0 xor eax, eax
0087C580 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0087C581 68F9C88700 push $0087C8F9
***** TRY
|
0087C586 64FF30 push dword ptr fs:[eax]
0087C589 648920 mov fs:[eax], esp
0087C58C 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087C58F 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087C595 E826B9C4FF call 004C7EC0
0087C59A 84C0 test al, al
0087C59C 0F85F1020000 jnz 0087C893
0087C5A2 A008C98700 mov al, byte ptr [$0087C908]
0087C5A7 50 push eax
0087C5A8 8D45EC lea eax, [ebp-$14]
0087C5AB B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0087C5AD E8B2C7B9FF call 00418D64
0087C5B2 8D4DEC lea ecx, [ebp-$14]
0087C5B5 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087C5B8 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0087C5BE BA14C98700 mov edx, $0087C914
0087C5C3 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0087C5C5 FF9344020000 call dword ptr [ebx+$0244]
0087C5CB 84C0 test al, al
0087C5CD 751D jnz 0087C5EC
0087C5CF 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087C5D1 B91CC98700 mov ecx, $0087C91C
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0087C5D6 BA24C98700 mov edx, $0087C924
*)
end;
procedure TfrmYSCRPB_QTTJ.CheckBox1Click(Sender : TObject);
begin
(*
0087C9E4 55 push ebp
0087C9E5 8BEC mov ebp, esp
0087C9E7 33C9 xor ecx, ecx
0087C9E9 51 push ecx
0087C9EA 51 push ecx
0087C9EB 51 push ecx
0087C9EC 51 push ecx
0087C9ED 51 push ecx
0087C9EE 51 push ecx
0087C9EF 51 push ecx
0087C9F0 51 push ecx
0087C9F1 53 push ebx
0087C9F2 56 push esi
0087C9F3 57 push edi
0087C9F4 8BF0 mov esi, eax
0087C9F6 33C0 xor eax, eax
0087C9F8 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><7F><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0087C9F9 6821CB8700 push $0087CB21
***** TRY
|
0087C9FE 64FF30 push dword ptr fs:[eax]
0087CA01 648920 mov fs:[eax], esp
0087CA04 BA38CB8700 mov edx, $0087CB38
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087CA09 8B869C030000 mov eax, [esi+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087CA0F E80CBCC0FF call 00488620
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CA14 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087CA1A E8A1B4C4FF call 004C7EC0
0087CA1F 84C0 test al, al
0087CA21 0F85D4000000 jnz 0087CAFB
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CA27 8B9E5C030000 mov ebx, [esi+$035C]
0087CA2D 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.DisableControls(TDataSet);
|
0087CA2F E820ABC4FF call 004C7554
0087CA34 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
0087CA36 E8F5B5C4FF call 004C8030
0087CA3B E9A0000000 jmp 0087CAE0
0087CA40 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087CA42 E8F9B9C4FF call 004C8440
* Reference to control TfrmYSCRPB_QTTJ.CheckBox1 : TCheckBox
|
0087CA47 8B8684030000 mov eax, [esi+$0384]
0087CA4D 8B10 mov edx, [eax]
* Reference to method TCheckBox.GetChecked()
|
0087CA4F FF92C8000000 call dword ptr [edx+$00C8]
0087CA55 8BD0 mov edx, eax
0087CA57 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0087CA5A E805C3B9FF call 00418D64
0087CA5F 8D45F0 lea eax, [ebp-$10]
0087CA62 50 push eax
* Possible String Reference to: 'ssel'
|
0087CA63 BA44CB8700 mov edx, $0087CB44
0087CA68 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087CA6A E845A1C4FF call 004C6BB4
0087CA6F 5A pop edx
0087CA70 8B08 mov ecx, [eax]
* Reference to method TClientDataSet.DestroyFields()
|
0087CA72 FF91B4000000 call dword ptr [ecx+$00B4]
* Possible String Reference to: 'Money'
|
0087CA78 BA54CB8700 mov edx, $0087CB54
0087CA7D 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087CA7F E830A1C4FF call 004C6BB4
0087CA84 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_4C
|
0087CA86 FF524C call dword ptr [edx+$4C]
0087CA89 DF7DE4 fistp qword ptr [ebp-$1C]
0087CA8C 9B wait
0087CA8D 8D55E0 lea edx, [ebp-$20]
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087CA90 8BBE9C030000 mov edi, [esi+$039C]
0087CA96 8BC7 mov eax, edi
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0087CA98 E853BBC0FF call 004885F0
0087CA9D 8B45E0 mov eax, [ebp-$20]
* Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload;
|
0087CAA0 E8870CB9FF call 0040D72C
0087CAA5 D80D5CCB8700 fmul dword ptr [$0087CB5C]
0087CAAB DF6DE4 fild qword ptr [ebp-$1C]
0087CAAE DEC1 faddp st(1), st(0)
0087CAB0 D8355CCB8700 fdiv dword ptr [$0087CB5C]
0087CAB6 83C4F4 add esp, -$0C
0087CAB9 DB3C24 fstp tbyte ptr [esp]
0087CABC 9B wait
0087CABD 8D45EC lea eax, [ebp-$14]
|
0087CAC0 E8E70AB9FF call 0040D5AC
0087CAC5 8B55EC mov edx, [ebp-$14]
0087CAC8 8BC7 mov eax, edi
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087CACA E851BBC0FF call 00488620
0087CACF 8BC3 mov eax, ebx
0087CAD1 8B10 mov edx, [eax]
* Reference to method TClientDataSet.Post()
|
0087CAD3 FF924C020000 call dword ptr [edx+$024C]
0087CAD9 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Next(TDataSet);
|
0087CADB E86CB8C4FF call 004C834C
* Reference to field TClientDataSet.Eof : Boolean
|
0087CAE0 80BBA100000000 cmp byte ptr [ebx+$00A1], $00
0087CAE7 0F8453FFFFFF jz 0087CA40
0087CAED 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.First(TDataSet);
|
0087CAEF E83CB5C4FF call 004C8030
0087CAF4 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.EnableControls(TDataSet);
|
0087CAF6 E879AAC4FF call 004C7574
0087CAFB 33C0 xor eax, eax
0087CAFD 5A pop edx
0087CAFE 59 pop ecx
0087CAFF 59 pop ecx
0087CB00 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[<5B><>]<5D>'
|
0087CB03 6828CB8700 push $0087CB28
0087CB08 8D45E0 lea eax, [ebp-$20]
* Reference to: System.@LStrClr(void;void);
|
0087CB0B E81488B8FF call 00405324
0087CB10 8D45EC lea eax, [ebp-$14]
* Reference to: System.@LStrClr(void;void);
|
0087CB13 E80C88B8FF call 00405324
0087CB18 8D45F0 lea eax, [ebp-$10]
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
0087CB1B E8547BB9FF call 00414674
0087CB20 C3 ret
* Reference to: System.@HandleFinally;
|
0087CB21 E9CE7FB8FF jmp 00404AF4
0087CB26 EBE0 jmp 0087CB08
****** END
|
0087CB28 5F pop edi
0087CB29 5E pop esi
0087CB2A 5B pop ebx
0087CB2B 8BE5 mov esp, ebp
0087CB2D 5D pop ebp
0087CB2E C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.cxTabControl1Change(Sender : TObject);
begin
(*
0087CB60 53 push ebx
0087CB61 8BD8 mov ebx, eax
0087CB63 8BC3 mov eax, ebx
|
0087CB65 E8DEABFFFF call 00877748
0087CB6A 8BC3 mov eax, ebx
|
0087CB6C E8DBABFFFF call 0087774C
0087CB71 5B pop ebx
0087CB72 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.FormCreate(Sender : TObject);
begin
(*
0087CB74 55 push ebp
0087CB75 8BEC mov ebp, esp
0087CB77 6A00 push $00
0087CB79 6A00 push $00
0087CB7B 53 push ebx
0087CB7C 8BD8 mov ebx, eax
0087CB7E 33C0 xor eax, eax
0087CB80 55 push ebp
0087CB81 68EECB8700 push $0087CBEE
***** TRY
|
0087CB86 64FF30 push dword ptr fs:[eax]
0087CB89 648920 mov fs:[eax], esp
0087CB8C B205 mov dl, $05
* Reference to control TfrmYSCRPB_QTTJ.cxGrid2 : TcxGrid
|
0087CB8E 8B8330030000 mov eax, [ebx+$0330]
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
0087CB94 E843AFC0FF call 00487ADC
0087CB99 8D55FC lea edx, [ebp-$04]
*)
end;
procedure TfrmYSCRPB_QTTJ.TchkClick(Sender : TObject);
begin
(*
0087CBFC 55 push ebp
0087CBFD 8BEC mov ebp, esp
0087CBFF B904000000 mov ecx, $00000004
0087CC04 6A00 push $00
0087CC06 6A00 push $00
0087CC08 49 dec ecx
0087CC09 75F9 jnz 0087CC04
0087CC0B 51 push ecx
0087CC0C 53 push ebx
0087CC0D 56 push esi
0087CC0E 57 push edi
0087CC0F 8945FC mov [ebp-$04], eax
0087CC12 33C0 xor eax, eax
0087CC14 55 push ebp
* Possible String Reference to: '<27><>|<7C><><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0087CC15 68FBCD8700 push $0087CDFB
***** TRY
|
0087CC1A 64FF30 push dword ptr fs:[eax]
0087CC1D 648920 mov fs:[eax], esp
0087CC20 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CC23 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087CC29 E892B2C4FF call 004C7EC0
0087CC2E 84C0 test al, al
0087CC30 0F85A2010000 jnz 0087CDD8
0087CC36 A00CCE8700 mov al, byte ptr [$0087CE0C]
0087CC3B 50 push eax
0087CC3C 8D45EC lea eax, [ebp-$14]
0087CC3F B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0087CC41 E81EC1B9FF call 00418D64
0087CC46 8D4DEC lea ecx, [ebp-$14]
0087CC49 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CC4C 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0087CC52 BA18CE8700 mov edx, $0087CE18
0087CC57 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0087CC59 FF9344020000 call dword ptr [ebx+$0244]
0087CC5F 84C0 test al, al
0087CC61 751D jnz 0087CC80
0087CC63 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087CC65 B920CE8700 mov ecx, $0087CE20
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0087CC6A BA28CE8700 mov edx, $0087CE28
*)
end;
procedure TfrmYSCRPB_QTTJ.TnochkClick(Sender : TObject);
begin
(*
0087CEA4 55 push ebp
0087CEA5 8BEC mov ebp, esp
0087CEA7 B904000000 mov ecx, $00000004
0087CEAC 6A00 push $00
0087CEAE 6A00 push $00
0087CEB0 49 dec ecx
0087CEB1 75F9 jnz 0087CEAC
0087CEB3 51 push ecx
0087CEB4 53 push ebx
0087CEB5 56 push esi
0087CEB6 57 push edi
0087CEB7 8945FC mov [ebp-$04], eax
0087CEBA 33C0 xor eax, eax
0087CEBC 55 push ebp
* Possible String Reference to: '<27>Lz<4C><7A><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0087CEBD 68A3D08700 push $0087D0A3
***** TRY
|
0087CEC2 64FF30 push dword ptr fs:[eax]
0087CEC5 648920 mov fs:[eax], esp
0087CEC8 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CECB 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087CED1 E8EAAFC4FF call 004C7EC0
0087CED6 84C0 test al, al
0087CED8 0F85A2010000 jnz 0087D080
0087CEDE A0B4D08700 mov al, byte ptr [$0087D0B4]
0087CEE3 50 push eax
0087CEE4 8D45EC lea eax, [ebp-$14]
0087CEE7 B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0087CEE9 E876BEB9FF call 00418D64
0087CEEE 8D4DEC lea ecx, [ebp-$14]
0087CEF1 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087CEF4 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0087CEFA BAC0D08700 mov edx, $0087D0C0
0087CEFF 8B18 mov ebx, [eax]
* Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions)
|
0087CF01 FF9344020000 call dword ptr [ebx+$0244]
0087CF07 84C0 test al, al
0087CF09 751D jnz 0087CF28
0087CF0B 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087CF0D B9C8D08700 mov ecx, $0087D0C8
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0087CF12 BAD0D08700 mov edx, $0087D0D0
*)
end;
procedure TfrmYSCRPB_QTTJ.v2ComTaitouPropertiesButtonClick(Sender : TObject);
begin
(*
0087D14C 55 push ebp
0087D14D 8BEC mov ebp, esp
0087D14F 51 push ecx
0087D150 B906000000 mov ecx, $00000006
0087D155 6A00 push $00
0087D157 6A00 push $00
0087D159 49 dec ecx
0087D15A 75F9 jnz 0087D155
0087D15C 51 push ecx
0087D15D 874DFC xchg [ebp-$04], ecx
0087D160 53 push ebx
0087D161 56 push esi
0087D162 8BF0 mov esi, eax
0087D164 33C0 xor eax, eax
0087D166 55 push ebp
0087D167 68A3D38700 push $0087D3A3
***** TRY
|
0087D16C 64FF30 push dword ptr fs:[eax]
0087D16F 648920 mov fs:[eax], esp
0087D172 33C0 xor eax, eax
0087D174 55 push ebp
0087D175 6879D38700 push $0087D379
***** TRY
|
0087D17A 64FF30 push dword ptr fs:[eax]
0087D17D 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.TZDSCClick(Sender : TObject);
begin
(*
0087D488 55 push ebp
0087D489 8BEC mov ebp, esp
0087D48B B919000000 mov ecx, $00000019
0087D490 6A00 push $00
0087D492 6A00 push $00
0087D494 49 dec ecx
0087D495 75F9 jnz 0087D490
0087D497 53 push ebx
0087D498 56 push esi
0087D499 8945FC mov [ebp-$04], eax
0087D49C 33C0 xor eax, eax
0087D49E 55 push ebp
0087D49F 68F4D88700 push $0087D8F4
***** TRY
|
0087D4A4 64FF30 push dword ptr fs:[eax]
0087D4A7 648920 mov fs:[eax], esp
0087D4AA 8B4DFC mov ecx, [ebp-$04]
0087D4AD B201 mov dl, $01
* Reference to class TfrmFKCR
|
0087D4AF A1C4C67F00 mov eax, dword ptr [$007FC6C4]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0087D4B4 E81749C2FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QTTJ.VBZPropertiesButtonClick(Sender : TObject);
begin
(*
0087D9F4 55 push ebp
0087D9F5 8BEC mov ebp, esp
0087D9F7 51 push ecx
0087D9F8 B906000000 mov ecx, $00000006
0087D9FD 6A00 push $00
0087D9FF 6A00 push $00
0087DA01 49 dec ecx
0087DA02 75F9 jnz 0087D9FD
0087DA04 51 push ecx
0087DA05 874DFC xchg [ebp-$04], ecx
0087DA08 53 push ebx
0087DA09 56 push esi
0087DA0A 8BF0 mov esi, eax
0087DA0C 33C0 xor eax, eax
0087DA0E 55 push ebp
* Possible String Reference to: '<27><>n<EFBFBD><6E><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087DA0F 684DDC8700 push $0087DC4D
***** TRY
|
0087DA14 64FF30 push dword ptr fs:[eax]
0087DA17 648920 mov fs:[eax], esp
0087DA1A 33C0 xor eax, eax
0087DA1C 55 push ebp
0087DA1D 6823DC8700 push $0087DC23
***** TRY
|
0087DA22 64FF30 push dword ptr fs:[eax]
0087DA25 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column4PropertiesButtonClick(Sender : TObject);
begin
(*
0087DD38 55 push ebp
0087DD39 8BEC mov ebp, esp
0087DD3B 51 push ecx
0087DD3C B906000000 mov ecx, $00000006
0087DD41 6A00 push $00
0087DD43 6A00 push $00
0087DD45 49 dec ecx
0087DD46 75F9 jnz 0087DD41
0087DD48 51 push ecx
0087DD49 874DFC xchg [ebp-$04], ecx
0087DD4C 53 push ebx
0087DD4D 56 push esi
0087DD4E 8BF0 mov esi, eax
0087DD50 33C0 xor eax, eax
0087DD52 55 push ebp
* Possible String Reference to: '<27>^k<><6B><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087DD53 6891DF8700 push $0087DF91
***** TRY
|
0087DD58 64FF30 push dword ptr fs:[eax]
0087DD5B 648920 mov fs:[eax], esp
0087DD5E 33C0 xor eax, eax
0087DD60 55 push ebp
0087DD61 6867DF8700 push $0087DF67
***** TRY
|
0087DD66 64FF30 push dword ptr fs:[eax]
0087DD69 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column5PropertiesChange(Sender : TObject);
begin
(*
0087E08C 53 push ebx
0087E08D 56 push esi
0087E08E 8BD8 mov ebx, eax
* Possible String Reference to: 'Money'
|
0087E090 BACCE08700 mov edx, $0087E0CC
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087E095 8BB35C030000 mov esi, [ebx+$035C]
0087E09B 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087E09D E8128BC4FF call 004C6BB4
0087E0A2 8B10 mov edx, [eax]
* Possible reference to virtual method TClientDataSet.OFFS_4C
|
0087E0A4 FF524C call dword ptr [edx+$4C]
0087E0A7 D835D4E08700 fdiv dword ptr [$0087E0D4]
0087E0AD 83C4F8 add esp, -$08
0087E0B0 DD1C24 fstp qword ptr [esp]
0087E0B3 9B wait
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087E0B4 8B939C030000 mov edx, [ebx+$039C]
0087E0BA 8BC6 mov eax, esi
* Reference to : TfrmSelExportField._PROC_007B6D90()
|
0087E0BC E8CF8CF3FF call 007B6D90
0087E0C1 5E pop esi
0087E0C2 5B pop ebx
0087E0C3 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.v2ConNoHZPropertiesButtonClick(Sender : TObject);
begin
(*
0087E0D8 55 push ebp
0087E0D9 8BEC mov ebp, esp
0087E0DB 51 push ecx
0087E0DC B90B000000 mov ecx, $0000000B
0087E0E1 6A00 push $00
0087E0E3 6A00 push $00
0087E0E5 49 dec ecx
0087E0E6 75F9 jnz 0087E0E1
0087E0E8 874DFC xchg [ebp-$04], ecx
0087E0EB 53 push ebx
0087E0EC 56 push esi
0087E0ED 8BF0 mov esi, eax
0087E0EF 33C0 xor eax, eax
0087E0F1 55 push ebp
* Possible String Reference to: '<27>Bg<42><67><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E0F2 68ADE38700 push $0087E3AD
***** TRY
|
0087E0F7 64FF30 push dword ptr fs:[eax]
0087E0FA 648920 mov fs:[eax], esp
0087E0FD 8BCE mov ecx, esi
0087E0FF B201 mov dl, $01
* Reference to class TfrmJYorderConCX
|
0087E101 A164DF7D00 mov eax, dword ptr [$007DDF64]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0087E106 E8C53CC2FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QTTJ.v2GYSNamePropertiesButtonClick(Sender : TObject);
begin
(*
0087E4B8 55 push ebp
0087E4B9 8BEC mov ebp, esp
0087E4BB 51 push ecx
0087E4BC B905000000 mov ecx, $00000005
0087E4C1 6A00 push $00
0087E4C3 6A00 push $00
0087E4C5 49 dec ecx
0087E4C6 75F9 jnz 0087E4C1
0087E4C8 51 push ecx
0087E4C9 874DFC xchg [ebp-$04], ecx
0087E4CC 53 push ebx
0087E4CD 56 push esi
0087E4CE 8BF0 mov esi, eax
0087E4D0 33C0 xor eax, eax
0087E4D2 55 push ebp
* Possible String Reference to: '<27>Wd<57><64><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E4D3 6898E68700 push $0087E698
***** TRY
|
0087E4D8 64FF30 push dword ptr fs:[eax]
0087E4DB 648920 mov fs:[eax], esp
0087E4DE 33C0 xor eax, eax
0087E4E0 55 push ebp
0087E4E1 686EE68700 push $0087E66E
***** TRY
|
0087E4E6 64FF30 push dword ptr fs:[eax]
0087E4E9 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.v2Column6PropertiesButtonClick(Sender : TObject);
begin
(*
0087E730 55 push ebp
0087E731 8BEC mov ebp, esp
0087E733 51 push ecx
0087E734 B905000000 mov ecx, $00000005
0087E739 6A00 push $00
0087E73B 6A00 push $00
0087E73D 49 dec ecx
0087E73E 75F9 jnz 0087E739
0087E740 51 push ecx
0087E741 874DFC xchg [ebp-$04], ecx
0087E744 53 push ebx
0087E745 56 push esi
0087E746 8BF0 mov esi, eax
0087E748 33C0 xor eax, eax
0087E74A 55 push ebp
* Possible String Reference to: '<27><>a<EFBFBD><61><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E74B 6810E98700 push $0087E910
***** TRY
|
0087E750 64FF30 push dword ptr fs:[eax]
0087E753 648920 mov fs:[eax], esp
0087E756 33C0 xor eax, eax
0087E758 55 push ebp
0087E759 68E6E88700 push $0087E8E6
***** TRY
|
0087E75E 64FF30 push dword ptr fs:[eax]
0087E761 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ.ConNoKeyPress(Sender : TObject);
begin
(*
0087E9B0 55 push ebp
0087E9B1 8BEC mov ebp, esp
0087E9B3 6A00 push $00
0087E9B5 6A00 push $00
0087E9B7 6A00 push $00
0087E9B9 53 push ebx
0087E9BA 56 push esi
0087E9BB 8BF0 mov esi, eax
0087E9BD 33C0 xor eax, eax
0087E9BF 55 push ebp
* Possible String Reference to: '<27><>_<EFBFBD><5F><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E9C0 6815EB8700 push $0087EB15
***** TRY
|
0087E9C5 64FF30 push dword ptr fs:[eax]
0087E9C8 648920 mov fs:[eax], esp
0087E9CB 80390D cmp byte ptr [ecx], $0D
0087E9CE 0F851E010000 jnz 0087EAF2
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087E9D4 8B9E20030000 mov ebx, [esi+$0320]
0087E9DA 33D2 xor edx, edx
0087E9DC 8BC3 mov eax, ebx
0087E9DE 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_0190
|
0087E9E0 FF9190010000 call dword ptr [ecx+$0190]
0087E9E6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087E9E8 E8E76EC4FF call 004C58D4
0087E9ED 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087E9EF E8B8F5C5FF call 004DDFAC
0087E9F4 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087E9F6 FF5244 call dword ptr [edx+$44]
0087E9F9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087E9FB E8ACF5C5FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
0087EA00 BA2CEB8700 mov edx, $0087EB2C
0087EA05 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA07 FF5138 call dword ptr [ecx+$38]
0087EA0A 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA0C E89BF5C5FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
0087EA11 BA8CEB8700 mov edx, $0087EB8C
0087EA16 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA18 FF5138 call dword ptr [ecx+$38]
0087EA1B 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA1D E88AF5C5FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
0087EA22 BAE8EB8700 mov edx, $0087EBE8
0087EA27 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA29 FF5138 call dword ptr [ecx+$38]
0087EA2C 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA2E E879F5C5FF 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,'
|
0087EA33 BA44EC8700 mov edx, $0087EC44
0087EA38 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA3A FF5138 call dword ptr [ecx+$38]
0087EA3D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA3F E868F5C5FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
0087EA44 BAD4EC8700 mov edx, $0087ECD4
0087EA49 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA4B FF5138 call dword ptr [ecx+$38]
0087EA4E 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA50 E857F5C5FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
0087EA55 BAE0EC8700 mov edx, $0087ECE0
0087EA5A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EA5C FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.ConNO like '%'
|
0087EA5F 68FCEC8700 push $0087ECFC
0087EA64 8D55F4 lea edx, [ebp-$0C]
* Reference to control TfrmYSCRPB_QTTJ.ConNo : TEdit
|
0087EA67 8B86A4030000 mov eax, [esi+$03A4]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0087EA6D E87E9BC0FF call 004885F0
0087EA72 8B45F4 mov eax, [ebp-$0C]
0087EA75 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087EA78 E86FBEB8FF call 0040A8EC
0087EA7D FF75F8 push dword ptr [ebp-$08]
0087EA80 681CED8700 push $0087ED1C
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
0087EA85 6828ED8700 push $0087ED28
0087EA8A 8D45FC lea eax, [ebp-$04]
0087EA8D BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087EA92 E81D6CB8FF call 004056B4
0087EA97 8B45FC mov eax, [ebp-$04]
0087EA9A 50 push eax
0087EA9B 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EA9D E80AF5C5FF call 004DDFAC
0087EAA2 5A pop edx
0087EAA3 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EAA5 FF5138 call dword ptr [ecx+$38]
0087EAA8 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EAAA E8FDF4C5FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0087EAAF BA50ED8700 mov edx, $0087ED50
0087EAB4 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EAB6 FF5138 call dword ptr [ecx+$38]
0087EAB9 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087EABB E8086EC4FF call 004C58C8
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087EAC0 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087EAC6 8B8620030000 mov eax, [esi+$0320]
|
0087EACC E8BF83F3FF call 007B6E90
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087EAD1 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087EAD7 8B8620030000 mov eax, [esi+$0320]
|
0087EADD E83685F3FF call 007B7018
0087EAE2 BA7CED8700 mov edx, $0087ED7C
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087EAE7 8B869C030000 mov eax, [esi+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087EAED E82E9BC0FF call 00488620
0087EAF2 33C0 xor eax, eax
0087EAF4 5A pop edx
0087EAF5 59 pop ecx
0087EAF6 59 pop ecx
0087EAF7 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
0087EAFA 681CEB8700 push $0087EB1C
0087EAFF 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0087EB02 E81D68B8FF call 00405324
0087EB07 8D45F8 lea eax, [ebp-$08]
0087EB0A BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0087EB0F E83468B8FF call 00405348
0087EB14 C3 ret
* Reference to: System.@HandleFinally;
|
0087EB15 E9DA5FB8FF jmp 00404AF4
0087EB1A EBE3 jmp 0087EAFF
****** END
|
0087EB1C 5E pop esi
0087EB1D 5B pop ebx
0087EB1E 8BE5 mov esp, ebp
0087EB20 5D pop ebp
0087EB21 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.OrderNoKeyPress(Sender : TObject);
begin
(*
0087ED80 55 push ebp
0087ED81 8BEC mov ebp, esp
0087ED83 6A00 push $00
0087ED85 6A00 push $00
0087ED87 6A00 push $00
0087ED89 53 push ebx
0087ED8A 56 push esi
0087ED8B 8BF0 mov esi, eax
0087ED8D 33C0 xor eax, eax
0087ED8F 55 push ebp
* Possible String Reference to: '<27>\<5C><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087ED90 68E5EE8700 push $0087EEE5
***** TRY
|
0087ED95 64FF30 push dword ptr fs:[eax]
0087ED98 648920 mov fs:[eax], esp
0087ED9B 80390D cmp byte ptr [ecx], $0D
0087ED9E 0F851E010000 jnz 0087EEC2
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087EDA4 8B9E20030000 mov ebx, [esi+$0320]
0087EDAA 33D2 xor edx, edx
0087EDAC 8BC3 mov eax, ebx
0087EDAE 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_0190
|
0087EDB0 FF9190010000 call dword ptr [ecx+$0190]
0087EDB6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087EDB8 E8176BC4FF call 004C58D4
0087EDBD 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EDBF E8E8F1C5FF call 004DDFAC
0087EDC4 8B10 mov edx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_44
|
0087EDC6 FF5244 call dword ptr [edx+$44]
0087EDC9 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EDCB E8DCF1C5FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
0087EDD0 BAFCEE8700 mov edx, $0087EEFC
0087EDD5 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EDD7 FF5138 call dword ptr [ecx+$38]
0087EDDA 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EDDC E8CBF1C5FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
0087EDE1 BA5CEF8700 mov edx, $0087EF5C
0087EDE6 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EDE8 FF5138 call dword ptr [ecx+$38]
0087EDEB 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EDED E8BAF1C5FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
0087EDF2 BAB8EF8700 mov edx, $0087EFB8
0087EDF7 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EDF9 FF5138 call dword ptr [ecx+$38]
0087EDFC 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EDFE E8A9F1C5FF 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,'
|
0087EE03 BA14F08700 mov edx, $0087F014
0087EE08 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EE0A FF5138 call dword ptr [ecx+$38]
0087EE0D 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EE0F E898F1C5FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
0087EE14 BAA4F08700 mov edx, $0087F0A4
0087EE19 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EE1B FF5138 call dword ptr [ecx+$38]
0087EE1E 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EE20 E887F1C5FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
0087EE25 BAB0F08700 mov edx, $0087F0B0
0087EE2A 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EE2C FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.OrderNO like '%'
|
0087EE2F 68CCF08700 push $0087F0CC
0087EE34 8D55F4 lea edx, [ebp-$0C]
* Reference to control TfrmYSCRPB_QTTJ.OrderNo : TEdit
|
0087EE37 8B8688030000 mov eax, [esi+$0388]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0087EE3D E8AE97C0FF call 004885F0
0087EE42 8B45F4 mov eax, [ebp-$0C]
0087EE45 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087EE48 E89FBAB8FF call 0040A8EC
0087EE4D FF75F8 push dword ptr [ebp-$08]
0087EE50 68F0F08700 push $0087F0F0
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
0087EE55 68FCF08700 push $0087F0FC
0087EE5A 8D45FC lea eax, [ebp-$04]
0087EE5D BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087EE62 E84D68B8FF call 004056B4
0087EE67 8B45FC mov eax, [ebp-$04]
0087EE6A 50 push eax
0087EE6B 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EE6D E83AF1C5FF call 004DDFAC
0087EE72 5A pop edx
0087EE73 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EE75 FF5138 call dword ptr [ecx+$38]
0087EE78 8BC3 mov eax, ebx
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
0087EE7A E82DF1C5FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0087EE7F BA24F18700 mov edx, $0087F124
0087EE84 8B08 mov ecx, [eax]
* Possible reference to virtual method TADOQuery.OFFS_38
|
0087EE86 FF5138 call dword ptr [ecx+$38]
0087EE89 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087EE8B E8386AC4FF call 004C58C8
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087EE90 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087EE96 8B8620030000 mov eax, [esi+$0320]
|
0087EE9C E8EF7FF3FF call 007B6E90
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087EEA1 8B965C030000 mov edx, [esi+$035C]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryMain : TADOQuery
|
0087EEA7 8B8620030000 mov eax, [esi+$0320]
|
0087EEAD E86681F3FF call 007B7018
0087EEB2 BA50F18700 mov edx, $0087F150
* Reference to control TfrmYSCRPB_QTTJ.Label13 : TLabel
|
0087EEB7 8B869C030000 mov eax, [esi+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087EEBD E85E97C0FF call 00488620
0087EEC2 33C0 xor eax, eax
0087EEC4 5A pop edx
0087EEC5 59 pop ecx
0087EEC6 59 pop ecx
0087EEC7 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
0087EECA 68ECEE8700 push $0087EEEC
0087EECF 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0087EED2 E84D64B8FF call 00405324
0087EED7 8D45F8 lea eax, [ebp-$08]
0087EEDA BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0087EEDF E86464B8FF call 00405348
0087EEE4 C3 ret
* Reference to: System.@HandleFinally;
|
0087EEE5 E90A5CB8FF jmp 00404AF4
0087EEEA EBE3 jmp 0087EECF
****** END
|
0087EEEC 5E pop esi
0087EEED 5B pop ebx
0087EEEE 8BE5 mov esp, ebp
0087EEF0 5D pop ebp
0087EEF1 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.Tv2StylesGetContentStyle(Sender : TObject);
begin
(*
0087F154 55 push ebp
0087F155 8BEC mov ebp, esp
0087F157 5D pop ebp
0087F158 C20800 ret $0008
*)
end;
procedure TfrmYSCRPB_QTTJ.cxTabControl2Change(Sender : TObject);
begin
(*
0087F15C 53 push ebx
0087F15D 8BD8 mov ebx, eax
0087F15F 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.v2ConNo : TcxGridDBColumn
|
0087F161 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F167 E858AADAFF call 00629BC4
0087F16C 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.VOrderNo : TcxGridDBColumn
|
0087F16E 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F174 E84BAADAFF call 00629BC4
0087F179 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.TPrint : TToolButton
|
0087F17B 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0087F181 E88A93C0FF call 00488510
* Possible String Reference to: '<27>Է<EFBFBD><D4B7><EFBFBD>λ'
|
0087F186 BA84F28700 mov edx, $0087F284
* Reference to control TfrmYSCRPB_QTTJ.v2Column6 : TcxGridDBColumn
|
0087F18B 8B836C030000 mov eax, [ebx+$036C]
* Reference to : TcxCustomGridTableView._PROC_006295E0()
|
0087F191 E84AA4DAFF call 006295E0
0087F196 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.v2Huilv : TcxGridDBColumn
|
0087F198 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F19E E821AADAFF call 00629BC4
0087F1A3 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.v2RMBMoney : TcxGridDBColumn
|
0087F1A5 8B83D8030000 mov eax, [ebx+$03D8]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1AB E814AADAFF call 00629BC4
* Reference to control TfrmYSCRPB_QTTJ.cxTabControl2 : TcxTabControl
|
0087F1B0 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1B6 83B83C03000000 cmp dword ptr [eax+$033C], +$00
0087F1BD 751A jnz 0087F1D9
0087F1BF B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.v2ConNo : TcxGridDBColumn
|
0087F1C1 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1C7 E8F8A9DAFF call 00629BC4
0087F1CC B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.VOrderNo : TcxGridDBColumn
|
0087F1CE 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1D4 E8EBA9DAFF call 00629BC4
* Reference to control TfrmYSCRPB_QTTJ.cxTabControl2 : TcxTabControl
|
0087F1D9 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1DF 83B83C03000001 cmp dword ptr [eax+$033C], +$01
0087F1E6 750D jnz 0087F1F5
0087F1E8 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.TPrint : TToolButton
|
0087F1EA 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0087F1F0 E81B93C0FF call 00488510
* Reference to control TfrmYSCRPB_QTTJ.cxTabControl2 : TcxTabControl
|
0087F1F5 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1FB 83B83C03000002 cmp dword ptr [eax+$033C], +$02
0087F202 7544 jnz 0087F248
* Possible String Reference to: 'Ա<><D4B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0087F204 BA98F28700 mov edx, $0087F298
* Reference to control TfrmYSCRPB_QTTJ.v2Column6 : TcxGridDBColumn
|
0087F209 8B836C030000 mov eax, [ebx+$036C]
* Reference to : TcxCustomGridTableView._PROC_006295E0()
|
0087F20F E8CCA3DAFF call 006295E0
0087F214 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.v2ConNo : TcxGridDBColumn
|
0087F216 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F21C E8A3A9DAFF call 00629BC4
0087F221 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.VOrderNo : TcxGridDBColumn
|
0087F223 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F229 E896A9DAFF call 00629BC4
0087F22E 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.v2Huilv : TcxGridDBColumn
|
0087F230 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F236 E889A9DAFF call 00629BC4
0087F23B 33D2 xor edx, edx
* Reference to control TfrmYSCRPB_QTTJ.v2RMBMoney : TcxGridDBColumn
|
0087F23D 8B83D8030000 mov eax, [ebx+$03D8]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F243 E87CA9DAFF call 00629BC4
* Reference to control TfrmYSCRPB_QTTJ.cxTabControl2 : TcxTabControl
|
0087F248 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F24E 83B83C03000003 cmp dword ptr [eax+$033C], +$03
0087F255 751A jnz 0087F271
0087F257 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.v2ConNo : TcxGridDBColumn
|
0087F259 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F25F E860A9DAFF call 00629BC4
0087F264 B201 mov dl, $01
* Reference to control TfrmYSCRPB_QTTJ.VOrderNo : TcxGridDBColumn
|
0087F266 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F26C E853A9DAFF call 00629BC4
0087F271 8BC3 mov eax, ebx
|
0087F273 E8D484FFFF call 0087774C
0087F278 5B pop ebx
0087F279 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.RadioGroup1Click(Sender : TObject);
begin
(*
|
0087F2A4 E8A384FFFF call 0087774C
0087F2A9 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ.TPrintClick(Sender : TObject);
begin
(*
0087F2AC 55 push ebp
0087F2AD 8BEC mov ebp, esp
0087F2AF B90A000000 mov ecx, $0000000A
0087F2B4 6A00 push $00
0087F2B6 6A00 push $00
0087F2B8 49 dec ecx
0087F2B9 75F9 jnz 0087F2B4
0087F2BB 53 push ebx
0087F2BC 56 push esi
0087F2BD 8BF0 mov esi, eax
0087F2BF 33C0 xor eax, eax
0087F2C1 55 push ebp
* Possible String Reference to: '<27>{S<><53><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087F2C2 6874F78700 push $0087F774
***** TRY
|
0087F2C7 64FF30 push dword ptr fs:[eax]
0087F2CA 648920 mov fs:[eax], esp
* Reference to control TfrmYSCRPB_QTTJ.CDS_HZ : TClientDataSet
|
0087F2CD 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087F2D3 E8E88BC4FF call 004C7EC0
0087F2D8 84C0 test al, al
0087F2DA 0F8535040000 jnz 0087F715
0087F2E0 8D55F4 lea edx, [ebp-$0C]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_008787D1(Sender : TObject);
begin
(*
008787D1 8BEC mov ebp, esp
008787D3 B93B000000 mov ecx, $0000003B
008787D8 6A00 push $00
008787DA 6A00 push $00
008787DC 49 dec ecx
008787DD 75F9 jnz 008787D8
008787DF 51 push ecx
008787E0 53 push ebx
008787E1 56 push esi
008787E2 57 push edi
008787E3 8945FC mov [ebp-$04], eax
008787E6 33C0 xor eax, eax
008787E8 55 push ebp
* Possible String Reference to: '<27>S<EFBFBD><53><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
008787E9 689C918700 push $0087919C
***** TRY
|
008787EE 64FF30 push dword ptr fs:[eax]
008787F1 648920 mov fs:[eax], esp
008787F4 33C0 xor eax, eax
008787F6 55 push ebp
008787F7 68FF8F8700 push $00878FFF
***** TRY
|
008787FC 64FF30 push dword ptr fs:[eax]
008787FF 648920 mov fs:[eax], esp
00878802 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
00878805 8B800C030000 mov eax, [eax+$030C]
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
0087880B E81C36C6FF call 004DBE2C
* Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer;
|
00878810 E87F9AC5FF call 004D2294
* Possible String Reference to: 'YF_Money_CR'
|
00878815 68B8918700 push $008791B8
0087881A 6A04 push $04
0087881C 6A01 push $01
0087881E 8D55F8 lea edx, [ebp-$08]
00878821 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
00878824 8B800C030000 mov eax, [eax+$030C]
* Possible String Reference to: 'YC'
|
0087882A B9CC918700 mov ecx, $008791CC
* Reference to : TfrmSelExportField._PROC_007B7708()
|
0087882F E8D4EEF3FF call 007B7708
00878834 84C0 test al, al
00878836 753A jnz 00878872
00878838 33DB xor ebx, ebx
0087883A 8B45FC mov eax, [ebp-$04]
* Reference to control TfrmYSCRPB_QTTJ.ADOQueryCmd : TADOQuery
|
0087883D 8B800C030000 mov eax, [eax+$030C]
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
00878843 E8E435C6FF call 004DBE2C
* Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection);
|
00878848 E8939AC5FF call 004D22E0
0087884D 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087884F B9D0918700 mov ecx, $008791D0
* Possible String Reference to: 'ȡ<><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧ<EFBFBD>ܣ<EFBFBD>'
|
00878854 BAD8918700 mov edx, $008791D8
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_00879259(Sender : TObject);
begin
(*
00879259 7064 jo 008792BF
0087925B 61 popa
0087925C 7465 jz 008792C3
0087925E 205946 and [ecx+$46], bl
00879261 5F pop edi
00879262 4D dec ebp
00879263 6F outsd
00879264 6E outsb
00879265 65795F jns 008792C7
00879268 43 inc ebx
00879269 52 push edx
0087926A 49 dec ecx
0087926B 44 inc esp
0087926C 207365 and [ebx+$65], dh
0087926F 7420 jz 00879291
00879271 43 inc ebx
00879272 52 push edx
00879273 49 dec ecx
00879274 44 inc esp
00879275 3D43524944 cmp eax, $44495243
0087927A 2B31 sub esi, dword ptr [ecx]
0087927C 0000 add [eax], al
0087927E 0000 add [eax], al
00879280 FFFF DB $FF, $FF //
00879282 FFFF DB $FF, $FF //
00879284 1C00 sbb al, $00
00879286 0000 add [eax], al
00879288 7365 jnb 008792EF
0087928A 6C insb
0087928B 656374202A arpl gs:[eax+$2A], si
00879290 206672 and [esi+$72], ah
00879293 6F outsd
00879294 6D insd
00879295 205946 and [ecx+$46], bl
00879298 5F pop edi
00879299 4D dec ebp
0087929A 6F outsd
0087929B 6E outsb
0087929C 65795F jns 008792FE
0087929F 43 inc ebx
008792A0 52 push edx
008792A1 49 dec ecx
008792A2 44 inc esp
008792A3 2000 and [eax], al
008792A5 0000 add [eax], al
008792A7 00FF add bh, bh
008792A9 FFFF DB $FF, $FF //
008792AB FF2400 jmp dword ptr [eax+eax]
008792AE 0000 add [eax], al
008792B0 7365 jnb 00879317
008792B2 6C insb
008792B3 656374202A arpl gs:[eax+$2A], si
008792B8 206672 and [esi+$72], ah
008792BB 6F outsd
008792BC 6D insd
008792BD 205946 and [ecx+$46], bl
008792C0 5F pop edi
008792C1 4D dec ebp
008792C2 6F outsd
008792C3 6E outsb
008792C4 65795F jns 00879326
008792C7 4B dec ebx
008792C8 43 inc ebx
008792C9 207768 and [edi+$68], dh
008792CC 657265 jb 00879334
008792CF 2031 and [ecx], dh
008792D1 3C3E cmp al, $3E
008792D3 3100 xor [eax], eax
008792D5 0000 add [eax], al
008792D7 00FF add bh, bh
008792D9 FFFF DB $FF, $FF //
008792DB FF09 dec dword ptr [ecx]
008792DD 0000 add [eax], al
008792DF 004661 add [esi+$61], al
008792E2 63746F72 arpl [edi+ebp*2+$72], si
008792E6 794E jns 00879336
008792E8 6F outsd
008792E9 0000 add [eax], al
008792EB 00FF add bh, bh
008792ED FFFF DB $FF, $FF //
008792EF FF07 inc dword ptr [edi]
008792F1 0000 add [eax], al
008792F3 005A64 add [edx+$64], bl
008792F6 7953 jns 0087934B
008792F8 7472 jz 0087936C
008792FA 3100 xor [eax], eax
008792FC FFFF DB $FF, $FF //
008792FE FFFF DB $FF, $FF //
00879300 06 push es
00879301 0000 add [eax], al
00879303 00D3 add bl, dl
00879305 A6 cmpsb
00879306 B8B6B8B600 mov eax, $00B6B8B6
0087930B 00FF add bh, bh
0087930D FFFF DB $FF, $FF //
0087930F FF23 jmp dword ptr [ebx]
00879311 0000 add [eax], al
00879313 007365 add [ebx+$65], dh
00879316 6C insb
00879317 656374202A arpl gs:[eax+$2A], si
0087931C 206672 and [esi+$72], ah
0087931F 6F outsd
00879320 6D insd
00879321 205946 and [ecx+$46], bl
00879324 5F pop edi
00879325 4D dec ebp
00879326 6F outsd
00879327 6E outsb
00879328 65795F jns 0087938A
0087932B 43 inc ebx
0087932C 52 push edx
0087932D 207768 and [edi+$68], dh
00879330 657265 jb 00879398
00879333 2031 and [ecx], dh
00879335 3D3200FFFF cmp eax, $FFFF0032
0087933A FFFF DB $FF, $FF //
0087933C 0400 add al, +$00
0087933E 0000 add [eax], al
00879340 59 pop ecx
00879341 46 inc esi
00879342 49 dec ecx
00879343 44 inc esp
00879344 0000 add [eax], al
00879346 0000 add [eax], al
00879348 FFFF DB $FF, $FF //
0087934A FFFF DB $FF, $FF //
0087934C 06 push es
0087934D 0000 add [eax], al
0087934F 004669 add [esi+$69], al
00879352 6C insb
00879353 6C insb
00879354 657200 jb 00879357
00879357 00FF add bh, bh
00879359 FFFF DB $FF, $FF //
0087935B FF06 inc dword ptr [esi]
0087935D 0000 add [eax], al
0087935F 004352 add [ebx+$52], al
00879362 54 push esp
00879363 7970 jns 008793D5
00879365 650000 add gs:[eax], al
00879368 FFFF DB $FF, $FF //
0087936A FFFF DB $FF, $FF //
0087936C 0A00 or al, byte ptr [eax]
0087936E 0000 add [eax], al
00879370 D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl
00879376 B5C7 mov ch, $C7
00879378 BCC70000FF mov esp, $FF0000C7
0087937D FFFF DB $FF, $FF //
0087937F FF06 inc dword ptr [esi]
00879381 0000 add [eax], al
00879383 004352 add [ebx+$52], al
00879386 46 inc esi
00879387 6C insb
00879388 61 popa
00879389 670000 add [bx+si], al
0087938C FFFF DB $FF, $FF //
0087938E FFFF DB $FF, $FF //
00879390 07 pop es
00879391 0000 add [eax], al
00879393 005174 add [ecx+$74], dl
00879396 7946 jns 008793DE
00879398 6C insb
00879399 61 popa
0087939A 6700FF add bh, bh
0087939D FFFF DB $FF, $FF //
0087939F FF06 inc dword ptr [esi]
008793A1 0000 add [eax], al
008793A3 005946 add [ecx+$46], bl
008793A6 4E dec esi
008793A7 61 popa
008793A8 6D insd
008793A9 650000 add gs:[eax], al
008793AC FFFF DB $FF, $FF //
008793AE FFFF DB $FF, $FF //
008793B0 07 pop es
008793B1 0000 add [eax], al
008793B3 004665 add [esi+$65], al
008793B6 6554 push esp
008793B8 7970 jns 0087942A
008793BA 6500FF add bh, bh
008793BD FFFF DB $FF, $FF //
008793BF FF06 inc dword ptr [esi]
008793C1 0000 add [eax], al
008793C3 004352 add [ebx+$52], al
008793C6 54 push esp
008793C7 696D650000FFFF imul ebp, [ebp+$65], $FFFF0000
008793CE FFFF DB $FF, $FF //
008793D0 07 pop es
008793D1 0000 add [eax], al
008793D3 006368 add [ebx+$68], ah
008793D6 6B6E6F74 imul ebp, [esi+$6F], $74
008793DA 6500FF add bh, bh
008793DD FFFF DB $FF, $FF //
008793DF FF0A dec dword ptr [edx]
008793E1 0000 add [eax], al
008793E3 005946 add [ecx+$46], bl
008793E6 44 inc esp
008793E7 656646 inc si
008793EA 6C insb
008793EB 61 popa
008793EC 673100 xor [bx+si], eax
008793EF 00FF add bh, bh
008793F1 FFFF DB $FF, $FF //
008793F3 FF06 inc dword ptr [esi]
008793F5 0000 add [eax], al
008793F7 007374 add [ebx+$74], dh
008793FA 61 popa
008793FB 7475 jz 00879472
008793FD 7300 jnb 008793FF
008793FF 00FF add bh, bh
00879401 FFFF DB $FF, $FF //
00879403 FF0500000048 inc dword ptr [$48000000]
00879409 7569 jnz 00879474
0087940B 4C dec esp
0087940C 7600 jbe 0087940E
0087940E 0000 add [eax], al
00879410 FFFF DB $FF, $FF //
00879412 FFFF DB $FF, $FF //
00879414 050000004D add eax, +$4D000000
00879419 6F outsd
0087941A 6E outsb
0087941B 657900 jns 0087941E
0087941E 0000 add [eax], al
00879420 FFFF DB $FF, $FF //
00879422 FFFF DB $FF, $FF //
00879424 0300 add eax, [eax]
00879426 0000 add [eax], al
00879428 53 push ebx
00879429 4C dec esp
0087942A 56 push esi
0087942B 00FF add bh, bh
0087942D FFFF DB $FF, $FF //
0087942F FF06 inc dword ptr [esi]
00879431 0000 add [eax], al
00879433 00425A add [edx+$5A], al
00879436 54 push esp
00879437 7970 jns 008794A9
00879439 650000 add gs:[eax], al
0087943C FFFF DB $FF, $FF //
0087943E FFFF DB $FF, $FF //
00879440 0200 add al, byte ptr [eax]
00879442 0000 add [eax], al
00879444 A3A40000FF mov dword ptr [$FF0000A4], eax
00879449 FFFF DB $FF, $FF //
0087944B FF09 dec dword ptr [ecx]
0087944D 0000 add [eax], al
0087944F 00436F add [ebx+$6F], al
00879452 6D insd
00879453 54 push esp
00879454 61 popa
00879455 69746F75000000FF imul esi, [edi+ebp*2+$75], $FF000000
0087945D FFFF DB $FF, $FF //
0087945F FF0400 inc dword ptr [eax+eax]
00879462 0000 add [eax], al
00879464 59 pop ecx
00879465 46 inc esi
00879466 49 dec ecx
00879467 640000 add fs:[eax], al
0087946A 0000 add [eax], al
0087946C D4 aam
0087946D F6D0 not al
0087946F D0CA ror dl, 1
00879471 A7 cmpsd
00879472 B0DC mov al, $DC
00879474 2100 and [eax], eax
00879476 0000 add [eax], al
00879478 55 push ebp
00879479 8BEC mov ebp, esp
0087947B B908000000 mov ecx, $00000008
00879480 6A00 push $00
00879482 6A00 push $00
00879484 49 dec ecx
00879485 75F9 jnz 00879480
00879487 51 push ecx
00879488 53 push ebx
00879489 56 push esi
0087948A 8BDA mov ebx, edx
0087948C 8BF0 mov esi, eax
0087948E 33C0 xor eax, eax
00879490 55 push ebp
* Possible String Reference to: '<27>i<EFBFBD><69><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
00879491 6886968700 push $00879686
***** TRY
|
00879496 64FF30 push dword ptr fs:[eax]
00879499 648920 mov fs:[eax], esp
0087949C 8D55FC lea edx, [ebp-$04]
0087949F 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;
|
008794A1 E81662D1FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
008794A6 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;
|
008794AC E89B2EDEFF 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;
|
008794B1 E8AE86DDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
008794B6 8B4050 mov eax, [eax+$50]
008794B9 8D55F4 lea edx, [ebp-$0C]
008794BC 8B08 mov ecx, [eax]
008794BE FF5110 call dword ptr [ecx+$10]
008794C1 8B45F4 mov eax, [ebp-$0C]
008794C4 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008794C7 E82014B9FF call 0040A8EC
* Reference to control Label10 : N.A.
|
008794CC 8B9E5C030000 mov ebx, [esi+$035C]
008794D2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
008794D4 E867EFC4FF call 004C8440
008794D9 8D55E0 lea edx, [ebp-$20]
008794DC 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008794DF E80814B9FF call 0040A8EC
008794E4 8B55E0 mov edx, [ebp-$20]
008794E7 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
008794EA E8D9F8B9FF call 00418DC8
008794EF 8D45E4 lea eax, [ebp-$1C]
008794F2 50 push eax
008794F3 8B55F8 mov edx, [ebp-$08]
008794F6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008794F8 E8B7D6C4FF call 004C6BB4
008794FD 5A pop edx
008794FE 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
00879500 FF91B4000000 call dword ptr [ecx+$00B4]
00879506 8BC3 mov eax, ebx
00879508 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_024C
|
0087950A FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
00879510 8B9E0C030000 mov ebx, [esi+$030C]
00879516 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
00879518 E8B7C3C4FF call 004C58D4
0087951D 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;
|
0087951F E8884AC6FF call 004DDFAC
00879524 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
00879526 FF5244 call dword ptr [edx+$44]
00879529 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;
|
0087952B E87C4AC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YCL_SG_HZ '
|
00879530 BA9C968700 mov edx, $0087969C
00879535 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
00879537 FF5138 call dword ptr [ecx+$38]
0087953A 8D55DC lea edx, [ebp-$24]
0087953D 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00879540 E8A713B9FF call 0040A8EC
00879545 837DDC00 cmp dword ptr [ebp-$24], +$00
00879549 7440 jz 0087958B
* Possible String Reference to: ' Set '
|
0087954B 68B8968700 push $008796B8
00879550 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
00879553 68C8968700 push $008796C8
00879558 8D55D4 lea edx, [ebp-$2C]
0087955B 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087955E E88913B9FF call 0040A8EC
00879563 FF75D4 push dword ptr [ebp-$2C]
00879566 68D4968700 push $008796D4
0087956B 8D45D8 lea eax, [ebp-$28]
0087956E BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
00879573 E83CC1B8FF call 004056B4
00879578 8B45D8 mov eax, [ebp-$28]
0087957B 50 push eax
0087957C 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;
|
0087957E E8294AC6FF call 004DDFAC
00879583 5A pop edx
00879584 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
00879586 FF5138 call dword ptr [ecx+$38]
00879589 EB2B jmp 008795B6
0087958B 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;
|
0087958D E81A4AC6FF call 004DDFAC
00879592 50 push eax
* Possible String Reference to: ' Set '
|
00879593 68B8968700 push $008796B8
00879598 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0087959B 68E0968700 push $008796E0
008795A0 8D45D0 lea eax, [ebp-$30]
008795A3 BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
008795A8 E807C1B8FF call 004056B4
008795AD 8B55D0 mov edx, [ebp-$30]
008795B0 58 pop eax
008795B1 8B08 mov ecx, [eax]
008795B3 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
008795B6 68F0968700 push $008796F0
008795BB 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087969D(Sender : TObject);
begin
(*
0087969D 50 push eax
0087969E 6461 popa
008796A0 7465 jz 00879707
008796A2 205943 and [ecx+$43], bl
008796A5 4C dec esp
008796A6 5F pop edi
008796A7 53 push ebx
008796A8 47 inc edi
008796A9 5F pop edi
008796AA 48 dec eax
008796AB 5A pop edx
008796AC 2000 and [eax], al
008796AE 0000 add [eax], al
008796B0 FFFF DB $FF, $FF //
008796B2 FFFF DB $FF, $FF //
008796B4 0500000020 add eax, +$20000000
008796B9 53 push ebx
008796BA 657420 jz 008796DD
008796BD 0000 add [eax], al
008796BF 00FF add bh, bh
008796C1 FFFF DB $FF, $FF //
008796C3 FF02 inc dword ptr [edx]
008796C5 0000 add [eax], al
008796C7 003D270000FF add [$FF000027], bh
008796CD FFFF DB $FF, $FF //
008796CF FF01 inc dword ptr [ecx]
008796D1 0000 add [eax], al
008796D3 0027 add [edi], ah
008796D5 0000 add [eax], al
008796D7 00FF add bh, bh
008796D9 FFFF DB $FF, $FF //
008796DB FF050000003D inc dword ptr [$3D000000]
008796E1 4E dec esi
008796E2 55 push ebp
008796E3 4C dec esp
008796E4 4C dec esp
008796E5 0000 add [eax], al
008796E7 00FF add bh, bh
008796E9 FFFF DB $FF, $FF //
008796EB FF09 dec dword ptr [ecx]
008796ED 0000 add [eax], al
008796EF 002C4564697465 add [$65746964+eax*2], ch
008796F6 723D jb 00879735
008796F8 27 daa
008796F9 0000 add [eax], al
008796FB 00FF add bh, bh
008796FD FFFF DB $FF, $FF //
008796FF FF1400 call dword ptr [eax+eax]
00879702 0000 add [eax], al
00879704 2C45 sub al, $45
00879706 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087970F 657464 jz 00879776
00879712 61 popa
00879713 7465 jz 0087977A
00879715 2829 sub [ecx], ch
00879717 2000 and [eax], al
00879719 0000 add [eax], al
0087971B 00FF add bh, bh
0087971D FFFF DB $FF, $FF //
0087971F FF0E dec dword ptr [esi]
00879721 0000 add [eax], al
00879723 0020 add [eax], ah
00879725 7768 jnbe 0087978F
00879727 657265 jb 0087978F
0087972A 205375 and [ebx+$75], dl
0087972D 624964 bound ecx, qword ptr [ecx+$64]
00879730 3D270000FF cmp eax, $FF000027
00879735 FFFF DB $FF, $FF //
00879737 FF0500000053 inc dword ptr [$53000000]
0087973D 7562 jnz 008797A1
0087973F 49 dec ecx
00879740 640000 add fs:[eax], al
00879743 00558B add [ebp-$75], dl
00879746 EC in al, dx
00879747 B924000000 mov ecx, $00000024
0087974C 6A00 push $00
0087974E 6A00 push $00
00879750 49 dec ecx
00879751 75F9 jnz 0087974C
00879753 53 push ebx
00879754 56 push esi
00879755 8BF2 mov esi, edx
00879757 8BD8 mov ebx, eax
00879759 33C0 xor eax, eax
0087975B 55 push ebp
* Possible String Reference to: '<27>⫸<EFBFBD><E2ABB8><EFBFBD>^[<5B><>]<5D>'
|
0087975C 680D9F8700 push $00879F0D
***** TRY
|
00879761 64FF30 push dword ptr fs:[eax]
00879764 648920 mov fs:[eax], esp
00879767 8D55FC lea edx, [ebp-$04]
0087976A 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;
|
0087976C E84B5FD1FF call 0058F6BC
00879771 8D55D8 lea edx, [ebp-$28]
00879774 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00879777 E87011B9FF call 0040A8EC
0087977C 837DD800 cmp dword ptr [ebp-$28], +$00
00879780 7513 jnz 00879795
00879782 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);
|
00879785 E8D63BBAFF call 0041D360
0087978A 8D55C8 lea edx, [ebp-$38]
0087978D 8D45FC lea eax, [ebp-$04]
* Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData);
|
00879790 E87BE5B9FF call 00417D10
* Reference to control v1PRTColor : N.A.
|
00879795 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;
|
0087979B E8AC2BDEFF 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;
|
008797A0 E8BF83DDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
008797A5 8B4050 mov eax, [eax+$50]
008797A8 8D55C4 lea edx, [ebp-$3C]
008797AB 8B08 mov ecx, [eax]
008797AD FF5110 call dword ptr [ecx+$10]
008797B0 8B45C4 mov eax, [ebp-$3C]
008797B3 8D55E0 lea edx, [ebp-$20]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008797B6 E83111B9FF call 0040A8EC
* Reference to control Label10 : N.A.
|
008797BB 8BB35C030000 mov esi, [ebx+$035C]
008797C1 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Edit(TDataSet);
|
008797C3 E878ECC4FF call 004C8440
008797C8 8D55B0 lea edx, [ebp-$50]
008797CB 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
008797CE E81911B9FF call 0040A8EC
008797D3 8B55B0 mov edx, [ebp-$50]
008797D6 8D45B4 lea eax, [ebp-$4C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
008797D9 E8EAF5B9FF call 00418DC8
008797DE 8D45B4 lea eax, [ebp-$4C]
008797E1 50 push eax
008797E2 8B55E0 mov edx, [ebp-$20]
008797E5 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
008797E7 E8C8D3C4FF call 004C6BB4
008797EC 5A pop edx
008797ED 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
008797EF FF91B4000000 call dword ptr [ecx+$00B4]
008797F5 8D55AC lea edx, [ebp-$54]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087A009(Sender : TObject);
begin
(*
0087A009 50 push eax
0087A00A 6461 popa
0087A00C 7465 jz 0087A073
0087A00E 205946 and [ecx+$46], bl
0087A011 5F pop edi
0087A012 4D dec ebp
0087A013 6F outsd
0087A014 6E outsb
0087A015 65795F jns 0087A077
0087A018 43 inc ebx
0087A019 52 push edx
0087A01A 2000 and [eax], al
0087A01C FFFF DB $FF, $FF //
0087A01E FFFF DB $FF, $FF //
0087A020 0500000020 add eax, +$20000000
0087A025 53 push ebx
0087A026 657420 jz 0087A049
0087A029 0000 add [eax], al
0087A02B 00FF add bh, bh
0087A02D FFFF DB $FF, $FF //
0087A02F FF01 inc dword ptr [ecx]
0087A031 0000 add [eax], al
0087A033 003D000000FF add [$FF000000], bh
0087A039 FFFF DB $FF, $FF //
0087A03B FF07 inc dword ptr [edi]
0087A03D 0000 add [eax], al
0087A03F 002C4D6F6E6579 add [$79656E6F+ecx*2], ch
0087A046 3D00FFFFFF cmp eax, $FFFFFF00
0087A04B FF09 dec dword ptr [ecx]
0087A04D 0000 add [eax], al
0087A04F 002C42 add [edx+eax*2], ch
0087A052 42 inc edx
0087A053 4D dec ebp
0087A054 6F outsd
0087A055 6E outsb
0087A056 65793D jns 0087A096
0087A059 0000 add [eax], al
0087A05B 00FF add bh, bh
0087A05D FFFF DB $FF, $FF //
0087A05F FF09 dec dword ptr [ecx]
0087A061 0000 add [eax], al
0087A063 002C4564697465 add [$65746964+eax*2], ch
0087A06A 723D jb 0087A0A9
0087A06C 27 daa
0087A06D 0000 add [eax], al
0087A06F 00FF add bh, bh
0087A071 FFFF DB $FF, $FF //
0087A073 FF1400 call dword ptr [eax+eax]
0087A076 0000 add [eax], al
0087A078 2C45 sub al, $45
0087A07A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087A083 657464 jz 0087A0EA
0087A086 61 popa
0087A087 7465 jz 0087A0EE
0087A089 2829 sub [ecx], ch
0087A08B 2000 and [eax], al
0087A08D 0000 add [eax], al
0087A08F 00FF add bh, bh
0087A091 FFFF DB $FF, $FF //
0087A093 FF0D00000020 dec dword ptr [$20000000]
0087A099 7768 jnbe 0087A103
0087A09B 657265 jb 0087A103
0087A09E 205946 and [ecx+$46], bl
0087A0A1 49 dec ecx
0087A0A2 643D27000000 cmp eax, $00000027
0087A0A8 FFFF DB $FF, $FF //
0087A0AA FFFF DB $FF, $FF //
0087A0AC 0400 add al, +$00
0087A0AE 0000 add [eax], al
0087A0B0 59 pop ecx
0087A0B1 46 inc esi
0087A0B2 49 dec ecx
0087A0B3 640000 add fs:[eax], al
0087A0B6 0000 add [eax], al
0087A0B8 FFFF DB $FF, $FF //
0087A0BA FFFF DB $FF, $FF //
0087A0BC 2B00 sub eax, dword ptr [eax]
0087A0BE 0000 add [eax], al
0087A0C0 55 push ebp
0087A0C1 7064 jo 0087A127
0087A0C3 61 popa
0087A0C4 7465 jz 0087A12B
0087A0C6 205946 and [ecx+$46], bl
0087A0C9 5F pop edi
0087A0CA 4D dec ebp
0087A0CB 6F outsd
0087A0CC 6E outsb
0087A0CD 65795F jns 0087A12F
0087A0D0 4B dec ebx
0087A0D1 43 inc ebx
0087A0D2 205365 and [ebx+$65], dl
0087A0D5 7420 jz 0087A0F7
0087A0D7 4B dec ebx
0087A0D8 43 inc ebx
0087A0D9 42 inc edx
0087A0DA 42 inc edx
0087A0DB 4D dec ebp
0087A0DC 6F outsd
0087A0DD 6E outsb
0087A0DE 65793D jns 0087A11E
0087A0E1 4B dec ebx
0087A0E2 43 inc ebx
0087A0E3 42 inc edx
0087A0E4 42 inc edx
0087A0E5 4D dec ebp
0087A0E6 6F outsd
0087A0E7 6E outsb
0087A0E8 65792D jns 0087A118
0087A0EB 00FF add bh, bh
0087A0ED FFFF DB $FF, $FF //
0087A0EF FF01 inc dword ptr [ecx]
0087A0F1 0000 add [eax], al
0087A0F3 002B add [ebx], ch
0087A0F5 0000 add [eax], al
0087A0F7 00FF add bh, bh
0087A0F9 FFFF DB $FF, $FF //
0087A0FB FF0D00000020 dec dword ptr [$20000000]
0087A101 7768 jnbe 0087A16B
0087A103 657265 jb 0087A16B
0087A106 204352 and [ebx+$52], al
0087A109 49 dec ecx
0087A10A 44 inc esp
0087A10B 3D27000000 cmp eax, $00000027
0087A110 FFFF DB $FF, $FF //
0087A112 FFFF DB $FF, $FF //
0087A114 0400 add al, +$00
0087A116 0000 add [eax], al
0087A118 43 inc ebx
0087A119 52 push edx
0087A11A 49 dec ecx
0087A11B 44 inc esp
0087A11C 0000 add [eax], al
0087A11E 0000 add [eax], al
0087A120 55 push ebp
0087A121 8BEC mov ebp, esp
0087A123 B908000000 mov ecx, $00000008
0087A128 6A00 push $00
0087A12A 6A00 push $00
0087A12C 49 dec ecx
0087A12D 75F9 jnz 0087A128
0087A12F 51 push ecx
0087A130 53 push ebx
0087A131 56 push esi
0087A132 8BDA mov ebx, edx
0087A134 8BF0 mov esi, eax
0087A136 33C0 xor eax, eax
0087A138 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087A139 682EA38700 push $0087A32E
***** TRY
|
0087A13E 64FF30 push dword ptr fs:[eax]
0087A141 648920 mov fs:[eax], esp
0087A144 8D55FC lea edx, [ebp-$04]
0087A147 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;
|
0087A149 E86E55D1FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
0087A14E 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;
|
0087A154 E8F321DEFF 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;
|
0087A159 E8067ADDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0087A15E 8B4050 mov eax, [eax+$50]
0087A161 8D55F4 lea edx, [ebp-$0C]
0087A164 8B08 mov ecx, [eax]
0087A166 FF5110 call dword ptr [ecx+$10]
0087A169 8B45F4 mov eax, [ebp-$0C]
0087A16C 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A16F E87807B9FF call 0040A8EC
* Reference to control Label10 : N.A.
|
0087A174 8B9E5C030000 mov ebx, [esi+$035C]
0087A17A 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087A17C E8BFE2C4FF call 004C8440
0087A181 8D55E0 lea edx, [ebp-$20]
0087A184 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A187 E86007B9FF call 0040A8EC
0087A18C 8B55E0 mov edx, [ebp-$20]
0087A18F 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087A192 E831ECB9FF call 00418DC8
0087A197 8D45E4 lea eax, [ebp-$1C]
0087A19A 50 push eax
0087A19B 8B55F8 mov edx, [ebp-$08]
0087A19E 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087A1A0 E80FCAC4FF call 004C6BB4
0087A1A5 5A pop edx
0087A1A6 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
0087A1A8 FF91B4000000 call dword ptr [ecx+$00B4]
0087A1AE 8BC3 mov eax, ebx
0087A1B0 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_024C
|
0087A1B2 FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0087A1B8 8B9E0C030000 mov ebx, [esi+$030C]
0087A1BE 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087A1C0 E80FB7C4FF call 004C58D4
0087A1C5 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;
|
0087A1C7 E8E03DC6FF call 004DDFAC
0087A1CC 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0087A1CE FF5244 call dword ptr [edx+$44]
0087A1D1 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;
|
0087A1D3 E8D43DC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087A1D8 BA44A38700 mov edx, $0087A344
0087A1DD 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087A1DF FF5138 call dword ptr [ecx+$38]
0087A1E2 8D55DC lea edx, [ebp-$24]
0087A1E5 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A1E8 E8FF06B9FF call 0040A8EC
0087A1ED 837DDC00 cmp dword ptr [ebp-$24], +$00
0087A1F1 7440 jz 0087A233
* Possible String Reference to: ' Set '
|
0087A1F3 6860A38700 push $0087A360
0087A1F8 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0087A1FB 6870A38700 push $0087A370
0087A200 8D55D4 lea edx, [ebp-$2C]
0087A203 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087A206 E8E106B9FF call 0040A8EC
0087A20B FF75D4 push dword ptr [ebp-$2C]
0087A20E 687CA38700 push $0087A37C
0087A213 8D45D8 lea eax, [ebp-$28]
0087A216 BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0087A21B E894B4B8FF call 004056B4
0087A220 8B45D8 mov eax, [ebp-$28]
0087A223 50 push eax
0087A224 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;
|
0087A226 E8813DC6FF call 004DDFAC
0087A22B 5A pop edx
0087A22C 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087A22E FF5138 call dword ptr [ecx+$38]
0087A231 EB2B jmp 0087A25E
0087A233 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;
|
0087A235 E8723DC6FF call 004DDFAC
0087A23A 50 push eax
* Possible String Reference to: ' Set '
|
0087A23B 6860A38700 push $0087A360
0087A240 FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=NULL'
|
0087A243 6888A38700 push $0087A388
0087A248 8D45D0 lea eax, [ebp-$30]
0087A24B BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0087A250 E85FB4B8FF call 004056B4
0087A255 8B55D0 mov edx, [ebp-$30]
0087A258 58 pop eax
0087A259 8B08 mov ecx, [eax]
0087A25B FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087A25E 6898A38700 push $0087A398
0087A263 8D55C8 lea edx, [ebp-$38]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087A345(Sender : TObject);
begin
(*
0087A345 50 push eax
0087A346 6461 popa
0087A348 7465 jz 0087A3AF
0087A34A 205946 and [ecx+$46], bl
0087A34D 5F pop edi
0087A34E 4D dec ebp
0087A34F 6F outsd
0087A350 6E outsb
0087A351 65795F jns 0087A3B3
0087A354 43 inc ebx
0087A355 52 push edx
0087A356 2000 and [eax], al
0087A358 FFFF DB $FF, $FF //
0087A35A FFFF DB $FF, $FF //
0087A35C 0500000020 add eax, +$20000000
0087A361 53 push ebx
0087A362 657420 jz 0087A385
0087A365 0000 add [eax], al
0087A367 00FF add bh, bh
0087A369 FFFF DB $FF, $FF //
0087A36B FF02 inc dword ptr [edx]
0087A36D 0000 add [eax], al
0087A36F 003D270000FF add [$FF000027], bh
0087A375 FFFF DB $FF, $FF //
0087A377 FF01 inc dword ptr [ecx]
0087A379 0000 add [eax], al
0087A37B 0027 add [edi], ah
0087A37D 0000 add [eax], al
0087A37F 00FF add bh, bh
0087A381 FFFF DB $FF, $FF //
0087A383 FF050000003D inc dword ptr [$3D000000]
0087A389 4E dec esi
0087A38A 55 push ebp
0087A38B 4C dec esp
0087A38C 4C dec esp
0087A38D 0000 add [eax], al
0087A38F 00FF add bh, bh
0087A391 FFFF DB $FF, $FF //
0087A393 FF09 dec dword ptr [ecx]
0087A395 0000 add [eax], al
0087A397 002C4564697465 add [$65746964+eax*2], ch
0087A39E 723D jb 0087A3DD
0087A3A0 27 daa
0087A3A1 0000 add [eax], al
0087A3A3 00FF add bh, bh
0087A3A5 FFFF DB $FF, $FF //
0087A3A7 FF1400 call dword ptr [eax+eax]
0087A3AA 0000 add [eax], al
0087A3AC 2C45 sub al, $45
0087A3AE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087A3B7 657464 jz 0087A41E
0087A3BA 61 popa
0087A3BB 7465 jz 0087A422
0087A3BD 2829 sub [ecx], ch
0087A3BF 2000 and [eax], al
0087A3C1 0000 add [eax], al
0087A3C3 00FF add bh, bh
0087A3C5 FFFF DB $FF, $FF //
0087A3C7 FF0D00000020 dec dword ptr [$20000000]
0087A3CD 7768 jnbe 0087A437
0087A3CF 657265 jb 0087A437
0087A3D2 205946 and [ecx+$46], bl
0087A3D5 49 dec ecx
0087A3D6 643D27000000 cmp eax, $00000027
0087A3DC FFFF DB $FF, $FF //
0087A3DE FFFF DB $FF, $FF //
0087A3E0 0400 add al, +$00
0087A3E2 0000 add [eax], al
0087A3E4 59 pop ecx
0087A3E5 46 inc esi
0087A3E6 49 dec ecx
0087A3E7 640000 add fs:[eax], al
0087A3EA 0000 add [eax], al
0087A3EC 55 push ebp
0087A3ED 8BEC mov ebp, esp
0087A3EF B916000000 mov ecx, $00000016
0087A3F4 6A00 push $00
0087A3F6 6A00 push $00
0087A3F8 49 dec ecx
0087A3F9 75F9 jnz 0087A3F4
0087A3FB 51 push ecx
0087A3FC 53 push ebx
0087A3FD 56 push esi
0087A3FE 8945FC mov [ebp-$04], eax
0087A401 33C0 xor eax, eax
0087A403 55 push ebp
* Possible String Reference to: '那<><E982A3><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087A404 686DA78700 push $0087A76D
***** TRY
|
0087A409 64FF30 push dword ptr fs:[eax]
0087A40C 648920 mov fs:[eax], esp
0087A40F 33C0 xor eax, eax
0087A411 55 push ebp
0087A412 68F0A68700 push $0087A6F0
***** TRY
|
0087A417 64FF30 push dword ptr fs:[eax]
0087A41A 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087ACFD(Sender : TObject);
begin
(*
0087ACFD 50 push eax
0087ACFE 6461 popa
0087AD00 7465 jz 0087AD67
0087AD02 205946 and [ecx+$46], bl
0087AD05 5F pop edi
0087AD06 4D dec ebp
0087AD07 6F outsd
0087AD08 6E outsb
0087AD09 65795F jns 0087AD6B
0087AD0C 43 inc ebx
0087AD0D 52 push edx
0087AD0E 2000 and [eax], al
0087AD10 FFFF DB $FF, $FF //
0087AD12 FFFF DB $FF, $FF //
0087AD14 0D00000020 or eax, $20000000
0087AD19 53 push ebx
0087AD1A 657420 jz 0087AD3D
0087AD1D 59 pop ecx
0087AD1E 46 inc esi
0087AD1F 43 inc ebx
0087AD20 6F outsd
0087AD21 64653D27000000 cmp eax, $00000027
0087AD28 FFFF DB $FF, $FF //
0087AD2A FFFF DB $FF, $FF //
0087AD2C 0100 add [eax], eax
0087AD2E 0000 add [eax], al
0087AD30 27 daa
0087AD31 0000 add [eax], al
0087AD33 00FF add bh, bh
0087AD35 FFFF DB $FF, $FF //
0087AD37 FF0A dec dword ptr [edx]
0087AD39 0000 add [eax], al
0087AD3B 0020 add [eax], ah
0087AD3D 2C59 sub al, $59
0087AD3F 46 inc esi
0087AD40 4E dec esi
0087AD41 61 popa
0087AD42 6D insd
0087AD43 653D270000FF cmp eax, $FF000027
0087AD49 FFFF DB $FF, $FF //
0087AD4B FF09 dec dword ptr [ecx]
0087AD4D 0000 add [eax], al
0087AD4F 002C4564697465 add [$65746964+eax*2], ch
0087AD56 723D jb 0087AD95
0087AD58 27 daa
0087AD59 0000 add [eax], al
0087AD5B 00FF add bh, bh
0087AD5D FFFF DB $FF, $FF //
0087AD5F FF1400 call dword ptr [eax+eax]
0087AD62 0000 add [eax], al
0087AD64 2C45 sub al, $45
0087AD66 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087AD6F 657464 jz 0087ADD6
0087AD72 61 popa
0087AD73 7465 jz 0087ADDA
0087AD75 2829 sub [ecx], ch
0087AD77 2000 and [eax], al
0087AD79 0000 add [eax], al
0087AD7B 00FF add bh, bh
0087AD7D FFFF DB $FF, $FF //
0087AD7F FF0D00000020 dec dword ptr [$20000000]
0087AD85 7768 jnbe 0087ADEF
0087AD87 657265 jb 0087ADEF
0087AD8A 205946 and [ecx+$46], bl
0087AD8D 49 dec ecx
0087AD8E 643D27000000 cmp eax, $00000027
0087AD94 FFFF DB $FF, $FF //
0087AD96 FFFF DB $FF, $FF //
0087AD98 0400 add al, +$00
0087AD9A 0000 add [eax], al
0087AD9C 59 pop ecx
0087AD9D 46 inc esi
0087AD9E 49 dec ecx
0087AD9F 640000 add fs:[eax], al
0087ADA2 0000 add [eax], al
0087ADA4 55 push ebp
0087ADA5 8BEC mov ebp, esp
0087ADA7 51 push ecx
0087ADA8 B906000000 mov ecx, $00000006
0087ADAD 6A00 push $00
0087ADAF 6A00 push $00
0087ADB1 49 dec ecx
0087ADB2 75F9 jnz 0087ADAD
0087ADB4 51 push ecx
0087ADB5 874DFC xchg [ebp-$04], ecx
0087ADB8 53 push ebx
0087ADB9 56 push esi
0087ADBA 8BF0 mov esi, eax
0087ADBC 33C0 xor eax, eax
0087ADBE 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087ADBF 68FDAF8700 push $0087AFFD
***** TRY
|
0087ADC4 64FF30 push dword ptr fs:[eax]
0087ADC7 648920 mov fs:[eax], esp
0087ADCA 33C0 xor eax, eax
0087ADCC 55 push ebp
0087ADCD 68D3AF8700 push $0087AFD3
***** TRY
|
0087ADD2 64FF30 push dword ptr fs:[eax]
0087ADD5 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087B01A(Sender : TObject);
begin
(*
0087B01A 6E outsb
0087B01B 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00
0087B023 FF08 dec dword ptr [eax]
0087B025 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087B050(Sender : TObject);
begin
(*
0087B050 6E outsb
0087B051 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF
0087B059 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087B05D(Sender : TObject);
begin
(*
0087B05D 50 push eax
0087B05E 6461 popa
0087B060 7465 jz 0087B0C7
0087B062 205946 and [ecx+$46], bl
0087B065 5F pop edi
0087B066 4D dec ebp
0087B067 6F outsd
0087B068 6E outsb
0087B069 65795F jns 0087B0CB
0087B06C 43 inc ebx
0087B06D 52 push edx
0087B06E 2000 and [eax], al
0087B070 FFFF DB $FF, $FF //
0087B072 FFFF DB $FF, $FF //
0087B074 0E push cs
0087B075 0000 add [eax], al
0087B077 0020 add [eax], ah
0087B079 53 push ebx
0087B07A 657420 jz 0087B09D
0087B07D 51 push ecx
0087B07E 7479 jz 0087B0F9
0087B080 55 push ebp
0087B081 6E outsb
0087B082 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000
0087B08A FFFF DB $FF, $FF //
0087B08C 07 pop es
0087B08D 0000 add [eax], al
0087B08F 005A64 add [edx+$64], bl
0087B092 794E jns 0087B0E2
0087B094 61 popa
0087B095 6D insd
0087B096 6500FF add bh, bh
0087B099 FFFF DB $FF, $FF //
0087B09B FF01 inc dword ptr [ecx]
0087B09D 0000 add [eax], al
0087B09F 0027 add [edi], ah
0087B0A1 0000 add [eax], al
0087B0A3 00FF add bh, bh
0087B0A5 FFFF DB $FF, $FF //
0087B0A7 FF09 dec dword ptr [ecx]
0087B0A9 0000 add [eax], al
0087B0AB 002C4564697465 add [$65746964+eax*2], ch
0087B0B2 723D jb 0087B0F1
0087B0B4 27 daa
0087B0B5 0000 add [eax], al
0087B0B7 00FF add bh, bh
0087B0B9 FFFF DB $FF, $FF //
0087B0BB FF1400 call dword ptr [eax+eax]
0087B0BE 0000 add [eax], al
0087B0C0 2C45 sub al, $45
0087B0C2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087B0CB 657464 jz 0087B132
0087B0CE 61 popa
0087B0CF 7465 jz 0087B136
0087B0D1 2829 sub [ecx], ch
0087B0D3 2000 and [eax], al
0087B0D5 0000 add [eax], al
0087B0D7 00FF add bh, bh
0087B0D9 FFFF DB $FF, $FF //
0087B0DB FF0D00000020 dec dword ptr [$20000000]
0087B0E1 7768 jnbe 0087B14B
0087B0E3 657265 jb 0087B14B
0087B0E6 205946 and [ecx+$46], bl
0087B0E9 49 dec ecx
0087B0EA 643D27000000 cmp eax, $00000027
0087B0F0 FFFF DB $FF, $FF //
0087B0F2 FFFF DB $FF, $FF //
0087B0F4 0400 add al, +$00
0087B0F6 0000 add [eax], al
0087B0F8 59 pop ecx
0087B0F9 46 inc esi
0087B0FA 49 dec ecx
0087B0FB 640000 add fs:[eax], al
0087B0FE 0000 add [eax], al
0087B100 55 push ebp
0087B101 8BEC mov ebp, esp
0087B103 51 push ecx
0087B104 B906000000 mov ecx, $00000006
0087B109 6A00 push $00
0087B10B 6A00 push $00
0087B10D 49 dec ecx
0087B10E 75F9 jnz 0087B109
0087B110 51 push ecx
0087B111 874DFC xchg [ebp-$04], ecx
0087B114 53 push ebx
0087B115 56 push esi
0087B116 8BF0 mov esi, eax
0087B118 33C0 xor eax, eax
0087B11A 55 push ebp
* Possible String Reference to: '閗<><E99697><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087B11B 6859B38700 push $0087B359
***** TRY
|
0087B120 64FF30 push dword ptr fs:[eax]
0087B123 648920 mov fs:[eax], esp
0087B126 33C0 xor eax, eax
0087B128 55 push ebp
0087B129 682FB38700 push $0087B32F
***** TRY
|
0087B12E 64FF30 push dword ptr fs:[eax]
0087B131 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087B3B9(Sender : TObject);
begin
(*
0087B3B9 50 push eax
0087B3BA 6461 popa
0087B3BC 7465 jz 0087B423
0087B3BE 205946 and [ecx+$46], bl
0087B3C1 5F pop edi
0087B3C2 4D dec ebp
0087B3C3 6F outsd
0087B3C4 6E outsb
0087B3C5 65795F jns 0087B427
0087B3C8 43 inc ebx
0087B3C9 52 push edx
0087B3CA 2000 and [eax], al
0087B3CC FFFF DB $FF, $FF //
0087B3CE FFFF DB $FF, $FF //
0087B3D0 1100 adc [eax], eax
0087B3D2 0000 add [eax], al
0087B3D4 205365 and [ebx+$65], dl
0087B3D7 7420 jz 0087B3F9
0087B3D9 50 push eax
0087B3DA 5F pop edi
0087B3DB 43 inc ebx
0087B3DC 6F outsd
0087B3DD 64654E dec esi
0087B3E0 61 popa
0087B3E1 6D insd
0087B3E2 653D27000000 cmp eax, $00000027
0087B3E8 FFFF DB $FF, $FF //
0087B3EA FFFF DB $FF, $FF //
0087B3EC 07 pop es
0087B3ED 0000 add [eax], al
0087B3EF 005A64 add [edx+$64], bl
0087B3F2 794E jns 0087B442
0087B3F4 61 popa
0087B3F5 6D insd
0087B3F6 6500FF add bh, bh
0087B3F9 FFFF DB $FF, $FF //
0087B3FB FF01 inc dword ptr [ecx]
0087B3FD 0000 add [eax], al
0087B3FF 0027 add [edi], ah
0087B401 0000 add [eax], al
0087B403 00FF add bh, bh
0087B405 FFFF DB $FF, $FF //
0087B407 FF09 dec dword ptr [ecx]
0087B409 0000 add [eax], al
0087B40B 002C4564697465 add [$65746964+eax*2], ch
0087B412 723D jb 0087B451
0087B414 27 daa
0087B415 0000 add [eax], al
0087B417 00FF add bh, bh
0087B419 FFFF DB $FF, $FF //
0087B41B FF1400 call dword ptr [eax+eax]
0087B41E 0000 add [eax], al
0087B420 2C45 sub al, $45
0087B422 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087B42B 657464 jz 0087B492
0087B42E 61 popa
0087B42F 7465 jz 0087B496
0087B431 2829 sub [ecx], ch
0087B433 2000 and [eax], al
0087B435 0000 add [eax], al
0087B437 00FF add bh, bh
0087B439 FFFF DB $FF, $FF //
0087B43B FF0D00000020 dec dword ptr [$20000000]
0087B441 7768 jnbe 0087B4AB
0087B443 657265 jb 0087B4AB
0087B446 205946 and [ecx+$46], bl
0087B449 49 dec ecx
0087B44A 643D27000000 cmp eax, $00000027
0087B450 FFFF DB $FF, $FF //
0087B452 FFFF DB $FF, $FF //
0087B454 0400 add al, +$00
0087B456 0000 add [eax], al
0087B458 59 pop ecx
0087B459 46 inc esi
0087B45A 49 dec ecx
0087B45B 640000 add fs:[eax], al
0087B45E 0000 add [eax], al
0087B460 53 push ebx
0087B461 8BD8 mov ebx, eax
* Reference to control ToolButton1 : TToolButton
|
0087B463 8B8320030000 mov eax, [ebx+$0320]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087B469 E852CAC4FF call 004C7EC0
0087B46E 84C0 test al, al
0087B470 7516 jnz 0087B488
* Possible String Reference to: 'Ӧ<>տ<EFBFBD><D5BF>б<EFBFBD>'
|
0087B472 B994B48700 mov ecx, $0087B494
* Reference to control ToolButton1 : TToolButton
|
0087B477 8B9320030000 mov edx, [ebx+$0320]
* Reference to control v1PRTColor : N.A.
|
0087B47D 8B8334030000 mov eax, [ebx+$0334]
|
0087B483 E8A8CDF3FF call 007B8230
0087B488 5B pop ebx
0087B489 C3 ret
0087B48A 0000 add [eax], al
0087B48C FFFF DB $FF, $FF //
0087B48E FFFF DB $FF, $FF //
0087B490 0A00 or al, byte ptr [eax]
0087B492 0000 add [eax], al
0087B494 D3A6CAD5BFEE shl dword ptr [esi+$EEBFD5CA], cl
0087B49A C1D0B1 rcl eax, $B1
0087B49D ED in eax, dx
0087B49E 0000 add [eax], al
0087B4A0 55 push ebp
0087B4A1 8BEC mov ebp, esp
0087B4A3 51 push ecx
0087B4A4 B919000000 mov ecx, $00000019
0087B4A9 6A00 push $00
0087B4AB 6A00 push $00
0087B4AD 49 dec ecx
0087B4AE 75F9 jnz 0087B4A9
0087B4B0 874DFC xchg [ebp-$04], ecx
0087B4B3 53 push ebx
0087B4B4 8945FC mov [ebp-$04], eax
0087B4B7 33C0 xor eax, eax
0087B4B9 55 push ebp
* Possible String Reference to: '鹐<><E9B990><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
0087B4BA 6836BA8700 push $0087BA36
***** TRY
|
0087B4BF 64FF30 push dword ptr fs:[eax]
0087B4C2 648920 mov fs:[eax], esp
0087B4C5 33C0 xor eax, eax
0087B4C7 55 push ebp
0087B4C8 68B5B98700 push $0087B9B5
***** TRY
|
0087B4CD 64FF30 push dword ptr fs:[eax]
0087B4D0 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087BACD(Sender : TObject);
begin
(*
0087BACD 50 push eax
0087BACE 6461 popa
0087BAD0 7465 jz 0087BB37
0087BAD2 205946 and [ecx+$46], bl
0087BAD5 5F pop edi
0087BAD6 4D dec ebp
0087BAD7 6F outsd
0087BAD8 6E outsb
0087BAD9 65795F jns 0087BB3B
0087BADC 43 inc ebx
0087BADD 52 push edx
0087BADE 2000 and [eax], al
0087BAE0 FFFF DB $FF, $FF //
0087BAE2 FFFF DB $FF, $FF //
0087BAE4 0D00000020 or eax, $20000000
0087BAE9 53 push ebx
0087BAEA 657420 jz 0087BB0D
0087BAED 4D dec ebp
0087BAEE 61 popa
0087BAEF 696E49643D2700 imul ebp, [esi+$49], $00273D64
0087BAF6 0000 add [eax], al
0087BAF8 FFFF DB $FF, $FF //
0087BAFA FFFF DB $FF, $FF //
0087BAFC 0100 add [eax], eax
0087BAFE 0000 add [eax], al
0087BB00 27 daa
0087BB01 0000 add [eax], al
0087BB03 00FF add bh, bh
0087BB05 FFFF DB $FF, $FF //
0087BB07 FF09 dec dword ptr [ecx]
0087BB09 0000 add [eax], al
0087BB0B 0020 add [eax], ah
0087BB0D 2C53 sub al, $53
0087BB0F 7562 jnz 0087BB73
0087BB11 49 dec ecx
0087BB12 643D27000000 cmp eax, $00000027
0087BB18 FFFF DB $FF, $FF //
0087BB1A FFFF DB $FF, $FF //
0087BB1C 0500000053 add eax, +$53000000
0087BB21 7562 jnz 0087BB85
0087BB23 49 dec ecx
0087BB24 640000 add fs:[eax], al
0087BB27 00FF add bh, bh
0087BB29 FFFF DB $FF, $FF //
0087BB2B FF0E dec dword ptr [esi]
0087BB2D 0000 add [eax], al
0087BB2F 0020 add [eax], ah
0087BB31 2C70 sub al, $70
0087BB33 5F pop edi
0087BB34 43 inc ebx
0087BB35 6F outsd
0087BB36 64654E dec esi
0087BB39 61 popa
0087BB3A 6D insd
0087BB3B 653D270000FF cmp eax, $FF000027
0087BB41 FFFF DB $FF, $FF //
0087BB43 FF0A dec dword ptr [edx]
0087BB45 0000 add [eax], al
0087BB47 0020 add [eax], ah
0087BB49 2C50 sub al, $50
0087BB4B 5F pop edi
0087BB4C 53 push ebx
0087BB4D 7065 jo 0087BBB4
0087BB4F 633D270000FF arpl [$FF000027], di
0087BB55 FFFF DB $FF, $FF //
0087BB57 FF0B dec dword ptr [ebx]
0087BB59 0000 add [eax], al
0087BB5B 0020 add [eax], ah
0087BB5D 2C4F sub al, $4F
0087BB5F 7264 jb 0087BBC5
0087BB61 65724E jb 0087BBB2
0087BB64 6F outsd
0087BB65 3D2700FFFF cmp eax, $FFFF0027
0087BB6A FFFF DB $FF, $FF //
0087BB6C 0900 or [eax], eax
0087BB6E 0000 add [eax], al
0087BB70 2C45 sub al, $45
0087BB72 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D
0087BB7B 00FF add bh, bh
0087BB7D FFFF DB $FF, $FF //
0087BB7F FF1400 call dword ptr [eax+eax]
0087BB82 0000 add [eax], al
0087BB84 2C45 sub al, $45
0087BB86 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087BB8F 657464 jz 0087BBF6
0087BB92 61 popa
0087BB93 7465 jz 0087BBFA
0087BB95 2829 sub [ecx], ch
0087BB97 2000 and [eax], al
0087BB99 0000 add [eax], al
0087BB9B 00FF add bh, bh
0087BB9D FFFF DB $FF, $FF //
0087BB9F FF0D00000020 dec dword ptr [$20000000]
0087BBA5 7768 jnbe 0087BC0F
0087BBA7 657265 jb 0087BC0F
0087BBAA 205946 and [ecx+$46], bl
0087BBAD 49 dec ecx
0087BBAE 643D27000000 cmp eax, $00000027
0087BBB4 FFFF DB $FF, $FF //
0087BBB6 FFFF DB $FF, $FF //
0087BBB8 0400 add al, +$00
0087BBBA 0000 add [eax], al
0087BBBC 59 pop ecx
0087BBBD 46 inc esi
0087BBBE 49 dec ecx
0087BBBF 640000 add fs:[eax], al
0087BBC2 0000 add [eax], al
0087BBC4 55 push ebp
0087BBC5 8BEC mov ebp, esp
0087BBC7 B908000000 mov ecx, $00000008
0087BBCC 6A00 push $00
0087BBCE 6A00 push $00
0087BBD0 49 dec ecx
0087BBD1 75F9 jnz 0087BBCC
0087BBD3 53 push ebx
0087BBD4 56 push esi
0087BBD5 8BDA mov ebx, edx
0087BBD7 8BF0 mov esi, eax
0087BBD9 33C0 xor eax, eax
0087BBDB 55 push ebp
* Possible String Reference to: '<27>C<EFBFBD><43><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087BBDC 68ACBD8700 push $0087BDAC
***** TRY
|
0087BBE1 64FF30 push dword ptr fs:[eax]
0087BBE4 648920 mov fs:[eax], esp
0087BBE7 8D55FC lea edx, [ebp-$04]
0087BBEA 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;
|
0087BBEC E8CB3AD1FF call 0058F6BC
0087BBF1 8D55F4 lea edx, [ebp-$0C]
0087BBF4 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BBF7 E8F0ECB8FF call 0040A8EC
0087BBFC 837DF400 cmp dword ptr [ebp-$0C], +$00
0087BC00 750D jnz 0087BC0F
0087BC02 8D45FC lea eax, [ebp-$04]
0087BC05 BAC4BD8700 mov edx, $0087BDC4
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0087BC0A E8AD97B8FF call 004053BC
* Reference to control v1PRTColor : N.A.
|
0087BC0F 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;
|
0087BC15 E83207DEFF 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;
|
0087BC1A E8455FDDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0087BC1F 8B4050 mov eax, [eax+$50]
0087BC22 8D55F0 lea edx, [ebp-$10]
0087BC25 8B08 mov ecx, [eax]
0087BC27 FF5110 call dword ptr [ecx+$10]
0087BC2A 8B45F0 mov eax, [ebp-$10]
0087BC2D 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BC30 E8B7ECB8FF call 0040A8EC
* Reference to control Label10 : N.A.
|
0087BC35 8B9E5C030000 mov ebx, [esi+$035C]
0087BC3B 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087BC3D E8FEC7C4FF call 004C8440
0087BC42 8D55DC lea edx, [ebp-$24]
0087BC45 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BC48 E89FECB8FF call 0040A8EC
0087BC4D 8B55DC mov edx, [ebp-$24]
0087BC50 8D45E0 lea eax, [ebp-$20]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087BC53 E870D1B9FF call 00418DC8
0087BC58 8D45E0 lea eax, [ebp-$20]
0087BC5B 50 push eax
0087BC5C 8B55F8 mov edx, [ebp-$08]
0087BC5F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087BC61 E84EAFC4FF call 004C6BB4
0087BC66 5A pop edx
0087BC67 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
0087BC69 FF91B4000000 call dword ptr [ecx+$00B4]
0087BC6F 8BC3 mov eax, ebx
0087BC71 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_024C
|
0087BC73 FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0087BC79 8B9E0C030000 mov ebx, [esi+$030C]
0087BC7F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087BC81 E84E9CC4FF call 004C58D4
0087BC86 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;
|
0087BC88 E81F23C6FF call 004DDFAC
0087BC8D 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0087BC8F FF5244 call dword ptr [edx+$44]
0087BC92 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;
|
0087BC94 E81323C6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087BC99 BAD0BD8700 mov edx, $0087BDD0
0087BC9E 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087BCA0 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087BCA3 68ECBD8700 push $0087BDEC
0087BCA8 FF75F8 push dword ptr [ebp-$08]
0087BCAB 68FCBD8700 push $0087BDFC
0087BCB0 8D55D4 lea edx, [ebp-$2C]
0087BCB3 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BCB6 E831ECB8FF call 0040A8EC
0087BCBB FF75D4 push dword ptr [ebp-$2C]
0087BCBE 8D45D8 lea eax, [ebp-$28]
0087BCC1 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087BCC6 E8E999B8FF call 004056B4
0087BCCB 8B45D8 mov eax, [ebp-$28]
0087BCCE 50 push eax
0087BCCF 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;
|
0087BCD1 E8D622C6FF call 004DDFAC
0087BCD6 5A pop edx
0087BCD7 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087BCD9 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087BCDC 6808BE8700 push $0087BE08
0087BCE1 8D55CC lea edx, [ebp-$34]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087BDD1(Sender : TObject);
begin
(*
0087BDD1 50 push eax
0087BDD2 6461 popa
0087BDD4 7465 jz 0087BE3B
0087BDD6 205946 and [ecx+$46], bl
0087BDD9 5F pop edi
0087BDDA 4D dec ebp
0087BDDB 6F outsd
0087BDDC 6E outsb
0087BDDD 65795F jns 0087BE3F
0087BDE0 43 inc ebx
0087BDE1 52 push edx
0087BDE2 2000 and [eax], al
0087BDE4 FFFF DB $FF, $FF //
0087BDE6 FFFF DB $FF, $FF //
0087BDE8 0500000020 add eax, +$20000000
0087BDED 53 push ebx
0087BDEE 657420 jz 0087BE11
0087BDF1 0000 add [eax], al
0087BDF3 00FF add bh, bh
0087BDF5 FFFF DB $FF, $FF //
0087BDF7 FF01 inc dword ptr [ecx]
0087BDF9 0000 add [eax], al
0087BDFB 003D000000FF add [$FF000000], bh
0087BE01 FFFF DB $FF, $FF //
0087BE03 FF09 dec dword ptr [ecx]
0087BE05 0000 add [eax], al
0087BE07 002C4564697465 add [$65746964+eax*2], ch
0087BE0E 723D jb 0087BE4D
0087BE10 27 daa
0087BE11 0000 add [eax], al
0087BE13 00FF add bh, bh
0087BE15 FFFF DB $FF, $FF //
0087BE17 FF01 inc dword ptr [ecx]
0087BE19 0000 add [eax], al
0087BE1B 0027 add [edi], ah
0087BE1D 0000 add [eax], al
0087BE1F 00FF add bh, bh
0087BE21 FFFF DB $FF, $FF //
0087BE23 FF1400 call dword ptr [eax+eax]
0087BE26 0000 add [eax], al
0087BE28 2C45 sub al, $45
0087BE2A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087BE33 657464 jz 0087BE9A
0087BE36 61 popa
0087BE37 7465 jz 0087BE9E
0087BE39 2829 sub [ecx], ch
0087BE3B 2000 and [eax], al
0087BE3D 0000 add [eax], al
0087BE3F 00FF add bh, bh
0087BE41 FFFF DB $FF, $FF //
0087BE43 FF0D00000020 dec dword ptr [$20000000]
0087BE49 7768 jnbe 0087BEB3
0087BE4B 657265 jb 0087BEB3
0087BE4E 205946 and [ecx+$46], bl
0087BE51 49 dec ecx
0087BE52 643D27000000 cmp eax, $00000027
0087BE58 FFFF DB $FF, $FF //
0087BE5A FFFF DB $FF, $FF //
0087BE5C 0400 add al, +$00
0087BE5E 0000 add [eax], al
0087BE60 59 pop ecx
0087BE61 46 inc esi
0087BE62 49 dec ecx
0087BE63 640000 add fs:[eax], al
0087BE66 0000 add [eax], al
0087BE68 55 push ebp
0087BE69 8BEC mov ebp, esp
0087BE6B B907000000 mov ecx, $00000007
0087BE70 6A00 push $00
0087BE72 6A00 push $00
0087BE74 49 dec ecx
0087BE75 75F9 jnz 0087BE70
0087BE77 51 push ecx
0087BE78 53 push ebx
0087BE79 56 push esi
0087BE7A 8BDA mov ebx, edx
0087BE7C 8BF0 mov esi, eax
0087BE7E 33C0 xor eax, eax
0087BE80 55 push ebp
* Possible String Reference to: '鷊<><E9B78A><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087BE81 6838C08700 push $0087C038
***** TRY
|
0087BE86 64FF30 push dword ptr fs:[eax]
0087BE89 648920 mov fs:[eax], esp
0087BE8C 8D55FC lea edx, [ebp-$04]
0087BE8F 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;
|
0087BE91 E82638D1FF call 0058F6BC
* Reference to control v1PRTColor : N.A.
|
0087BE96 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;
|
0087BE9C E8AB04DEFF 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;
|
0087BEA1 E8BE5CDDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0087BEA6 8B4050 mov eax, [eax+$50]
0087BEA9 8D55F4 lea edx, [ebp-$0C]
0087BEAC 8B08 mov ecx, [eax]
0087BEAE FF5110 call dword ptr [ecx+$10]
0087BEB1 8B45F4 mov eax, [ebp-$0C]
0087BEB4 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BEB7 E830EAB8FF call 0040A8EC
* Reference to control Label10 : N.A.
|
0087BEBC 8B9E5C030000 mov ebx, [esi+$035C]
0087BEC2 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087BEC4 E877C5C4FF call 004C8440
0087BEC9 8D55E0 lea edx, [ebp-$20]
0087BECC 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BECF E818EAB8FF call 0040A8EC
0087BED4 8B55E0 mov edx, [ebp-$20]
0087BED7 8D45E4 lea eax, [ebp-$1C]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087BEDA E8E9CEB9FF call 00418DC8
0087BEDF 8D45E4 lea eax, [ebp-$1C]
0087BEE2 50 push eax
0087BEE3 8B55F8 mov edx, [ebp-$08]
0087BEE6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087BEE8 E8C7ACC4FF call 004C6BB4
0087BEED 5A pop edx
0087BEEE 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
0087BEF0 FF91B4000000 call dword ptr [ecx+$00B4]
0087BEF6 8BC3 mov eax, ebx
0087BEF8 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_024C
|
0087BEFA FF924C020000 call dword ptr [edx+$024C]
* Reference to control OrdDate : N.A.
|
0087BF00 8B9E0C030000 mov ebx, [esi+$030C]
0087BF06 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087BF08 E8C799C4FF call 004C58D4
0087BF0D 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;
|
0087BF0F E89820C6FF call 004DDFAC
0087BF14 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0087BF16 FF5244 call dword ptr [edx+$44]
0087BF19 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;
|
0087BF1B E88C20C6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087BF20 BA50C08700 mov edx, $0087C050
0087BF25 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087BF27 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087BF2A 686CC08700 push $0087C06C
0087BF2F FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: '=''
|
0087BF32 687CC08700 push $0087C07C
0087BF37 8D55D8 lea edx, [ebp-$28]
0087BF3A 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087BF3D E8AAE9B8FF call 0040A8EC
0087BF42 FF75D8 push dword ptr [ebp-$28]
0087BF45 6888C08700 push $0087C088
0087BF4A 8D45DC lea eax, [ebp-$24]
0087BF4D BA05000000 mov edx, $00000005
* Reference to: System.@LStrCatN;
|
0087BF52 E85D97B8FF call 004056B4
0087BF57 8B45DC mov eax, [ebp-$24]
0087BF5A 50 push eax
0087BF5B 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;
|
0087BF5D E84A20C6FF call 004DDFAC
0087BF62 5A pop edx
0087BF63 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087BF65 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087BF68 6894C08700 push $0087C094
0087BF6D 8D55D0 lea edx, [ebp-$30]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087C051(Sender : TObject);
begin
(*
0087C051 50 push eax
0087C052 6461 popa
0087C054 7465 jz 0087C0BB
0087C056 205946 and [ecx+$46], bl
0087C059 5F pop edi
0087C05A 4D dec ebp
0087C05B 6F outsd
0087C05C 6E outsb
0087C05D 65795F jns 0087C0BF
0087C060 43 inc ebx
0087C061 52 push edx
0087C062 2000 and [eax], al
0087C064 FFFF DB $FF, $FF //
0087C066 FFFF DB $FF, $FF //
0087C068 0500000020 add eax, +$20000000
0087C06D 53 push ebx
0087C06E 657420 jz 0087C091
0087C071 0000 add [eax], al
0087C073 00FF add bh, bh
0087C075 FFFF DB $FF, $FF //
0087C077 FF02 inc dword ptr [edx]
0087C079 0000 add [eax], al
0087C07B 003D270000FF add [$FF000027], bh
0087C081 FFFF DB $FF, $FF //
0087C083 FF01 inc dword ptr [ecx]
0087C085 0000 add [eax], al
0087C087 0027 add [edi], ah
0087C089 0000 add [eax], al
0087C08B 00FF add bh, bh
0087C08D FFFF DB $FF, $FF //
0087C08F FF09 dec dword ptr [ecx]
0087C091 0000 add [eax], al
0087C093 002C4564697465 add [$65746964+eax*2], ch
0087C09A 723D jb 0087C0D9
0087C09C 27 daa
0087C09D 0000 add [eax], al
0087C09F 00FF add bh, bh
0087C0A1 FFFF DB $FF, $FF //
0087C0A3 FF1400 call dword ptr [eax+eax]
0087C0A6 0000 add [eax], al
0087C0A8 2C45 sub al, $45
0087C0AA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087C0B3 657464 jz 0087C11A
0087C0B6 61 popa
0087C0B7 7465 jz 0087C11E
0087C0B9 2829 sub [ecx], ch
0087C0BB 2000 and [eax], al
0087C0BD 0000 add [eax], al
0087C0BF 00FF add bh, bh
0087C0C1 FFFF DB $FF, $FF //
0087C0C3 FF0D00000020 dec dword ptr [$20000000]
0087C0C9 7768 jnbe 0087C133
0087C0CB 657265 jb 0087C133
0087C0CE 205946 and [ecx+$46], bl
0087C0D1 49 dec ecx
0087C0D2 643D27000000 cmp eax, $00000027
0087C0D8 FFFF DB $FF, $FF //
0087C0DA FFFF DB $FF, $FF //
0087C0DC 0400 add al, +$00
0087C0DE 0000 add [eax], al
0087C0E0 59 pop ecx
0087C0E1 46 inc esi
0087C0E2 49 dec ecx
0087C0E3 640000 add fs:[eax], al
0087C0E6 0000 add [eax], al
0087C0E8 55 push ebp
0087C0E9 8BEC mov ebp, esp
0087C0EB B90C000000 mov ecx, $0000000C
0087C0F0 6A00 push $00
0087C0F2 6A00 push $00
0087C0F4 49 dec ecx
0087C0F5 75F9 jnz 0087C0F0
0087C0F7 53 push ebx
0087C0F8 56 push esi
0087C0F9 8BDA mov ebx, edx
0087C0FB 8BF0 mov esi, eax
0087C0FD 33C0 xor eax, eax
0087C0FF 55 push ebp
0087C100 68DFC38700 push $0087C3DF
***** TRY
|
0087C105 64FF30 push dword ptr fs:[eax]
0087C108 648920 mov fs:[eax], esp
0087C10B 8D55FC lea edx, [ebp-$04]
0087C10E 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;
|
0087C110 E8A735D1FF call 0058F6BC
0087C115 8D55EC lea edx, [ebp-$14]
0087C118 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C11B E8CCE7B8FF call 0040A8EC
0087C120 837DEC00 cmp dword ptr [ebp-$14], +$00
0087C124 750D jnz 0087C133
0087C126 8D45FC lea eax, [ebp-$04]
0087C129 BAF4C38700 mov edx, $0087C3F4
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0087C12E E88992B8FF call 004053BC
* Reference to control v1PRTColor : N.A.
|
0087C133 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;
|
0087C139 E80E02DEFF 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;
|
0087C13E E8215ADDFF call 00651B64
* Reference to field N.A..OFFS_0050
|
0087C143 8B4050 mov eax, [eax+$50]
0087C146 8D55E8 lea edx, [ebp-$18]
0087C149 8B08 mov ecx, [eax]
0087C14B FF5110 call dword ptr [ecx+$10]
0087C14E 8B45E8 mov eax, [ebp-$18]
0087C151 8D55F0 lea edx, [ebp-$10]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C154 E893E7B8FF call 0040A8EC
* Reference to control Label10 : N.A.
|
0087C159 8B9E5C030000 mov ebx, [esi+$035C]
0087C15F 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Edit(TDataSet);
|
0087C161 E8DAC2C4FF call 004C8440
0087C166 8D55D4 lea edx, [ebp-$2C]
0087C169 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C16C E87BE7B8FF call 0040A8EC
0087C171 8B55D4 mov edx, [ebp-$2C]
0087C174 8D45D8 lea eax, [ebp-$28]
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
0087C177 E84CCCB9FF call 00418DC8
0087C17C 8D45D8 lea eax, [ebp-$28]
0087C17F 50 push eax
0087C180 8B55F0 mov edx, [ebp-$10]
0087C183 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C185 E82AAAC4FF call 004C6BB4
0087C18A 5A pop edx
0087C18B 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_00B4
|
0087C18D FF91B4000000 call dword ptr [ecx+$00B4]
0087C193 8BC3 mov eax, ebx
0087C195 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_024C
|
0087C197 FF924C020000 call dword ptr [edx+$024C]
* Reference to control Label3 : TLabel
|
0087C19D 8B9E08030000 mov ebx, [esi+$0308]
0087C1A3 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087C1A5 E82A97C4FF call 004C58D4
0087C1AA 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087C1AC E8FB1DC6FF call 004DDFAC
0087C1B1 8B10 mov edx, [eax]
* Reference to method TLabel.GetClientRect()
|
0087C1B3 FF5244 call dword ptr [edx+$44]
* Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr
| om YF_Money_CR where YFID=''
|
0087C1B6 6800C48700 push $0087C400
* Possible String Reference to: 'YFID'
|
0087C1BB BA48C48700 mov edx, $0087C448
* Reference to control Label10 : N.A.
|
0087C1C0 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C1C6 E8E9A9C4FF call 004C6BB4
0087C1CB 8D55CC lea edx, [ebp-$34]
0087C1CE 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_60
|
0087C1D0 FF5160 call dword ptr [ecx+$60]
0087C1D3 FF75CC push dword ptr [ebp-$34]
0087C1D6 6858C48700 push $0087C458
0087C1DB 8D45D0 lea eax, [ebp-$30]
0087C1DE BA03000000 mov edx, $00000003
* Reference to: System.@LStrCatN;
|
0087C1E3 E8CC94B8FF call 004056B4
0087C1E8 8B45D0 mov eax, [ebp-$30]
0087C1EB 50 push eax
0087C1EC 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087C1EE E8B91DC6FF call 004DDFAC
0087C1F3 5A pop edx
0087C1F4 8B08 mov ecx, [eax]
* Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087C1F6 FF5138 call dword ptr [ecx+$38]
0087C1F9 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087C1FB E8C896C4FF call 004C58C8
* Possible String Reference to: 'KPMoney'
|
0087C200 BA64C48700 mov edx, $0087C464
* Reference to control Label3 : TLabel
|
0087C205 8B8608030000 mov eax, [esi+$0308]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C20B E8A4A9C4FF call 004C6BB4
0087C210 8D55F4 lea edx, [ebp-$0C]
0087C213 8B08 mov ecx, [eax]
* Reference to method TLabel.SetDragMode(TDragMode)
|
0087C215 FF5160 call dword ptr [ecx+$60]
* Possible String Reference to: 'KPMoney'
|
0087C218 BA64C48700 mov edx, $0087C464
* Reference to control Label10 : N.A.
|
0087C21D 8B865C030000 mov eax, [esi+$035C]
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087C223 E88CA9C4FF call 004C6BB4
0087C228 8D55F8 lea edx, [ebp-$08]
0087C22B 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_60
|
0087C22D FF5160 call dword ptr [ecx+$60]
* Reference to control OrdDate : N.A.
|
0087C230 8B9E0C030000 mov ebx, [esi+$030C]
0087C236 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087C238 E89796C4FF call 004C58D4
0087C23D 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;
|
0087C23F E8681DC6FF call 004DDFAC
0087C244 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_44
|
0087C246 FF5244 call dword ptr [edx+$44]
0087C249 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;
|
0087C24B E85C1DC6FF call 004DDFAC
* Possible String Reference to: 'UPdate YF_Money_CR '
|
0087C250 BA74C48700 mov edx, $0087C474
0087C255 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087C257 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' Set '
|
0087C25A 6890C48700 push $0087C490
0087C25F FF75F0 push dword ptr [ebp-$10]
0087C262 68A0C48700 push $0087C4A0
0087C267 8D55C4 lea edx, [ebp-$3C]
0087C26A 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087C26D E87AE6B8FF call 0040A8EC
0087C272 FF75C4 push dword ptr [ebp-$3C]
0087C275 8D45C8 lea eax, [ebp-$38]
0087C278 BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087C27D E83294B8FF call 004056B4
0087C282 8B45C8 mov eax, [ebp-$38]
0087C285 50 push eax
0087C286 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;
|
0087C288 E81F1DC6FF call 004DDFAC
0087C28D 5A pop edx
0087C28E 8B08 mov ecx, [eax]
* Possible reference to virtual method TN.A..OFFS_38
|
0087C290 FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ',Editer=''
|
0087C293 68ACC48700 push $0087C4AC
0087C298 8D55BC lea edx, [ebp-$44]
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087C475(Sender : TObject);
begin
(*
0087C475 50 push eax
0087C476 6461 popa
0087C478 7465 jz 0087C4DF
0087C47A 205946 and [ecx+$46], bl
0087C47D 5F pop edi
0087C47E 4D dec ebp
0087C47F 6F outsd
0087C480 6E outsb
0087C481 65795F jns 0087C4E3
0087C484 43 inc ebx
0087C485 52 push edx
0087C486 2000 and [eax], al
0087C488 FFFF DB $FF, $FF //
0087C48A FFFF DB $FF, $FF //
0087C48C 0500000020 add eax, +$20000000
0087C491 53 push ebx
0087C492 657420 jz 0087C4B5
0087C495 0000 add [eax], al
0087C497 00FF add bh, bh
0087C499 FFFF DB $FF, $FF //
0087C49B FF01 inc dword ptr [ecx]
0087C49D 0000 add [eax], al
0087C49F 003D000000FF add [$FF000000], bh
0087C4A5 FFFF DB $FF, $FF //
0087C4A7 FF09 dec dword ptr [ecx]
0087C4A9 0000 add [eax], al
0087C4AB 002C4564697465 add [$65746964+eax*2], ch
0087C4B2 723D jb 0087C4F1
0087C4B4 27 daa
0087C4B5 0000 add [eax], al
0087C4B7 00FF add bh, bh
0087C4B9 FFFF DB $FF, $FF //
0087C4BB FF1400 call dword ptr [eax+eax]
0087C4BE 0000 add [eax], al
0087C4C0 2C45 sub al, $45
0087C4C2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087C4CB 657464 jz 0087C532
0087C4CE 61 popa
0087C4CF 7465 jz 0087C536
0087C4D1 2829 sub [ecx], ch
0087C4D3 2000 and [eax], al
0087C4D5 0000 add [eax], al
0087C4D7 00FF add bh, bh
0087C4D9 FFFF DB $FF, $FF //
0087C4DB FF0D00000020 dec dword ptr [$20000000]
0087C4E1 7768 jnbe 0087C54B
0087C4E3 657265 jb 0087C54B
0087C4E6 205946 and [ecx+$46], bl
0087C4E9 49 dec ecx
0087C4EA 643D27000000 cmp eax, $00000027
0087C4F0 FFFF DB $FF, $FF //
0087C4F2 FFFF DB $FF, $FF //
0087C4F4 0400 add al, +$00
0087C4F6 0000 add [eax], al
0087C4F8 59 pop ecx
0087C4F9 46 inc esi
0087C4FA 49 dec ecx
0087C4FB 640000 add fs:[eax], al
0087C4FE 0000 add [eax], al
0087C500 FFFF DB $FF, $FF //
0087C502 FFFF DB $FF, $FF //
0087C504 2B00 sub eax, dword ptr [eax]
0087C506 0000 add [eax], al
0087C508 55 push ebp
0087C509 7064 jo 0087C56F
0087C50B 61 popa
0087C50C 7465 jz 0087C573
0087C50E 205946 and [ecx+$46], bl
0087C511 5F pop edi
0087C512 4D dec ebp
0087C513 6F outsd
0087C514 6E outsb
0087C515 65795F jns 0087C577
0087C518 4B dec ebx
0087C519 43 inc ebx
0087C51A 205365 and [ebx+$65], dl
0087C51D 7420 jz 0087C53F
0087C51F 4B dec ebx
0087C520 43 inc ebx
0087C521 4B dec ebx
0087C522 50 push eax
0087C523 4D dec ebp
0087C524 6F outsd
0087C525 6E outsb
0087C526 65793D jns 0087C566
0087C529 4B dec ebx
0087C52A 43 inc ebx
0087C52B 4B dec ebx
0087C52C 50 push eax
0087C52D 4D dec ebp
0087C52E 6F outsd
0087C52F 6E outsb
0087C530 65792D jns 0087C560
0087C533 00FF add bh, bh
0087C535 FFFF DB $FF, $FF //
0087C537 FF01 inc dword ptr [ecx]
0087C539 0000 add [eax], al
0087C53B 002B add [ebx], ch
0087C53D 0000 add [eax], al
0087C53F 00FF add bh, bh
0087C541 FFFF DB $FF, $FF //
0087C543 FF0D00000020 dec dword ptr [$20000000]
0087C549 7768 jnbe 0087C5B3
0087C54B 657265 jb 0087C5B3
0087C54E 204352 and [ebx+$52], al
0087C551 49 dec ecx
0087C552 44 inc esp
0087C553 3D27000000 cmp eax, $00000027
0087C558 FFFF DB $FF, $FF //
0087C55A FFFF DB $FF, $FF //
0087C55C 0400 add al, +$00
0087C55E 0000 add [eax], al
0087C560 43 inc ebx
0087C561 52 push edx
0087C562 49 dec ecx
0087C563 44 inc esp
0087C564 0000 add [eax], al
0087C566 0000 add [eax], al
0087C568 55 push ebp
0087C569 8BEC mov ebp, esp
0087C56B B910000000 mov ecx, $00000010
0087C570 6A00 push $00
0087C572 6A00 push $00
0087C574 49 dec ecx
0087C575 75F9 jnz 0087C570
0087C577 51 push ecx
0087C578 53 push ebx
0087C579 56 push esi
0087C57A 57 push edi
0087C57B 8945FC mov [ebp-$04], eax
0087C57E 33C0 xor eax, eax
0087C580 55 push ebp
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
0087C581 68F9C88700 push $0087C8F9
***** TRY
|
0087C586 64FF30 push dword ptr fs:[eax]
0087C589 648920 mov fs:[eax], esp
0087C58C 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : N.A.
|
0087C58F 8B805C030000 mov eax, [eax+$035C]
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
0087C595 E826B9C4FF call 004C7EC0
0087C59A 84C0 test al, al
0087C59C 0F85F1020000 jnz 0087C893
0087C5A2 A008C98700 mov al, byte ptr [$0087C908]
0087C5A7 50 push eax
0087C5A8 8D45EC lea eax, [ebp-$14]
0087C5AB B201 mov dl, $01
* Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean);
|
0087C5AD E8B2C7B9FF call 00418D64
0087C5B2 8D4DEC lea ecx, [ebp-$14]
0087C5B5 8B45FC mov eax, [ebp-$04]
* Reference to control Label10 : N.A.
|
0087C5B8 8B805C030000 mov eax, [eax+$035C]
* Possible String Reference to: 'ssel'
|
0087C5BE BA14C98700 mov edx, $0087C914
0087C5C3 8B18 mov ebx, [eax]
* Possible reference to virtual method TN.A..OFFS_0244
|
0087C5C5 FF9344020000 call dword ptr [ebx+$0244]
0087C5CB 84C0 test al, al
0087C5CD 751D jnz 0087C5EC
0087C5CF 6A00 push $00
* Possible String Reference to: '<27><>ʾ'
|
0087C5D1 B91CC98700 mov ecx, $0087C91C
* Possible String Reference to: 'û<><C3BB>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!'
|
0087C5D6 BA24C98700 mov edx, $0087C924
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087D3F1(Sender : TObject);
begin
(*
0087D3F1 50 push eax
0087D3F2 6461 popa
0087D3F4 7465 jz 0087D45B
0087D3F6 205946 and [ecx+$46], bl
0087D3F9 5F pop edi
0087D3FA 4D dec ebp
0087D3FB 6F outsd
0087D3FC 6E outsb
0087D3FD 65795F jns 0087D45F
0087D400 43 inc ebx
0087D401 52 push edx
0087D402 2000 and [eax], al
0087D404 FFFF DB $FF, $FF //
0087D406 FFFF DB $FF, $FF //
0087D408 1000 adc [eax], al
0087D40A 0000 add [eax], al
0087D40C 205365 and [ebx+$65], dl
0087D40F 7420 jz 0087D431
0087D411 43 inc ebx
0087D412 6F outsd
0087D413 6D insd
0087D414 54 push esp
0087D415 61 popa
0087D416 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D
0087D41E 0000 add [eax], al
0087D420 FFFF DB $FF, $FF //
0087D422 FFFF DB $FF, $FF //
0087D424 0100 add [eax], eax
0087D426 0000 add [eax], al
0087D428 27 daa
0087D429 0000 add [eax], al
0087D42B 00FF add bh, bh
0087D42D FFFF DB $FF, $FF //
0087D42F FF09 dec dword ptr [ecx]
0087D431 0000 add [eax], al
0087D433 002C4564697465 add [$65746964+eax*2], ch
0087D43A 723D jb 0087D479
0087D43C 27 daa
0087D43D 0000 add [eax], al
0087D43F 00FF add bh, bh
0087D441 FFFF DB $FF, $FF //
0087D443 FF1400 call dword ptr [eax+eax]
0087D446 0000 add [eax], al
0087D448 2C45 sub al, $45
0087D44A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087D453 657464 jz 0087D4BA
0087D456 61 popa
0087D457 7465 jz 0087D4BE
0087D459 2829 sub [ecx], ch
0087D45B 2000 and [eax], al
0087D45D 0000 add [eax], al
0087D45F 00FF add bh, bh
0087D461 FFFF DB $FF, $FF //
0087D463 FF0D00000020 dec dword ptr [$20000000]
0087D469 7768 jnbe 0087D4D3
0087D46B 657265 jb 0087D4D3
0087D46E 205946 and [ecx+$46], bl
0087D471 49 dec ecx
0087D472 643D27000000 cmp eax, $00000027
0087D478 FFFF DB $FF, $FF //
0087D47A FFFF DB $FF, $FF //
0087D47C 0400 add al, +$00
0087D47E 0000 add [eax], al
0087D480 59 pop ecx
0087D481 46 inc esi
0087D482 49 dec ecx
0087D483 640000 add fs:[eax], al
0087D486 0000 add [eax], al
0087D488 55 push ebp
0087D489 8BEC mov ebp, esp
0087D48B B919000000 mov ecx, $00000019
0087D490 6A00 push $00
0087D492 6A00 push $00
0087D494 49 dec ecx
0087D495 75F9 jnz 0087D490
0087D497 53 push ebx
0087D498 56 push esi
0087D499 8945FC mov [ebp-$04], eax
0087D49C 33C0 xor eax, eax
0087D49E 55 push ebp
0087D49F 68F4D88700 push $0087D8F4
***** TRY
|
0087D4A4 64FF30 push dword ptr fs:[eax]
0087D4A7 648920 mov fs:[eax], esp
0087D4AA 8B4DFC mov ecx, [ebp-$04]
0087D4AD B201 mov dl, $01
* Reference to class TfrmFKCR
|
0087D4AF A1C4C67F00 mov eax, dword ptr [$007FC6C4]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0087D4B4 E81749C2FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087DC95(Sender : TObject);
begin
(*
0087DC95 50 push eax
0087DC96 6461 popa
0087DC98 7465 jz 0087DCFF
0087DC9A 205946 and [ecx+$46], bl
0087DC9D 5F pop edi
0087DC9E 4D dec ebp
0087DC9F 6F outsd
0087DCA0 6E outsb
0087DCA1 65795F jns 0087DD03
0087DCA4 43 inc ebx
0087DCA5 52 push edx
0087DCA6 2000 and [eax], al
0087DCA8 FFFF DB $FF, $FF //
0087DCAA FFFF DB $FF, $FF //
0087DCAC 0D00000020 or eax, $20000000
0087DCB1 53 push ebx
0087DCB2 657420 jz 0087DCD5
0087DCB5 42 inc edx
0087DCB6 5A pop edx
0087DCB7 54 push esp
0087DCB8 7970 jns 0087DD2A
0087DCBA 653D27000000 cmp eax, $00000027
0087DCC0 FFFF DB $FF, $FF //
0087DCC2 FFFF DB $FF, $FF //
0087DCC4 07 pop es
0087DCC5 0000 add [eax], al
0087DCC7 005A64 add [edx+$64], bl
0087DCCA 794E jns 0087DD1A
0087DCCC 61 popa
0087DCCD 6D insd
0087DCCE 6500FF add bh, bh
0087DCD1 FFFF DB $FF, $FF //
0087DCD3 FF01 inc dword ptr [ecx]
0087DCD5 0000 add [eax], al
0087DCD7 0027 add [edi], ah
0087DCD9 0000 add [eax], al
0087DCDB 00FF add bh, bh
0087DCDD FFFF DB $FF, $FF //
0087DCDF FF09 dec dword ptr [ecx]
0087DCE1 0000 add [eax], al
0087DCE3 002C4564697465 add [$65746964+eax*2], ch
0087DCEA 723D jb 0087DD29
0087DCEC 27 daa
0087DCED 0000 add [eax], al
0087DCEF 00FF add bh, bh
0087DCF1 FFFF DB $FF, $FF //
0087DCF3 FF1400 call dword ptr [eax+eax]
0087DCF6 0000 add [eax], al
0087DCF8 2C45 sub al, $45
0087DCFA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087DD03 657464 jz 0087DD6A
0087DD06 61 popa
0087DD07 7465 jz 0087DD6E
0087DD09 2829 sub [ecx], ch
0087DD0B 2000 and [eax], al
0087DD0D 0000 add [eax], al
0087DD0F 00FF add bh, bh
0087DD11 FFFF DB $FF, $FF //
0087DD13 FF0D00000020 dec dword ptr [$20000000]
0087DD19 7768 jnbe 0087DD83
0087DD1B 657265 jb 0087DD83
0087DD1E 205946 and [ecx+$46], bl
0087DD21 49 dec ecx
0087DD22 643D27000000 cmp eax, $00000027
0087DD28 FFFF DB $FF, $FF //
0087DD2A FFFF DB $FF, $FF //
0087DD2C 0400 add al, +$00
0087DD2E 0000 add [eax], al
0087DD30 59 pop ecx
0087DD31 46 inc esi
0087DD32 49 dec ecx
0087DD33 640000 add fs:[eax], al
0087DD36 0000 add [eax], al
0087DD38 55 push ebp
0087DD39 8BEC mov ebp, esp
0087DD3B 51 push ecx
0087DD3C B906000000 mov ecx, $00000006
0087DD41 6A00 push $00
0087DD43 6A00 push $00
0087DD45 49 dec ecx
0087DD46 75F9 jnz 0087DD41
0087DD48 51 push ecx
0087DD49 874DFC xchg [ebp-$04], ecx
0087DD4C 53 push ebx
0087DD4D 56 push esi
0087DD4E 8BF0 mov esi, eax
0087DD50 33C0 xor eax, eax
0087DD52 55 push ebp
* Possible String Reference to: '<27>^k<><6B><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087DD53 6891DF8700 push $0087DF91
***** TRY
|
0087DD58 64FF30 push dword ptr fs:[eax]
0087DD5B 648920 mov fs:[eax], esp
0087DD5E 33C0 xor eax, eax
0087DD60 55 push ebp
0087DD61 6867DF8700 push $0087DF67
***** TRY
|
0087DD66 64FF30 push dword ptr fs:[eax]
0087DD69 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087DFE9(Sender : TObject);
begin
(*
0087DFE9 50 push eax
0087DFEA 6461 popa
0087DFEC 7465 jz 0087E053
0087DFEE 205946 and [ecx+$46], bl
0087DFF1 5F pop edi
0087DFF2 4D dec ebp
0087DFF3 6F outsd
0087DFF4 6E outsb
0087DFF5 65795F jns 0087E057
0087DFF8 43 inc ebx
0087DFF9 52 push edx
0087DFFA 2000 and [eax], al
0087DFFC FFFF DB $FF, $FF //
0087DFFE FFFF DB $FF, $FF //
0087E000 0D00000020 or eax, $20000000
0087E005 53 push ebx
0087E006 657420 jz 0087E029
0087E009 50 push eax
0087E00A 5F pop edi
0087E00B 53 push ebx
0087E00C 7065 jo 0087E073
0087E00E 633D27000000 arpl [$00000027], di
0087E014 FFFF DB $FF, $FF //
0087E016 FFFF DB $FF, $FF //
0087E018 07 pop es
0087E019 0000 add [eax], al
0087E01B 005A64 add [edx+$64], bl
0087E01E 794E jns 0087E06E
0087E020 61 popa
0087E021 6D insd
0087E022 6500FF add bh, bh
0087E025 FFFF DB $FF, $FF //
0087E027 FF01 inc dword ptr [ecx]
0087E029 0000 add [eax], al
0087E02B 0027 add [edi], ah
0087E02D 0000 add [eax], al
0087E02F 00FF add bh, bh
0087E031 FFFF DB $FF, $FF //
0087E033 FF09 dec dword ptr [ecx]
0087E035 0000 add [eax], al
0087E037 002C4564697465 add [$65746964+eax*2], ch
0087E03E 723D jb 0087E07D
0087E040 27 daa
0087E041 0000 add [eax], al
0087E043 00FF add bh, bh
0087E045 FFFF DB $FF, $FF //
0087E047 FF1400 call dword ptr [eax+eax]
0087E04A 0000 add [eax], al
0087E04C 2C45 sub al, $45
0087E04E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087E057 657464 jz 0087E0BE
0087E05A 61 popa
0087E05B 7465 jz 0087E0C2
0087E05D 2829 sub [ecx], ch
0087E05F 2000 and [eax], al
0087E061 0000 add [eax], al
0087E063 00FF add bh, bh
0087E065 FFFF DB $FF, $FF //
0087E067 FF0D00000020 dec dword ptr [$20000000]
0087E06D 7768 jnbe 0087E0D7
0087E06F 657265 jb 0087E0D7
0087E072 205946 and [ecx+$46], bl
0087E075 49 dec ecx
0087E076 643D27000000 cmp eax, $00000027
0087E07C FFFF DB $FF, $FF //
0087E07E FFFF DB $FF, $FF //
0087E080 0400 add al, +$00
0087E082 0000 add [eax], al
0087E084 59 pop ecx
0087E085 46 inc esi
0087E086 49 dec ecx
0087E087 640000 add fs:[eax], al
0087E08A 0000 add [eax], al
0087E08C 53 push ebx
0087E08D 56 push esi
0087E08E 8BD8 mov ebx, eax
* Possible String Reference to: 'Money'
|
0087E090 BACCE08700 mov edx, $0087E0CC
* Reference to control Label10 : N.A.
|
0087E095 8BB35C030000 mov esi, [ebx+$035C]
0087E09B 8BC6 mov eax, esi
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0087E09D E8128BC4FF call 004C6BB4
0087E0A2 8B10 mov edx, [eax]
* Possible reference to virtual method TN.A..OFFS_4C
|
0087E0A4 FF524C call dword ptr [edx+$4C]
0087E0A7 D835D4E08700 fdiv dword ptr [$0087E0D4]
0087E0AD 83C4F8 add esp, -$08
0087E0B0 DD1C24 fstp qword ptr [esp]
0087E0B3 9B wait
* Reference to control Payment : N.A.
|
0087E0B4 8B939C030000 mov edx, [ebx+$039C]
0087E0BA 8BC6 mov eax, esi
* Reference to : TfrmSelExportField._PROC_007B6D90()
|
0087E0BC E8CF8CF3FF call 007B6D90
0087E0C1 5E pop esi
0087E0C2 5B pop ebx
0087E0C3 C3 ret
0087E0C4 FFFF DB $FF, $FF //
0087E0C6 FFFF DB $FF, $FF //
0087E0C8 050000004D add eax, +$4D000000
0087E0CD 6F outsd
0087E0CE 6E outsb
0087E0CF 657900 jns 0087E0D2
0087E0D2 0000 add [eax], al
0087E0D4 00401C add [eax+$1C], al
0087E0D7 46 inc esi
0087E0D8 55 push ebp
0087E0D9 8BEC mov ebp, esp
0087E0DB 51 push ecx
0087E0DC B90B000000 mov ecx, $0000000B
0087E0E1 6A00 push $00
0087E0E3 6A00 push $00
0087E0E5 49 dec ecx
0087E0E6 75F9 jnz 0087E0E1
0087E0E8 874DFC xchg [ebp-$04], ecx
0087E0EB 53 push ebx
0087E0EC 56 push esi
0087E0ED 8BF0 mov esi, eax
0087E0EF 33C0 xor eax, eax
0087E0F1 55 push ebp
* Possible String Reference to: '<27>Bg<42><67><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E0F2 68ADE38700 push $0087E3AD
***** TRY
|
0087E0F7 64FF30 push dword ptr fs:[eax]
0087E0FA 648920 mov fs:[eax], esp
0087E0FD 8BCE mov ecx, esi
0087E0FF B201 mov dl, $01
* Reference to class TfrmJYorderConCX
|
0087E101 A164DF7D00 mov eax, dword ptr [$007DDF64]
* Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent);
| or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent);
|
0087E106 E8C53CC2FF call 004A1DD0
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087E401(Sender : TObject);
begin
(*
0087E401 50 push eax
0087E402 6461 popa
0087E404 7465 jz 0087E46B
0087E406 205946 and [ecx+$46], bl
0087E409 5F pop edi
0087E40A 4D dec ebp
0087E40B 6F outsd
0087E40C 6E outsb
0087E40D 65795F jns 0087E46F
0087E410 43 inc ebx
0087E411 52 push edx
0087E412 2000 and [eax], al
0087E414 FFFF DB $FF, $FF //
0087E416 FFFF DB $FF, $FF //
0087E418 0C00 or al, $00
0087E41A 0000 add [eax], al
0087E41C 205365 and [ebx+$65], dl
0087E41F 7420 jz 0087E441
0087E421 43 inc ebx
0087E422 6F outsd
0087E423 6E outsb
0087E424 69643D2700000000 imul esp, [ebp+edi+$27], $00000000
0087E42C FFFF DB $FF, $FF //
0087E42E FFFF DB $FF, $FF //
0087E430 0100 add [eax], eax
0087E432 0000 add [eax], al
0087E434 27 daa
0087E435 0000 add [eax], al
0087E437 00FF add bh, bh
0087E439 FFFF DB $FF, $FF //
0087E43B FF08 dec dword ptr [eax]
0087E43D 0000 add [eax], al
0087E43F 002C43 add [ebx+eax*2], ch
0087E442 6F outsd
0087E443 6E outsb
0087E444 4E dec esi
0087E445 4F dec edi
0087E446 3D27000000 cmp eax, $00000027
0087E44B 00FF add bh, bh
0087E44D FFFF DB $FF, $FF //
0087E44F FF0500000043 inc dword ptr [$43000000]
0087E455 6F outsd
0087E456 6E outsb
0087E457 4E dec esi
0087E458 4F dec edi
0087E459 0000 add [eax], al
0087E45B 00FF add bh, bh
0087E45D FFFF DB $FF, $FF //
0087E45F FF09 dec dword ptr [ecx]
0087E461 0000 add [eax], al
0087E463 002C4564697465 add [$65746964+eax*2], ch
0087E46A 723D jb 0087E4A9
0087E46C 27 daa
0087E46D 0000 add [eax], al
0087E46F 00FF add bh, bh
0087E471 FFFF DB $FF, $FF //
0087E473 FF1400 call dword ptr [eax+eax]
0087E476 0000 add [eax], al
0087E478 2C45 sub al, $45
0087E47A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D
0087E483 657464 jz 0087E4EA
0087E486 61 popa
0087E487 7465 jz 0087E4EE
0087E489 2829 sub [ecx], ch
0087E48B 2000 and [eax], al
0087E48D 0000 add [eax], al
0087E48F 00FF add bh, bh
0087E491 FFFF DB $FF, $FF //
0087E493 FF0D00000020 dec dword ptr [$20000000]
0087E499 7768 jnbe 0087E503
0087E49B 657265 jb 0087E503
0087E49E 205946 and [ecx+$46], bl
0087E4A1 49 dec ecx
0087E4A2 643D27000000 cmp eax, $00000027
0087E4A8 FFFF DB $FF, $FF //
0087E4AA FFFF DB $FF, $FF //
0087E4AC 0400 add al, +$00
0087E4AE 0000 add [eax], al
0087E4B0 59 pop ecx
0087E4B1 46 inc esi
0087E4B2 49 dec ecx
0087E4B3 640000 add fs:[eax], al
0087E4B6 0000 add [eax], al
0087E4B8 55 push ebp
0087E4B9 8BEC mov ebp, esp
0087E4BB 51 push ecx
0087E4BC B905000000 mov ecx, $00000005
0087E4C1 6A00 push $00
0087E4C3 6A00 push $00
0087E4C5 49 dec ecx
0087E4C6 75F9 jnz 0087E4C1
0087E4C8 51 push ecx
0087E4C9 874DFC xchg [ebp-$04], ecx
0087E4CC 53 push ebx
0087E4CD 56 push esi
0087E4CE 8BF0 mov esi, eax
0087E4D0 33C0 xor eax, eax
0087E4D2 55 push ebp
* Possible String Reference to: '<27>Wd<57><64><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E4D3 6898E68700 push $0087E698
***** TRY
|
0087E4D8 64FF30 push dword ptr fs:[eax]
0087E4DB 648920 mov fs:[eax], esp
0087E4DE 33C0 xor eax, eax
0087E4E0 55 push ebp
0087E4E1 686EE68700 push $0087E66E
***** TRY
|
0087E4E6 64FF30 push dword ptr fs:[eax]
0087E4E9 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087E6D1(Sender : TObject);
begin
(*
0087E6D1 50 push eax
0087E6D2 6461 popa
0087E6D4 7465 jz 0087E73B
0087E6D6 205946 and [ecx+$46], bl
0087E6D9 5F pop edi
0087E6DA 4D dec ebp
0087E6DB 6F outsd
0087E6DC 6E outsb
0087E6DD 65795F jns 0087E73F
0087E6E0 43 inc ebx
0087E6E1 52 push edx
0087E6E2 2000 and [eax], al
0087E6E4 FFFF DB $FF, $FF //
0087E6E6 FFFF DB $FF, $FF //
0087E6E8 0E push cs
0087E6E9 0000 add [eax], al
0087E6EB 0020 add [eax], ah
0087E6ED 53 push ebx
0087E6EE 657420 jz 0087E711
0087E6F1 47 inc edi
0087E6F2 59 pop ecx
0087E6F3 53 push ebx
0087E6F4 4E dec esi
0087E6F5 61 popa
0087E6F6 6D insd
0087E6F7 653D270000FF cmp eax, $FF000027
0087E6FD FFFF DB $FF, $FF //
0087E6FF FF01 inc dword ptr [ecx]
0087E701 0000 add [eax], al
0087E703 0027 add [edi], ah
0087E705 0000 add [eax], al
0087E707 00FF add bh, bh
0087E709 FFFF DB $FF, $FF //
0087E70B FF0D00000020 dec dword ptr [$20000000]
0087E711 7768 jnbe 0087E77B
0087E713 657265 jb 0087E77B
0087E716 205946 and [ecx+$46], bl
0087E719 49 dec ecx
0087E71A 643D27000000 cmp eax, $00000027
0087E720 FFFF DB $FF, $FF //
0087E722 FFFF DB $FF, $FF //
0087E724 0400 add al, +$00
0087E726 0000 add [eax], al
0087E728 59 pop ecx
0087E729 46 inc esi
0087E72A 49 dec ecx
0087E72B 640000 add fs:[eax], al
0087E72E 0000 add [eax], al
0087E730 55 push ebp
0087E731 8BEC mov ebp, esp
0087E733 51 push ecx
0087E734 B905000000 mov ecx, $00000005
0087E739 6A00 push $00
0087E73B 6A00 push $00
0087E73D 49 dec ecx
0087E73E 75F9 jnz 0087E739
0087E740 51 push ecx
0087E741 874DFC xchg [ebp-$04], ecx
0087E744 53 push ebx
0087E745 56 push esi
0087E746 8BF0 mov esi, eax
0087E748 33C0 xor eax, eax
0087E74A 55 push ebp
* Possible String Reference to: '<27><>a<EFBFBD><61><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E74B 6810E98700 push $0087E910
***** TRY
|
0087E750 64FF30 push dword ptr fs:[eax]
0087E753 648920 mov fs:[eax], esp
0087E756 33C0 xor eax, eax
0087E758 55 push ebp
0087E759 68E6E88700 push $0087E8E6
***** TRY
|
0087E75E 64FF30 push dword ptr fs:[eax]
0087E761 648920 mov fs:[eax], esp
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087E94D(Sender : TObject);
begin
(*
0087E94D 50 push eax
0087E94E 6461 popa
0087E950 7465 jz 0087E9B7
0087E952 205946 and [ecx+$46], bl
0087E955 5F pop edi
0087E956 4D dec ebp
0087E957 6F outsd
0087E958 6E outsb
0087E959 65795F jns 0087E9BB
0087E95C 43 inc ebx
0087E95D 52 push edx
0087E95E 2000 and [eax], al
0087E960 FFFF DB $FF, $FF //
0087E962 FFFF DB $FF, $FF //
0087E964 1200 adc al, byte ptr [eax]
0087E966 0000 add [eax], al
0087E968 205365 and [ebx+$65], dl
0087E96B 7420 jz 0087E98D
0087E96D 46 inc esi
0087E96E 61 popa
0087E96F 63746F72 arpl [edi+ebp*2+$72], si
0087E973 794E jns 0087E9C3
0087E975 61 popa
0087E976 6D insd
0087E977 653D270000FF cmp eax, $FF000027
0087E97D FFFF DB $FF, $FF //
0087E97F FF01 inc dword ptr [ecx]
0087E981 0000 add [eax], al
0087E983 0027 add [edi], ah
0087E985 0000 add [eax], al
0087E987 00FF add bh, bh
0087E989 FFFF DB $FF, $FF //
0087E98B FF0D00000020 dec dword ptr [$20000000]
0087E991 7768 jnbe 0087E9FB
0087E993 657265 jb 0087E9FB
0087E996 205946 and [ecx+$46], bl
0087E999 49 dec ecx
0087E99A 643D27000000 cmp eax, $00000027
0087E9A0 FFFF DB $FF, $FF //
0087E9A2 FFFF DB $FF, $FF //
0087E9A4 0400 add al, +$00
0087E9A6 0000 add [eax], al
0087E9A8 59 pop ecx
0087E9A9 46 inc esi
0087E9AA 49 dec ecx
0087E9AB 640000 add fs:[eax], al
0087E9AE 0000 add [eax], al
0087E9B0 55 push ebp
0087E9B1 8BEC mov ebp, esp
0087E9B3 6A00 push $00
0087E9B5 6A00 push $00
0087E9B7 6A00 push $00
0087E9B9 53 push ebx
0087E9BA 56 push esi
0087E9BB 8BF0 mov esi, eax
0087E9BD 33C0 xor eax, eax
0087E9BF 55 push ebp
* Possible String Reference to: '<27><>_<EFBFBD><5F><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087E9C0 6815EB8700 push $0087EB15
***** TRY
|
0087E9C5 64FF30 push dword ptr fs:[eax]
0087E9C8 648920 mov fs:[eax], esp
0087E9CB 80390D cmp byte ptr [ecx], $0D
0087E9CE 0F851E010000 jnz 0087EAF2
* Reference to control ToolButton1 : TToolButton
|
0087E9D4 8B9E20030000 mov ebx, [esi+$0320]
0087E9DA 33D2 xor edx, edx
0087E9DC 8BC3 mov eax, ebx
0087E9DE 8B08 mov ecx, [eax]
* Possible reference to virtual method TToolButton.OFFS_0190
|
0087E9E0 FF9190010000 call dword ptr [ecx+$0190]
0087E9E6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087E9E8 E8E76EC4FF call 004C58D4
0087E9ED 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087E9EF E8B8F5C5FF call 004DDFAC
0087E9F4 8B10 mov edx, [eax]
* Reference to method TToolButton.GetClientRect()
|
0087E9F6 FF5244 call dword ptr [edx+$44]
0087E9F9 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087E9FB E8ACF5C5FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
0087EA00 BA2CEB8700 mov edx, $0087EB2C
0087EA05 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA07 FF5138 call dword ptr [ecx+$38]
0087EA0A 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA0C E89BF5C5FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
0087EA11 BA8CEB8700 mov edx, $0087EB8C
0087EA16 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA18 FF5138 call dword ptr [ecx+$38]
0087EA1B 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA1D E88AF5C5FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
0087EA22 BAE8EB8700 mov edx, $0087EBE8
0087EA27 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA29 FF5138 call dword ptr [ecx+$38]
0087EA2C 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA2E E879F5C5FF 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,'
|
0087EA33 BA44EC8700 mov edx, $0087EC44
0087EA38 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA3A FF5138 call dword ptr [ecx+$38]
0087EA3D 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA3F E868F5C5FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
0087EA44 BAD4EC8700 mov edx, $0087ECD4
0087EA49 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA4B FF5138 call dword ptr [ecx+$38]
0087EA4E 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA50 E857F5C5FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
0087EA55 BAE0EC8700 mov edx, $0087ECE0
0087EA5A 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EA5C FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.ConNO like '%'
|
0087EA5F 68FCEC8700 push $0087ECFC
0087EA64 8D55F4 lea edx, [ebp-$0C]
* Reference to control ToPlace : N.A.
|
0087EA67 8B86A4030000 mov eax, [esi+$03A4]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0087EA6D E87E9BC0FF call 004885F0
0087EA72 8B45F4 mov eax, [ebp-$0C]
0087EA75 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087EA78 E86FBEB8FF call 0040A8EC
0087EA7D FF75F8 push dword ptr [ebp-$08]
0087EA80 681CED8700 push $0087ED1C
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
0087EA85 6828ED8700 push $0087ED28
0087EA8A 8D45FC lea eax, [ebp-$04]
0087EA8D BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087EA92 E81D6CB8FF call 004056B4
0087EA97 8B45FC mov eax, [ebp-$04]
0087EA9A 50 push eax
0087EA9B 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EA9D E80AF5C5FF call 004DDFAC
0087EAA2 5A pop edx
0087EAA3 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EAA5 FF5138 call dword ptr [ecx+$38]
0087EAA8 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EAAA E8FDF4C5FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0087EAAF BA50ED8700 mov edx, $0087ED50
0087EAB4 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EAB6 FF5138 call dword ptr [ecx+$38]
0087EAB9 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087EABB E8086EC4FF call 004C58C8
* Reference to control Label10 : N.A.
|
0087EAC0 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
0087EAC6 8B8620030000 mov eax, [esi+$0320]
|
0087EACC E8BF83F3FF call 007B6E90
* Reference to control Label10 : N.A.
|
0087EAD1 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
0087EAD7 8B8620030000 mov eax, [esi+$0320]
|
0087EADD E83685F3FF call 007B7018
0087EAE2 BA7CED8700 mov edx, $0087ED7C
* Reference to control Payment : N.A.
|
0087EAE7 8B869C030000 mov eax, [esi+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087EAED E82E9BC0FF call 00488620
0087EAF2 33C0 xor eax, eax
0087EAF4 5A pop edx
0087EAF5 59 pop ecx
0087EAF6 59 pop ecx
0087EAF7 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
0087EAFA 681CEB8700 push $0087EB1C
0087EAFF 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0087EB02 E81D68B8FF call 00405324
0087EB07 8D45F8 lea eax, [ebp-$08]
0087EB0A BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0087EB0F E83468B8FF call 00405348
0087EB14 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087EB29(Sender : TObject);
begin
(*
0087EB29 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087EBC1(Sender : TObject);
begin
(*
0087EBC1 53 push ebx
0087EBC2 44 inc esp
0087EBC3 27 daa
0087EBC4 2920 sub dword ptr [eax], esp
0087EBC6 7468 jz 0087EC30
0087EBC8 656E outsb
0087EBCA 204D6F and [ebp+$6F], cl
0087EBCD 6E outsb
0087EBCE 657920 jns 0087EBF1
0087EBD1 656C insb
0087EBD3 7365 jnb 0087EC3A
0087EBD5 2030 and [eax], dh
0087EBD7 20656E and [ebp+$6E], ah
0087EBDA 642900 sub dword ptr fs:[eax], eax
0087EBDD 0000 add [eax], al
0087EBDF 00FF add bh, bh
0087EBE1 FFFF DB $FF, $FF //
0087EBE3 FF5200 call dword ptr [edx+$00]
0087EBE6 0000 add [eax], al
0087EBE8 2C55 sub al, $55
0087EBEA 53 push ebx
0087EBEB 44 inc esp
0087EBEC 4D dec ebp
0087EBED 6F outsd
0087EBEE 6E outsb
0087EBEF 65793D jns 0087EC2F
0087EBF2 286361 sub [ebx+$61], ah
0087EBF5 7365 jnb 0087EC5C
0087EBF7 207768 and [edi+$68], dh
0087EBFA 656E outsb
0087EBFC 2028 and [eax], ch
0087EBFE 41 inc ecx
0087EBFF 2E42 inc edx
0087EC01 5A pop edx
0087EC02 54 push esp
0087EC03 7970 jns 0087EC75
0087EC05 653C3E cmp al, $3E
0087EC08 27 daa
0087EC09 A3A4272920 mov dword ptr [$202927A4], eax
0087EC0E 61 popa
0087EC0F 6E outsb
0087EC10 642028 and fs:[eax], ch
0087EC13 41 inc ecx
0087EC14 2E42 inc edx
0087EC16 5A pop edx
0087EC17 54 push esp
0087EC18 7970 jns 0087EC8A
0087EC1A 653C3E cmp al, $3E
0087EC1D 27 daa
0087EC1E 52 push edx
0087EC1F 4D dec ebp
0087EC20 42 inc edx
0087EC21 27 daa
0087EC22 2920 sub dword ptr [eax], esp
0087EC24 7468 jz 0087EC8E
0087EC26 656E outsb
0087EC28 204D6F and [ebp+$6F], cl
0087EC2B 6E outsb
0087EC2C 657920 jns 0087EC4F
0087EC2F 656C insb
0087EC31 7365 jnb 0087EC98
0087EC33 2030 and [eax], dh
0087EC35 20656E and [ebp+$6E], ah
0087EC38 642900 sub dword ptr fs:[eax], eax
0087EC3B 00FF add bh, bh
0087EC3D FFFF DB $FF, $FF //
0087EC3F FF870000002C inc dword ptr [edi+$2C000000]
0087EC45 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
0087EC4C 287365 sub [ebx+$65], dh
0087EC4F 6C insb
0087EC50 656374204A arpl gs:[eax+$4A], si
0087EC55 4D dec ebp
0087EC56 2E50 push eax
0087EC58 52 push edx
0087EC59 54 push esp
0087EC5A 43 inc ebx
0087EC5B 6F outsd
0087EC5C 6C insb
0087EC5D 6F outsd
0087EC5E 7220 jb 0087EC80
0087EC60 66726F jb 0087ECD2
0087EC63 6D insd
0087EC64 204A59 and [edx+$59], cl
0087EC67 4F dec edi
0087EC68 7264 jb 0087ECCE
0087EC6A 65725F jb 0087ECCC
0087EC6D 53 push ebx
0087EC6E 7562 jnz 0087ECD2
0087EC70 204A4D and [edx+$4D], cl
0087EC73 20696E and [ecx+$6E], ch
0087EC76 6E outsb
0087EC77 657220 jb 0087EC9A
0087EC7A 6A6F push $6F
0087EC7C 696E20434B5F53 imul ebp, [esi+$20], $535F4B43
0087EC83 58 pop eax
0087EC84 50 push eax
0087EC85 42 inc edx
0087EC86 5F pop edi
0087EC87 43 inc ebx
0087EC88 52 push edx
0087EC89 204620 and [esi+$20], al
0087EC8C 6F outsd
0087EC8D 6E outsb
0087EC8E 204A4D and [edx+$4D], cl
0087EC91 2E53 push ebx
0087EC93 7562 jnz 0087ECF7
0087EC95 69643D462E4F5244 imul esp, [ebp+edi+$46], $44524F2E
0087EC9D 53 push ebx
0087EC9E 7562 jnz 0087ED02
0087ECA0 49 dec ecx
0087ECA1 6452 push edx
0087ECA3 4B dec ebx
0087ECA4 207768 and [edi+$68], dh
0087ECA7 657265 jb 0087ED0F
0087ECAA 20462E and [esi+$2E], al
0087ECAD 53 push ebx
0087ECAE 50 push eax
0087ECAF 49 dec ecx
0087ECB0 44 inc esp
0087ECB1 3D412E5946 cmp eax, $46592E41
0087ECB6 54 push esp
0087ECB7 7970 jns 0087ED29
0087ECB9 6549 dec ecx
0087ECBB 64292C27 sub dword ptr fs:[edi], ebp
0087ECBF 27 daa
0087ECC0 2920 sub dword ptr [eax], esp
0087ECC2 50 push eax
0087ECC3 52 push edx
0087ECC4 54 push esp
0087ECC5 43 inc ebx
0087ECC6 6F outsd
0087ECC7 6C insb
0087ECC8 6F outsd
0087ECC9 722C jb 0087ECF7
0087ECCB 00FF add bh, bh
0087ECCD FFFF DB $FF, $FF //
0087ECCF FF03 inc dword ptr [ebx]
0087ECD1 0000 add [eax], al
0087ECD3 00412E add [ecx+$2E], al
0087ECD6 2A00 sub al, byte ptr [eax]
0087ECD8 FFFF DB $FF, $FF //
0087ECDA FFFF DB $FF, $FF //
0087ECDC 1300 adc eax, [eax]
0087ECDE 0000 add [eax], al
0087ECE0 206672 and [esi+$72], ah
0087ECE3 6F outsd
0087ECE4 6D insd
0087ECE5 205946 and [ecx+$46], bl
0087ECE8 5F pop edi
0087ECE9 4D dec ebp
0087ECEA 6F outsd
0087ECEB 6E outsb
0087ECEC 65795F jns 0087ED4E
0087ECEF 43 inc ebx
0087ECF0 52 push edx
0087ECF1 204100 and [ecx+$00], al
0087ECF4 FFFF DB $FF, $FF //
0087ECF6 FFFF DB $FF, $FF //
0087ECF8 16 push ss
0087ECF9 0000 add [eax], al
0087ECFB 0020 add [eax], ah
0087ECFD 7768 jnbe 0087ED67
0087ECFF 657265 jb 0087ED67
0087ED02 20412E and [ecx+$2E], al
0087ED05 43 inc ebx
0087ED06 6F outsd
0087ED07 6E outsb
0087ED08 4E dec esi
0087ED09 4F dec edi
0087ED0A 206C696B and [ecx+ebp*2+$6B], ch
0087ED0E 652027 and gs:[edi], ah
0087ED11 250000FFFF and eax, $FFFF0000
0087ED16 FFFF DB $FF, $FF //
0087ED18 0100 add [eax], eax
0087ED1A 0000 add [eax], al
0087ED1C 25000000FF and eax, $FF000000
0087ED21 FFFF DB $FF, $FF //
0087ED23 FF1D00000027 call [$27000000]
0087ED29 20616E and [ecx+$6E], ah
0087ED2C 6420412E and fs:[ecx+$2E], al
0087ED30 43 inc ebx
0087ED31 52 push edx
0087ED32 54 push esp
0087ED33 7970 jns 0087EDA5
0087ED35 653D27D3A6B8 cmp eax, $B8A6D327
0087ED3B B6BF mov dh, $BF
0087ED3D EE out dx, al
0087ED3E B5C7 mov ch, $C7
0087ED40 BCC7272020 mov esp, $202027C7
0087ED45 0000 add [eax], al
0087ED47 00FF add bh, bh
0087ED49 FFFF DB $FF, $FF //
0087ED4B FF22 jmp dword ptr [edx]
0087ED4D 0000 add [eax], al
0087ED4F 0020 add [eax], ah
0087ED51 61 popa
0087ED52 6E outsb
0087ED53 64206973 and fs:[ecx+$73], ch
0087ED57 6E outsb
0087ED58 756C jnz 0087EDC6
0087ED5A 6C insb
0087ED5B 284665 sub [esi+$65], al
0087ED5E 6554 push esp
0087ED60 7970 jns 0087EDD2
0087ED62 652C27 sub al, $27
0087ED65 27 daa
0087ED66 293D27D0E9C4 sub dword ptr [$C4E9D027], edi
0087ED6C E2B7 loop -$49
0087ED6E D1D3 rcl ebx, 1
0087ED70 C3 ret
0087ED71 27 daa
0087ED72 0000 add [eax], al
0087ED74 FFFF DB $FF, $FF //
0087ED76 FFFF DB $FF, $FF //
0087ED78 0100 add [eax], eax
0087ED7A 0000 add [eax], al
0087ED7C 3000 xor [eax], al
0087ED7E 0000 add [eax], al
0087ED80 55 push ebp
0087ED81 8BEC mov ebp, esp
0087ED83 6A00 push $00
0087ED85 6A00 push $00
0087ED87 6A00 push $00
0087ED89 53 push ebx
0087ED8A 56 push esi
0087ED8B 8BF0 mov esi, eax
0087ED8D 33C0 xor eax, eax
0087ED8F 55 push ebp
* Possible String Reference to: '<27>\<5C><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
0087ED90 68E5EE8700 push $0087EEE5
***** TRY
|
0087ED95 64FF30 push dword ptr fs:[eax]
0087ED98 648920 mov fs:[eax], esp
0087ED9B 80390D cmp byte ptr [ecx], $0D
0087ED9E 0F851E010000 jnz 0087EEC2
* Reference to control ToolButton1 : TToolButton
|
0087EDA4 8B9E20030000 mov ebx, [esi+$0320]
0087EDAA 33D2 xor edx, edx
0087EDAC 8BC3 mov eax, ebx
0087EDAE 8B08 mov ecx, [eax]
* Possible reference to virtual method TToolButton.OFFS_0190
|
0087EDB0 FF9190010000 call dword ptr [ecx+$0190]
0087EDB6 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Close(TDataSet);
|
0087EDB8 E8176BC4FF call 004C58D4
0087EDBD 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EDBF E8E8F1C5FF call 004DDFAC
0087EDC4 8B10 mov edx, [eax]
* Reference to method TToolButton.GetClientRect()
|
0087EDC6 FF5244 call dword ptr [edx+$44]
0087EDC9 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EDCB E8DCF1C5FF call 004DDFAC
* Possible String Reference to: 'select SCOrderNO=(select Top 1 JM.C
| onNo from Cloth_Main JM where JM.Ma
| inid=A.Mainid),'
|
0087EDD0 BAFCEE8700 mov edx, $0087EEFC
0087EDD5 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EDD7 FF5138 call dword ptr [ecx+$38]
0087EDDA 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EDDC E8CBF1C5FF call 004DDFAC
* Possible String Reference to: 'RMBMoney=(case when (A.BZType<>'$')
| and (A.BZType<>'USD') then Money e
| lse 0 end)'
|
0087EDE1 BA5CEF8700 mov edx, $0087EF5C
0087EDE6 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EDE8 FF5138 call dword ptr [ecx+$38]
0087EDEB 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EDED E8BAF1C5FF call 004DDFAC
* Possible String Reference to: ',USDMoney=(case when (A.BZType<>'<27><>
| ') and (A.BZType<>'RMB') then Money
| else 0 end)'
|
0087EDF2 BAB8EF8700 mov edx, $0087EFB8
0087EDF7 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EDF9 FF5138 call dword ptr [ecx+$38]
0087EDFC 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EDFE E8A9F1C5FF 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,'
|
0087EE03 BA14F08700 mov edx, $0087F014
0087EE08 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EE0A FF5138 call dword ptr [ecx+$38]
0087EE0D 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EE0F E898F1C5FF call 004DDFAC
* Possible String Reference to: 'A.*'
|
0087EE14 BAA4F08700 mov edx, $0087F0A4
0087EE19 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EE1B FF5138 call dword ptr [ecx+$38]
0087EE1E 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EE20 E887F1C5FF call 004DDFAC
* Possible String Reference to: ' from YF_Money_CR A'
|
0087EE25 BAB0F08700 mov edx, $0087F0B0
0087EE2A 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EE2C FF5138 call dword ptr [ecx+$38]
* Possible String Reference to: ' where A.OrderNO like '%'
|
0087EE2F 68CCF08700 push $0087F0CC
0087EE34 8D55F4 lea edx, [ebp-$0C]
* Reference to control Label5 : TLabel
|
0087EE37 8B8688030000 mov eax, [esi+$0388]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0087EE3D E8AE97C0FF call 004885F0
0087EE42 8B45F4 mov eax, [ebp-$0C]
0087EE45 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0087EE48 E89FBAB8FF call 0040A8EC
0087EE4D FF75F8 push dword ptr [ebp-$08]
0087EE50 68F0F08700 push $0087F0F0
* Possible String Reference to: '' and A.CRType='Ӧ<><D3A6><EFBFBD><EFBFBD><EFBFBD>Ǽ<EFBFBD>' '
|
0087EE55 68FCF08700 push $0087F0FC
0087EE5A 8D45FC lea eax, [ebp-$04]
0087EE5D BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
0087EE62 E84D68B8FF call 004056B4
0087EE67 8B45FC mov eax, [ebp-$04]
0087EE6A 50 push eax
0087EE6B 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EE6D E83AF1C5FF call 004DDFAC
0087EE72 5A pop edx
0087EE73 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EE75 FF5138 call dword ptr [ecx+$38]
0087EE78 8BC3 mov eax, ebx
* Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu;
|
0087EE7A E82DF1C5FF call 004DDFAC
* Possible String Reference to: ' and isnull(FeeType,'')='<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>''
|
0087EE7F BA24F18700 mov edx, $0087F124
0087EE84 8B08 mov ecx, [eax]
* Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer)
|
0087EE86 FF5138 call dword ptr [ecx+$38]
0087EE89 8BC3 mov eax, ebx
* Reference to: DB.TDataSet.Open(TDataSet);
|
0087EE8B E8386AC4FF call 004C58C8
* Reference to control Label10 : N.A.
|
0087EE90 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
0087EE96 8B8620030000 mov eax, [esi+$0320]
|
0087EE9C E8EF7FF3FF call 007B6E90
* Reference to control Label10 : N.A.
|
0087EEA1 8B965C030000 mov edx, [esi+$035C]
* Reference to control ToolButton1 : TToolButton
|
0087EEA7 8B8620030000 mov eax, [esi+$0320]
|
0087EEAD E86681F3FF call 007B7018
0087EEB2 BA50F18700 mov edx, $0087F150
* Reference to control Payment : N.A.
|
0087EEB7 8B869C030000 mov eax, [esi+$039C]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
0087EEBD E85E97C0FF call 00488620
0087EEC2 33C0 xor eax, eax
0087EEC4 5A pop edx
0087EEC5 59 pop ecx
0087EEC6 59 pop ecx
0087EEC7 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[<5B><>]<5D>'
|
0087EECA 68ECEE8700 push $0087EEEC
0087EECF 8D45F4 lea eax, [ebp-$0C]
* Reference to: System.@LStrClr(void;void);
|
0087EED2 E84D64B8FF call 00405324
0087EED7 8D45F8 lea eax, [ebp-$08]
0087EEDA BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0087EEDF E86464B8FF call 00405348
0087EEE4 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087EEF9(Sender : TObject);
begin
(*
0087EEF9 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087EF91(Sender : TObject);
begin
(*
0087EF91 53 push ebx
0087EF92 44 inc esp
0087EF93 27 daa
0087EF94 2920 sub dword ptr [eax], esp
0087EF96 7468 jz 0087F000
0087EF98 656E outsb
0087EF9A 204D6F and [ebp+$6F], cl
0087EF9D 6E outsb
0087EF9E 657920 jns 0087EFC1
0087EFA1 656C insb
0087EFA3 7365 jnb 0087F00A
0087EFA5 2030 and [eax], dh
0087EFA7 20656E and [ebp+$6E], ah
0087EFAA 642900 sub dword ptr fs:[eax], eax
0087EFAD 0000 add [eax], al
0087EFAF 00FF add bh, bh
0087EFB1 FFFF DB $FF, $FF //
0087EFB3 FF5200 call dword ptr [edx+$00]
0087EFB6 0000 add [eax], al
0087EFB8 2C55 sub al, $55
0087EFBA 53 push ebx
0087EFBB 44 inc esp
0087EFBC 4D dec ebp
0087EFBD 6F outsd
0087EFBE 6E outsb
0087EFBF 65793D jns 0087EFFF
0087EFC2 286361 sub [ebx+$61], ah
0087EFC5 7365 jnb 0087F02C
0087EFC7 207768 and [edi+$68], dh
0087EFCA 656E outsb
0087EFCC 2028 and [eax], ch
0087EFCE 41 inc ecx
0087EFCF 2E42 inc edx
0087EFD1 5A pop edx
0087EFD2 54 push esp
0087EFD3 7970 jns 0087F045
0087EFD5 653C3E cmp al, $3E
0087EFD8 27 daa
0087EFD9 A3A4272920 mov dword ptr [$202927A4], eax
0087EFDE 61 popa
0087EFDF 6E outsb
0087EFE0 642028 and fs:[eax], ch
0087EFE3 41 inc ecx
0087EFE4 2E42 inc edx
0087EFE6 5A pop edx
0087EFE7 54 push esp
0087EFE8 7970 jns 0087F05A
0087EFEA 653C3E cmp al, $3E
0087EFED 27 daa
0087EFEE 52 push edx
0087EFEF 4D dec ebp
0087EFF0 42 inc edx
0087EFF1 27 daa
0087EFF2 2920 sub dword ptr [eax], esp
0087EFF4 7468 jz 0087F05E
0087EFF6 656E outsb
0087EFF8 204D6F and [ebp+$6F], cl
0087EFFB 6E outsb
0087EFFC 657920 jns 0087F01F
0087EFFF 656C insb
0087F001 7365 jnb 0087F068
0087F003 2030 and [eax], dh
0087F005 20656E and [ebp+$6E], ah
0087F008 642900 sub dword ptr fs:[eax], eax
0087F00B 00FF add bh, bh
0087F00D FFFF DB $FF, $FF //
0087F00F FF870000002C inc dword ptr [edi+$2C000000]
0087F015 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
0087F01C 287365 sub [ebx+$65], dh
0087F01F 6C insb
0087F020 656374204A arpl gs:[eax+$4A], si
0087F025 4D dec ebp
0087F026 2E50 push eax
0087F028 52 push edx
0087F029 54 push esp
0087F02A 43 inc ebx
0087F02B 6F outsd
0087F02C 6C insb
0087F02D 6F outsd
0087F02E 7220 jb 0087F050
0087F030 66726F jb 0087F0A2
0087F033 6D insd
0087F034 204A59 and [edx+$59], cl
0087F037 4F dec edi
0087F038 7264 jb 0087F09E
0087F03A 65725F jb 0087F09C
0087F03D 53 push ebx
0087F03E 7562 jnz 0087F0A2
0087F040 204A4D and [edx+$4D], cl
0087F043 20696E and [ecx+$6E], ch
0087F046 6E outsb
0087F047 657220 jb 0087F06A
0087F04A 6A6F push $6F
0087F04C 696E20434B5F53 imul ebp, [esi+$20], $535F4B43
0087F053 58 pop eax
0087F054 50 push eax
0087F055 42 inc edx
0087F056 5F pop edi
0087F057 43 inc ebx
0087F058 52 push edx
0087F059 204620 and [esi+$20], al
0087F05C 6F outsd
0087F05D 6E outsb
0087F05E 204A4D and [edx+$4D], cl
0087F061 2E53 push ebx
0087F063 7562 jnz 0087F0C7
0087F065 69643D462E4F5244 imul esp, [ebp+edi+$46], $44524F2E
0087F06D 53 push ebx
0087F06E 7562 jnz 0087F0D2
0087F070 49 dec ecx
0087F071 6452 push edx
0087F073 4B dec ebx
0087F074 207768 and [edi+$68], dh
0087F077 657265 jb 0087F0DF
0087F07A 20462E and [esi+$2E], al
0087F07D 53 push ebx
0087F07E 50 push eax
0087F07F 49 dec ecx
0087F080 44 inc esp
0087F081 3D412E5946 cmp eax, $46592E41
0087F086 54 push esp
0087F087 7970 jns 0087F0F9
0087F089 6549 dec ecx
0087F08B 64292C27 sub dword ptr fs:[edi], ebp
0087F08F 27 daa
0087F090 2920 sub dword ptr [eax], esp
0087F092 50 push eax
0087F093 52 push edx
0087F094 54 push esp
0087F095 43 inc ebx
0087F096 6F outsd
0087F097 6C insb
0087F098 6F outsd
0087F099 722C jb 0087F0C7
0087F09B 00FF add bh, bh
0087F09D FFFF DB $FF, $FF //
0087F09F FF03 inc dword ptr [ebx]
0087F0A1 0000 add [eax], al
0087F0A3 00412E add [ecx+$2E], al
0087F0A6 2A00 sub al, byte ptr [eax]
0087F0A8 FFFF DB $FF, $FF //
0087F0AA FFFF DB $FF, $FF //
0087F0AC 1300 adc eax, [eax]
0087F0AE 0000 add [eax], al
0087F0B0 206672 and [esi+$72], ah
0087F0B3 6F outsd
0087F0B4 6D insd
0087F0B5 205946 and [ecx+$46], bl
0087F0B8 5F pop edi
0087F0B9 4D dec ebp
0087F0BA 6F outsd
0087F0BB 6E outsb
0087F0BC 65795F jns 0087F11E
0087F0BF 43 inc ebx
0087F0C0 52 push edx
0087F0C1 204100 and [ecx+$00], al
0087F0C4 FFFF DB $FF, $FF //
0087F0C6 FFFF DB $FF, $FF //
0087F0C8 1800 sbb [eax], al
0087F0CA 0000 add [eax], al
0087F0CC 207768 and [edi+$68], dh
0087F0CF 657265 jb 0087F137
0087F0D2 20412E and [ecx+$2E], al
0087F0D5 4F dec edi
0087F0D6 7264 jb 0087F13C
0087F0D8 65724E jb 0087F129
0087F0DB 4F dec edi
0087F0DC 206C696B and [ecx+ebp*2+$6B], ch
0087F0E0 652027 and gs:[edi], ah
0087F0E3 2500000000 and eax, $00000000
0087F0E8 FFFF DB $FF, $FF //
0087F0EA FFFF DB $FF, $FF //
0087F0EC 0100 add [eax], eax
0087F0EE 0000 add [eax], al
0087F0F0 25000000FF and eax, $FF000000
0087F0F5 FFFF DB $FF, $FF //
0087F0F7 FF1D00000027 call [$27000000]
0087F0FD 20616E and [ecx+$6E], ah
0087F100 6420412E and fs:[ecx+$2E], al
0087F104 43 inc ebx
0087F105 52 push edx
0087F106 54 push esp
0087F107 7970 jns 0087F179
0087F109 653D27D3A6B8 cmp eax, $B8A6D327
0087F10F B6BF mov dh, $BF
0087F111 EE out dx, al
0087F112 B5C7 mov ch, $C7
0087F114 BCC7272020 mov esp, $202027C7
0087F119 0000 add [eax], al
0087F11B 00FF add bh, bh
0087F11D FFFF DB $FF, $FF //
0087F11F FF22 jmp dword ptr [edx]
0087F121 0000 add [eax], al
0087F123 0020 add [eax], ah
0087F125 61 popa
0087F126 6E outsb
0087F127 64206973 and fs:[ecx+$73], ch
0087F12B 6E outsb
0087F12C 756C jnz 0087F19A
0087F12E 6C insb
0087F12F 284665 sub [esi+$65], al
0087F132 6554 push esp
0087F134 7970 jns 0087F1A6
0087F136 652C27 sub al, $27
0087F139 27 daa
0087F13A 293D27D0E9C4 sub dword ptr [$C4E9D027], edi
0087F140 E2B7 loop -$49
0087F142 D1D3 rcl ebx, 1
0087F144 C3 ret
0087F145 27 daa
0087F146 0000 add [eax], al
0087F148 FFFF DB $FF, $FF //
0087F14A FFFF DB $FF, $FF //
0087F14C 0100 add [eax], eax
0087F14E 0000 add [eax], al
0087F150 3000 xor [eax], al
0087F152 0000 add [eax], al
0087F154 55 push ebp
0087F155 8BEC mov ebp, esp
0087F157 5D pop ebp
0087F158 C20800 ret $0008
0087F15B 90 nop
0087F15C 53 push ebx
0087F15D 8BD8 mov ebx, eax
0087F15F 33D2 xor edx, edx
* Reference to control QtyNote : N.A.
|
0087F161 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F167 E858AADAFF call 00629BC4
0087F16C 33D2 xor edx, edx
* Reference to control FromPlace : N.A.
|
0087F16E 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F174 E84BAADAFF call 00629BC4
0087F179 33D2 xor edx, edx
* Reference to control v1Column3 : N.A.
|
0087F17B 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0087F181 E88A93C0FF call 00488510
* Possible String Reference to: '<27>Է<EFBFBD><D4B7><EFBFBD>λ'
|
0087F186 BA84F28700 mov edx, $0087F284
* Reference to control Label20 : N.A.
|
0087F18B 8B836C030000 mov eax, [ebx+$036C]
* Reference to : TcxCustomGridTableView._PROC_006295E0()
|
0087F191 E84AA4DAFF call 006295E0
0087F196 B201 mov dl, $01
* Reference to control Label23 : N.A.
|
0087F198 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F19E E821AADAFF call 00629BC4
0087F1A3 B201 mov dl, $01
* Reference to control TelNo : N.A.
|
0087F1A5 8B83D8030000 mov eax, [ebx+$03D8]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1AB E814AADAFF call 00629BC4
* Reference to control ToolButton3 : TToolButton
|
0087F1B0 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1B6 83B83C03000000 cmp dword ptr [eax+$033C], +$00
0087F1BD 751A jnz 0087F1D9
0087F1BF B201 mov dl, $01
* Reference to control QtyNote : N.A.
|
0087F1C1 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1C7 E8F8A9DAFF call 00629BC4
0087F1CC B201 mov dl, $01
* Reference to control FromPlace : N.A.
|
0087F1CE 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F1D4 E8EBA9DAFF call 00629BC4
* Reference to control ToolButton3 : TToolButton
|
0087F1D9 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1DF 83B83C03000001 cmp dword ptr [eax+$033C], +$01
0087F1E6 750D jnz 0087F1F5
0087F1E8 B201 mov dl, $01
* Reference to control v1Column3 : N.A.
|
0087F1EA 8B83D0030000 mov eax, [ebx+$03D0]
* Reference to: Controls.TControl.SetVisible(TControl;Boolean);
|
0087F1F0 E81B93C0FF call 00488510
* Reference to control ToolButton3 : TToolButton
|
0087F1F5 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F1FB 83B83C03000002 cmp dword ptr [eax+$033C], +$02
0087F202 7544 jnz 0087F248
* Possible String Reference to: 'Ա<><D4B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
0087F204 BA98F28700 mov edx, $0087F298
* Reference to control Label20 : N.A.
|
0087F209 8B836C030000 mov eax, [ebx+$036C]
* Reference to : TcxCustomGridTableView._PROC_006295E0()
|
0087F20F E8CCA3DAFF call 006295E0
0087F214 B201 mov dl, $01
* Reference to control QtyNote : N.A.
|
0087F216 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F21C E8A3A9DAFF call 00629BC4
0087F221 B201 mov dl, $01
* Reference to control FromPlace : N.A.
|
0087F223 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F229 E896A9DAFF call 00629BC4
0087F22E 33D2 xor edx, edx
* Reference to control Label23 : N.A.
|
0087F230 8B83DC030000 mov eax, [ebx+$03DC]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F236 E889A9DAFF call 00629BC4
0087F23B 33D2 xor edx, edx
* Reference to control TelNo : N.A.
|
0087F23D 8B83D8030000 mov eax, [ebx+$03D8]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F243 E87CA9DAFF call 00629BC4
* Reference to control ToolButton3 : TToolButton
|
0087F248 8B83C8030000 mov eax, [ebx+$03C8]
* Reference to control ADOTemp : N.A.
|
0087F24E 83B83C03000003 cmp dword ptr [eax+$033C], +$03
0087F255 751A jnz 0087F271
0087F257 B201 mov dl, $01
* Reference to control QtyNote : N.A.
|
0087F259 8B8394030000 mov eax, [ebx+$0394]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F25F E860A9DAFF call 00629BC4
0087F264 B201 mov dl, $01
* Reference to control FromPlace : N.A.
|
0087F266 8B8370030000 mov eax, [ebx+$0370]
* Reference to : TcxCustomGridTableView._PROC_00629BC4()
|
0087F26C E853A9DAFF call 00629BC4
0087F271 8BC3 mov eax, ebx
|
0087F273 E8D484FFFF call 0087774C
0087F278 5B pop ebx
0087F279 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0087FC13(Sender : TObject);
begin
(*
0087FC13 4D dec ebp
0087FC14 6F outsd
0087FC15 6E outsb
0087FC16 65793D jns 0087FC56
0087FC19 287365 sub [ebx+$65], dh
0087FC1C 6C insb
0087FC1D 6563742053 arpl gs:[eax+$53], si
0087FC22 756D jnz 0087FC91
0087FC24 28422E sub [edx+$2E], al
0087FC27 4D dec ebp
0087FC28 6F outsd
0087FC29 6E outsb
0087FC2A 657929 jns 0087FC56
0087FC2D 206672 and [esi+$72], ah
0087FC30 6F outsd
0087FC31 6D insd
0087FC32 205946 and [ecx+$46], bl
0087FC35 5F pop edi
0087FC36 4D dec ebp
0087FC37 6F outsd
0087FC38 6E outsb
0087FC39 65795F jns 0087FC9B
0087FC3C 43 inc ebx
0087FC3D 52 push edx
0087FC3E 204220 and [edx+$20], al
0087FC41 7768 jnbe 0087FCAB
0087FC43 657265 jb 0087FCAB
0087FC46 207965 and [ecx+$65], bh
0087FC49 61 popa
0087FC4A 7228 jb 0087FC74
0087FC4C 42 inc edx
0087FC4D 2E43 inc ebx
0087FC4F 52 push edx
0087FC50 54 push esp
0087FC51 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0087FC58 61 popa
0087FC59 7228 jb 0087FC83
0087FC5B 41 inc ecx
0087FC5C 2E43 inc ebx
0087FC5E 52 push edx
0087FC5F 54 push esp
0087FC60 696D652920616E imul ebp, [ebp+$65], $6E612029
0087FC67 6420422E and fs:[edx+$2E], al
0087FC6B 43 inc ebx
0087FC6C 6F outsd
0087FC6D 6D insd
0087FC6E 54 push esp
0087FC6F 61 popa
0087FC70 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0087FC78 6F outsd
0087FC79 6D insd
0087FC7A 54 push esp
0087FC7B 61 popa
0087FC7C 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
0087FC84 20422E and [edx+$2E], al
0087FC87 59 pop ecx
0087FC88 46 inc esi
0087FC89 4E dec esi
0087FC8A 61 popa
0087FC8B 6D insd
0087FC8C 653D412E5946 cmp eax, $46592E41
0087FC92 4E dec esi
0087FC93 61 popa
0087FC94 6D insd
0087FC95 652000 and gs:[eax], al
0087FC98 FFFF DB $FF, $FF //
0087FC9A FFFF DB $FF, $FF //
0087FC9C 670000 add [bx+si], al
0087FC9F 00616E add [ecx+$6E], ah
0087FCA2 6420422E and fs:[edx+$2E], al
0087FCA6 43 inc ebx
0087FCA7 52 push edx
0087FCA8 54 push esp
0087FCA9 7970 jns 0087FD1B
0087FCAB 653D27B8B6BF cmp eax, $BFB6B827
0087FCB1 EE out dx, al
0087FCB2 D4 aam
0087FCB3 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
0087FCB9 6E outsb
0087FCBA 64206973 and fs:[ecx+$73], ch
0087FCBE 6E outsb
0087FCBF 756C jnz 0087FD2D
0087FCC1 6C insb
0087FCC2 28422E sub [edx+$2E], al
0087FCC5 43 inc ebx
0087FCC6 6F outsd
0087FCC7 6E outsb
0087FCC8 4E dec esi
0087FCC9 6F outsd
0087FCCA 2C27 sub al, $27
0087FCCC 27 daa
0087FCCD 293D27272061 sub dword ptr [$61202727], edi
0087FCD3 6E outsb
0087FCD4 64206973 and fs:[ecx+$73], ch
0087FCD8 6E outsb
0087FCD9 756C jnz 0087FD47
0087FCDB 6C insb
0087FCDC 28422E sub [edx+$2E], al
0087FCDF 4F dec edi
0087FCE0 7264 jb 0087FD46
0087FCE2 65724E jb 0087FD33
0087FCE5 6F outsd
0087FCE6 2C27 sub al, $27
0087FCE8 27 daa
0087FCE9 293D27272061 sub dword ptr [$61202727], edi
0087FCEF 6E outsb
0087FCF0 64204D6F and fs:[ebp+$6F], cl
0087FCF4 6E outsb
0087FCF5 7468 jz 0087FD5F
0087FCF7 28422E sub [edx+$2E], al
0087FCFA 43 inc ebx
0087FCFB 52 push edx
0087FCFC 54 push esp
0087FCFD 696D65293D2730 imul ebp, [ebp+$65], $30273D29
0087FD04 35272900FF xor eax, $FF002927
0087FD09 FFFF DB $FF, $FF //
0087FD0B FF880000002C dec dword ptr [eax+$2C000000]
0087FD11 4C dec esp
0087FD12 49 dec ecx
0087FD13 55 push ebp
0087FD14 4D dec ebp
0087FD15 6F outsd
0087FD16 6E outsb
0087FD17 65793D jns 0087FD57
0087FD1A 287365 sub [ebx+$65], dh
0087FD1D 6C insb
0087FD1E 6563742053 arpl gs:[eax+$53], si
0087FD23 756D jnz 0087FD92
0087FD25 28422E sub [edx+$2E], al
0087FD28 4D dec ebp
0087FD29 6F outsd
0087FD2A 6E outsb
0087FD2B 657929 jns 0087FD57
0087FD2E 206672 and [esi+$72], ah
0087FD31 6F outsd
0087FD32 6D insd
0087FD33 205946 and [ecx+$46], bl
0087FD36 5F pop edi
0087FD37 4D dec ebp
0087FD38 6F outsd
0087FD39 6E outsb
0087FD3A 65795F jns 0087FD9C
0087FD3D 43 inc ebx
0087FD3E 52 push edx
0087FD3F 204220 and [edx+$20], al
0087FD42 7768 jnbe 0087FDAC
0087FD44 657265 jb 0087FDAC
0087FD47 207965 and [ecx+$65], bh
0087FD4A 61 popa
0087FD4B 7228 jb 0087FD75
0087FD4D 42 inc edx
0087FD4E 2E43 inc ebx
0087FD50 52 push edx
0087FD51 54 push esp
0087FD52 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0087FD59 61 popa
0087FD5A 7228 jb 0087FD84
0087FD5C 41 inc ecx
0087FD5D 2E43 inc ebx
0087FD5F 52 push edx
0087FD60 54 push esp
0087FD61 696D652920616E imul ebp, [ebp+$65], $6E612029
0087FD68 6420422E and fs:[edx+$2E], al
0087FD6C 43 inc ebx
0087FD6D 6F outsd
0087FD6E 6D insd
0087FD6F 54 push esp
0087FD70 61 popa
0087FD71 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0087FD79 6F outsd
0087FD7A 6D insd
0087FD7B 54 push esp
0087FD7C 61 popa
0087FD7D 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
0087FD85 20422E and [edx+$2E], al
0087FD88 59 pop ecx
0087FD89 46 inc esi
0087FD8A 4E dec esi
0087FD8B 61 popa
0087FD8C 6D insd
0087FD8D 653D412E5946 cmp eax, $46592E41
0087FD93 4E dec esi
0087FD94 61 popa
0087FD95 6D insd
0087FD96 652000 and gs:[eax], al
0087FD99 0000 add [eax], al
0087FD9B 00FF add bh, bh
0087FD9D FFFF DB $FF, $FF //
0087FD9F FF6700 jmp dword ptr [edi+$00]
0087FDA2 0000 add [eax], al
0087FDA4 61 popa
0087FDA5 6E outsb
0087FDA6 6420422E and fs:[edx+$2E], al
0087FDAA 43 inc ebx
0087FDAB 52 push edx
0087FDAC 54 push esp
0087FDAD 7970 jns 0087FE1F
0087FDAF 653D27B8B6BF cmp eax, $BFB6B827
0087FDB5 EE out dx, al
0087FDB6 D4 aam
0087FDB7 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
0087FDBD 6E outsb
0087FDBE 64206973 and fs:[ecx+$73], ch
0087FDC2 6E outsb
0087FDC3 756C jnz 0087FE31
0087FDC5 6C insb
0087FDC6 28422E sub [edx+$2E], al
0087FDC9 43 inc ebx
0087FDCA 6F outsd
0087FDCB 6E outsb
0087FDCC 4E dec esi
0087FDCD 6F outsd
0087FDCE 2C27 sub al, $27
0087FDD0 27 daa
0087FDD1 293D27272061 sub dword ptr [$61202727], edi
0087FDD7 6E outsb
0087FDD8 64206973 and fs:[ecx+$73], ch
0087FDDC 6E outsb
0087FDDD 756C jnz 0087FE4B
0087FDDF 6C insb
0087FDE0 28422E sub [edx+$2E], al
0087FDE3 4F dec edi
0087FDE4 7264 jb 0087FE4A
0087FDE6 65724E jb 0087FE37
0087FDE9 6F outsd
0087FDEA 2C27 sub al, $27
0087FDEC 27 daa
0087FDED 293D27272061 sub dword ptr [$61202727], edi
0087FDF3 6E outsb
0087FDF4 64204D6F and fs:[ebp+$6F], cl
0087FDF8 6E outsb
0087FDF9 7468 jz 0087FE63
0087FDFB 28422E sub [edx+$2E], al
0087FDFE 43 inc ebx
0087FDFF 52 push edx
0087FE00 54 push esp
0087FE01 696D65293D2730 imul ebp, [ebp+$65], $30273D29
0087FE08 3627 daa
0087FE0A 2900 sub dword ptr [eax], eax
0087FE0C FFFF DB $FF, $FF //
0087FE0E FFFF DB $FF, $FF //
0087FE10 8700 xchg [eax], eax
0087FE12 0000 add [eax], al
0087FE14 2C51 sub al, $51
0087FE16 49 dec ecx
0087FE17 4D dec ebp
0087FE18 6F outsd
0087FE19 6E outsb
0087FE1A 65793D jns 0087FE5A
0087FE1D 287365 sub [ebx+$65], dh
0087FE20 6C insb
0087FE21 6563742053 arpl gs:[eax+$53], si
0087FE26 756D jnz 0087FE95
0087FE28 28422E sub [edx+$2E], al
0087FE2B 4D dec ebp
0087FE2C 6F outsd
0087FE2D 6E outsb
0087FE2E 657929 jns 0087FE5A
0087FE31 206672 and [esi+$72], ah
0087FE34 6F outsd
0087FE35 6D insd
0087FE36 205946 and [ecx+$46], bl
0087FE39 5F pop edi
0087FE3A 4D dec ebp
0087FE3B 6F outsd
0087FE3C 6E outsb
0087FE3D 65795F jns 0087FE9F
0087FE40 43 inc ebx
0087FE41 52 push edx
0087FE42 204220 and [edx+$20], al
0087FE45 7768 jnbe 0087FEAF
0087FE47 657265 jb 0087FEAF
0087FE4A 207965 and [ecx+$65], bh
0087FE4D 61 popa
0087FE4E 7228 jb 0087FE78
0087FE50 42 inc edx
0087FE51 2E43 inc ebx
0087FE53 52 push edx
0087FE54 54 push esp
0087FE55 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0087FE5C 61 popa
0087FE5D 7228 jb 0087FE87
0087FE5F 41 inc ecx
0087FE60 2E43 inc ebx
0087FE62 52 push edx
0087FE63 54 push esp
0087FE64 696D652920616E imul ebp, [ebp+$65], $6E612029
0087FE6B 6420422E and fs:[edx+$2E], al
0087FE6F 43 inc ebx
0087FE70 6F outsd
0087FE71 6D insd
0087FE72 54 push esp
0087FE73 61 popa
0087FE74 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0087FE7C 6F outsd
0087FE7D 6D insd
0087FE7E 54 push esp
0087FE7F 61 popa
0087FE80 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
0087FE88 20422E and [edx+$2E], al
0087FE8B 59 pop ecx
0087FE8C 46 inc esi
0087FE8D 4E dec esi
0087FE8E 61 popa
0087FE8F 6D insd
0087FE90 653D412E5946 cmp eax, $46592E41
0087FE96 4E dec esi
0087FE97 61 popa
0087FE98 6D insd
0087FE99 652000 and gs:[eax], al
0087FE9C FFFF DB $FF, $FF //
0087FE9E FFFF DB $FF, $FF //
0087FEA0 670000 add [bx+si], al
0087FEA3 00616E add [ecx+$6E], ah
0087FEA6 6420422E and fs:[edx+$2E], al
0087FEAA 43 inc ebx
0087FEAB 52 push edx
0087FEAC 54 push esp
0087FEAD 7970 jns 0087FF1F
0087FEAF 653D27B8B6BF cmp eax, $BFB6B827
0087FEB5 EE out dx, al
0087FEB6 D4 aam
0087FEB7 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
0087FEBD 6E outsb
0087FEBE 64206973 and fs:[ecx+$73], ch
0087FEC2 6E outsb
0087FEC3 756C jnz 0087FF31
0087FEC5 6C insb
0087FEC6 28422E sub [edx+$2E], al
0087FEC9 43 inc ebx
0087FECA 6F outsd
0087FECB 6E outsb
0087FECC 4E dec esi
0087FECD 6F outsd
0087FECE 2C27 sub al, $27
0087FED0 27 daa
0087FED1 293D27272061 sub dword ptr [$61202727], edi
0087FED7 6E outsb
0087FED8 64206973 and fs:[ecx+$73], ch
0087FEDC 6E outsb
0087FEDD 756C jnz 0087FF4B
0087FEDF 6C insb
0087FEE0 28422E sub [edx+$2E], al
0087FEE3 4F dec edi
0087FEE4 7264 jb 0087FF4A
0087FEE6 65724E jb 0087FF37
0087FEE9 6F outsd
0087FEEA 2C27 sub al, $27
0087FEEC 27 daa
0087FEED 293D27272061 sub dword ptr [$61202727], edi
0087FEF3 6E outsb
0087FEF4 64204D6F and fs:[ebp+$6F], cl
0087FEF8 6E outsb
0087FEF9 7468 jz 0087FF63
0087FEFB 28422E sub [edx+$2E], al
0087FEFE 43 inc ebx
0087FEFF 52 push edx
0087FF00 54 push esp
0087FF01 696D65293D2730 imul ebp, [ebp+$65], $30273D29
0087FF08 37 aaa
0087FF09 27 daa
0087FF0A 2900 sub dword ptr [eax], eax
0087FF0C FFFF DB $FF, $FF //
0087FF0E FFFF DB $FF, $FF //
0087FF10 8700 xchg [eax], eax
0087FF12 0000 add [eax], al
0087FF14 2C42 sub al, $42
0087FF16 41 inc ecx
0087FF17 4D dec ebp
0087FF18 6F outsd
0087FF19 6E outsb
0087FF1A 65793D jns 0087FF5A
0087FF1D 287365 sub [ebx+$65], dh
0087FF20 6C insb
0087FF21 6563742053 arpl gs:[eax+$53], si
0087FF26 756D jnz 0087FF95
0087FF28 28422E sub [edx+$2E], al
0087FF2B 4D dec ebp
0087FF2C 6F outsd
0087FF2D 6E outsb
0087FF2E 657929 jns 0087FF5A
0087FF31 206672 and [esi+$72], ah
0087FF34 6F outsd
0087FF35 6D insd
0087FF36 205946 and [ecx+$46], bl
0087FF39 5F pop edi
0087FF3A 4D dec ebp
0087FF3B 6F outsd
0087FF3C 6E outsb
0087FF3D 65795F jns 0087FF9F
0087FF40 43 inc ebx
0087FF41 52 push edx
0087FF42 204220 and [edx+$20], al
0087FF45 7768 jnbe 0087FFAF
0087FF47 657265 jb 0087FFAF
0087FF4A 207965 and [ecx+$65], bh
0087FF4D 61 popa
0087FF4E 7228 jb 0087FF78
0087FF50 42 inc edx
0087FF51 2E43 inc ebx
0087FF53 52 push edx
0087FF54 54 push esp
0087FF55 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0087FF5C 61 popa
0087FF5D 7228 jb 0087FF87
0087FF5F 41 inc ecx
0087FF60 2E43 inc ebx
0087FF62 52 push edx
0087FF63 54 push esp
0087FF64 696D652920616E imul ebp, [ebp+$65], $6E612029
0087FF6B 6420422E and fs:[edx+$2E], al
0087FF6F 43 inc ebx
0087FF70 6F outsd
0087FF71 6D insd
0087FF72 54 push esp
0087FF73 61 popa
0087FF74 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0087FF7C 6F outsd
0087FF7D 6D insd
0087FF7E 54 push esp
0087FF7F 61 popa
0087FF80 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
0087FF88 20422E and [edx+$2E], al
0087FF8B 59 pop ecx
0087FF8C 46 inc esi
0087FF8D 4E dec esi
0087FF8E 61 popa
0087FF8F 6D insd
0087FF90 653D412E5946 cmp eax, $46592E41
0087FF96 4E dec esi
0087FF97 61 popa
0087FF98 6D insd
0087FF99 652000 and gs:[eax], al
0087FF9C FFFF DB $FF, $FF //
0087FF9E FFFF DB $FF, $FF //
0087FFA0 670000 add [bx+si], al
0087FFA3 00616E add [ecx+$6E], ah
0087FFA6 6420422E and fs:[edx+$2E], al
0087FFAA 43 inc ebx
0087FFAB 52 push edx
0087FFAC 54 push esp
0087FFAD 7970 jns 0088001F
0087FFAF 653D27B8B6BF cmp eax, $BFB6B827
0087FFB5 EE out dx, al
0087FFB6 D4 aam
0087FFB7 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
0087FFBD 6E outsb
0087FFBE 64206973 and fs:[ecx+$73], ch
0087FFC2 6E outsb
0087FFC3 756C jnz 00880031
0087FFC5 6C insb
0087FFC6 28422E sub [edx+$2E], al
0087FFC9 43 inc ebx
0087FFCA 6F outsd
0087FFCB 6E outsb
0087FFCC 4E dec esi
0087FFCD 6F outsd
0087FFCE 2C27 sub al, $27
0087FFD0 27 daa
0087FFD1 293D27272061 sub dword ptr [$61202727], edi
0087FFD7 6E outsb
0087FFD8 64206973 and fs:[ecx+$73], ch
0087FFDC 6E outsb
0087FFDD 756C jnz 0088004B
0087FFDF 6C insb
0087FFE0 28422E sub [edx+$2E], al
0087FFE3 4F dec edi
0087FFE4 7264 jb 0088004A
0087FFE6 65724E jb 00880037
0087FFE9 6F outsd
0087FFEA 2C27 sub al, $27
0087FFEC 27 daa
0087FFED 293D27272061 sub dword ptr [$61202727], edi
0087FFF3 6E outsb
0087FFF4 64204D6F and fs:[ebp+$6F], cl
0087FFF8 6E outsb
0087FFF9 7468 jz 00880063
0087FFFB 28422E sub [edx+$2E], al
0087FFFE 43 inc ebx
0087FFFF 52 push edx
00880000 54 push esp
00880001 696D65293D2730 imul ebp, [ebp+$65], $30273D29
00880008 3827 cmp [edi], ah
0088000A 2900 sub dword ptr [eax], eax
0088000C FFFF DB $FF, $FF //
0088000E FFFF DB $FF, $FF //
00880010 8800 mov [eax], al
00880012 0000 add [eax], al
00880014 2C4A sub al, $4A
00880016 49 dec ecx
00880017 55 push ebp
00880018 4D dec ebp
00880019 6F outsd
0088001A 6E outsb
0088001B 65793D jns 0088005B
0088001E 287365 sub [ebx+$65], dh
00880021 6C insb
00880022 6563742053 arpl gs:[eax+$53], si
00880027 756D jnz 00880096
00880029 28422E sub [edx+$2E], al
0088002C 4D dec ebp
0088002D 6F outsd
0088002E 6E outsb
0088002F 657929 jns 0088005B
00880032 206672 and [esi+$72], ah
00880035 6F outsd
00880036 6D insd
00880037 205946 and [ecx+$46], bl
0088003A 5F pop edi
0088003B 4D dec ebp
0088003C 6F outsd
0088003D 6E outsb
0088003E 65795F jns 008800A0
00880041 43 inc ebx
00880042 52 push edx
00880043 204220 and [edx+$20], al
00880046 7768 jnbe 008800B0
00880048 657265 jb 008800B0
0088004B 207965 and [ecx+$65], bh
0088004E 61 popa
0088004F 7228 jb 00880079
00880051 42 inc edx
00880052 2E43 inc ebx
00880054 52 push edx
00880055 54 push esp
00880056 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0088005D 61 popa
0088005E 7228 jb 00880088
00880060 41 inc ecx
00880061 2E43 inc ebx
00880063 52 push edx
00880064 54 push esp
00880065 696D652920616E imul ebp, [ebp+$65], $6E612029
0088006C 6420422E and fs:[edx+$2E], al
00880070 43 inc ebx
00880071 6F outsd
00880072 6D insd
00880073 54 push esp
00880074 61 popa
00880075 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0088007D 6F outsd
0088007E 6D insd
0088007F 54 push esp
00880080 61 popa
00880081 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
00880089 20422E and [edx+$2E], al
0088008C 59 pop ecx
0088008D 46 inc esi
0088008E 4E dec esi
0088008F 61 popa
00880090 6D insd
00880091 653D412E5946 cmp eax, $46592E41
00880097 4E dec esi
00880098 61 popa
00880099 6D insd
0088009A 652000 and gs:[eax], al
0088009D 0000 add [eax], al
0088009F 00FF add bh, bh
008800A1 FFFF DB $FF, $FF //
008800A3 FF6700 jmp dword ptr [edi+$00]
008800A6 0000 add [eax], al
008800A8 61 popa
008800A9 6E outsb
008800AA 6420422E and fs:[edx+$2E], al
008800AE 43 inc ebx
008800AF 52 push edx
008800B0 54 push esp
008800B1 7970 jns 00880123
008800B3 653D27B8B6BF cmp eax, $BFB6B827
008800B9 EE out dx, al
008800BA D4 aam
008800BB D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
008800C1 6E outsb
008800C2 64206973 and fs:[ecx+$73], ch
008800C6 6E outsb
008800C7 756C jnz 00880135
008800C9 6C insb
008800CA 28422E sub [edx+$2E], al
008800CD 43 inc ebx
008800CE 6F outsd
008800CF 6E outsb
008800D0 4E dec esi
008800D1 6F outsd
008800D2 2C27 sub al, $27
008800D4 27 daa
008800D5 293D27272061 sub dword ptr [$61202727], edi
008800DB 6E outsb
008800DC 64206973 and fs:[ecx+$73], ch
008800E0 6E outsb
008800E1 756C jnz 0088014F
008800E3 6C insb
008800E4 28422E sub [edx+$2E], al
008800E7 4F dec edi
008800E8 7264 jb 0088014E
008800EA 65724E jb 0088013B
008800ED 6F outsd
008800EE 2C27 sub al, $27
008800F0 27 daa
008800F1 293D27272061 sub dword ptr [$61202727], edi
008800F7 6E outsb
008800F8 64204D6F and fs:[ebp+$6F], cl
008800FC 6E outsb
008800FD 7468 jz 00880167
008800FF 28422E sub [edx+$2E], al
00880102 43 inc ebx
00880103 52 push edx
00880104 54 push esp
00880105 696D65293D2730 imul ebp, [ebp+$65], $30273D29
0088010C 3927 cmp [edi], esp
0088010E 2900 sub dword ptr [eax], eax
00880110 FFFF DB $FF, $FF //
00880112 FFFF DB $FF, $FF //
00880114 8800 mov [eax], al
00880116 0000 add [eax], al
00880118 2C53 sub al, $53
0088011A 48 dec eax
0088011B 49 dec ecx
0088011C 4D dec ebp
0088011D 6F outsd
0088011E 6E outsb
0088011F 65793D jns 0088015F
00880122 287365 sub [ebx+$65], dh
00880125 6C insb
00880126 6563742053 arpl gs:[eax+$53], si
0088012B 756D jnz 0088019A
0088012D 28422E sub [edx+$2E], al
00880130 4D dec ebp
00880131 6F outsd
00880132 6E outsb
00880133 657929 jns 0088015F
00880136 206672 and [esi+$72], ah
00880139 6F outsd
0088013A 6D insd
0088013B 205946 and [ecx+$46], bl
0088013E 5F pop edi
0088013F 4D dec ebp
00880140 6F outsd
00880141 6E outsb
00880142 65795F jns 008801A4
00880145 43 inc ebx
00880146 52 push edx
00880147 204220 and [edx+$20], al
0088014A 7768 jnbe 008801B4
0088014C 657265 jb 008801B4
0088014F 207965 and [ecx+$65], bh
00880152 61 popa
00880153 7228 jb 0088017D
00880155 42 inc edx
00880156 2E43 inc ebx
00880158 52 push edx
00880159 54 push esp
0088015A 696D65293D7965 imul ebp, [ebp+$65], $65793D29
00880161 61 popa
00880162 7228 jb 0088018C
00880164 41 inc ecx
00880165 2E43 inc ebx
00880167 52 push edx
00880168 54 push esp
00880169 696D652920616E imul ebp, [ebp+$65], $6E612029
00880170 6420422E and fs:[edx+$2E], al
00880174 43 inc ebx
00880175 6F outsd
00880176 6D insd
00880177 54 push esp
00880178 61 popa
00880179 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
00880181 6F outsd
00880182 6D insd
00880183 54 push esp
00880184 61 popa
00880185 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
0088018D 20422E and [edx+$2E], al
00880190 59 pop ecx
00880191 46 inc esi
00880192 4E dec esi
00880193 61 popa
00880194 6D insd
00880195 653D412E5946 cmp eax, $46592E41
0088019B 4E dec esi
0088019C 61 popa
0088019D 6D insd
0088019E 652000 and gs:[eax], al
008801A1 0000 add [eax], al
008801A3 00FF add bh, bh
008801A5 FFFF DB $FF, $FF //
008801A7 FF6700 jmp dword ptr [edi+$00]
008801AA 0000 add [eax], al
008801AC 61 popa
008801AD 6E outsb
008801AE 6420422E and fs:[edx+$2E], al
008801B2 43 inc ebx
008801B3 52 push edx
008801B4 54 push esp
008801B5 7970 jns 00880227
008801B7 653D27B8B6BF cmp eax, $BFB6B827
008801BD EE out dx, al
008801BE D4 aam
008801BF D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
008801C5 6E outsb
008801C6 64206973 and fs:[ecx+$73], ch
008801CA 6E outsb
008801CB 756C jnz 00880239
008801CD 6C insb
008801CE 28422E sub [edx+$2E], al
008801D1 43 inc ebx
008801D2 6F outsd
008801D3 6E outsb
008801D4 4E dec esi
008801D5 6F outsd
008801D6 2C27 sub al, $27
008801D8 27 daa
008801D9 293D27272061 sub dword ptr [$61202727], edi
008801DF 6E outsb
008801E0 64206973 and fs:[ecx+$73], ch
008801E4 6E outsb
008801E5 756C jnz 00880253
008801E7 6C insb
008801E8 28422E sub [edx+$2E], al
008801EB 4F dec edi
008801EC 7264 jb 00880252
008801EE 65724E jb 0088023F
008801F1 6F outsd
008801F2 2C27 sub al, $27
008801F4 27 daa
008801F5 293D27272061 sub dword ptr [$61202727], edi
008801FB 6E outsb
008801FC 64204D6F and fs:[ebp+$6F], cl
00880200 6E outsb
00880201 7468 jz 0088026B
00880203 28422E sub [edx+$2E], al
00880206 43 inc ebx
00880207 52 push edx
00880208 54 push esp
00880209 696D65293D2731 imul ebp, [ebp+$65], $31273D29
00880210 3027 xor [edi], ah
00880212 2900 sub dword ptr [eax], eax
00880214 FFFF DB $FF, $FF //
00880216 FFFF DB $FF, $FF //
00880218 8A00 mov al, byte ptr [eax]
0088021A 0000 add [eax], al
0088021C 2C53 sub al, $53
0088021E 48 dec eax
0088021F 49 dec ecx
00880220 59 pop ecx
00880221 49 dec ecx
00880222 4D dec ebp
00880223 6F outsd
00880224 6E outsb
00880225 65793D jns 00880265
00880228 287365 sub [ebx+$65], dh
0088022B 6C insb
0088022C 6563742053 arpl gs:[eax+$53], si
00880231 756D jnz 008802A0
00880233 28422E sub [edx+$2E], al
00880236 4D dec ebp
00880237 6F outsd
00880238 6E outsb
00880239 657929 jns 00880265
0088023C 206672 and [esi+$72], ah
0088023F 6F outsd
00880240 6D insd
00880241 205946 and [ecx+$46], bl
00880244 5F pop edi
00880245 4D dec ebp
00880246 6F outsd
00880247 6E outsb
00880248 65795F jns 008802AA
0088024B 43 inc ebx
0088024C 52 push edx
0088024D 204220 and [edx+$20], al
00880250 7768 jnbe 008802BA
00880252 657265 jb 008802BA
00880255 207965 and [ecx+$65], bh
00880258 61 popa
00880259 7228 jb 00880283
0088025B 42 inc edx
0088025C 2E43 inc ebx
0088025E 52 push edx
0088025F 54 push esp
00880260 696D65293D7965 imul ebp, [ebp+$65], $65793D29
00880267 61 popa
00880268 7228 jb 00880292
0088026A 41 inc ecx
0088026B 2E43 inc ebx
0088026D 52 push edx
0088026E 54 push esp
0088026F 696D652920616E imul ebp, [ebp+$65], $6E612029
00880276 6420422E and fs:[edx+$2E], al
0088027A 43 inc ebx
0088027B 6F outsd
0088027C 6D insd
0088027D 54 push esp
0088027E 61 popa
0088027F 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
00880287 6F outsd
00880288 6D insd
00880289 54 push esp
0088028A 61 popa
0088028B 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
00880293 20422E and [edx+$2E], al
00880296 59 pop ecx
00880297 46 inc esi
00880298 4E dec esi
00880299 61 popa
0088029A 6D insd
0088029B 653D412E5946 cmp eax, $46592E41
008802A1 4E dec esi
008802A2 61 popa
008802A3 6D insd
008802A4 652000 and gs:[eax], al
008802A7 00FF add bh, bh
008802A9 FFFF DB $FF, $FF //
008802AB FF6700 jmp dword ptr [edi+$00]
008802AE 0000 add [eax], al
008802B0 61 popa
008802B1 6E outsb
008802B2 6420422E and fs:[edx+$2E], al
008802B6 43 inc ebx
008802B7 52 push edx
008802B8 54 push esp
008802B9 7970 jns 0088032B
008802BB 653D27B8B6BF cmp eax, $BFB6B827
008802C1 EE out dx, al
008802C2 D4 aam
008802C3 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
008802C9 6E outsb
008802CA 64206973 and fs:[ecx+$73], ch
008802CE 6E outsb
008802CF 756C jnz 0088033D
008802D1 6C insb
008802D2 28422E sub [edx+$2E], al
008802D5 43 inc ebx
008802D6 6F outsd
008802D7 6E outsb
008802D8 4E dec esi
008802D9 6F outsd
008802DA 2C27 sub al, $27
008802DC 27 daa
008802DD 293D27272061 sub dword ptr [$61202727], edi
008802E3 6E outsb
008802E4 64206973 and fs:[ecx+$73], ch
008802E8 6E outsb
008802E9 756C jnz 00880357
008802EB 6C insb
008802EC 28422E sub [edx+$2E], al
008802EF 4F dec edi
008802F0 7264 jb 00880356
008802F2 65724E jb 00880343
008802F5 6F outsd
008802F6 2C27 sub al, $27
008802F8 27 daa
008802F9 293D27272061 sub dword ptr [$61202727], edi
008802FF 6E outsb
00880300 64204D6F and fs:[ebp+$6F], cl
00880304 6E outsb
00880305 7468 jz 0088036F
00880307 28422E sub [edx+$2E], al
0088030A 43 inc ebx
0088030B 52 push edx
0088030C 54 push esp
0088030D 696D65293D2731 imul ebp, [ebp+$65], $31273D29
00880314 3127 xor [edi], esp
00880316 2900 sub dword ptr [eax], eax
00880318 FFFF DB $FF, $FF //
0088031A FFFF DB $FF, $FF //
0088031C 8A00 mov al, byte ptr [eax]
0088031E 0000 add [eax], al
00880320 2C53 sub al, $53
00880322 48 dec eax
00880323 49 dec ecx
00880324 45 inc ebp
00880325 52 push edx
00880326 4D dec ebp
00880327 6F outsd
00880328 6E outsb
00880329 65793D jns 00880369
0088032C 287365 sub [ebx+$65], dh
0088032F 6C insb
00880330 6563742053 arpl gs:[eax+$53], si
00880335 756D jnz 008803A4
00880337 28422E sub [edx+$2E], al
0088033A 4D dec ebp
0088033B 6F outsd
0088033C 6E outsb
0088033D 657929 jns 00880369
00880340 206672 and [esi+$72], ah
00880343 6F outsd
00880344 6D insd
00880345 205946 and [ecx+$46], bl
00880348 5F pop edi
00880349 4D dec ebp
0088034A 6F outsd
0088034B 6E outsb
0088034C 65795F jns 008803AE
0088034F 43 inc ebx
00880350 52 push edx
00880351 204220 and [edx+$20], al
00880354 7768 jnbe 008803BE
00880356 657265 jb 008803BE
00880359 207965 and [ecx+$65], bh
0088035C 61 popa
0088035D 7228 jb 00880387
0088035F 42 inc edx
00880360 2E43 inc ebx
00880362 52 push edx
00880363 54 push esp
00880364 696D65293D7965 imul ebp, [ebp+$65], $65793D29
0088036B 61 popa
0088036C 7228 jb 00880396
0088036E 41 inc ecx
0088036F 2E43 inc ebx
00880371 52 push edx
00880372 54 push esp
00880373 696D652920616E imul ebp, [ebp+$65], $6E612029
0088037A 6420422E and fs:[edx+$2E], al
0088037E 43 inc ebx
0088037F 6F outsd
00880380 6D insd
00880381 54 push esp
00880382 61 popa
00880383 69746F753D412E43 imul esi, [edi+ebp*2+$75], $432E413D
0088038B 6F outsd
0088038C 6D insd
0088038D 54 push esp
0088038E 61 popa
0088038F 69746F7520616E64 imul esi, [edi+ebp*2+$75], $646E6120
00880397 20422E and [edx+$2E], al
0088039A 59 pop ecx
0088039B 46 inc esi
0088039C 4E dec esi
0088039D 61 popa
0088039E 6D insd
0088039F 653D412E5946 cmp eax, $46592E41
008803A5 4E dec esi
008803A6 61 popa
008803A7 6D insd
008803A8 652000 and gs:[eax], al
008803AB 00FF add bh, bh
008803AD FFFF DB $FF, $FF //
008803AF FF6700 jmp dword ptr [edi+$00]
008803B2 0000 add [eax], al
008803B4 61 popa
008803B5 6E outsb
008803B6 6420422E and fs:[edx+$2E], al
008803BA 43 inc ebx
008803BB 52 push edx
008803BC 54 push esp
008803BD 7970 jns 0088042F
008803BF 653D27B8B6BF cmp eax, $BFB6B827
008803C5 EE out dx, al
008803C6 D4 aam
008803C7 D3B7D1272061 DB $D3, $B7, $D1, $27, $20, $61 // dword ptr [edi+$612027D1], cl
008803CD 6E outsb
008803CE 64206973 and fs:[ecx+$73], ch
008803D2 6E outsb
008803D3 756C jnz 00880441
008803D5 6C insb
008803D6 28422E sub [edx+$2E], al
008803D9 43 inc ebx
008803DA 6F outsd
008803DB 6E outsb
008803DC 4E dec esi
008803DD 6F outsd
008803DE 2C27 sub al, $27
008803E0 27 daa
008803E1 293D27272061 sub dword ptr [$61202727], edi
008803E7 6E outsb
008803E8 64206973 and fs:[ecx+$73], ch
008803EC 6E outsb
008803ED 756C jnz 0088045B
008803EF 6C insb
008803F0 28422E sub [edx+$2E], al
008803F3 4F dec edi
008803F4 7264 jb 0088045A
008803F6 65724E jb 00880447
008803F9 6F outsd
008803FA 2C27 sub al, $27
008803FC 27 daa
008803FD 293D27272061 sub dword ptr [$61202727], edi
00880403 6E outsb
00880404 64204D6F and fs:[ebp+$6F], cl
00880408 6E outsb
00880409 7468 jz 00880473
0088040B 28422E sub [edx+$2E], al
0088040E 43 inc ebx
0088040F 52 push edx
00880410 54 push esp
00880411 696D65293D2731 imul ebp, [ebp+$65], $31273D29
00880418 3227 xor ah, byte ptr [edi]
0088041A 2900 sub dword ptr [eax], eax
0088041C FFFF DB $FF, $FF //
0088041E FFFF DB $FF, $FF //
00880420 1300 adc eax, [eax]
00880422 0000 add [eax], al
00880424 206672 and [esi+$72], ah
00880427 6F outsd
00880428 6D insd
00880429 205946 and [ecx+$46], bl
0088042C 5F pop edi
0088042D 4D dec ebp
0088042E 6F outsd
0088042F 6E outsb
00880430 65795F jns 00880492
00880433 43 inc ebx
00880434 52 push edx
00880435 204100 and [ecx+$00], al
00880438 FFFF DB $FF, $FF //
0088043A FFFF DB $FF, $FF //
0088043C 1800 sbb [eax], al
0088043E 0000 add [eax], al
00880440 207768 and [edi+$68], dh
00880443 657265 jb 008804AB
00880446 207965 and [ecx+$65], bh
00880449 61 popa
0088044A 7228 jb 00880474
0088044C 41 inc ecx
0088044D 2E43 inc ebx
0088044F 52 push edx
00880450 54 push esp
00880451 696D65293E3D27 imul ebp, [ebp+$65], $273D3E29
00880458 0000 add [eax], al
0088045A 0000 add [eax], al
0088045C FFFF DB $FF, $FF //
0088045E FFFF DB $FF, $FF //
00880460 0400 add al, +$00
00880462 0000 add [eax], al
00880464 7979 jns 008804DF
00880466 7979 jns 008804E1
00880468 0000 add [eax], al
0088046A 0000 add [eax], al
0088046C FFFF DB $FF, $FF //
0088046E FFFF DB $FF, $FF //
00880470 0200 add al, byte ptr [eax]
00880472 0000 add [eax], al
00880474 27 daa
00880475 2000 and [eax], al
00880477 00FF add bh, bh
00880479 FFFF DB $FF, $FF //
0088047B FF16 call dword ptr [esi]
0088047D 0000 add [eax], al
0088047F 0020 add [eax], ah
00880481 61 popa
00880482 6E outsb
00880483 64207965 and fs:[ecx+$65], bh
00880487 61 popa
00880488 7228 jb 008804B2
0088048A 41 inc ecx
0088048B 2E43 inc ebx
0088048D 52 push edx
0088048E 54 push esp
0088048F 696D65293C3D27 imul ebp, [ebp+$65], $273D3C29
00880496 0000 add [eax], al
00880498 FFFF DB $FF, $FF //
0088049A FFFF DB $FF, $FF //
0088049C 16 push ss
0088049D 0000 add [eax], al
0088049F 0020 add [eax], ah
008804A1 61 popa
008804A2 6E outsb
008804A3 6420436F and fs:[ebx+$6F], al
008804A7 6D insd
008804A8 54 push esp
008804A9 61 popa
008804AA 69746F75206C696B imul esi, [edi+ebp*2+$75], $6B696C20
008804B2 652027 and gs:[edi], ah
008804B5 250000FFFF and eax, $FFFF0000
008804BA FFFF DB $FF, $FF //
008804BC 0100 add [eax], eax
008804BE 0000 add [eax], al
008804C0 25000000FF and eax, $FF000000
008804C5 FFFF DB $FF, $FF //
008804C7 FF01 inc dword ptr [ecx]
008804C9 0000 add [eax], al
008804CB 0027 add [edi], ah
008804CD 0000 add [eax], al
008804CF 00FF add bh, bh
008804D1 FFFF DB $FF, $FF //
008804D3 FF13 call dword ptr [ebx]
008804D5 0000 add [eax], al
008804D7 0020 add [eax], ah
008804D9 61 popa
008804DA 6E outsb
008804DB 64205946 and fs:[ecx+$46], bl
008804DF 4E dec esi
008804E0 61 popa
008804E1 6D insd
008804E2 65206C696B and gs:[ecx+ebp*2+$6B], ch
008804E7 652027 and gs:[edi], ah
008804EA 2500FFFFFF and eax, $FFFFFF00
008804EF FF1A call [edx]
008804F1 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_008805A1(Sender : TObject);
begin
(*
008805A1 8BEC mov ebp, esp
008805A3 33C0 xor eax, eax
008805A5 55 push ebp
* Possible String Reference to: '<27>*E<><45><EFBFBD><EFBFBD>]Ë<><C38B>-<2D>Z<EFBFBD>'
|
008805A6 68C5058800 push $008805C5
***** TRY
|
008805AB 64FF30 push dword ptr fs:[eax]
008805AE 648920 mov fs:[eax], esp
008805B1 FF05D05A8900 inc dword ptr [$00895AD0]
008805B7 33C0 xor eax, eax
008805B9 5A pop edx
008805BA 59 pop ecx
008805BB 59 pop ecx
008805BC 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: ']Ë<><C38B>-<2D>Z<EFBFBD>'
|
008805BF 68CC058800 push $008805CC
008805C4 C3 ret
* Reference to: System.@HandleFinally;
|
008805C5 E92A45B8FF jmp 00404AF4
008805CA EBF8 jmp 008805C4
****** END
|
008805CC 5D pop ebp
008805CD C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_008805D0(Sender : TObject);
begin
(*
008805D0 832DD05A890001 sub dword ptr [$00895AD0], +$01
008805D7 C3 ret
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_008805D8(Sender : TObject);
begin
(*
008805D8 2406 and al, $06
008805DA 8800 mov [eax], al
008805DC 0000 add [eax], al
*)
end;
procedure TfrmYSCRPB_QTTJ._PROC_0088063E(Sender : TObject);
begin
(*
0088063E 48 dec eax
0088063F 0050D4 add [eax-$2C], dl
00880642 42 inc edx
00880643 0008 add [eax], cl
00880645 2D4A007CD0 sub eax, $D07C004A
0088064A 42 inc edx
0088064B 00F4 add ah, dh
0088064D 6B4A00D0 imul ecx, [edx+$00], $D0
00880651 1D4A0030F6 sbb eax, $F630004A
00880656 48 dec eax
00880657 004CFB48 add [ebx+edi*8+$48], cl
0088065B 0098FA48000C add [eax+$C0048FA], bl
00880661 7948 jns 008806AB
00880663 00ACF04800E829 add [eax+esi*8+$29E80048], ch
0088066A 4A dec edx
0088066B 00E4 add ah, ah
0088066D ED in eax, dx
0088066E 48 dec eax
0088066F 00547848 add [eax+edi*2+$48], dl
00880673 005878 add [eax+$78], bl
00880676 48 dec eax
00880677 00DC add ah, bl
00880679 2A4A00 sub cl, byte ptr [edx+$00]
0088067C 3CA9 cmp al, $A9
0088067E 48 dec eax
0088067F 00C0 add al, al
00880681 834800D0 or dword ptr [eax+$00], -$30
00880685 7948 jns 008806CF
00880687 004C8548 add [ebp+eax*4+$48], cl
0088068B 00D0 add al, dl
0088068D 2C4A sub al, $4A
0088068F 009C2B4A008486 add [ebx+ebp+$8684004A], bl
00880696 48 dec eax
00880697 00482D add [eax+$2D], cl
0088069A 4A dec edx
0088069B 00C0 add al, al
0088069D A9480038EE test eax, $EE380048
008806A2 48 dec eax
008806A3 00F4 add ah, dh
008806A5 EE out dx, al
008806A6 48 dec eax
008806A7 00F0 add al, dh
008806A9 E94800D8EE jmp EF6006F6
008806AE 48 dec eax
008806AF 00D8 add al, bl
008806B1 1B4A00 sbb ecx, [edx+$00]
008806B4 EC in al, dx
008806B5 334A00 xor ecx, [edx+$00]
008806B8 20C4 and ah, al
008806BA 48 dec eax
008806BB 00B0404A0010 add [eax+$10004A40], dh
008806C1 44 inc esp
008806C2 4A dec edx
008806C3 00CC add ah, cl
008806C5 42 inc edx
008806C6 4A dec edx
008806C7 00B8C44800BC add [eax+$BC0048C4], bh
008806CD C44800 les ecx, [eax+$00]
008806D0 48 dec eax
008806D1 45 inc ebp
008806D2 4A dec edx
008806D3 001CC3 add [ebx+eax*8], bl
008806D6 48 dec eax
008806D7 0018 add [eax], bl
008806D9 F0 lock
008806DA 48 dec eax
008806DB 00444C4A add [esp+ecx*2+$4A], al
008806DF 000C02 add [edx+eax], cl
008806E2 49 dec ecx
008806E3 0094EC48009C64 add [esp+ebp*8+$649C0048], dl
008806EA 4A dec edx
008806EB 008C154A003C18 add [ebp+edx+$183C004A], cl
008806F2 4A dec edx
008806F3 0038 add [eax], bh
008806F5 52 push edx
008806F6 4A dec edx
008806F7 005C224A add [edx+$4A], bl
008806FB 00D8 add al, bl
008806FD 224A00 and cl, byte ptr [edx+$00]
00880700 7C68 jl 0088076A
00880702 4A dec edx
00880703 00941F4A003C60 add [edi+ebx+$603C004A], dl
0088070A 4A dec edx
0088070B 001447 add [edi+eax*2], dl
0088070E 4A dec edx
0088070F 0034654A00CC2C add [$2CCC004A], dh
00880716 4A dec edx
00880717 000E add [esi], cl
00880719 0000 add [eax], al
0088071B 0000 add [eax], al
0088071D 0003 add [ebx], al
0088071F 0000 add [eax], al
00880721 0020 add [eax], ah
00880723 114000 adc [eax+$00], eax
00880726 8C03 mov word ptr [ebx], es
00880728 0000 add [eax], al
0088072A 2011 and [ecx], dl
0088072C 40 inc eax
0088072D 009003000020 add [eax+$20000003], dl
00880733 114000 adc [eax+$00], eax
00880736 94 xchg eax, esp
00880737 0300 add eax, [eax]
00880739 002500240A88 add [$880A2400], ah
0088073F 00F8 add al, bh
00880741 0200 add al, byte ptr [eax]
00880743 0000 add [eax], al
00880745 0008 add [eax], cl
00880747 54 push esp
00880748 6F outsd
00880749 6F outsd
0088074A 6C insb
0088074B 42 inc edx
0088074C 61 popa
0088074D 7231 jb 00880780
0088074F FC cld
00880750 0200 add al, byte ptr [eax]
00880752 0001 add [ecx], al
00880754 0009 add [ecx], cl
00880756 54 push esp
00880757 42 inc edx
00880758 52 push edx
00880759 61 popa
0088075A 667265 jb 008807C2
0088075D 7368 jnb 008807C7
0088075F 0003 add [ebx], al
00880761 0000 add [eax], al
00880763 0100 add [eax], eax
00880765 07 pop es
00880766 54 push esp
00880767 42 inc edx
00880768 43 inc ebx
00880769 6C insb
0088076A 6F outsd
0088076B 7365 jnb 008807D2
0088076D 0403 add al, +$03
0088076F 0000 add [eax], al
00880771 0200 add al, byte ptr [eax]
00880773 0C41 or al, $41
00880775 44 inc esp
00880776 4F dec edi
00880777 51 push ecx
00880778 7565 jnz 008807DF
0088077A 7279 jb 008807F5
0088077C 54 push esp
0088077D 656D insd
0088077F 7008 jo 00880789
00880781 0300 add eax, [eax]
00880783 0002 add [edx], al
00880785 000B add [ebx], cl
00880787 41 inc ecx
00880788 44 inc esp
00880789 4F dec edi
0088078A 51 push ecx
0088078B 7565 jnz 008807F2
0088078D 7279 jb 00880808
0088078F 43 inc ebx
00880790 6D insd
00880791 640C03 or al, $03
00880794 0000 add [eax], al
00880796 0300 add eax, [eax]
00880798 06 push es
00880799 50 push eax
0088079A 61 popa
0088079B 6E outsb
0088079C 656C insb
0088079E 3110 xor [eax], edx
008807A0 0300 add eax, [eax]
008807A2 0001 add [ecx], al
008807A4 000B add [ebx], cl
008807A6 54 push esp
008807A7 6F outsd
008807A8 6F outsd
008807A9 6C insb
008807AA 42 inc edx
008807AB 7574 jnz 00880821
008807AD 746F jz 0088081E
008807AF 6E outsb
008807B0 321403 xor dl, byte ptr [ebx+eax]
008807B3 0000 add [eax], al
008807B5 0200 add al, byte ptr [eax]
008807B7 0C41 or al, $41
008807B9 44 inc esp
008807BA 4F dec edi
008807BB 51 push ecx
008807BC 7565 jnz 00880823
008807BE 7279 jb 00880839
008807C0 4D dec ebp
008807C1 61 popa
008807C2 696E1803000001 imul ebp, [esi+$18], $01000003
008807C9 000B add [ebx], cl
008807CB 54 push esp
008807CC 6F outsd
008807CD 6F outsd
008807CE 6C insb
008807CF 42 inc edx
008807D0 7574 jnz 00880846
008807D2 746F jz 00880843
008807D4 6E outsb
008807D5 311C03 xor [ebx+eax], ebx
008807D8 0000 add [eax], al
008807DA 0400 add al, +$00
008807DC 03524D add edx, [edx+$4D]
008807DF 3120 xor [eax], esp
008807E1 0300 add eax, [eax]
008807E3 00050009524D add [$4D520900], al
008807E9 44 inc esp
008807EA 42 inc edx
008807EB 5F pop edi
008807EC 4D dec ebp
008807ED 61 popa
008807EE 696E2403000006 imul ebp, [esi+$24], $06000003
008807F5 0007 add [edi], al
008807F7 637847 arpl [eax+$47], di
008807FA 7269 jb 00880865
008807FC 643228 xor ch, byte ptr fs:[eax]
008807FF 0300 add eax, [eax]
00880801 0007 add [edi], al
00880803 0003 add [ebx], al
00880805 54 push esp
00880806 7632 jbe 0088083A
00880808 2C03 sub al, $03
0088080A 0000 add [eax], al
0088080C 0800 or [eax], al
0088080E 0C63 or al, $63
00880810 7847 js 00880859
00880812 7269 jb 0088087D
00880814 644C dec esp
00880816 657665 jbe 0088087E
00880819 6C insb
0088081A 3130 xor [eax], esi
0088081C 0300 add eax, [eax]
0088081E 0009 add [ecx], cl
00880820 0006 add [esi], al
00880822 4C dec esp
00880823 61 popa
00880824 62656C bound esp, qword ptr [ebp+$6C]
00880827 323403 xor dh, byte ptr [ebx+eax]
0088082A 0000 add [eax], al
0088082C 0900 or [eax], eax
0088082E 06 push es
0088082F 4C dec esp
00880830 61 popa
00880831 62656C bound esp, qword ptr [ebp+$6C]
00880834 363803 cmp ss:[ebx], al
00880837 0000 add [eax], al
00880839 0A00 or al, byte ptr [eax]
0088083B 07 pop es
0088083C 626567 bound esp, qword ptr [ebp+$67]
0088083F 6461 popa
00880841 7465 jz 008808A8
00880843 3C03 cmp al, $03
00880845 0000 add [eax], al
00880847 0A00 or al, byte ptr [eax]
00880849 07 pop es
0088084A 45 inc ebp
0088084B 6E outsb
0088084C 646461 popa
0088084F 7465 jz 008808B6
00880851 40 inc eax
00880852 0300 add eax, [eax]
00880854 000B add [ebx], cl
00880856 0010 add [eax], dl
00880858 637847 arpl [eax+$47], di
0088085B 7269 jb 008808C6
0088085D 6450 push eax
0088085F 6F outsd
00880860 7075 jo 008808D7
00880862 704D jo 008808B1
00880864 656E outsb
00880866 7532 jnz 0088089A
00880868 44 inc esp
00880869 0300 add eax, [eax]
0088086B 000C00 add [eax+eax], cl
0088086E 0544535F48 add eax, +$485F5344
00880873 5A pop edx
00880874 48 dec eax
00880875 0300 add eax, [eax]
00880877 000D00064344 add [$44430600], cl
0088087D 53 push ebx
0088087E 5F pop edi
0088087F 48 dec eax
00880880 5A pop edx
00880881 4C dec esp
00880882 0300 add eax, [eax]
00880884 000E add [esi], cl
00880886 0009 add [ecx], cl
00880888 7632 jbe 008808BC
0088088A 59 pop ecx
0088088B 53 push ebx
0088088C 4D dec ebp
0088088D 6F outsd
0088088E 6E outsb
0088088F 657950 jns 008808E2
00880892 0300 add eax, [eax]
00880894 000E add [esi], cl
00880896 0009 add [ecx], cl
00880898 7632 jbe 008808CC
0088089A 59 pop ecx
0088089B 46 inc esi
0088089C 4D dec ebp
0088089D 6F outsd
0088089E 6E outsb
0088089F 657954 jns 008808F6
008808A2 0300 add eax, [eax]
008808A4 000E add [esi], cl
008808A6 0009 add [ecx], cl
008808A8 7632 jbe 008808DC
008808AA 44 inc esp
008808AB 51 push ecx
008808AC 4C dec esp
008808AD 49 dec ecx
008808AE 52 push edx
008808AF 756E jnz 0088091F
008808B1 58 pop eax
008808B2 0300 add eax, [eax]
008808B4 000E add [esi], cl
008808B6 0009 add [ecx], cl
008808B8 7632 jbe 008808EC
008808BA 46 inc esi
008808BB 4B dec ebx
008808BC 4D dec ebp
008808BD 6F outsd
008808BE 6E outsb
008808BF 65795C jns 0088091E
008808C2 0300 add eax, [eax]
008808C4 0009 add [ecx], cl
008808C6 0006 add [esi], al
008808C8 4C dec esp
008808C9 61 popa
008808CA 62656C bound esp, qword ptr [ebp+$6C]
008808CD 316003 xor [eax+$03], esp
008808D0 0000 add [eax], al
008808D2 0F0009 str word ptr [ecx]
008808D5 43 inc ebx
008808D6 6F outsd
008808D7 6D insd
008808D8 54 push esp
008808D9 61 popa
008808DA 69546F7564030000 imul edx, [edi+ebp*2+$75], $00000364
008808E2 0900 or [eax], eax
008808E4 06 push es
008808E5 4C dec esp
008808E6 61 popa
008808E7 62656C bound esp, qword ptr [ebp+$6C]
008808EA 3468 xor al, $68
008808EC 0300 add eax, [eax]
008808EE 000F add [edi], cl
008808F0 0009 add [ecx], cl
008808F2 46 inc esi
008808F3 48 dec eax
008808F4 41 inc ecx
008808F5 64647265 jb 0088095E
008808F9 7373 jnb 0088096E
008808FB 6C insb
008808FC 0300 add eax, [eax]
008808FE 0009 add [ecx], cl
00880900 0006 add [esi], al
00880902 4C dec esp
00880903 61 popa
00880904 62656C bound esp, qword ptr [ebp+$6C]
00880907 3570030000 xor eax, $00000370
0088090C 0F000446 sldt word ptr [esi+eax*2]
00880910 48 dec eax
00880911 647174 jno 00880988
00880914 0300 add eax, [eax]
00880916 000E add [esi], cl
00880918 0009 add [ecx], cl
0088091A 7632 jbe 0088094E
0088091C 53 push ebx
0088091D 4B dec ebx
0088091E 4D dec ebp
0088091F 6F outsd
00880920 6E outsb
00880921 657978 jns 0088099C
00880924 0300 add eax, [eax]
00880926 000E add [esi], cl
00880928 000A add [edx], cl
0088092A 7632 jbe 0088095E
0088092C 57 push edi
0088092D 53 push ebx
0088092E 4B dec ebx
0088092F 4D dec ebp
00880930 6F outsd
00880931 6E outsb
00880932 65797C jns 008809B1
00880935 0300 add eax, [eax]
00880937 000E add [esi], cl
00880939 000A add [edx], cl
0088093B 7632 jbe 0088096F
0088093D 57 push edi
0088093E 46 inc esi
0088093F 4B dec ebx
00880940 4D dec ebp
00880941 6F outsd
00880942 6E outsb
00880943 657980 jns 008808C6
00880946 0300 add eax, [eax]
00880948 000E add [esi], cl
0088094A 0009 add [ecx], cl
0088094C 7632 jbe 00880980
0088094E 53 push ebx
0088094F 58 pop eax
00880950 4D dec ebp
00880951 6F outsd
00880952 6E outsb
00880953 657984 jns 008808DA
00880956 0300 add eax, [eax]
00880958 000E add [esi], cl
0088095A 0009 add [ecx], cl
0088095C 7632 jbe 00880990
0088095E 54 push esp
0088095F 53 push ebx
00880960 4D dec ebp
00880961 6F outsd
00880962 6E outsb
00880963 657988 jns 008808EE
00880966 0300 add eax, [eax]
00880968 000E add [esi], cl
0088096A 000B add [ebx], cl
0088096C 7632 jbe 008809A0
0088096E 46 inc esi
0088096F 59 pop ecx
00880970 5A pop edx
00880971 43 inc ebx
00880972 4D dec ebp
00880973 6F outsd
00880974 6E outsb
00880975 657908 jns 00880980
00880978 0012 add [edx], dl
0088097A 00D0 add al, dl
0088097C 0C88 or al, $88
0088097E 000B add [ebx], cl
00880980 46 inc esi
00880981 6F outsd
00880982 726D jb 008809F1
00880984 44 inc esp
00880985 657374 jnb 008809FC
00880988 726F jb 008809F9
0088098A 7910 jns 0088099C
0088098C 00D8 add al, bl
0088098E 0C88 or al, $88
00880990 0009 add [ecx], cl
00880992 46 inc esi
00880993 6F outsd
00880994 726D jb 00880A03
00880996 43 inc ebx
00880997 6C insb
00880998 6F outsd
00880999 7365 jnb 00880A00
0088099B 1300 adc eax, [eax]
0088099D DC0C88 fmul qword ptr [eax+ecx*4]
008809A0 000C54 add [esp+edx*2], cl
008809A3 42 inc edx
008809A4 43 inc ebx
008809A5 6C insb
008809A6 6F outsd
008809A7 7365 jnb 00880A0E
008809A9 43 inc ebx
008809AA 6C insb
008809AB 69636B0F002C0D imul esp, [ebx+$6B], $0D2C000F
008809B2 8800 mov [eax], al
008809B4 08466F or [esi+$6F], al
008809B7 726D jb 00880A26
008809B9 53 push ebx
008809BA 686F771500 push $0015776F
008809BF A80E test al, $0E
008809C1 8800 mov [eax], al
008809C3 0E push cs
008809C4 54 push esp
008809C5 42 inc edx
008809C6 52 push edx
008809C7 61 popa
008809C8 667265 jb 00880A30
008809CB 7368 jnb 00880A35
008809CD 43 inc ebx
008809CE 6C insb
008809CF 69636B1700B00E imul esp, [ebx+$6B], $0EB00017
008809D6 8800 mov [eax], al
008809D8 10546F6F adc [edi+ebp*2+$6F], dl
008809DC 6C insb
008809DD 42 inc edx
008809DE 7574 jnz 00880A54
008809E0 746F jz 00880A51
008809E2 6E outsb
008809E3 32436C xor al, byte ptr [ebx+$6C]
008809E6 69636B1800540F imul esp, [ebx+$6B], $0F540018
008809ED 8800 mov [eax], al
008809EF 114661 adc [esi+$61], eax
008809F2 63746F72 arpl [edi+ebp*2+$72], si
008809F6 794E jns 00880A46
008809F8 61 popa
008809F9 6D insd
008809FA 6543 inc ebx
008809FC 68616E6765 push $65676E61
00880A01 17 pop ss
00880A02 00680F add [eax+$0F], ch
00880A05 8800 mov [eax], al
00880A07 10546F6F adc [edi+ebp*2+$6F], dl
00880A0B 6C insb
00880A0C 42 inc edx
00880A0D 7574 jnz 00880A83
00880A0F 746F jz 00880A80
00880A11 6E outsb
00880A12 31436C xor [ebx+$6C], eax
00880A15 69636B0B546672 imul esp, [ebx+$6B], $7266540B
00880A1C 6D insd
00880A1D 43 inc ebx
00880A1E 57 push edi
00880A1F 5A pop edx
00880A20 4B dec ebx
00880A21 5F pop edi
00880A22 43 inc ebx
00880A23 58 pop eax
00880A24 1000 adc [eax], al
00880A26 28944500648A45 sub [ebp+eax*2+$458A6400], dl
00880A2D 00B8124D0020 add [eax+$20004D12], bh
00880A33 42 inc edx
00880A34 44 inc esp
00880A35 0064D378 add [ebx+edx*8+$78], ah
00880A39 00A80A780000 add [eax+$780A], ch
00880A3F 16 push ss
00880A40 6300 arpl [eax], ax
00880A42 F4 hlt
00880A43 B466 mov ah, $66
00880A45 00A40E64001C5F add [esi+ecx+$5F1C0064], ah
00880A4C 47 inc edi
00880A4D 00E0 add al, ah
00880A4F A5 movsd
00880A50 45 inc ebp
00880A51 005876 add [eax+$76], bl
00880A54 7C00 jl 00880A56
00880A56 087F4B or [edi+$4B], bh
00880A59 0088996A0034 add [eax+$34006A99], cl
00880A5F B166 mov cl, $66
00880A61 00B86747008B add [eax+$8B004767], bh
00880A67 C06C0A8800 shr byte ptr [edx+ecx-$78], $00
00880A6C 07 pop es
00880A6D 0B546672 or edx, [esi+$72]
00880A71 6D insd
00880A72 43 inc ebx
00880A73 57 push edi
00880A74 5A pop edx
00880A75 4B dec ebx
00880A76 5F pop edi
00880A77 43 inc ebx
00880A78 58 pop eax
00880A79 2406 and al, $06
00880A7B 8800 mov [eax], al
00880A7D D0F2 DB $D0, $F2 // dl, 1
00880A7F 49 dec ecx
00880A80 005E00 add [esi+$00], bl
00880A83 09555F or [ebp+$5F], edx
00880A86 43 inc ebx
00880A87 57 push edi
00880A88 5A pop edx
00880A89 4B dec ebx
00880A8A 5F pop edi
00880A8B 43 inc ebx
00880A8C 58 pop eax
00880A8D 0000 add [eax], al
*)
end;
end.
Reference in New Issue View Git Blame Copy Permalink