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: '财务管理' | 008781AB B9D4818700 mov ecx, $008781D4 * Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView | 008781B0 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '应收款登记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: '轸聘脬_^[嬪]' | 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: '提示' | 0087825A B920848700 mov ecx, $00878420 * Possible String Reference to: '没有选择数据!' | 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: '财务管理' | 008784AB B938858700 mov ecx, $00878538 * Reference to control TfrmYSCRPB_QTTJ.Tv2 : TcxGridDBTableView | 008784B0 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '应收款登记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: '杂费' | 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: '樽母腽[Y]' | 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]' | 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: '閹酶腚^[嬪]' | 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: '提示' | 00878685 B970878700 mov ecx, $00878770 * Possible String Reference to: '确定要删除数据吗？' | 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: '閕锤胫^[嬪]' | 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: '殁雸^[嬪]' | 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: '榱Ц胫^[嬪]' | 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: '閭８霅^[嬪]' | 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: '閹灨肓^[嬪]' | 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: '提示' | 0087A92D B980AC8700 mov ecx, $0087AC80 * Possible String Reference to: '自动生成数据不能更改!' | 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: '轵毟脬^[嬪]' | 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: '闁椄脬^[嬪]' | 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: '应收款列表' | 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: '楣惛雽[嬪]' | 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: '镃嵏胫^[嬪]' | 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: '榉姼胫^[嬪]' | 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: '轹伕霠_^[嬪]' | 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: '提示' | 0087C5D1 B91CC98700 mov ecx, $0087C91C * Possible String Reference to: '没有选择数据!' | 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: '槲豚_^[嬪]' | 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: '_^[嬪]' | 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: '轸|脬_^[嬪]' | 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: '提示' | 0087CC65 B920CE8700 mov ecx, $0087CE20 * Possible String Reference to: '没有选择数据!' | 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: '長z脬_^[嬪]' | 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: '提示' | 0087CF0D B9C8D08700 mov ecx, $0087D0C8 * Possible String Reference to: '没有选择数据!' | 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: '棰n脬^[嬪]' | 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: '閊k脬^[嬪]' | 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: '锽g胛^[嬪]' | 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: '閃d脬^[嬪]' | 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: '檫a脬^[嬪]' | 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: '橼_脬^[嬪]' | 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<>'￥ | ') 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='应付款登记' ' | 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,'')='虚拟费用'' | 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: '^[嬪]' | 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: '閈脬^[嬪]' | 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<>'￥ | ') 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='应付款登记' ' | 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,'')='虚拟费用'' | 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: '^[嬪]' | 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: '对方单位' | 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: '员工姓名' | 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: '閧S毵^[嬪]' | 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: '镾垢闈嬅_^[嬪]' | 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: '提示' | 0087884F B9D0918700 mov ecx, $008791D0 * Possible String Reference to: '取最大号失败！' | 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: '閕锤胫^[嬪]' | 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: '殁雸^[嬪]' | 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: '榱Ц胫^[嬪]' | 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: '閭８霅^[嬪]' | 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: '轵毟脬^[嬪]' | 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: '闁椄脬^[嬪]' | 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: '应收款列表' | 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: '楣惛雽[嬪]' | 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: '镃嵏胫^[嬪]' | 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: '榉姼胫^[嬪]' | 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: '轹伕霠_^[嬪]' | 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: '提示' | 0087C5D1 B91CC98700 mov ecx, $0087C91C * Possible String Reference to: '没有选择数据!' | 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: '閊k脬^[嬪]' | 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: '锽g胛^[嬪]' | 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: '閃d脬^[嬪]' | 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: '檫a脬^[嬪]' | 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: '橼_脬^[嬪]' | 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<>'￥ | ') 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='应付款登记' ' | 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,'')='虚拟费用'' | 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: '^[嬪]' | 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: '閈脬^[嬪]' | 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<>'￥ | ') 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='应付款登记' ' | 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,'')='虚拟费用'' | 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: '^[嬪]' | 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: '对方单位' | 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: '员工姓名' | 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: '*E滕]脣纼-衂' | 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: ']脣纼-衂' | 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.