unit U_YSCRPB_ZHYH; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmYSCRPB_ZHYH=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; cxYFName: TcxGridDBColumn; cxGridLevel1: TcxGridLevel; Label2: TLabel; Label6: TLabel; begdate: TDateTimePicker; Enddate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; ToolButton3: TToolButton; VSRMoney: TcxGridDBColumn; v2Column6: TcxGridDBColumn; v2Note: TcxGridDBColumn; v2Column5: TcxGridDBColumn; Label7: TLabel; Edit1: TEdit; Button1: TToolButton; CheckBox1: TCheckBox; Tchk: TToolButton; Tnochk: TToolButton; cxTabControl1: TcxTabControl; v2BankName: TcxGridDBColumn; TZDSC: TToolButton; Label11: TLabel; Label13: TLabel; Label5: TLabel; Note: TEdit; ADOQuery1: TADOQuery; Label3: TLabel; Label9: TLabel; FactoryName: TEdit; v2CRFlag: TcxGridDBColumn; v2IFSC: TcxGridDBColumn; Label8: TLabel; v2ZCMoney: TcxGridDBColumn; Label10: TLabel; IFSC: TComboBox; CRFlag: TComboBox; TSsel: TToolButton; v2YEMoney: TcxGridDBColumn; cxStyleRepository1: TcxStyleRepository; cxStyle1: TcxStyle; v2FKTaiTou: TcxGridDBColumn; Label4: TLabel; FKTaiTou: TEdit; BankName: TComboBox; v2BZType: TcxGridDBColumn; v2BankNo: TcxGridDBColumn; Label12: TLabel; BankNo: TEdit; Label14: TLabel; BZType: TEdit; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure TBDelClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure CRFlagChange(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 v2BankNamePropertiesButtonClick(Sender : TObject); procedure TSselClick(Sender : TObject); procedure VSRMoneyPropertiesEditValueChanged(Sender : TObject); procedure v2ZCMoneyPropertiesEditValueChanged(Sender : TObject); procedure v2FKTaiTouPropertiesButtonClick(Sender : TObject); procedure Tv2MouseDown(Sender : TObject); procedure v2BZTypePropertiesButtonClick(Sender : TObject); procedure v2BankNoPropertiesButtonClick(Sender : TObject); procedure _PROC_007F3629(Sender : TObject); procedure _PROC_007F5641(Sender : TObject); procedure _PROC_007F5E11(Sender : TObject); procedure _PROC_007F66F5(Sender : TObject); procedure _PROC_007F6AA9(Sender : TObject); procedure _PROC_007F71BD(Sender : TObject); procedure _PROC_007F74DA(Sender : TObject); procedure _PROC_007F7510(Sender : TObject); procedure _PROC_007F751D(Sender : TObject); procedure _PROC_007F7879(Sender : TObject); procedure _PROC_007F7F8D(Sender : TObject); procedure _PROC_007F8291(Sender : TObject); procedure _PROC_007F855D(Sender : TObject); procedure _PROC_007F89D1(Sender : TObject); procedure _PROC_007F9929(Sender : TObject); procedure _PROC_007FA135(Sender : TObject); procedure _PROC_007FA489(Sender : TObject); procedure _PROC_007FA8A1(Sender : TObject); procedure _PROC_007FAB71(Sender : TObject); procedure _PROC_007FAFFD(Sender : TObject); procedure _PROC_007FB31D(Sender : TObject); procedure _PROC_007FB825(Sender : TObject); procedure _PROC_007FBB41(Sender : TObject); procedure _PROC_007FBE49(Sender : TObject); procedure _PROC_007FC239(Sender : TObject); procedure _PROC_007FC619(Sender : TObject); procedure _PROC_007FC72A(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmYSCRPB_ZHYH: TfrmYSCRPB_ZHYH; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmYSCRPB_ZHYH.FormDestroy(Sender : TObject); begin (* 007F500C 33C0 xor eax, eax * Reference to GlobalVar_00893CE0 | 007F500E A3E03C8900 mov dword ptr [$00893CE0], eax 007F5013 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.FormClose(Sender : TObject); begin (* 007F5014 C60102 mov byte ptr [ecx], $02 007F5017 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.TBCloseClick(Sender : TObject); begin (* 007F5018 53 push ebx 007F5019 8BD8 mov ebx, eax * Possible String Reference to: '财务管理' | 007F501B B944507F00 mov ecx, $007F5044 * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F5020 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '应收款登记1232' | 007F5026 B858507F00 mov eax, $007F5058 | 007F502B E8702BFCFF call 007B7BA0 007F5030 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 007F5032 E8610FCBFF call 004A5F98 007F5037 5B pop ebx 007F5038 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.TBDelClick(Sender : TObject); begin (* 007F5068 55 push ebp 007F5069 8BEC mov ebp, esp 007F506B 33C9 xor ecx, ecx 007F506D 51 push ecx 007F506E 51 push ecx 007F506F 51 push ecx 007F5070 51 push ecx 007F5071 51 push ecx 007F5072 51 push ecx 007F5073 51 push ecx 007F5074 51 push ecx 007F5075 53 push ebx 007F5076 56 push esi 007F5077 57 push edi 007F5078 8945FC mov [ebp-$04], eax 007F507B 33C0 xor eax, eax 007F507D 55 push ebp * Possible String Reference to: '閫脬_^[嬪]' | 007F507E 686F527F00 push $007F526F ***** TRY | 007F5083 64FF30 push dword ptr fs:[eax] 007F5086 648920 mov fs:[eax], esp 007F5089 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F508C 8B805C030000 mov eax, [eax+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F5092 E8292ECDFF call 004C7EC0 007F5097 84C0 test al, al 007F5099 0F85AD010000 jnz 007F524C 007F509F A080527F00 mov al, byte ptr [$007F5280] 007F50A4 50 push eax 007F50A5 8D45EC lea eax, [ebp-$14] 007F50A8 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F50AA E8B53CC2FF call 00418D64 007F50AF 8D4DEC lea ecx, [ebp-$14] 007F50B2 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F50B5 8B805C030000 mov eax, [eax+$035C] * Possible String Reference to: 'ssel' | 007F50BB BA8C527F00 mov edx, $007F528C 007F50C0 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007F50C2 FF9344020000 call dword ptr [ebx+$0244] 007F50C8 84C0 test al, al 007F50CA 751D jnz 007F50E9 007F50CC 6A00 push $00 * Possible String Reference to: '提示' | 007F50CE B994527F00 mov ecx, $007F5294 * Possible String Reference to: '没有选择数据!' | 007F50D3 BA9C527F00 mov edx, $007F529C *) end; procedure TfrmYSCRPB_ZHYH.FormShow(Sender : TObject); begin (* 007F531C 55 push ebp 007F531D 8BEC mov ebp, esp 007F531F 6A00 push $00 007F5321 53 push ebx 007F5322 8BD8 mov ebx, eax 007F5324 33C0 xor eax, eax 007F5326 55 push ebp * Possible String Reference to: '辂隼腽[Y]' | 007F5327 68F4537F00 push $007F53F4 ***** TRY | 007F532C 64FF30 push dword ptr fs:[eax] 007F532F 648920 mov fs:[eax], esp * Possible String Reference to: '财务管理' | 007F5332 B908547F00 mov ecx, $007F5408 * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F5337 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '应收款登记1232' | 007F533D B81C547F00 mov eax, $007F541C | 007F5342 E85D26FCFF call 007B79A4 * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F5347 8B8308030000 mov eax, [ebx+$0308] | 007F534D E836F6FBFF call 007B4988 007F5352 83C4F8 add esp, -$08 007F5355 DD1C24 fstp qword ptr [esp] 007F5358 9B wait * Reference to control TfrmYSCRPB_ZHYH.Enddate : TDateTimePicker | 007F5359 8B8350030000 mov eax, [ebx+$0350] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F535F E8C8CEC7FF call 0047222C * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F5364 8B8308030000 mov eax, [ebx+$0308] | 007F536A E819F6FBFF call 007B4988 007F536F D8252C547F00 fsub dword ptr [$007F542C] 007F5375 83C4F8 add esp, -$08 007F5378 DD1C24 fstp qword ptr [esp] 007F537B 9B wait * Reference to control TfrmYSCRPB_ZHYH.begdate : TDateTimePicker | 007F537C 8B834C030000 mov eax, [ebx+$034C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F5382 E8A5CEC7FF call 0047222C 007F5387 33D2 xor edx, edx * Reference to control TfrmYSCRPB_ZHYH.TZDSC : TToolButton | 007F5389 8B8394030000 mov eax, [ebx+$0394] * Reference to: Controls.TControl.SetVisible(TControl;Boolean); | 007F538F E87C31C9FF call 00488510 * Reference to field TfrmYSCRPB_ZHYH.OFFS_041C | 007F5394 8B831C040000 mov eax, [ebx+$041C] * Possible String Reference to: '杂费' | 007F539A BA38547F00 mov edx, $007F5438 * Reference to: System.@LStrCmp; | 007F539F E89C03C1FF call 00405740 007F53A4 750D jnz 007F53B3 007F53A6 B201 mov dl, $01 * Reference to control TfrmYSCRPB_ZHYH.TZDSC : TToolButton | 007F53A8 8B8394030000 mov eax, [ebx+$0394] * Reference to: Controls.TControl.SetVisible(TControl;Boolean); | 007F53AE E85D31C9FF call 00488510 007F53B3 8D45FC lea eax, [ebp-$04] * Possible String Reference to: 'select distinct (A.BankName) name f | rom YF_Money_CR A where A.CRType=' | 渌钕' ' | 007F53B6 BA48547F00 mov edx, $007F5448 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F53BB E8FCFFC0FF call 004053BC 007F53C0 8B45FC mov eax, [ebp-$04] 007F53C3 50 push eax 007F53C4 33C9 xor ecx, ecx * Reference to control TfrmYSCRPB_ZHYH.BankName : TComboBox | 007F53C6 8B93F0030000 mov edx, [ebx+$03F0] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F53CC 8B830C030000 mov eax, [ebx+$030C] | 007F53D2 E8711EFCFF call 007B7248 007F53D7 8BC3 mov eax, ebx | 007F53D9 E84AE2FFFF call 007F3628 007F53DE 33C0 xor eax, eax 007F53E0 5A pop edx 007F53E1 59 pop ecx 007F53E2 59 pop ecx 007F53E3 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]' | 007F53E6 68FB537F00 push $007F53FB 007F53EB 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F53EE E831FFC0FF call 00405324 007F53F3 C3 ret * Reference to: System.@HandleFinally; | 007F53F4 E9FBF6C0FF jmp 00404AF4 007F53F9 EBF0 jmp 007F53EB ****** END | 007F53FB 5B pop ebx 007F53FC 59 pop ecx 007F53FD 5D pop ebp 007F53FE C3 ret *) end; procedure TfrmYSCRPB_ZHYH.TBRafreshClick(Sender : TObject); begin (* 007F5498 53 push ebx 007F5499 8BD8 mov ebx, eax * Reference to control TfrmYSCRPB_ZHYH.begdate : TDateTimePicker | 007F549B 8B834C030000 mov eax, [ebx+$034C] 007F54A1 8B10 mov edx, [eax] * Reference to method TDateTimePicker.SetFocus() | 007F54A3 FF92C4000000 call dword ptr [edx+$00C4] 007F54A9 8BC3 mov eax, ebx | 007F54AB E878E1FFFF call 007F3628 007F54B0 5B pop ebx 007F54B1 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.ToolButton2Click(Sender : TObject); begin (* | 007F54B4 E86FE1FFFF call 007F3628 007F54B9 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.CRFlagChange(Sender : TObject); begin (* | 007F54BC E867E1FFFF call 007F3628 007F54C1 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.Button2Click(Sender : TObject); begin (* 007F54C4 55 push ebp 007F54C5 8BEC mov ebp, esp 007F54C7 33C9 xor ecx, ecx 007F54C9 51 push ecx 007F54CA 51 push ecx 007F54CB 51 push ecx 007F54CC 51 push ecx 007F54CD 51 push ecx 007F54CE 53 push ebx 007F54CF 56 push esi 007F54D0 8BD8 mov ebx, eax 007F54D2 33C0 xor eax, eax 007F54D4 55 push ebp 007F54D5 68D1557F00 push $007F55D1 ***** TRY | 007F54DA 64FF30 push dword ptr fs:[eax] 007F54DD 648920 mov fs:[eax], esp * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F54E0 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F54E6 E8D529CDFF call 004C7EC0 007F54EB 84C0 test al, al 007F54ED 0F85C3000000 jnz 007F55B6 007F54F3 6A24 push $24 * Possible String Reference to: '提示' | 007F54F5 B9E0557F00 mov ecx, $007F55E0 * Possible String Reference to: '确定要删除数据吗？' | 007F54FA BAE8557F00 mov edx, $007F55E8 *) end; procedure TfrmYSCRPB_ZHYH.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 007F5BEC 55 push ebp 007F5BED 8BEC mov ebp, esp 007F5BEF B908000000 mov ecx, $00000008 007F5BF4 6A00 push $00 007F5BF6 6A00 push $00 007F5BF8 49 dec ecx 007F5BF9 75F9 jnz 007F5BF4 007F5BFB 51 push ecx 007F5BFC 53 push ebx 007F5BFD 56 push esi 007F5BFE 8BDA mov ebx, edx 007F5C00 8BF0 mov esi, eax 007F5C02 33C0 xor eax, eax 007F5C04 55 push ebp * Possible String Reference to: '轷炖胫^[嬪]' | 007F5C05 68FA5D7F00 push $007F5DFA ***** TRY | 007F5C0A 64FF30 push dword ptr fs:[eax] 007F5C0D 648920 mov fs:[eax], esp 007F5C10 8D55FC lea edx, [ebp-$04] 007F5C13 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; | 007F5C15 E8A29AD9FF call 0058F6BC * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F5C1A 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; | 007F5C20 E82767E6FF 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; | 007F5C25 E83ABFE5FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007F5C2A 8B4050 mov eax, [eax+$50] 007F5C2D 8D55F4 lea edx, [ebp-$0C] 007F5C30 8B08 mov ecx, [eax] 007F5C32 FF5110 call dword ptr [ecx+$10] 007F5C35 8B45F4 mov eax, [ebp-$0C] 007F5C38 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5C3B E8AC4CC1FF call 0040A8EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F5C40 8B9E5C030000 mov ebx, [esi+$035C] 007F5C46 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F5C48 E8F327CDFF call 004C8440 007F5C4D 8D55E0 lea edx, [ebp-$20] 007F5C50 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5C53 E8944CC1FF call 0040A8EC 007F5C58 8B55E0 mov edx, [ebp-$20] 007F5C5B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F5C5E E86531C2FF call 00418DC8 007F5C63 8D45E4 lea eax, [ebp-$1C] 007F5C66 50 push eax 007F5C67 8B55F8 mov edx, [ebp-$08] 007F5C6A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5C6C E8430FCDFF call 004C6BB4 007F5C71 5A pop edx 007F5C72 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F5C74 FF91B4000000 call dword ptr [ecx+$00B4] 007F5C7A 8BC3 mov eax, ebx 007F5C7C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F5C7E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F5C84 8B9E0C030000 mov ebx, [esi+$030C] 007F5C8A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F5C8C E843FCCCFF call 004C58D4 007F5C91 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5C93 E81483CEFF call 004DDFAC 007F5C98 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F5C9A FF5244 call dword ptr [edx+$44] 007F5C9D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5C9F E80883CEFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 007F5CA4 BA105E7F00 mov edx, $007F5E10 007F5CA9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F5CAB FF5138 call dword ptr [ecx+$38] 007F5CAE 8D55DC lea edx, [ebp-$24] 007F5CB1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5CB4 E8334CC1FF call 0040A8EC 007F5CB9 837DDC00 cmp dword ptr [ebp-$24], +$00 007F5CBD 7440 jz 007F5CFF * Possible String Reference to: ' Set ' | 007F5CBF 682C5E7F00 push $007F5E2C 007F5CC4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007F5CC7 683C5E7F00 push $007F5E3C 007F5CCC 8D55D4 lea edx, [ebp-$2C] 007F5CCF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5CD2 E8154CC1FF call 0040A8EC 007F5CD7 FF75D4 push dword ptr [ebp-$2C] 007F5CDA 68485E7F00 push $007F5E48 007F5CDF 8D45D8 lea eax, [ebp-$28] 007F5CE2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007F5CE7 E8C8F9C0FF call 004056B4 007F5CEC 8B45D8 mov eax, [ebp-$28] 007F5CEF 50 push eax 007F5CF0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5CF2 E8B582CEFF call 004DDFAC 007F5CF7 5A pop edx 007F5CF8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F5CFA FF5138 call dword ptr [ecx+$38] 007F5CFD EB2B jmp 007F5D2A 007F5CFF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5D01 E8A682CEFF call 004DDFAC 007F5D06 50 push eax * Possible String Reference to: ' Set ' | 007F5D07 682C5E7F00 push $007F5E2C 007F5D0C FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 007F5D0F 68545E7F00 push $007F5E54 007F5D14 8D45D0 lea eax, [ebp-$30] 007F5D17 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F5D1C E893F9C0FF call 004056B4 007F5D21 8B55D0 mov edx, [ebp-$30] 007F5D24 58 pop eax 007F5D25 8B08 mov ecx, [eax] 007F5D27 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F5D2A 68645E7F00 push $007F5E64 007F5D2F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYSCRPB_ZHYH.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 007F5EB8 55 push ebp 007F5EB9 8BEC mov ebp, esp 007F5EBB B921000000 mov ecx, $00000021 007F5EC0 6A00 push $00 007F5EC2 6A00 push $00 007F5EC4 49 dec ecx 007F5EC5 75F9 jnz 007F5EC0 007F5EC7 51 push ecx 007F5EC8 53 push ebx 007F5EC9 56 push esi 007F5ECA 8BF2 mov esi, edx 007F5ECC 8BD8 mov ebx, eax 007F5ECE 33C0 xor eax, eax 007F5ED0 55 push ebp * Possible String Reference to: '殒淅霛^[嬪]' | 007F5ED1 6809667F00 push $007F6609 ***** TRY | 007F5ED6 64FF30 push dword ptr fs:[eax] 007F5ED9 648920 mov fs:[eax], esp 007F5EDC 8D55FC lea edx, [ebp-$04] 007F5EDF 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; | 007F5EE1 E8D697D9FF call 0058F6BC 007F5EE6 8D55D8 lea edx, [ebp-$28] 007F5EE9 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5EEC E8FB49C1FF call 0040A8EC 007F5EF1 837DD800 cmp dword ptr [ebp-$28], +$00 007F5EF5 7513 jnz 007F5F0A 007F5EF7 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); | 007F5EFA E86174C2FF call 0041D360 007F5EFF 8D55C8 lea edx, [ebp-$38] 007F5F02 8D45FC lea eax, [ebp-$04] * Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData); | 007F5F05 E8061EC2FF call 00417D10 * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F5F0A 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; | 007F5F10 E83764E6FF 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; | 007F5F15 E84ABCE5FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007F5F1A 8B4050 mov eax, [eax+$50] 007F5F1D 8D55C4 lea edx, [ebp-$3C] 007F5F20 8B08 mov ecx, [eax] 007F5F22 FF5110 call dword ptr [ecx+$10] 007F5F25 8B45C4 mov eax, [ebp-$3C] 007F5F28 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5F2B E8BC49C1FF call 0040A8EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F5F30 8BB35C030000 mov esi, [ebx+$035C] 007F5F36 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007F5F38 E80325CDFF call 004C8440 007F5F3D 8D55B0 lea edx, [ebp-$50] 007F5F40 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5F43 E8A449C1FF call 0040A8EC 007F5F48 8B55B0 mov edx, [ebp-$50] 007F5F4B 8D45B4 lea eax, [ebp-$4C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F5F4E E8752EC2FF call 00418DC8 007F5F53 8D45B4 lea eax, [ebp-$4C] 007F5F56 50 push eax 007F5F57 8B55E0 mov edx, [ebp-$20] 007F5F5A 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5F5C E8530CCDFF call 004C6BB4 007F5F61 5A pop edx 007F5F62 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F5F64 FF91B4000000 call dword ptr [ecx+$00B4] 007F5F6A 8BC6 mov eax, esi 007F5F6C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F5F6E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F5F74 8BB308030000 mov esi, [ebx+$0308] 007F5F7A 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 007F5F7C E853F9CCFF call 004C58D4 007F5F81 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5F83 E82480CEFF call 004DDFAC 007F5F88 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F5F8A FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 007F5F8D 6820667F00 push $007F6620 * Possible String Reference to: 'YFID' | 007F5F92 BA68667F00 mov edx, $007F6668 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F5F97 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5F9D E8120CCDFF call 004C6BB4 007F5FA2 8D55A8 lea edx, [ebp-$58] 007F5FA5 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F5FA7 FF5160 call dword ptr [ecx+$60] 007F5FAA FF75A8 push dword ptr [ebp-$58] 007F5FAD 6878667F00 push $007F6678 007F5FB2 8D45AC lea eax, [ebp-$54] 007F5FB5 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F5FBA E8F5F6C0FF call 004056B4 007F5FBF 8B45AC mov eax, [ebp-$54] 007F5FC2 50 push eax 007F5FC3 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F5FC5 E8E27FCEFF call 004DDFAC 007F5FCA 5A pop edx 007F5FCB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F5FCD FF5138 call dword ptr [ecx+$38] 007F5FD0 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 007F5FD2 E8F1F8CCFF call 004C58C8 * Possible String Reference to: 'BBMoney' | 007F5FD7 BA84667F00 mov edx, $007F6684 * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F5FDC 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5FE2 E8CD0BCDFF call 004C6BB4 007F5FE7 8D55E4 lea edx, [ebp-$1C] 007F5FEA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F5FEC FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 007F5FEF BA94667F00 mov edx, $007F6694 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F5FF4 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5FFA E8B50BCDFF call 004C6BB4 007F5FFF 8D55A4 lea edx, [ebp-$5C] 007F6002 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6004 FF5160 call dword ptr [ecx+$60] 007F6007 8B45A4 mov eax, [ebp-$5C] 007F600A 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F600D E8DA48C1FF call 0040A8EC 007F6012 8D55A0 lea edx, [ebp-$60] 007F6015 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6018 E8CF48C1FF call 0040A8EC 007F601D 837DA000 cmp dword ptr [ebp-$60], +$00 007F6021 750D jnz 007F6030 007F6023 8D45F8 lea eax, [ebp-$08] 007F6026 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F602B E88CF3C0FF call 004053BC * Possible String Reference to: 'Price' | 007F6030 BAAC667F00 mov edx, $007F66AC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F6035 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F603B E8740BCDFF call 004C6BB4 007F6040 8D559C lea edx, [ebp-$64] 007F6043 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6045 FF5160 call dword ptr [ecx+$60] 007F6048 8B459C mov eax, [ebp-$64] 007F604B 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F604E E89948C1FF call 0040A8EC 007F6053 8D5598 lea edx, [ebp-$68] 007F6056 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6059 E88E48C1FF call 0040A8EC 007F605E 837D9800 cmp dword ptr [ebp-$68], +$00 007F6062 750D jnz 007F6071 007F6064 8D45F4 lea eax, [ebp-$0C] 007F6067 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F606C E84BF3C0FF call 004053BC * Possible String Reference to: 'Qty' | 007F6071 BA94667F00 mov edx, $007F6694 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F6076 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F607C E8330BCDFF call 004C6BB4 007F6081 8D5594 lea edx, [ebp-$6C] 007F6084 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6086 FF5160 call dword ptr [ecx+$60] 007F6089 8B4594 mov eax, [ebp-$6C] 007F608C 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F608F E85848C1FF call 0040A8EC 007F6094 8D5590 lea edx, [ebp-$70] 007F6097 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F609A E84D48C1FF call 0040A8EC 007F609F 837D9000 cmp dword ptr [ebp-$70], +$00 007F60A3 750D jnz 007F60B2 007F60A5 8D45F8 lea eax, [ebp-$08] 007F60A8 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F60AD E80AF3C0FF call 004053BC * Possible String Reference to: 'Money' | 007F60B2 BABC667F00 mov edx, $007F66BC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F60B7 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F60BD E8F20ACDFF call 004C6BB4 007F60C2 8D558C lea edx, [ebp-$74] 007F60C5 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F60C7 FF5160 call dword ptr [ecx+$60] 007F60CA 8B458C mov eax, [ebp-$74] 007F60CD 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F60D0 E81748C1FF call 0040A8EC 007F60D5 8D5588 lea edx, [ebp-$78] 007F60D8 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F60DB E80C48C1FF call 0040A8EC 007F60E0 837D8800 cmp dword ptr [ebp-$78], +$00 007F60E4 750D jnz 007F60F3 007F60E6 8D45F0 lea eax, [ebp-$10] 007F60E9 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F60EE E8C9F2C0FF call 004053BC * Possible String Reference to: 'HuiLv' | 007F60F3 BACC667F00 mov edx, $007F66CC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F60F8 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F60FE E8B10ACDFF call 004C6BB4 007F6103 8D5584 lea edx, [ebp-$7C] 007F6106 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6108 FF5160 call dword ptr [ecx+$60] 007F610B 8B4584 mov eax, [ebp-$7C] 007F610E 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6111 E8D647C1FF call 0040A8EC 007F6116 8D5580 lea edx, [ebp-$80] 007F6119 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F611C E8CB47C1FF call 0040A8EC 007F6121 837D8000 cmp dword ptr [ebp-$80], +$00 007F6125 750D jnz 007F6134 007F6127 8D45EC lea eax, [ebp-$14] 007F612A BADC667F00 mov edx, $007F66DC * Reference to: System.@LStrLAsg(void;void;void;void); | 007F612F E888F2C0FF call 004053BC * Possible String Reference to: 'SLV' | 007F6134 BAE8667F00 mov edx, $007F66E8 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F6139 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F613F E8700ACDFF call 004C6BB4 007F6144 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 007F614A 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F614C FF5160 call dword ptr [ecx+$60] 007F614F 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C] 007F6155 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6158 E88F47C1FF call 0040A8EC 007F615D 8D9578FFFFFF lea edx, [ebp+$FFFFFF78] 007F6163 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6166 E88147C1FF call 0040A8EC 007F616B 83BD78FFFFFF00 cmp dword ptr [ebp+$FFFFFF78], +$00 007F6172 750D jnz 007F6181 007F6174 8D45DC lea eax, [ebp-$24] 007F6177 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F617C E83BF2C0FF call 004053BC 007F6181 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] 007F6187 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F618A E85D47C1FF call 0040A8EC 007F618F 8B8574FFFFFF mov eax, [ebp+$FFFFFF74] * Possible String Reference to: 'Money' | 007F6195 BABC667F00 mov edx, $007F66BC * Reference to: System.@LStrCmp; | 007F619A E8A1F5C0FF call 00405740 007F619F 0F84FA000000 jz 007F629F 007F61A5 8D9570FFFFFF lea edx, [ebp+$FFFFFF70] 007F61AB 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F61AE E83947C1FF call 0040A8EC 007F61B3 8B8570FFFFFF mov eax, [ebp+$FFFFFF70] * Possible String Reference to: 'HuiLv' | 007F61B9 BACC667F00 mov edx, $007F66CC * Reference to: System.@LStrCmp; | 007F61BE E87DF5C0FF call 00405740 007F61C3 0F848F000000 jz 007F6258 007F61C9 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61CC E85B75C1FF call 0040D72C 007F61D1 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F61D7 9B wait 007F61D8 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61DB E84C75C1FF call 0040D72C 007F61E0 DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F61E6 DEC9 fmulp st(1), st(0) 007F61E8 DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F61EE 9B wait 007F61EF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61F2 E83575C1FF call 0040D72C 007F61F7 DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F61FD DEC9 fmulp st(1), st(0) 007F61FF DBBD4CFFFFFF fstp tbyte ptr [ebp+$FFFFFF4C] 007F6205 9B wait 007F6206 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6209 E81E75C1FF call 0040D72C 007F620E DBAD4CFFFFFF fld tbyte ptr [ebp+$FFFFFF4C] 007F6214 DEC9 fmulp st(1), st(0) 007F6216 83C4F4 add esp, -$0C 007F6219 DB3C24 fstp tbyte ptr [esp] 007F621C 9B wait 007F621D 8D45E8 lea eax, [ebp-$18] | 007F6220 E88773C1FF call 0040D5AC 007F6225 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6228 E8FF74C1FF call 0040D72C 007F622D DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F6233 9B wait 007F6234 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6237 E8F074C1FF call 0040D72C 007F623C DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F6242 DEC9 fmulp st(1), st(0) 007F6244 83C4F4 add esp, -$0C 007F6247 DB3C24 fstp tbyte ptr [esp] 007F624A 9B wait 007F624B 8D45F0 lea eax, [ebp-$10] | 007F624E E85973C1FF call 0040D5AC 007F6253 E98C000000 jmp 007F62E4 007F6258 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F625B E8CC74C1FF call 0040D72C 007F6260 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F6266 9B wait 007F6267 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F626A E8BD74C1FF call 0040D72C 007F626F DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F6275 DEC9 fmulp st(1), st(0) 007F6277 DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F627D 9B wait 007F627E 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6281 E8A674C1FF call 0040D72C 007F6286 DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F628C DEC9 fmulp st(1), st(0) 007F628E 83C4F4 add esp, -$0C 007F6291 DB3C24 fstp tbyte ptr [esp] 007F6294 9B wait 007F6295 8D45E8 lea eax, [ebp-$18] | 007F6298 E80F73C1FF call 0040D5AC 007F629D EB45 jmp 007F62E4 007F629F 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62A2 E88574C1FF call 0040D72C 007F62A7 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F62AD 9B wait 007F62AE 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62B1 E87674C1FF call 0040D72C 007F62B6 DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F62BC DEC9 fmulp st(1), st(0) 007F62BE DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F62C4 9B wait 007F62C5 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62C8 E85F74C1FF call 0040D72C 007F62CD DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F62D3 DEC9 fmulp st(1), st(0) 007F62D5 83C4F4 add esp, -$0C 007F62D8 DB3C24 fstp tbyte ptr [esp] 007F62DB 9B wait 007F62DC 8D45E8 lea eax, [ebp-$18] | 007F62DF E8C872C1FF call 0040D5AC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F62E4 8BB35C030000 mov esi, [ebx+$035C] 007F62EA 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007F62EC E84F21CDFF call 004C8440 * Possible String Reference to: 'Money' | 007F62F1 BABC667F00 mov edx, $007F66BC 007F62F6 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F62F8 E8B708CDFF call 004C6BB4 007F62FD 50 push eax 007F62FE 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6301 E82674C1FF call 0040D72C 007F6306 8D853CFFFFFF lea eax, [ebp+$FFFFFF3C] * Reference to: Variants.@VarFromReal; | 007F630C E87B2AC2FF call 00418D8C 007F6311 8D953CFFFFFF lea edx, [ebp+$FFFFFF3C] 007F6317 58 pop eax 007F6318 8B08 mov ecx, [eax] 007F631A FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 007F6320 BA84667F00 mov edx, $007F6684 007F6325 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F6327 E88808CDFF call 004C6BB4 007F632C 50 push eax 007F632D 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6330 E8F773C1FF call 0040D72C 007F6335 8D852CFFFFFF lea eax, [ebp+$FFFFFF2C] * Reference to: Variants.@VarFromReal; | 007F633B E84C2AC2FF call 00418D8C 007F6340 8D952CFFFFFF lea edx, [ebp+$FFFFFF2C] 007F6346 58 pop eax 007F6347 8B08 mov ecx, [eax] 007F6349 FF91B4000000 call dword ptr [ecx+$00B4] 007F634F 8BC6 mov eax, esi 007F6351 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F6353 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F6359 8BB30C030000 mov esi, [ebx+$030C] 007F635F 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 007F6361 E86EF5CCFF call 004C58D4 007F6366 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F6368 E83F7CCEFF call 004DDFAC 007F636D 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F636F FF5244 call dword ptr [edx+$44] 007F6372 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F6374 E8337CCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F6379 BAF4667F00 mov edx, $007F66F4 007F637E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F6380 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F6383 6810677F00 push $007F6710 007F6388 FF75E0 push dword ptr [ebp-$20] 007F638B 6820677F00 push $007F6720 007F6390 8D9524FFFFFF lea edx, [ebp+$FFFFFF24] 007F6396 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6399 E84E45C1FF call 0040A8EC 007F639E FFB524FFFFFF push dword ptr [ebp+$FFFFFF24] 007F63A4 8D8528FFFFFF lea eax, [ebp+$FFFFFF28] 007F63AA BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F63AF E800F3C0FF call 004056B4 007F63B4 8B8528FFFFFF mov eax, [ebp+$FFFFFF28] 007F63BA 50 push eax 007F63BB 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F63BD E8EA7BCEFF call 004DDFAC 007F63C2 5A pop edx 007F63C3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F63C5 FF5138 call dword ptr [ecx+$38] 007F63C8 8D9520FFFFFF lea edx, [ebp+$FFFFFF20] 007F63CE 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F63D1 E81645C1FF call 0040A8EC 007F63D6 8B8520FFFFFF mov eax, [ebp+$FFFFFF20] * Possible String Reference to: 'Money' | 007F63DC BABC667F00 mov edx, $007F66BC * Reference to: System.@LStrCmp; | 007F63E1 E85AF3C0FF call 00405740 007F63E6 7427 jz 007F640F 007F63E8 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F63EA E8BD7BCEFF call 004DDFAC 007F63EF 50 push eax 007F63F0 8D851CFFFFFF lea eax, [ebp+$FFFFFF1C] 007F63F6 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 007F63F9 BA2C677F00 mov edx, $007F672C * Reference to: System.@LStrCat3; | 007F63FE E83DF2C0FF call 00405640 007F6403 8B951CFFFFFF mov edx, [ebp+$FFFFFF1C] 007F6409 58 pop eax 007F640A 8B08 mov ecx, [eax] 007F640C FF5138 call dword ptr [ecx+$38] 007F640F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F6411 E8967BCEFF call 004DDFAC 007F6416 50 push eax 007F6417 8D8518FFFFFF lea eax, [ebp+$FFFFFF18] 007F641D 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 007F6420 BA3C677F00 mov edx, $007F673C * Reference to: System.@LStrCat3; | 007F6425 E816F2C0FF call 00405640 007F642A 8B9518FFFFFF mov edx, [ebp+$FFFFFF18] 007F6430 58 pop eax 007F6431 8B08 mov ecx, [eax] 007F6433 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F6436 6850677F00 push $007F6750 007F643B 8D9510FFFFFF lea edx, [ebp+$FFFFFF10] *) end; procedure TfrmYSCRPB_ZHYH.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 007F680C 55 push ebp 007F680D 8BEC mov ebp, esp 007F680F B909000000 mov ecx, $00000009 007F6814 6A00 push $00 007F6816 6A00 push $00 007F6818 49 dec ecx 007F6819 75F9 jnz 007F6814 007F681B 51 push ecx 007F681C 53 push ebx 007F681D 56 push esi 007F681E 8BDA mov ebx, edx 007F6820 8BF0 mov esi, eax 007F6822 33C0 xor eax, eax 007F6824 55 push ebp * Possible String Reference to: '閺嗬胫^[嬪]' | 007F6825 68606A7F00 push $007F6A60 ***** TRY | 007F682A 64FF30 push dword ptr fs:[eax] 007F682D 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 007F6830 BA786A7F00 mov edx, $007F6A78 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F6835 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F683B E87403CDFF call 004C6BB4 007F6840 8D55F0 lea edx, [ebp-$10] 007F6843 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6845 FF5160 call dword ptr [ecx+$60] 007F6848 8B45F0 mov eax, [ebp-$10] 007F684B 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F684E E89940C1FF call 0040A8EC 007F6853 837DF400 cmp dword ptr [ebp-$0C], +$00 007F6857 741D jz 007F6876 007F6859 6A00 push $00 * Possible String Reference to: '提示' | 007F685B B9806A7F00 mov ecx, $007F6A80 * Possible String Reference to: '自动生成数据不能更改!' | 007F6860 BA886A7F00 mov edx, $007F6A88 *) end; procedure TfrmYSCRPB_ZHYH.ToolButton3Click(Sender : TObject); begin (* 007F6B50 55 push ebp 007F6B51 8BEC mov ebp, esp 007F6B53 B90E000000 mov ecx, $0000000E 007F6B58 6A00 push $00 007F6B5A 6A00 push $00 007F6B5C 49 dec ecx 007F6B5D 75F9 jnz 007F6B58 007F6B5F 51 push ecx 007F6B60 56 push esi 007F6B61 57 push edi 007F6B62 8BF8 mov edi, eax 007F6B64 33C0 xor eax, eax 007F6B66 55 push ebp 007F6B67 68EA6C7F00 push $007F6CEA ***** TRY | 007F6B6C 64FF30 push dword ptr fs:[eax] 007F6B6F 648920 mov fs:[eax], esp 007F6B72 8BB75C030000 mov esi, [edi+$035C] 007F6B78 8BC6 mov eax, esi | 007F6B7A E8111ACDFF call 004C8590 * Possible String Reference to: 'CRTime' | 007F6B7F BA006D7F00 mov edx, $007F6D00 007F6B84 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F6B86 E82900CDFF call 004C6BB4 007F6B8B 50 push eax 007F6B8C 8B8708030000 mov eax, [edi+$0308] | 007F6B92 E8F1DDFBFF call 007B4988 007F6B97 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarFromTDateTime; | 007F6B9A E80122C2FF call 00418DA0 007F6B9F 8D55F0 lea edx, [ebp-$10] 007F6BA2 58 pop eax 007F6BA3 8B08 mov ecx, [eax] 007F6BA5 FF91B4000000 call dword ptr [ecx+$00B4] 007F6BAB 8D55DC lea edx, [ebp-$24] *) end; procedure TfrmYSCRPB_ZHYH.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 007F6D88 55 push ebp 007F6D89 8BEC mov ebp, esp 007F6D8B 51 push ecx 007F6D8C B90C000000 mov ecx, $0000000C 007F6D91 6A00 push $00 007F6D93 6A00 push $00 007F6D95 49 dec ecx 007F6D96 75F9 jnz 007F6D91 007F6D98 51 push ecx 007F6D99 874DFC xchg [ebp-$04], ecx 007F6D9C 53 push ebx 007F6D9D 56 push esi 007F6D9E 8BF0 mov esi, eax 007F6DA0 33C0 xor eax, eax 007F6DA2 55 push ebp * Possible String Reference to: '檩倮肓^[嬪]' | 007F6DA3 6812717F00 push $007F7112 ***** TRY | 007F6DA8 64FF30 push dword ptr fs:[eax] 007F6DAB 648920 mov fs:[eax], esp * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F6DAE 8B865C030000 mov eax, [esi+$035C] * Possible String Reference to: 'YFType' | 007F6DB4 BA28717F00 mov edx, $007F7128 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F6DB9 E8F6FDCCFF call 004C6BB4 007F6DBE 8D55F8 lea edx, [ebp-$08] 007F6DC1 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F6DC3 FF5160 call dword ptr [ecx+$60] 007F6DC6 8B45F8 mov eax, [ebp-$08] 007F6DC9 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6DCC E81B3BC1FF call 0040A8EC 007F6DD1 837DFC00 cmp dword ptr [ebp-$04], +$00 007F6DD5 741D jz 007F6DF4 007F6DD7 6A00 push $00 * Possible String Reference to: '提示' | 007F6DD9 B930717F00 mov ecx, $007F7130 * Possible String Reference to: '自动生成数据不能更改!' | 007F6DDE BA38717F00 mov edx, $007F7138 *) end; procedure TfrmYSCRPB_ZHYH.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 007F7264 55 push ebp 007F7265 8BEC mov ebp, esp 007F7267 51 push ecx 007F7268 B906000000 mov ecx, $00000006 007F726D 6A00 push $00 007F726F 6A00 push $00 007F7271 49 dec ecx 007F7272 75F9 jnz 007F726D 007F7274 51 push ecx 007F7275 874DFC xchg [ebp-$04], ecx 007F7278 53 push ebx 007F7279 56 push esi 007F727A 8BF0 mov esi, eax 007F727C 33C0 xor eax, eax 007F727E 55 push ebp * Possible String Reference to: '2掷脬^[嬪]' | 007F727F 68BD747F00 push $007F74BD ***** TRY | 007F7284 64FF30 push dword ptr fs:[eax] 007F7287 648920 mov fs:[eax], esp 007F728A 33C0 xor eax, eax 007F728C 55 push ebp 007F728D 6893747F00 push $007F7493 ***** TRY | 007F7292 64FF30 push dword ptr fs:[eax] 007F7295 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 007F75C0 55 push ebp 007F75C1 8BEC mov ebp, esp 007F75C3 51 push ecx 007F75C4 B906000000 mov ecx, $00000006 007F75C9 6A00 push $00 007F75CB 6A00 push $00 007F75CD 49 dec ecx 007F75CE 75F9 jnz 007F75C9 007F75D0 51 push ecx 007F75D1 874DFC xchg [ebp-$04], ecx 007F75D4 53 push ebx 007F75D5 56 push esi 007F75D6 8BF0 mov esi, eax 007F75D8 33C0 xor eax, eax 007F75DA 55 push ebp * Possible String Reference to: '橹依脬^[嬪]' | 007F75DB 6819787F00 push $007F7819 ***** TRY | 007F75E0 64FF30 push dword ptr fs:[eax] 007F75E3 648920 mov fs:[eax], esp 007F75E6 33C0 xor eax, eax 007F75E8 55 push ebp 007F75E9 68EF777F00 push $007F77EF ***** TRY | 007F75EE 64FF30 push dword ptr fs:[eax] 007F75F1 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.ToolButton1Click(Sender : TObject); begin (* 007F7920 53 push ebx 007F7921 8BD8 mov ebx, eax * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F7923 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F7929 E89205CDFF call 004C7EC0 007F792E 84C0 test al, al 007F7930 7516 jnz 007F7948 * Possible String Reference to: '应收款列表' | 007F7932 B954797F00 mov ecx, $007F7954 * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F7937 8B9320030000 mov edx, [ebx+$0320] * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F793D 8B8334030000 mov eax, [ebx+$0334] | 007F7943 E8E808FCFF call 007B8230 007F7948 5B pop ebx 007F7949 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.v2Column7PropertiesButtonClick(Sender : TObject); begin (* 007F7960 55 push ebp 007F7961 8BEC mov ebp, esp 007F7963 51 push ecx 007F7964 B919000000 mov ecx, $00000019 007F7969 6A00 push $00 007F796B 6A00 push $00 007F796D 49 dec ecx 007F796E 75F9 jnz 007F7969 007F7970 874DFC xchg [ebp-$04], ecx 007F7973 53 push ebx 007F7974 8945FC mov [ebp-$04], eax 007F7977 33C0 xor eax, eax 007F7979 55 push ebp * Possible String Reference to: '轾死雽[嬪]' | 007F797A 68F67E7F00 push $007F7EF6 ***** TRY | 007F797F 64FF30 push dword ptr fs:[eax] 007F7982 648920 mov fs:[eax], esp 007F7985 33C0 xor eax, eax 007F7987 55 push ebp 007F7988 68757E7F00 push $007F7E75 ***** TRY | 007F798D 64FF30 push dword ptr fs:[eax] 007F7990 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2PSPropertiesEditValueChanged(Sender : TObject); begin (* 007F8084 55 push ebp 007F8085 8BEC mov ebp, esp 007F8087 B908000000 mov ecx, $00000008 007F808C 6A00 push $00 007F808E 6A00 push $00 007F8090 49 dec ecx 007F8091 75F9 jnz 007F808C 007F8093 53 push ebx 007F8094 56 push esi 007F8095 8BDA mov ebx, edx 007F8097 8BF0 mov esi, eax 007F8099 33C0 xor eax, eax 007F809B 55 push ebp * Possible String Reference to: '閮壤胫^[嬪]' | 007F809C 686C827F00 push $007F826C ***** TRY | 007F80A1 64FF30 push dword ptr fs:[eax] 007F80A4 648920 mov fs:[eax], esp 007F80A7 8D55FC lea edx, [ebp-$04] 007F80AA 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; | 007F80AC E80B76D9FF call 0058F6BC 007F80B1 8D55F4 lea edx, [ebp-$0C] 007F80B4 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F80B7 E83028C1FF call 0040A8EC 007F80BC 837DF400 cmp dword ptr [ebp-$0C], +$00 007F80C0 750D jnz 007F80CF 007F80C2 8D45FC lea eax, [ebp-$04] 007F80C5 BA84827F00 mov edx, $007F8284 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F80CA E8EDD2C0FF call 004053BC * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F80CF 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; | 007F80D5 E87242E6FF 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; | 007F80DA E8859AE5FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007F80DF 8B4050 mov eax, [eax+$50] 007F80E2 8D55F0 lea edx, [ebp-$10] 007F80E5 8B08 mov ecx, [eax] 007F80E7 FF5110 call dword ptr [ecx+$10] 007F80EA 8B45F0 mov eax, [ebp-$10] 007F80ED 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F80F0 E8F727C1FF call 0040A8EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F80F5 8B9E5C030000 mov ebx, [esi+$035C] 007F80FB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F80FD E83E03CDFF call 004C8440 007F8102 8D55DC lea edx, [ebp-$24] 007F8105 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8108 E8DF27C1FF call 0040A8EC 007F810D 8B55DC mov edx, [ebp-$24] 007F8110 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F8113 E8B00CC2FF call 00418DC8 007F8118 8D45E0 lea eax, [ebp-$20] 007F811B 50 push eax 007F811C 8B55F8 mov edx, [ebp-$08] 007F811F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8121 E88EEACCFF call 004C6BB4 007F8126 5A pop edx 007F8127 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F8129 FF91B4000000 call dword ptr [ecx+$00B4] 007F812F 8BC3 mov eax, ebx 007F8131 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F8133 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F8139 8B9E0C030000 mov ebx, [esi+$030C] 007F813F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8141 E88ED7CCFF call 004C58D4 007F8146 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8148 E85F5ECEFF call 004DDFAC 007F814D 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F814F FF5244 call dword ptr [edx+$44] 007F8152 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8154 E8535ECEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F8159 BA90827F00 mov edx, $007F8290 007F815E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8160 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F8163 68AC827F00 push $007F82AC 007F8168 FF75F8 push dword ptr [ebp-$08] 007F816B 68BC827F00 push $007F82BC 007F8170 8D55D4 lea edx, [ebp-$2C] 007F8173 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8176 E87127C1FF call 0040A8EC 007F817B FF75D4 push dword ptr [ebp-$2C] 007F817E 8D45D8 lea eax, [ebp-$28] 007F8181 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F8186 E829D5C0FF call 004056B4 007F818B 8B45D8 mov eax, [ebp-$28] 007F818E 50 push eax 007F818F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8191 E8165ECEFF call 004DDFAC 007F8196 5A pop edx 007F8197 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8199 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F819C 68C8827F00 push $007F82C8 007F81A1 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYSCRPB_ZHYH.v2Column2PropertiesEditValueChanged(Sender : TObject); begin (* 007F8328 55 push ebp 007F8329 8BEC mov ebp, esp 007F832B B907000000 mov ecx, $00000007 007F8330 6A00 push $00 007F8332 6A00 push $00 007F8334 49 dec ecx 007F8335 75F9 jnz 007F8330 007F8337 51 push ecx 007F8338 53 push ebx 007F8339 56 push esi 007F833A 8BDA mov ebx, edx 007F833C 8BF0 mov esi, eax 007F833E 33C0 xor eax, eax 007F8340 55 push ebp 007F8341 6847857F00 push $007F8547 ***** TRY | 007F8346 64FF30 push dword ptr fs:[eax] 007F8349 648920 mov fs:[eax], esp 007F834C 8D55FC lea edx, [ebp-$04] 007F834F 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; | 007F8351 E86673D9FF call 0058F6BC * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F8356 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; | 007F835C E8EB3FE6FF 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; | 007F8361 E8FE97E5FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007F8366 8B4050 mov eax, [eax+$50] 007F8369 8D55F4 lea edx, [ebp-$0C] 007F836C 8B08 mov ecx, [eax] 007F836E FF5110 call dword ptr [ecx+$10] 007F8371 8B45F4 mov eax, [ebp-$0C] 007F8374 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8377 E87025C1FF call 0040A8EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F837C 8B9E5C030000 mov ebx, [esi+$035C] 007F8382 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F8384 E8B700CDFF call 004C8440 007F8389 8D55E0 lea edx, [ebp-$20] 007F838C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F838F E85825C1FF call 0040A8EC 007F8394 8B55E0 mov edx, [ebp-$20] 007F8397 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F839A E8290AC2FF call 00418DC8 007F839F 8D45E4 lea eax, [ebp-$1C] 007F83A2 50 push eax 007F83A3 8B55F8 mov edx, [ebp-$08] 007F83A6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F83A8 E807E8CCFF call 004C6BB4 007F83AD 5A pop edx 007F83AE 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F83B0 FF91B4000000 call dword ptr [ecx+$00B4] 007F83B6 8BC3 mov eax, ebx 007F83B8 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F83BA FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F83C0 8B9E08030000 mov ebx, [esi+$0308] 007F83C6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F83C8 E807D5CCFF call 004C58D4 007F83CD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F83CF E8D85BCEFF call 004DDFAC 007F83D4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F83D6 FF5244 call dword ptr [edx+$44] 007F83D9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F83DB E8CC5BCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F83E0 BA5C857F00 mov edx, $007F855C 007F83E5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F83E7 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F83EA 6878857F00 push $007F8578 007F83EF FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007F83F2 6888857F00 push $007F8588 007F83F7 8D55D8 lea edx, [ebp-$28] 007F83FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F83FD E8EA24C1FF call 0040A8EC 007F8402 FF75D8 push dword ptr [ebp-$28] 007F8405 6894857F00 push $007F8594 007F840A 8D45DC lea eax, [ebp-$24] 007F840D BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007F8412 E89DD2C0FF call 004056B4 007F8417 8B45DC mov eax, [ebp-$24] 007F841A 50 push eax 007F841B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F841D E88A5BCEFF call 004DDFAC 007F8422 5A pop edx 007F8423 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8425 FF5138 call dword ptr [ecx+$38] 007F8428 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'CRFlag' | 007F842B BAA0857F00 mov edx, $007F85A0 * Reference to: System.@LStrCmp; | 007F8430 E80BD3C0FF call 00405740 007F8435 7540 jnz 007F8477 007F8437 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '收' | 007F843A BAB0857F00 mov edx, $007F85B0 * Reference to: System.@LStrCmp; | 007F843F E8FCD2C0FF call 00405740 007F8444 7511 jnz 007F8457 007F8446 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8448 E85F5BCEFF call 004DDFAC * Possible String Reference to: ',QtyFlag=1' | 007F844D BABC857F00 mov edx, $007F85BC 007F8452 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8454 FF5138 call dword ptr [ecx+$38] 007F8457 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '付' | 007F845A BAD0857F00 mov edx, $007F85D0 * Reference to: System.@LStrCmp; | 007F845F E8DCD2C0FF call 00405740 007F8464 7511 jnz 007F8477 007F8466 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8468 E83F5BCEFF call 004DDFAC * Possible String Reference to: ',QtyFlag=-1' | 007F846D BADC857F00 mov edx, $007F85DC 007F8472 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8474 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F8477 68F0857F00 push $007F85F0 007F847C 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYSCRPB_ZHYH.v2KPMoneyPropertiesEditValueChanged(Sender : TObject); begin (* 007F8644 55 push ebp 007F8645 8BEC mov ebp, esp 007F8647 B90C000000 mov ecx, $0000000C 007F864C 6A00 push $00 007F864E 6A00 push $00 007F8650 49 dec ecx 007F8651 75F9 jnz 007F864C 007F8653 53 push ebx 007F8654 56 push esi 007F8655 8BDA mov ebx, edx 007F8657 8BF0 mov esi, eax 007F8659 33C0 xor eax, eax 007F865B 55 push ebp 007F865C 683B897F00 push $007F893B ***** TRY | 007F8661 64FF30 push dword ptr fs:[eax] 007F8664 648920 mov fs:[eax], esp 007F8667 8D55FC lea edx, [ebp-$04] 007F866A 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; | 007F866C E84B70D9FF call 0058F6BC 007F8671 8D55EC lea edx, [ebp-$14] 007F8674 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8677 E87022C1FF call 0040A8EC 007F867C 837DEC00 cmp dword ptr [ebp-$14], +$00 007F8680 750D jnz 007F868F 007F8682 8D45FC lea eax, [ebp-$04] 007F8685 BA50897F00 mov edx, $007F8950 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F868A E82DCDC0FF call 004053BC * Reference to control TfrmYSCRPB_ZHYH.Tv2 : TcxGridDBTableView | 007F868F 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; | 007F8695 E8B23CE6FF 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; | 007F869A E8C594E5FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007F869F 8B4050 mov eax, [eax+$50] 007F86A2 8D55E8 lea edx, [ebp-$18] 007F86A5 8B08 mov ecx, [eax] 007F86A7 FF5110 call dword ptr [ecx+$10] 007F86AA 8B45E8 mov eax, [ebp-$18] 007F86AD 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F86B0 E83722C1FF call 0040A8EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F86B5 8B9E5C030000 mov ebx, [esi+$035C] 007F86BB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F86BD E87EFDCCFF call 004C8440 007F86C2 8D55D4 lea edx, [ebp-$2C] 007F86C5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F86C8 E81F22C1FF call 0040A8EC 007F86CD 8B55D4 mov edx, [ebp-$2C] 007F86D0 8D45D8 lea eax, [ebp-$28] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F86D3 E8F006C2FF call 00418DC8 007F86D8 8D45D8 lea eax, [ebp-$28] 007F86DB 50 push eax 007F86DC 8B55F0 mov edx, [ebp-$10] 007F86DF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F86E1 E8CEE4CCFF call 004C6BB4 007F86E6 5A pop edx 007F86E7 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F86E9 FF91B4000000 call dword ptr [ecx+$00B4] 007F86EF 8BC3 mov eax, ebx 007F86F1 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F86F3 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F86F9 8B9E08030000 mov ebx, [esi+$0308] 007F86FF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8701 E8CED1CCFF call 004C58D4 007F8706 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F8708 E89F58CEFF call 004DDFAC 007F870D 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F870F FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 007F8712 685C897F00 push $007F895C * Possible String Reference to: 'YFID' | 007F8717 BAA4897F00 mov edx, $007F89A4 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F871C 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8722 E88DE4CCFF call 004C6BB4 007F8727 8D55CC lea edx, [ebp-$34] 007F872A 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F872C FF5160 call dword ptr [ecx+$60] 007F872F FF75CC push dword ptr [ebp-$34] 007F8732 68B4897F00 push $007F89B4 007F8737 8D45D0 lea eax, [ebp-$30] 007F873A BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F873F E870CFC0FF call 004056B4 007F8744 8B45D0 mov eax, [ebp-$30] 007F8747 50 push eax 007F8748 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F874A E85D58CEFF call 004DDFAC 007F874F 5A pop edx 007F8750 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F8752 FF5138 call dword ptr [ecx+$38] 007F8755 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007F8757 E86CD1CCFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 007F875C BAC0897F00 mov edx, $007F89C0 * Reference to control TfrmYSCRPB_ZHYH.ADOQueryTemp : TADOQuery | 007F8761 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8767 E848E4CCFF call 004C6BB4 007F876C 8D55F4 lea edx, [ebp-$0C] 007F876F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F8771 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 007F8774 BAC0897F00 mov edx, $007F89C0 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F8779 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F877F E830E4CCFF call 004C6BB4 007F8784 8D55F8 lea edx, [ebp-$08] 007F8787 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007F8789 FF5160 call dword ptr [ecx+$60] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F878C 8B9E0C030000 mov ebx, [esi+$030C] 007F8792 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8794 E83BD1CCFF call 004C58D4 007F8799 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F879B E80C58CEFF call 004DDFAC 007F87A0 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F87A2 FF5244 call dword ptr [edx+$44] 007F87A5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F87A7 E80058CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F87AC BAD0897F00 mov edx, $007F89D0 007F87B1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F87B3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F87B6 68EC897F00 push $007F89EC 007F87BB FF75F0 push dword ptr [ebp-$10] 007F87BE 68FC897F00 push $007F89FC 007F87C3 8D55C4 lea edx, [ebp-$3C] 007F87C6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F87C9 E81E21C1FF call 0040A8EC 007F87CE FF75C4 push dword ptr [ebp-$3C] 007F87D1 8D45C8 lea eax, [ebp-$38] 007F87D4 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F87D9 E8D6CEC0FF call 004056B4 007F87DE 8B45C8 mov eax, [ebp-$38] 007F87E1 50 push eax 007F87E2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F87E4 E8C357CEFF call 004DDFAC 007F87E9 5A pop edx 007F87EA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F87EC FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F87EF 68088A7F00 push $007F8A08 007F87F4 8D55BC lea edx, [ebp-$44] *) end; procedure TfrmYSCRPB_ZHYH.Button1Click(Sender : TObject); begin (* 007F8AC4 55 push ebp 007F8AC5 8BEC mov ebp, esp 007F8AC7 B910000000 mov ecx, $00000010 007F8ACC 6A00 push $00 007F8ACE 6A00 push $00 007F8AD0 49 dec ecx 007F8AD1 75F9 jnz 007F8ACC 007F8AD3 51 push ecx 007F8AD4 53 push ebx 007F8AD5 56 push esi 007F8AD6 57 push edi 007F8AD7 8945FC mov [ebp-$04], eax 007F8ADA 33C0 xor eax, eax 007F8ADC 55 push ebp * Possible String Reference to: '闅祭霠_^[嬪]' | 007F8ADD 68558E7F00 push $007F8E55 ***** TRY | 007F8AE2 64FF30 push dword ptr fs:[eax] 007F8AE5 648920 mov fs:[eax], esp 007F8AE8 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F8AEB 8B805C030000 mov eax, [eax+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F8AF1 E8CAF3CCFF call 004C7EC0 007F8AF6 84C0 test al, al 007F8AF8 0F85F1020000 jnz 007F8DEF 007F8AFE A0648E7F00 mov al, byte ptr [$007F8E64] 007F8B03 50 push eax 007F8B04 8D45EC lea eax, [ebp-$14] 007F8B07 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F8B09 E85602C2FF call 00418D64 007F8B0E 8D4DEC lea ecx, [ebp-$14] 007F8B11 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F8B14 8B805C030000 mov eax, [eax+$035C] * Possible String Reference to: 'ssel' | 007F8B1A BA708E7F00 mov edx, $007F8E70 007F8B1F 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007F8B21 FF9344020000 call dword ptr [ebx+$0244] 007F8B27 84C0 test al, al 007F8B29 751D jnz 007F8B48 007F8B2B 6A00 push $00 * Possible String Reference to: '提示' | 007F8B2D B9788E7F00 mov ecx, $007F8E78 * Possible String Reference to: '没有选择数据!' | 007F8B32 BA808E7F00 mov edx, $007F8E80 *) end; procedure TfrmYSCRPB_ZHYH.CheckBox1Click(Sender : TObject); begin (* 007F8F40 55 push ebp 007F8F41 8BEC mov ebp, esp 007F8F43 33C9 xor ecx, ecx 007F8F45 51 push ecx 007F8F46 51 push ecx 007F8F47 51 push ecx 007F8F48 51 push ecx 007F8F49 51 push ecx 007F8F4A 51 push ecx 007F8F4B 51 push ecx 007F8F4C 51 push ecx 007F8F4D 53 push ebx 007F8F4E 56 push esi 007F8F4F 57 push edi 007F8F50 8BF0 mov esi, eax 007F8F52 33C0 xor eax, eax 007F8F54 55 push ebp * Possible String Reference to: '閞豪豚_^[嬪]' | 007F8F55 687D907F00 push $007F907D ***** TRY | 007F8F5A 64FF30 push dword ptr fs:[eax] 007F8F5D 648920 mov fs:[eax], esp 007F8F60 BA94907F00 mov edx, $007F9094 * Reference to control TfrmYSCRPB_ZHYH.Label13 : TLabel | 007F8F65 8B869C030000 mov eax, [esi+$039C] * Reference to: Controls.TControl.SetText(TControl;TCaption); | 007F8F6B E8B0F6C8FF call 00488620 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F8F70 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F8F76 E845EFCCFF call 004C7EC0 007F8F7B 84C0 test al, al 007F8F7D 0F85D4000000 jnz 007F9057 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F8F83 8B9E5C030000 mov ebx, [esi+$035C] 007F8F89 8BC3 mov eax, ebx * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007F8F8B E8C4E5CCFF call 004C7554 007F8F90 8BC3 mov eax, ebx * Reference to: DB.TDataSet.First(TDataSet); | 007F8F92 E899F0CCFF call 004C8030 007F8F97 E9A0000000 jmp 007F903C 007F8F9C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F8F9E E89DF4CCFF call 004C8440 * Reference to control TfrmYSCRPB_ZHYH.CheckBox1 : TCheckBox | 007F8FA3 8B8680030000 mov eax, [esi+$0380] 007F8FA9 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 007F8FAB FF92C8000000 call dword ptr [edx+$00C8] 007F8FB1 8BD0 mov edx, eax 007F8FB3 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F8FB6 E8A9FDC1FF call 00418D64 007F8FBB 8D45F0 lea eax, [ebp-$10] 007F8FBE 50 push eax * Possible String Reference to: 'ssel' | 007F8FBF BAA0907F00 mov edx, $007F90A0 007F8FC4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8FC6 E8E9DBCCFF call 004C6BB4 007F8FCB 5A pop edx 007F8FCC 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F8FCE FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'Money' | 007F8FD4 BAB0907F00 mov edx, $007F90B0 007F8FD9 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8FDB E8D4DBCCFF call 004C6BB4 007F8FE0 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_4C | 007F8FE2 FF524C call dword ptr [edx+$4C] 007F8FE5 DF7DE4 fistp qword ptr [ebp-$1C] 007F8FE8 9B wait 007F8FE9 8D55E0 lea edx, [ebp-$20] * Reference to control TfrmYSCRPB_ZHYH.Label13 : TLabel | 007F8FEC 8BBE9C030000 mov edi, [esi+$039C] 007F8FF2 8BC7 mov eax, edi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F8FF4 E8F7F5C8FF call 004885F0 007F8FF9 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F8FFC E82B47C1FF call 0040D72C 007F9001 D80DB8907F00 fmul dword ptr [$007F90B8] 007F9007 DF6DE4 fild qword ptr [ebp-$1C] 007F900A DEC1 faddp st(1), st(0) 007F900C D835B8907F00 fdiv dword ptr [$007F90B8] 007F9012 83C4F4 add esp, -$0C 007F9015 DB3C24 fstp tbyte ptr [esp] 007F9018 9B wait 007F9019 8D45EC lea eax, [ebp-$14] | 007F901C E88B45C1FF call 0040D5AC 007F9021 8B55EC mov edx, [ebp-$14] 007F9024 8BC7 mov eax, edi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 007F9026 E8F5F5C8FF call 00488620 007F902B 8BC3 mov eax, ebx 007F902D 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F902F FF924C020000 call dword ptr [edx+$024C] 007F9035 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Next(TDataSet); | 007F9037 E810F3CCFF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 007F903C 80BBA100000000 cmp byte ptr [ebx+$00A1], $00 007F9043 0F8453FFFFFF jz 007F8F9C 007F9049 8BC3 mov eax, ebx * Reference to: DB.TDataSet.First(TDataSet); | 007F904B E8E0EFCCFF call 004C8030 007F9050 8BC3 mov eax, ebx * Reference to: DB.TDataSet.EnableControls(TDataSet); | 007F9052 E81DE5CCFF call 004C7574 007F9057 33C0 xor eax, eax 007F9059 5A pop edx 007F905A 59 pop ecx 007F905B 59 pop ecx 007F905C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[嬪]' | 007F905F 6884907F00 push $007F9084 007F9064 8D45E0 lea eax, [ebp-$20] * Reference to: System.@LStrClr(void;void); | 007F9067 E8B8C2C0FF call 00405324 007F906C 8D45EC lea eax, [ebp-$14] * Reference to: System.@LStrClr(void;void); | 007F906F E8B0C2C0FF call 00405324 007F9074 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F9077 E8F8B5C1FF call 00414674 007F907C C3 ret * Reference to: System.@HandleFinally; | 007F907D E972BAC0FF jmp 00404AF4 007F9082 EBE0 jmp 007F9064 ****** END | 007F9084 5F pop edi 007F9085 5E pop esi 007F9086 5B pop ebx 007F9087 8BE5 mov esp, ebp 007F9089 5D pop ebp 007F908A C3 ret *) end; procedure TfrmYSCRPB_ZHYH.cxTabControl1Change(Sender : TObject); begin (* 007F90BC 53 push ebx 007F90BD 8BD8 mov ebx, eax 007F90BF 8BC3 mov eax, ebx | 007F90C1 E816A4FFFF call 007F34DC 007F90C6 8BC3 mov eax, ebx | 007F90C8 E85BA5FFFF call 007F3628 007F90CD 5B pop ebx 007F90CE C3 ret *) end; procedure TfrmYSCRPB_ZHYH.FormCreate(Sender : TObject); begin (* 007F90D0 55 push ebp 007F90D1 8BEC mov ebp, esp 007F90D3 6A00 push $00 007F90D5 53 push ebx 007F90D6 8BD8 mov ebx, eax 007F90D8 33C0 xor eax, eax 007F90DA 55 push ebp * Possible String Reference to: '樯估腽[Y]脥@' | 007F90DB 6826917F00 push $007F9126 ***** TRY | 007F90E0 64FF30 push dword ptr fs:[eax] 007F90E3 648920 mov fs:[eax], esp 007F90E6 B205 mov dl, $05 * Reference to control TfrmYSCRPB_ZHYH.cxGrid2 : TcxGrid | 007F90E8 8B8330030000 mov eax, [ebx+$0330] * Reference to: Controls.TControl.SetAlign(TControl;TAlign); | 007F90EE E8E9E9C8FF call 00487ADC 007F90F3 8D55FC lea edx, [ebp-$04] *) end; procedure TfrmYSCRPB_ZHYH.TchkClick(Sender : TObject); begin (* 007F9134 55 push ebp 007F9135 8BEC mov ebp, esp 007F9137 B904000000 mov ecx, $00000004 007F913C 6A00 push $00 007F913E 6A00 push $00 007F9140 49 dec ecx 007F9141 75F9 jnz 007F913C 007F9143 51 push ecx 007F9144 53 push ebx 007F9145 56 push esi 007F9146 57 push edi 007F9147 8945FC mov [ebp-$04], eax 007F914A 33C0 xor eax, eax 007F914C 55 push ebp * Possible String Reference to: '榧防脬_^[嬪]' | 007F914D 6833937F00 push $007F9333 ***** TRY | 007F9152 64FF30 push dword ptr fs:[eax] 007F9155 648920 mov fs:[eax], esp 007F9158 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F915B 8B805C030000 mov eax, [eax+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F9161 E85AEDCCFF call 004C7EC0 007F9166 84C0 test al, al 007F9168 0F85A2010000 jnz 007F9310 007F916E A044937F00 mov al, byte ptr [$007F9344] 007F9173 50 push eax 007F9174 8D45EC lea eax, [ebp-$14] 007F9177 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F9179 E8E6FBC1FF call 00418D64 007F917E 8D4DEC lea ecx, [ebp-$14] 007F9181 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F9184 8B805C030000 mov eax, [eax+$035C] * Possible String Reference to: 'ssel' | 007F918A BA50937F00 mov edx, $007F9350 007F918F 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007F9191 FF9344020000 call dword ptr [ebx+$0244] 007F9197 84C0 test al, al 007F9199 751D jnz 007F91B8 007F919B 6A00 push $00 * Possible String Reference to: '提示' | 007F919D B958937F00 mov ecx, $007F9358 * Possible String Reference to: '没有选择数据!' | 007F91A2 BA60937F00 mov edx, $007F9360 *) end; procedure TfrmYSCRPB_ZHYH.TnochkClick(Sender : TObject); begin (* 007F93DC 55 push ebp 007F93DD 8BEC mov ebp, esp 007F93DF B904000000 mov ecx, $00000004 007F93E4 6A00 push $00 007F93E6 6A00 push $00 007F93E8 49 dec ecx 007F93E9 75F9 jnz 007F93E4 007F93EB 51 push ecx 007F93EC 53 push ebx 007F93ED 56 push esi 007F93EE 57 push edi 007F93EF 8945FC mov [ebp-$04], eax 007F93F2 33C0 xor eax, eax 007F93F4 55 push ebp 007F93F5 68DB957F00 push $007F95DB ***** TRY | 007F93FA 64FF30 push dword ptr fs:[eax] 007F93FD 648920 mov fs:[eax], esp 007F9400 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F9403 8B805C030000 mov eax, [eax+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F9409 E8B2EACCFF call 004C7EC0 007F940E 84C0 test al, al 007F9410 0F85A2010000 jnz 007F95B8 007F9416 A0EC957F00 mov al, byte ptr [$007F95EC] 007F941B 50 push eax 007F941C 8D45EC lea eax, [ebp-$14] 007F941F B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F9421 E83EF9C1FF call 00418D64 007F9426 8D4DEC lea ecx, [ebp-$14] 007F9429 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F942C 8B805C030000 mov eax, [eax+$035C] * Possible String Reference to: 'ssel' | 007F9432 BAF8957F00 mov edx, $007F95F8 007F9437 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007F9439 FF9344020000 call dword ptr [ebx+$0244] 007F943F 84C0 test al, al 007F9441 751D jnz 007F9460 007F9443 6A00 push $00 * Possible String Reference to: '提示' | 007F9445 B900967F00 mov ecx, $007F9600 * Possible String Reference to: '没有选择数据!' | 007F944A BA08967F00 mov edx, $007F9608 *) end; procedure TfrmYSCRPB_ZHYH.v2ComTaitouPropertiesButtonClick(Sender : TObject); begin (* 007F9684 55 push ebp 007F9685 8BEC mov ebp, esp 007F9687 51 push ecx 007F9688 B906000000 mov ecx, $00000006 007F968D 6A00 push $00 007F968F 6A00 push $00 007F9691 49 dec ecx 007F9692 75F9 jnz 007F968D 007F9694 51 push ecx 007F9695 874DFC xchg [ebp-$04], ecx 007F9698 53 push ebx 007F9699 56 push esi 007F969A 8BF0 mov esi, eax 007F969C 33C0 xor eax, eax 007F969E 55 push ebp 007F969F 68DB987F00 push $007F98DB ***** TRY | 007F96A4 64FF30 push dword ptr fs:[eax] 007F96A7 648920 mov fs:[eax], esp 007F96AA 33C0 xor eax, eax 007F96AC 55 push ebp 007F96AD 68B1987F00 push $007F98B1 ***** TRY | 007F96B2 64FF30 push dword ptr fs:[eax] 007F96B5 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.TZDSCClick(Sender : TObject); begin (* 007F99C0 55 push ebp 007F99C1 8BEC mov ebp, esp 007F99C3 B916000000 mov ecx, $00000016 007F99C8 6A00 push $00 007F99CA 6A00 push $00 007F99CC 49 dec ecx 007F99CD 75F9 jnz 007F99C8 007F99CF 53 push ebx 007F99D0 56 push esi 007F99D1 8945FC mov [ebp-$04], eax 007F99D4 33C0 xor eax, eax 007F99D6 55 push ebp 007F99D7 68B79D7F00 push $007F9DB7 ***** TRY | 007F99DC 64FF30 push dword ptr fs:[eax] 007F99DF 648920 mov fs:[eax], esp 007F99E2 8B4DFC mov ecx, [ebp-$04] 007F99E5 B201 mov dl, $01 * Reference to class TfrmFKCR | 007F99E7 A1C4C67F00 mov eax, dword ptr [$007FC6C4] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 007F99EC E8DF83CAFF call 004A1DD0 *) end; procedure TfrmYSCRPB_ZHYH.VBZPropertiesButtonClick(Sender : TObject); begin (* 007F9E94 55 push ebp 007F9E95 8BEC mov ebp, esp 007F9E97 51 push ecx 007F9E98 B906000000 mov ecx, $00000006 007F9E9D 6A00 push $00 007F9E9F 6A00 push $00 007F9EA1 49 dec ecx 007F9EA2 75F9 jnz 007F9E9D 007F9EA4 51 push ecx 007F9EA5 874DFC xchg [ebp-$04], ecx 007F9EA8 53 push ebx 007F9EA9 56 push esi 007F9EAA 8BF0 mov esi, eax 007F9EAC 33C0 xor eax, eax 007F9EAE 55 push ebp 007F9EAF 68EDA07F00 push $007FA0ED ***** TRY | 007F9EB4 64FF30 push dword ptr fs:[eax] 007F9EB7 648920 mov fs:[eax], esp 007F9EBA 33C0 xor eax, eax 007F9EBC 55 push ebp 007F9EBD 68C3A07F00 push $007FA0C3 ***** TRY | 007F9EC2 64FF30 push dword ptr fs:[eax] 007F9EC5 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2Column4PropertiesButtonClick(Sender : TObject); begin (* 007FA1D8 55 push ebp 007FA1D9 8BEC mov ebp, esp 007FA1DB 51 push ecx 007FA1DC B906000000 mov ecx, $00000006 007FA1E1 6A00 push $00 007FA1E3 6A00 push $00 007FA1E5 49 dec ecx 007FA1E6 75F9 jnz 007FA1E1 007FA1E8 51 push ecx 007FA1E9 874DFC xchg [ebp-$04], ecx 007FA1EC 53 push ebx 007FA1ED 56 push esi 007FA1EE 8BF0 mov esi, eax 007FA1F0 33C0 xor eax, eax 007FA1F2 55 push ebp * Possible String Reference to: '榫脬^[嬪]' | 007FA1F3 6831A47F00 push $007FA431 ***** TRY | 007FA1F8 64FF30 push dword ptr fs:[eax] 007FA1FB 648920 mov fs:[eax], esp 007FA1FE 33C0 xor eax, eax 007FA200 55 push ebp 007FA201 6807A47F00 push $007FA407 ***** TRY | 007FA206 64FF30 push dword ptr fs:[eax] 007FA209 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2Column5PropertiesChange(Sender : TObject); begin (* 007FA52C 53 push ebx 007FA52D 56 push esi 007FA52E 8BD8 mov ebx, eax * Possible String Reference to: 'Money' | 007FA530 BA6CA57F00 mov edx, $007FA56C * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FA535 8BB35C030000 mov esi, [ebx+$035C] 007FA53B 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FA53D E872C6CCFF call 004C6BB4 007FA542 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_4C | 007FA544 FF524C call dword ptr [edx+$4C] 007FA547 D83574A57F00 fdiv dword ptr [$007FA574] 007FA54D 83C4F8 add esp, -$08 007FA550 DD1C24 fstp qword ptr [esp] 007FA553 9B wait * Reference to control TfrmYSCRPB_ZHYH.Label13 : TLabel | 007FA554 8B939C030000 mov edx, [ebx+$039C] 007FA55A 8BC6 mov eax, esi * Reference to : TfrmSelExportField._PROC_007B6D90() | 007FA55C E82FC8FBFF call 007B6D90 007FA561 5E pop esi 007FA562 5B pop ebx 007FA563 C3 ret *) end; procedure TfrmYSCRPB_ZHYH.v2ConNoHZPropertiesButtonClick(Sender : TObject); begin (* 007FA578 55 push ebp 007FA579 8BEC mov ebp, esp 007FA57B 51 push ecx 007FA57C B90B000000 mov ecx, $0000000B 007FA581 6A00 push $00 007FA583 6A00 push $00 007FA585 49 dec ecx 007FA586 75F9 jnz 007FA581 007FA588 874DFC xchg [ebp-$04], ecx 007FA58B 53 push ebx 007FA58C 56 push esi 007FA58D 8BF0 mov esi, eax 007FA58F 33C0 xor eax, eax 007FA591 55 push ebp * Possible String Reference to: '棰⒗胛^[嬪]' | 007FA592 684DA87F00 push $007FA84D ***** TRY | 007FA597 64FF30 push dword ptr fs:[eax] 007FA59A 648920 mov fs:[eax], esp 007FA59D 8BCE mov ecx, esi 007FA59F B201 mov dl, $01 * Reference to class TfrmJYorderConCX | 007FA5A1 A164DF7D00 mov eax, dword ptr [$007DDF64] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 007FA5A6 E82578CAFF call 004A1DD0 *) end; procedure TfrmYSCRPB_ZHYH.v2GYSNamePropertiesButtonClick(Sender : TObject); begin (* 007FA958 55 push ebp 007FA959 8BEC mov ebp, esp 007FA95B 51 push ecx 007FA95C B905000000 mov ecx, $00000005 007FA961 6A00 push $00 007FA963 6A00 push $00 007FA965 49 dec ecx 007FA966 75F9 jnz 007FA961 007FA968 51 push ecx 007FA969 874DFC xchg [ebp-$04], ecx 007FA96C 53 push ebx 007FA96D 56 push esi 007FA96E 8BF0 mov esi, eax 007FA970 33C0 xor eax, eax 007FA972 55 push ebp * Possible String Reference to: '榉熇脬^[嬪]' | 007FA973 6838AB7F00 push $007FAB38 ***** TRY | 007FA978 64FF30 push dword ptr fs:[eax] 007FA97B 648920 mov fs:[eax], esp 007FA97E 33C0 xor eax, eax 007FA980 55 push ebp 007FA981 680EAB7F00 push $007FAB0E ***** TRY | 007FA986 64FF30 push dword ptr fs:[eax] 007FA989 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2Column6PropertiesButtonClick(Sender : TObject); begin (* 007FABD0 55 push ebp 007FABD1 8BEC mov ebp, esp 007FABD3 51 push ecx 007FABD4 B90C000000 mov ecx, $0000000C 007FABD9 6A00 push $00 007FABDB 6A00 push $00 007FABDD 49 dec ecx 007FABDE 75F9 jnz 007FABD9 007FABE0 51 push ecx 007FABE1 874DFC xchg [ebp-$04], ecx 007FABE4 53 push ebx 007FABE5 56 push esi 007FABE6 8BF0 mov esi, eax 007FABE8 33C0 xor eax, eax 007FABEA 55 push ebp * Possible String Reference to: '閍浝肓^[嬪]' | 007FABEB 688EAF7F00 push $007FAF8E ***** TRY | 007FABF0 64FF30 push dword ptr fs:[eax] 007FABF3 648920 mov fs:[eax], esp * Possible String Reference to: 'CRFlag' | 007FABF6 BAA4AF7F00 mov edx, $007FAFA4 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FABFB 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FAC01 E8AEBFCCFF call 004C6BB4 007FAC06 8D55FC lea edx, [ebp-$04] 007FAC09 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007FAC0B FF5160 call dword ptr [ecx+$60] 007FAC0E 837DFC00 cmp dword ptr [ebp-$04], +$00 007FAC12 751D jnz 007FAC31 007FAC14 6A00 push $00 * Possible String Reference to: '提示' | 007FAC16 B9ACAF7F00 mov ecx, $007FAFAC * Possible String Reference to: '请先选择方向' | 007FAC1B BAB4AF7F00 mov edx, $007FAFB4 *) end; procedure TfrmYSCRPB_ZHYH.v2BankNamePropertiesButtonClick(Sender : TObject); begin (* 007FB060 55 push ebp 007FB061 8BEC mov ebp, esp 007FB063 51 push ecx 007FB064 B906000000 mov ecx, $00000006 007FB069 6A00 push $00 007FB06B 6A00 push $00 007FB06D 49 dec ecx 007FB06E 75F9 jnz 007FB069 007FB070 51 push ecx 007FB071 874DFC xchg [ebp-$04], ecx 007FB074 53 push ebx 007FB075 56 push esi 007FB076 8BF0 mov esi, eax 007FB078 33C0 xor eax, eax 007FB07A 55 push ebp * Possible String Reference to: '6樌脬^[嬪]' | 007FB07B 68B9B27F00 push $007FB2B9 ***** TRY | 007FB080 64FF30 push dword ptr fs:[eax] 007FB083 648920 mov fs:[eax], esp 007FB086 33C0 xor eax, eax 007FB088 55 push ebp 007FB089 688FB27F00 push $007FB28F ***** TRY | 007FB08E 64FF30 push dword ptr fs:[eax] 007FB091 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.TSselClick(Sender : TObject); begin (* 007FB3C0 55 push ebp 007FB3C1 8BEC mov ebp, esp 007FB3C3 33C9 xor ecx, ecx 007FB3C5 51 push ecx 007FB3C6 51 push ecx 007FB3C7 51 push ecx 007FB3C8 51 push ecx 007FB3C9 51 push ecx 007FB3CA 51 push ecx 007FB3CB 53 push ebx 007FB3CC 56 push esi 007FB3CD 8BF0 mov esi, eax 007FB3CF 33C0 xor eax, eax 007FB3D1 55 push ebp * Possible String Reference to: '榫暲脬^[嬪]' | 007FB3D2 6831B57F00 push $007FB531 ***** TRY | 007FB3D7 64FF30 push dword ptr fs:[eax] 007FB3DA 648920 mov fs:[eax], esp * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FB3DD 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007FB3E3 E8D8CACCFF call 004C7EC0 007FB3E8 84C0 test al, al 007FB3EA 0F851E010000 jnz 007FB50E 007FB3F0 A040B57F00 mov al, byte ptr [$007FB540] 007FB3F5 50 push eax 007FB3F6 8D45F0 lea eax, [ebp-$10] 007FB3F9 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007FB3FB E864D9C1FF call 00418D64 007FB400 8D4DF0 lea ecx, [ebp-$10] * Possible String Reference to: 'Ssel' | 007FB403 BA4CB57F00 mov edx, $007FB54C * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FB408 8B865C030000 mov eax, [esi+$035C] 007FB40E 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007FB410 FF9344020000 call dword ptr [ebx+$0244] 007FB416 84C0 test al, al 007FB418 751D jnz 007FB437 007FB41A 6A00 push $00 * Possible String Reference to: '提示' | 007FB41C B954B57F00 mov ecx, $007FB554 * Possible String Reference to: '没有选择数据' | 007FB421 BA5CB57F00 mov edx, $007FB55C *) end; procedure TfrmYSCRPB_ZHYH.VSRMoneyPropertiesEditValueChanged(Sender : TObject); begin (* 007FB5DC 55 push ebp 007FB5DD 8BEC mov ebp, esp 007FB5DF B907000000 mov ecx, $00000007 007FB5E4 6A00 push $00 007FB5E6 6A00 push $00 007FB5E8 49 dec ecx 007FB5E9 75F9 jnz 007FB5E4 007FB5EB 51 push ecx 007FB5EC 53 push ebx 007FB5ED 56 push esi 007FB5EE 8BDA mov ebx, edx 007FB5F0 8BF0 mov esi, eax 007FB5F2 33C0 xor eax, eax 007FB5F4 55 push ebp 007FB5F5 68D5B77F00 push $007FB7D5 ***** TRY | 007FB5FA 64FF30 push dword ptr fs:[eax] 007FB5FD 648920 mov fs:[eax], esp * Possible String Reference to: 'CRFlag' | 007FB600 BAECB77F00 mov edx, $007FB7EC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FB605 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FB60B E8A4B5CCFF call 004C6BB4 007FB610 8D55F8 lea edx, [ebp-$08] 007FB613 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007FB615 FF5160 call dword ptr [ecx+$60] 007FB618 837DF800 cmp dword ptr [ebp-$08], +$00 007FB61C 751D jnz 007FB63B 007FB61E 6A00 push $00 * Possible String Reference to: '提示' | 007FB620 B9F4B77F00 mov ecx, $007FB7F4 * Possible String Reference to: '请先选择方向' | 007FB625 BAFCB77F00 mov edx, $007FB7FC *) end; procedure TfrmYSCRPB_ZHYH.v2ZCMoneyPropertiesEditValueChanged(Sender : TObject); begin (* 007FB8D0 55 push ebp 007FB8D1 8BEC mov ebp, esp 007FB8D3 B907000000 mov ecx, $00000007 007FB8D8 6A00 push $00 007FB8DA 6A00 push $00 007FB8DC 49 dec ecx 007FB8DD 75F9 jnz 007FB8D8 007FB8DF 51 push ecx 007FB8E0 53 push ebx 007FB8E1 56 push esi 007FB8E2 8BDA mov ebx, edx 007FB8E4 8BF0 mov esi, eax 007FB8E6 33C0 xor eax, eax 007FB8E8 55 push ebp 007FB8E9 68E6BA7F00 push $007FBAE6 ***** TRY | 007FB8EE 64FF30 push dword ptr fs:[eax] 007FB8F1 648920 mov fs:[eax], esp * Possible String Reference to: 'CRFlag' | 007FB8F4 BAFCBA7F00 mov edx, $007FBAFC * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FB8F9 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FB8FF E8B0B2CCFF call 004C6BB4 007FB904 8D55F8 lea edx, [ebp-$08] 007FB907 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007FB909 FF5160 call dword ptr [ecx+$60] 007FB90C 837DF800 cmp dword ptr [ebp-$08], +$00 007FB910 751D jnz 007FB92F 007FB912 6A00 push $00 * Possible String Reference to: '提示' | 007FB914 B904BB7F00 mov ecx, $007FBB04 * Possible String Reference to: '请先选择方向' | 007FB919 BA0CBB7F00 mov edx, $007FBB0C *) end; procedure TfrmYSCRPB_ZHYH.v2FKTaiTouPropertiesButtonClick(Sender : TObject); begin (* 007FBBEC 55 push ebp 007FBBED 8BEC mov ebp, esp 007FBBEF 51 push ecx 007FBBF0 B905000000 mov ecx, $00000005 007FBBF5 6A00 push $00 007FBBF7 6A00 push $00 007FBBF9 49 dec ecx 007FBBFA 75F9 jnz 007FBBF5 007FBBFC 51 push ecx 007FBBFD 874DFC xchg [ebp-$04], ecx 007FBC00 53 push ebx 007FBC01 56 push esi 007FBC02 8BF0 mov esi, eax 007FBC04 33C0 xor eax, eax 007FBC06 55 push ebp * Possible String Reference to: '轺尷脬^[嬪]' | 007FBC07 68F8BD7F00 push $007FBDF8 ***** TRY | 007FBC0C 64FF30 push dword ptr fs:[eax] 007FBC0F 648920 mov fs:[eax], esp 007FBC12 33C0 xor eax, eax 007FBC14 55 push ebp 007FBC15 68CEBD7F00 push $007FBDCE ***** TRY | 007FBC1A 64FF30 push dword ptr fs:[eax] 007FBC1D 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.Tv2MouseDown(Sender : TObject); begin (* 007FBEA8 55 push ebp 007FBEA9 8BEC mov ebp, esp 007FBEAB 6A00 push $00 007FBEAD 6A00 push $00 007FBEAF 6A00 push $00 007FBEB1 6A00 push $00 007FBEB3 53 push ebx 007FBEB4 8BD8 mov ebx, eax 007FBEB6 33C0 xor eax, eax 007FBEB8 55 push ebp 007FBEB9 68AEBF7F00 push $007FBFAE ***** TRY | 007FBEBE 64FF30 push dword ptr fs:[eax] 007FBEC1 648920 mov fs:[eax], esp * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FBEC4 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007FBECA E8F1BFCCFF call 004C7EC0 007FBECF 84C0 test al, al 007FBED1 0F85BC000000 jnz 007FBF93 * Reference to control TfrmYSCRPB_ZHYH.ToolButton3 : TToolButton | 007FBED7 8B8360030000 mov eax, [ebx+$0360] * Reference to field TToolButton.Visible : Boolean | 007FBEDD 80785701 cmp byte ptr [eax+$57], $01 007FBEE1 0F85AC000000 jnz 007FBF93 * Reference to control TfrmYSCRPB_ZHYH.VSRMoney : TcxGridDBColumn | 007FBEE7 8B8364030000 mov eax, [ebx+$0364] | 007FBEED E8DEE2E5FF call 0065A1D0 007FBEF2 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBEF4 E867D0E2FF call 00628F60 * Reference to control TfrmYSCRPB_ZHYH.v2ZCMoney : TcxGridDBColumn | 007FBEF9 8B83C4030000 mov eax, [ebx+$03C4] | 007FBEFF E8CCE2E5FF call 0065A1D0 007FBF04 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF06 E855D0E2FF call 00628F60 * Possible String Reference to: 'CRFlag' | 007FBF0B BAC4BF7F00 mov edx, $007FBFC4 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FBF10 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FBF16 E899ACCCFF call 004C6BB4 007FBF1B 8D55F8 lea edx, [ebp-$08] 007FBF1E 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007FBF20 FF5160 call dword ptr [ecx+$60] 007FBF23 8B45F8 mov eax, [ebp-$08] 007FBF26 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007FBF29 E8BEE9C0FF call 0040A8EC 007FBF2E 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '收' | 007FBF31 BAD4BF7F00 mov edx, $007FBFD4 * Reference to: System.@LStrCmp; | 007FBF36 E80598C0FF call 00405740 007FBF3B 7512 jnz 007FBF4F * Reference to control TfrmYSCRPB_ZHYH.VSRMoney : TcxGridDBColumn | 007FBF3D 8B8364030000 mov eax, [ebx+$0364] | 007FBF43 E888E2E5FF call 0065A1D0 007FBF48 B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF4A E811D0E2FF call 00628F60 * Possible String Reference to: 'CRFlag' | 007FBF4F BAC4BF7F00 mov edx, $007FBFC4 * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007FBF54 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FBF5A E855ACCCFF call 004C6BB4 007FBF5F 8D55F0 lea edx, [ebp-$10] 007FBF62 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007FBF64 FF5160 call dword ptr [ecx+$60] 007FBF67 8B45F0 mov eax, [ebp-$10] 007FBF6A 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007FBF6D E87AE9C0FF call 0040A8EC 007FBF72 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '付' | 007FBF75 BAE0BF7F00 mov edx, $007FBFE0 * Reference to: System.@LStrCmp; | 007FBF7A E8C197C0FF call 00405740 007FBF7F 7512 jnz 007FBF93 * Reference to control TfrmYSCRPB_ZHYH.v2ZCMoney : TcxGridDBColumn | 007FBF81 8B83C4030000 mov eax, [ebx+$03C4] | 007FBF87 E844E2E5FF call 0065A1D0 007FBF8C B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF8E E8CDCFE2FF call 00628F60 007FBF93 33C0 xor eax, eax 007FBF95 5A pop edx 007FBF96 59 pop ecx 007FBF97 59 pop ecx 007FBF98 648910 mov fs:[eax], edx ****** FINALLY | 007FBF9B 68B5BF7F00 push $007FBFB5 007FBFA0 8D45F0 lea eax, [ebp-$10] 007FBFA3 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007FBFA8 E89B93C0FF call 00405348 007FBFAD C3 ret * Reference to: System.@HandleFinally; | 007FBFAE E9418BC0FF jmp 00404AF4 007FBFB3 EBEB jmp 007FBFA0 ****** END | 007FBFB5 5B pop ebx 007FBFB6 8BE5 mov esp, ebp 007FBFB8 5D pop ebp 007FBFB9 C20C00 ret $000C *) end; procedure TfrmYSCRPB_ZHYH.v2BZTypePropertiesButtonClick(Sender : TObject); begin (* 007FBFE4 55 push ebp 007FBFE5 8BEC mov ebp, esp 007FBFE7 51 push ecx 007FBFE8 B905000000 mov ecx, $00000005 007FBFED 6A00 push $00 007FBFEF 6A00 push $00 007FBFF1 49 dec ecx 007FBFF2 75F9 jnz 007FBFED 007FBFF4 51 push ecx 007FBFF5 874DFC xchg [ebp-$04], ecx 007FBFF8 53 push ebx 007FBFF9 56 push esi 007FBFFA 8BF0 mov esi, eax 007FBFFC 33C0 xor eax, eax 007FBFFE 55 push ebp * Possible String Reference to: '埨脬^[嬪]' | 007FBFFF 68F0C17F00 push $007FC1F0 ***** TRY | 007FC004 64FF30 push dword ptr fs:[eax] 007FC007 648920 mov fs:[eax], esp 007FC00A 33C0 xor eax, eax 007FC00C 55 push ebp 007FC00D 68C6C17F00 push $007FC1C6 ***** TRY | 007FC012 64FF30 push dword ptr fs:[eax] 007FC015 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH.v2BankNoPropertiesButtonClick(Sender : TObject); begin (* 007FC298 55 push ebp 007FC299 8BEC mov ebp, esp 007FC29B 51 push ecx 007FC29C B90A000000 mov ecx, $0000000A 007FC2A1 6A00 push $00 007FC2A3 6A00 push $00 007FC2A5 49 dec ecx 007FC2A6 75F9 jnz 007FC2A1 007FC2A8 874DFC xchg [ebp-$04], ecx 007FC2AB 53 push ebx 007FC2AC 56 push esi 007FC2AD 8BF0 mov esi, eax 007FC2AF 33C0 xor eax, eax 007FC2B1 55 push ebp 007FC2B2 6897C57F00 push $007FC597 ***** TRY | 007FC2B7 64FF30 push dword ptr fs:[eax] 007FC2BA 648920 mov fs:[eax], esp 007FC2BD 33C0 xor eax, eax 007FC2BF 55 push ebp 007FC2C0 6858C57F00 push $007FC558 ***** TRY | 007FC2C5 64FF30 push dword ptr fs:[eax] 007FC2C8 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F3629(Sender : TObject); begin (* 007F3629 8BEC mov ebp, esp 007F362B B954000000 mov ecx, $00000054 007F3630 6A00 push $00 007F3632 6A00 push $00 007F3634 49 dec ecx 007F3635 75F9 jnz 007F3630 007F3637 51 push ecx 007F3638 53 push ebx 007F3639 56 push esi 007F363A 8945FC mov [ebp-$04], eax 007F363D 33C0 xor eax, eax 007F363F 55 push ebp * Possible String Reference to: '榍' | 007F3640 68284A7F00 push $007F4A28 ***** TRY | 007F3645 64FF30 push dword ptr fs:[eax] 007F3648 648920 mov fs:[eax], esp 007F364B 33C0 xor eax, eax 007F364D 55 push ebp 007F364E 68CE467F00 push $007F46CE ***** TRY | 007F3653 64FF30 push dword ptr fs:[eax] 007F3656 648920 mov fs:[eax], esp 007F3659 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F365C 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007F3662 E8ED3ECDFF call 004C7554 007F3667 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F366A 8B9820030000 mov ebx, [eax+$0320] 007F3670 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F3672 E85D22CDFF call 004C58D4 007F3677 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3679 E82EA9CEFF call 004DDFAC 007F367E 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F3680 FF5244 call dword ptr [edx+$44] 007F3683 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3685 E822A9CEFF call 004DDFAC * Possible String Reference to: 'select Sum(Money*QtyFlag) YEMoney ' | 007F368A BA404A7F00 mov edx, $007F4A40 007F368F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3691 FF5138 call dword ptr [ecx+$38] 007F3694 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3696 E811A9CEFF call 004DDFAC * Possible String Reference to: 'from YF_Money_CR A ' | 007F369B BA6C4A7F00 mov edx, $007F4A6C 007F36A0 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F36A2 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where CRTime<'' | 007F36A5 68884A7F00 push $007F4A88 007F36AA 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.begdate : TDateTimePicker | 007F36AD 8B804C030000 mov eax, [eax+$034C] 007F36B3 FFB014020000 push dword ptr [eax+$0214] 007F36B9 FFB010020000 push dword ptr [eax+$0210] 007F36BF 8D55E8 lea edx, [ebp-$18] * Possible String Reference to: 'yyyy-MM-dd' | 007F36C2 B8A04A7F00 mov eax, $007F4AA0 | 007F36C7 E8F0B4C1FF call 0040EBBC 007F36CC FF75E8 push dword ptr [ebp-$18] 007F36CF 68B44A7F00 push $007F4AB4 007F36D4 8D45EC lea eax, [ebp-$14] 007F36D7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F36DC E8D31FC1FF call 004056B4 007F36E1 8B45EC mov eax, [ebp-$14] 007F36E4 50 push eax 007F36E5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F36E7 E8C0A8CEFF call 004DDFAC 007F36EC 5A pop edx 007F36ED 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F36EF FF5138 call dword ptr [ecx+$38] 007F36F2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F36F4 E8B3A8CEFF call 004DDFAC * Possible String Reference to: ' and CRType='其他款项' ' | 007F36F9 BAC04A7F00 mov edx, $007F4AC0 007F36FE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3700 FF5138 call dword ptr [ecx+$38] 007F3703 8D55E4 lea edx, [ebp-$1C] 007F3706 8B45FC mov eax, [ebp-$04] * Reference to field TfrmYSCRPB_ZHYH.OFFS_0420 | 007F3709 8B8020040000 mov eax, [eax+$0420] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F370F E8D871C1FF call 0040A8EC 007F3714 837DE400 cmp dword ptr [ebp-$1C], +$00 007F3718 743E jz 007F3758 * Possible String Reference to: ' and (CRFlag='' | 007F371A 68E04A7F00 push $007F4AE0 007F371F 8D55DC lea edx, [ebp-$24] 007F3722 8B45FC mov eax, [ebp-$04] * Reference to field TfrmYSCRPB_ZHYH.OFFS_0420 | 007F3725 8B8020040000 mov eax, [eax+$0420] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F372B E8BC71C1FF call 0040A8EC 007F3730 FF75DC push dword ptr [ebp-$24] * Possible String Reference to: '' or YFName='退款')' | 007F3733 68F84A7F00 push $007F4AF8 007F3738 8D45E0 lea eax, [ebp-$20] 007F373B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F3740 E86F1FC1FF call 004056B4 007F3745 8B45E0 mov eax, [ebp-$20] 007F3748 50 push eax 007F3749 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F374B E85CA8CEFF call 004DDFAC 007F3750 5A pop edx 007F3751 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3753 FF5138 call dword ptr [ecx+$38] 007F3756 EB5E jmp 007F37B6 007F3758 8D55D8 lea edx, [ebp-$28] 007F375B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CRFlag : TComboBox | 007F375E 8B80D0030000 mov eax, [eax+$03D0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3764 E8874EC9FF call 004885F0 007F3769 837DD800 cmp dword ptr [ebp-$28], +$00 007F376D 7447 jz 007F37B6 * Possible String Reference to: ' and CRFlag='' | 007F376F 68144B7F00 push $007F4B14 007F3774 8D55CC lea edx, [ebp-$34] 007F3777 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CRFlag : TComboBox | 007F377A 8B80D0030000 mov eax, [eax+$03D0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3780 E86B4EC9FF call 004885F0 007F3785 8B45CC mov eax, [ebp-$34] 007F3788 8D55D0 lea edx, [ebp-$30] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F378B E85C71C1FF call 0040A8EC 007F3790 FF75D0 push dword ptr [ebp-$30] * Possible String Reference to: '' ' | 007F3793 682C4B7F00 push $007F4B2C 007F3798 8D45D4 lea eax, [ebp-$2C] 007F379B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F37A0 E80F1FC1FF call 004056B4 007F37A5 8B45D4 mov eax, [ebp-$2C] 007F37A8 50 push eax 007F37A9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F37AB E8FCA7CEFF call 004DDFAC 007F37B0 5A pop edx 007F37B1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F37B3 FF5138 call dword ptr [ecx+$38] 007F37B6 8D55C8 lea edx, [ebp-$38] 007F37B9 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankName : TComboBox | 007F37BC 8B80F0030000 mov eax, [eax+$03F0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F37C2 E8294EC9FF call 004885F0 007F37C7 837DC800 cmp dword ptr [ebp-$38], +$00 007F37CB 744C jz 007F3819 * Possible String Reference to: ' and BankName like '%' | 007F37CD 68384B7F00 push $007F4B38 007F37D2 8D55BC lea edx, [ebp-$44] 007F37D5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankName : TComboBox | 007F37D8 8B80F0030000 mov eax, [eax+$03F0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F37DE E80D4EC9FF call 004885F0 007F37E3 8B45BC mov eax, [ebp-$44] 007F37E6 8D55C0 lea edx, [ebp-$40] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F37E9 E8FE70C1FF call 0040A8EC 007F37EE FF75C0 push dword ptr [ebp-$40] 007F37F1 68584B7F00 push $007F4B58 007F37F6 68B44A7F00 push $007F4AB4 007F37FB 8D45C4 lea eax, [ebp-$3C] 007F37FE BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3803 E8AC1EC1FF call 004056B4 007F3808 8B45C4 mov eax, [ebp-$3C] 007F380B 50 push eax 007F380C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F380E E899A7CEFF call 004DDFAC 007F3813 5A pop edx 007F3814 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3816 FF5138 call dword ptr [ecx+$38] 007F3819 8D55B8 lea edx, [ebp-$48] 007F381C 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.IFSC : TComboBox | 007F381F 8B80CC030000 mov eax, [eax+$03CC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3825 E8C64DC9FF call 004885F0 007F382A 837DB800 cmp dword ptr [ebp-$48], +$00 007F382E 744C jz 007F387C * Possible String Reference to: ' and (case when isnull((select Top | 1 Y.YFID from YF_Money_CR Y where Y | .SZYFID=A.YFID and Y.CRtype in ('付 | 款登记','收款登记','付款杂费')),'') | ='' then '' else '是' end) like '%' | 007F3830 68644B7F00 push $007F4B64 007F3835 8D55AC lea edx, [ebp-$54] 007F3838 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.IFSC : TComboBox | 007F383B 8B80CC030000 mov eax, [eax+$03CC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3841 E8AA4DC9FF call 004885F0 007F3846 8B45AC mov eax, [ebp-$54] 007F3849 8D55B0 lea edx, [ebp-$50] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F384C E89B70C1FF call 0040A8EC 007F3851 FF75B0 push dword ptr [ebp-$50] 007F3854 68584B7F00 push $007F4B58 007F3859 68B44A7F00 push $007F4AB4 007F385E 8D45B4 lea eax, [ebp-$4C] 007F3861 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3866 E8491EC1FF call 004056B4 007F386B 8B45B4 mov eax, [ebp-$4C] 007F386E 50 push eax 007F386F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3871 E836A7CEFF call 004DDFAC 007F3876 5A pop edx 007F3877 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3879 FF5138 call dword ptr [ecx+$38] 007F387C 8D55A8 lea edx, [ebp-$58] 007F387F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.YFName : TEdit | 007F3882 8B801C030000 mov eax, [eax+$031C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3888 E8634DC9FF call 004885F0 007F388D 837DA800 cmp dword ptr [ebp-$58], +$00 007F3891 744C jz 007F38DF * Possible String Reference to: ' and YFName like '%' | 007F3893 681C4C7F00 push $007F4C1C 007F3898 8D559C lea edx, [ebp-$64] 007F389B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.YFName : TEdit | 007F389E 8B801C030000 mov eax, [eax+$031C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F38A4 E8474DC9FF call 004885F0 007F38A9 8B459C mov eax, [ebp-$64] 007F38AC 8D55A0 lea edx, [ebp-$60] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F38AF E83870C1FF call 0040A8EC 007F38B4 FF75A0 push dword ptr [ebp-$60] 007F38B7 68584B7F00 push $007F4B58 007F38BC 68B44A7F00 push $007F4AB4 007F38C1 8D45A4 lea eax, [ebp-$5C] 007F38C4 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F38C9 E8E61DC1FF call 004056B4 007F38CE 8B45A4 mov eax, [ebp-$5C] 007F38D1 50 push eax 007F38D2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F38D4 E8D3A6CEFF call 004DDFAC 007F38D9 5A pop edx 007F38DA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F38DC FF5138 call dword ptr [ecx+$38] 007F38DF 8D5598 lea edx, [ebp-$68] 007F38E2 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Note : TEdit | 007F38E5 8B80A4030000 mov eax, [eax+$03A4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F38EB E8004DC9FF call 004885F0 007F38F0 837D9800 cmp dword ptr [ebp-$68], +$00 007F38F4 744C jz 007F3942 * Possible String Reference to: ' and Note like '%' | 007F38F6 68384C7F00 push $007F4C38 007F38FB 8D558C lea edx, [ebp-$74] 007F38FE 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Note : TEdit | 007F3901 8B80A4030000 mov eax, [eax+$03A4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3907 E8E44CC9FF call 004885F0 007F390C 8B458C mov eax, [ebp-$74] 007F390F 8D5590 lea edx, [ebp-$70] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3912 E8D56FC1FF call 0040A8EC 007F3917 FF7590 push dword ptr [ebp-$70] 007F391A 68584B7F00 push $007F4B58 007F391F 68B44A7F00 push $007F4AB4 007F3924 8D4594 lea eax, [ebp-$6C] 007F3927 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F392C E8831DC1FF call 004056B4 007F3931 8B4594 mov eax, [ebp-$6C] 007F3934 50 push eax 007F3935 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3937 E870A6CEFF call 004DDFAC 007F393C 5A pop edx 007F393D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F393F FF5138 call dword ptr [ecx+$38] 007F3942 8D5588 lea edx, [ebp-$78] 007F3945 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FactoryName : TEdit | 007F3948 8B80B4030000 mov eax, [eax+$03B4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F394E E89D4CC9FF call 004885F0 007F3953 837D8800 cmp dword ptr [ebp-$78], +$00 007F3957 7452 jz 007F39AB * Possible String Reference to: ' and FactoryName like '%' | 007F3959 68544C7F00 push $007F4C54 007F395E 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 007F3964 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FactoryName : TEdit | 007F3967 8B80B4030000 mov eax, [eax+$03B4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F396D E87E4CC9FF call 004885F0 007F3972 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C] 007F3978 8D5580 lea edx, [ebp-$80] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F397B E86C6FC1FF call 0040A8EC 007F3980 FF7580 push dword ptr [ebp-$80] 007F3983 68584B7F00 push $007F4B58 007F3988 68B44A7F00 push $007F4AB4 007F398D 8D4584 lea eax, [ebp-$7C] 007F3990 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3995 E81A1DC1FF call 004056B4 007F399A 8B4584 mov eax, [ebp-$7C] 007F399D 50 push eax 007F399E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F39A0 E807A6CEFF call 004DDFAC 007F39A5 5A pop edx 007F39A6 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F39A8 FF5138 call dword ptr [ecx+$38] 007F39AB 8D9578FFFFFF lea edx, [ebp+$FFFFFF78] 007F39B1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FKTaiTou : TEdit | 007F39B4 8B80EC030000 mov eax, [eax+$03EC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F39BA E8314CC9FF call 004885F0 007F39BF 83BD78FFFFFF00 cmp dword ptr [ebp+$FFFFFF78], +$00 007F39C6 745E jz 007F3A26 * Possible String Reference to: ' and FKTaiTou like '%' | 007F39C8 68784C7F00 push $007F4C78 007F39CD 8D956CFFFFFF lea edx, [ebp+$FFFFFF6C] 007F39D3 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FKTaiTou : TEdit | 007F39D6 8B80EC030000 mov eax, [eax+$03EC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F39DC E80F4CC9FF call 004885F0 007F39E1 8B856CFFFFFF mov eax, [ebp+$FFFFFF6C] 007F39E7 8D9570FFFFFF lea edx, [ebp+$FFFFFF70] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F39ED E8FA6EC1FF call 0040A8EC 007F39F2 FFB570FFFFFF push dword ptr [ebp+$FFFFFF70] 007F39F8 68584B7F00 push $007F4B58 007F39FD 68B44A7F00 push $007F4AB4 007F3A02 8D8574FFFFFF lea eax, [ebp+$FFFFFF74] 007F3A08 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3A0D E8A21CC1FF call 004056B4 007F3A12 8B8574FFFFFF mov eax, [ebp+$FFFFFF74] 007F3A18 50 push eax 007F3A19 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3A1B E88CA5CEFF call 004DDFAC 007F3A20 5A pop edx 007F3A21 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3A23 FF5138 call dword ptr [ecx+$38] 007F3A26 8D9568FFFFFF lea edx, [ebp+$FFFFFF68] 007F3A2C 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankNo : TEdit | 007F3A2F 8B8000040000 mov eax, [eax+$0400] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3A35 E8B64BC9FF call 004885F0 007F3A3A 83BD68FFFFFF00 cmp dword ptr [ebp+$FFFFFF68], +$00 007F3A41 745E jz 007F3AA1 * Possible String Reference to: ' and BankNo like '%' | 007F3A43 68984C7F00 push $007F4C98 007F3A48 8D955CFFFFFF lea edx, [ebp+$FFFFFF5C] 007F3A4E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankNo : TEdit | 007F3A51 8B8000040000 mov eax, [eax+$0400] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3A57 E8944BC9FF call 004885F0 007F3A5C 8B855CFFFFFF mov eax, [ebp+$FFFFFF5C] 007F3A62 8D9560FFFFFF lea edx, [ebp+$FFFFFF60] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3A68 E87F6EC1FF call 0040A8EC 007F3A6D FFB560FFFFFF push dword ptr [ebp+$FFFFFF60] 007F3A73 68584B7F00 push $007F4B58 007F3A78 68B44A7F00 push $007F4AB4 007F3A7D 8D8564FFFFFF lea eax, [ebp+$FFFFFF64] 007F3A83 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3A88 E8271CC1FF call 004056B4 007F3A8D 8B8564FFFFFF mov eax, [ebp+$FFFFFF64] 007F3A93 50 push eax 007F3A94 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3A96 E811A5CEFF call 004DDFAC 007F3A9B 5A pop edx 007F3A9C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3A9E FF5138 call dword ptr [ecx+$38] 007F3AA1 8D9558FFFFFF lea edx, [ebp+$FFFFFF58] 007F3AA7 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BZType : TEdit | 007F3AAA 8B8008040000 mov eax, [eax+$0408] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3AB0 E83B4BC9FF call 004885F0 007F3AB5 83BD58FFFFFF00 cmp dword ptr [ebp+$FFFFFF58], +$00 007F3ABC 745E jz 007F3B1C * Possible String Reference to: ' and BZType like '%' | 007F3ABE 68B44C7F00 push $007F4CB4 007F3AC3 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 007F3AC9 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BZType : TEdit | 007F3ACC 8B8008040000 mov eax, [eax+$0408] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3AD2 E8194BC9FF call 004885F0 007F3AD7 8B854CFFFFFF mov eax, [ebp+$FFFFFF4C] 007F3ADD 8D9550FFFFFF lea edx, [ebp+$FFFFFF50] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3AE3 E8046EC1FF call 0040A8EC 007F3AE8 FFB550FFFFFF push dword ptr [ebp+$FFFFFF50] 007F3AEE 68584B7F00 push $007F4B58 007F3AF3 68B44A7F00 push $007F4AB4 007F3AF8 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] 007F3AFE BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3B03 E8AC1BC1FF call 004056B4 007F3B08 8B8554FFFFFF mov eax, [ebp+$FFFFFF54] 007F3B0E 50 push eax 007F3B0F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B11 E896A4CEFF call 004DDFAC 007F3B16 5A pop edx 007F3B17 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3B19 FF5138 call dword ptr [ecx+$38] 007F3B1C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007F3B1E E8A51DCDFF call 004C58C8 007F3B23 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F3B26 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'YEMoney' | 007F3B2C BAD04C7F00 mov edx, $007F4CD0 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F3B31 E87E30CDFF call 004C6BB4 007F3B36 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_54 | 007F3B38 FF5254 call dword ptr [edx+$54] 007F3B3B DD5DF0 fstp qword ptr [ebp-$10] 007F3B3E 9B wait 007F3B3F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F3B42 8B9820030000 mov ebx, [eax+$0320] 007F3B48 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F3B4A E8851DCDFF call 004C58D4 007F3B4F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B51 E856A4CEFF call 004DDFAC 007F3B56 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F3B58 FF5244 call dword ptr [edx+$44] 007F3B5B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B5D E84AA4CEFF call 004DDFAC * Possible String Reference to: 'select A.*' | 007F3B62 BAE04C7F00 mov edx, $007F4CE0 007F3B67 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3B69 FF5138 call dword ptr [ecx+$38] 007F3B6C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B6E E839A4CEFF call 004DDFAC * Possible String Reference to: ',IFSC=(case when isnull((select Top | 1 Y.YFID from YF_Money_CR Y where | Y.SZYFID=A.YFID and Y.CRtype in (' | 犊畹羌','收款登记','付款杂费')),'' | )='' then '' else '是' end)' | 007F3B73 BAF44C7F00 mov edx, $007F4CF4 007F3B78 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3B7A FF5138 call dword ptr [ecx+$38] 007F3B7D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B7F E828A4CEFF call 004DDFAC * Possible String Reference to: ',SRMoney=(case when A.CRFlag='收' t | hen A.Money else 0 end)' | 007F3B84 BAA44D7F00 mov edx, $007F4DA4 007F3B89 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3B8B FF5138 call dword ptr [ecx+$38] 007F3B8E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3B90 E817A4CEFF call 004DDFAC * Possible String Reference to: ',ZCMoney=(case when isnull(A.CRFlag | ,'')<>'收' then A.Money else 0 end)' | 007F3B95 BAE84D7F00 mov edx, $007F4DE8 007F3B9A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3B9C FF5138 call dword ptr [ecx+$38] 007F3B9F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3BA1 E806A4CEFF call 004DDFAC * Possible String Reference to: ',cast(0 as decimal(18,2)) YEMoney' | 007F3BA6 BA384E7F00 mov edx, $007F4E38 007F3BAB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3BAD FF5138 call dword ptr [ecx+$38] 007F3BB0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3BB2 E8F5A3CEFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 007F3BB7 BA644E7F00 mov edx, $007F4E64 007F3BBC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3BBE FF5138 call dword ptr [ecx+$38] 007F3BC1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3BC3 E8E4A3CEFF call 004DDFAC * Possible String Reference to: ' where A.CRType='其他款项' ' | 007F3BC8 BA804E7F00 mov edx, $007F4E80 007F3BCD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3BCF FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' and A.CRTime>='' | 007F3BD2 68A84E7F00 push $007F4EA8 007F3BD7 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.begdate : TDateTimePicker | 007F3BDA 8B804C030000 mov eax, [eax+$034C] 007F3BE0 FFB014020000 push dword ptr [eax+$0214] 007F3BE6 FFB010020000 push dword ptr [eax+$0210] 007F3BEC 8D9544FFFFFF lea edx, [ebp+$FFFFFF44] * Possible String Reference to: 'yyyy-MM-dd' | 007F3BF2 B8A04A7F00 mov eax, $007F4AA0 | 007F3BF7 E8C0AFC1FF call 0040EBBC 007F3BFC FFB544FFFFFF push dword ptr [ebp+$FFFFFF44] 007F3C02 68B44A7F00 push $007F4AB4 007F3C07 8D8548FFFFFF lea eax, [ebp+$FFFFFF48] 007F3C0D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F3C12 E89D1AC1FF call 004056B4 007F3C17 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] 007F3C1D 50 push eax 007F3C1E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3C20 E887A3CEFF call 004DDFAC 007F3C25 5A pop edx 007F3C26 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3C28 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' and A.CRTime<'' | 007F3C2B 68C44E7F00 push $007F4EC4 007F3C30 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Enddate : TDateTimePicker | 007F3C33 8B8050030000 mov eax, [eax+$0350] 007F3C39 DD8010020000 fld qword ptr [eax+$0210] 007F3C3F D805D44E7F00 fadd dword ptr [$007F4ED4] 007F3C45 83C4F8 add esp, -$08 007F3C48 DD1C24 fstp qword ptr [esp] 007F3C4B 9B wait 007F3C4C 8D953CFFFFFF lea edx, [ebp+$FFFFFF3C] * Possible String Reference to: 'yyyy-MM-dd' | 007F3C52 B8A04A7F00 mov eax, $007F4AA0 | 007F3C57 E860AFC1FF call 0040EBBC 007F3C5C FFB53CFFFFFF push dword ptr [ebp+$FFFFFF3C] 007F3C62 68B44A7F00 push $007F4AB4 007F3C67 8D8540FFFFFF lea eax, [ebp+$FFFFFF40] 007F3C6D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F3C72 E83D1AC1FF call 004056B4 007F3C77 8B8540FFFFFF mov eax, [ebp+$FFFFFF40] 007F3C7D 50 push eax 007F3C7E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3C80 E827A3CEFF call 004DDFAC 007F3C85 5A pop edx 007F3C86 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3C88 FF5138 call dword ptr [ecx+$38] 007F3C8B 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] 007F3C91 8B45FC mov eax, [ebp-$04] * Reference to field TfrmYSCRPB_ZHYH.OFFS_0420 | 007F3C94 8B8020040000 mov eax, [eax+$0420] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3C9A E84D6CC1FF call 0040A8EC 007F3C9F 83BD38FFFFFF00 cmp dword ptr [ebp+$FFFFFF38], +$00 007F3CA6 744A jz 007F3CF2 * Possible String Reference to: ' and (CRFlag='' | 007F3CA8 68E04A7F00 push $007F4AE0 007F3CAD 8D9530FFFFFF lea edx, [ebp+$FFFFFF30] 007F3CB3 8B45FC mov eax, [ebp-$04] * Reference to field TfrmYSCRPB_ZHYH.OFFS_0420 | 007F3CB6 8B8020040000 mov eax, [eax+$0420] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3CBC E82B6CC1FF call 0040A8EC 007F3CC1 FFB530FFFFFF push dword ptr [ebp+$FFFFFF30] * Possible String Reference to: '' or YFName='退款')' | 007F3CC7 68F84A7F00 push $007F4AF8 007F3CCC 8D8534FFFFFF lea eax, [ebp+$FFFFFF34] 007F3CD2 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F3CD7 E8D819C1FF call 004056B4 007F3CDC 8B8534FFFFFF mov eax, [ebp+$FFFFFF34] 007F3CE2 50 push eax 007F3CE3 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3CE5 E8C2A2CEFF call 004DDFAC 007F3CEA 5A pop edx 007F3CEB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3CED FF5138 call dword ptr [ecx+$38] 007F3CF0 EB76 jmp 007F3D68 007F3CF2 8D952CFFFFFF lea edx, [ebp+$FFFFFF2C] 007F3CF8 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CRFlag : TComboBox | 007F3CFB 8B80D0030000 mov eax, [eax+$03D0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3D01 E8EA48C9FF call 004885F0 007F3D06 83BD2CFFFFFF00 cmp dword ptr [ebp+$FFFFFF2C], +$00 007F3D0D 7459 jz 007F3D68 * Possible String Reference to: ' and CRFlag='' | 007F3D0F 68144B7F00 push $007F4B14 007F3D14 8D9520FFFFFF lea edx, [ebp+$FFFFFF20] 007F3D1A 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CRFlag : TComboBox | 007F3D1D 8B80D0030000 mov eax, [eax+$03D0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3D23 E8C848C9FF call 004885F0 007F3D28 8B8520FFFFFF mov eax, [ebp+$FFFFFF20] 007F3D2E 8D9524FFFFFF lea edx, [ebp+$FFFFFF24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3D34 E8B36BC1FF call 0040A8EC 007F3D39 FFB524FFFFFF push dword ptr [ebp+$FFFFFF24] * Possible String Reference to: '' ' | 007F3D3F 682C4B7F00 push $007F4B2C 007F3D44 8D8528FFFFFF lea eax, [ebp+$FFFFFF28] 007F3D4A BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F3D4F E86019C1FF call 004056B4 007F3D54 8B8528FFFFFF mov eax, [ebp+$FFFFFF28] 007F3D5A 50 push eax 007F3D5B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3D5D E84AA2CEFF call 004DDFAC 007F3D62 5A pop edx 007F3D63 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3D65 FF5138 call dword ptr [ecx+$38] 007F3D68 8D951CFFFFFF lea edx, [ebp+$FFFFFF1C] 007F3D6E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankName : TComboBox | 007F3D71 8B80F0030000 mov eax, [eax+$03F0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3D77 E87448C9FF call 004885F0 007F3D7C 83BD1CFFFFFF00 cmp dword ptr [ebp+$FFFFFF1C], +$00 007F3D83 745E jz 007F3DE3 * Possible String Reference to: ' and BankName like '%' | 007F3D85 68384B7F00 push $007F4B38 007F3D8A 8D9510FFFFFF lea edx, [ebp+$FFFFFF10] 007F3D90 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankName : TComboBox | 007F3D93 8B80F0030000 mov eax, [eax+$03F0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3D99 E85248C9FF call 004885F0 007F3D9E 8B8510FFFFFF mov eax, [ebp+$FFFFFF10] 007F3DA4 8D9514FFFFFF lea edx, [ebp+$FFFFFF14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3DAA E83D6BC1FF call 0040A8EC 007F3DAF FFB514FFFFFF push dword ptr [ebp+$FFFFFF14] 007F3DB5 68584B7F00 push $007F4B58 007F3DBA 68B44A7F00 push $007F4AB4 007F3DBF 8D8518FFFFFF lea eax, [ebp+$FFFFFF18] 007F3DC5 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3DCA E8E518C1FF call 004056B4 007F3DCF 8B8518FFFFFF mov eax, [ebp+$FFFFFF18] 007F3DD5 50 push eax 007F3DD6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3DD8 E8CFA1CEFF call 004DDFAC 007F3DDD 5A pop edx 007F3DDE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3DE0 FF5138 call dword ptr [ecx+$38] 007F3DE3 8D950CFFFFFF lea edx, [ebp+$FFFFFF0C] 007F3DE9 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.IFSC : TComboBox | 007F3DEC 8B80CC030000 mov eax, [eax+$03CC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3DF2 E8F947C9FF call 004885F0 007F3DF7 83BD0CFFFFFF00 cmp dword ptr [ebp+$FFFFFF0C], +$00 007F3DFE 745E jz 007F3E5E * Possible String Reference to: ' and (case when isnull((select Top | 1 Y.YFID from YF_Money_CR Y where Y | .SZYFID=A.YFID and Y.CRtype in ('付 | 款登记','收款登记','付款杂费')),'') | ='' then '' else '是' end) like '%' | 007F3E00 68644B7F00 push $007F4B64 007F3E05 8D9500FFFFFF lea edx, [ebp+$FFFFFF00] 007F3E0B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.IFSC : TComboBox | 007F3E0E 8B80CC030000 mov eax, [eax+$03CC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3E14 E8D747C9FF call 004885F0 007F3E19 8B8500FFFFFF mov eax, [ebp+$FFFFFF00] 007F3E1F 8D9504FFFFFF lea edx, [ebp+$FFFFFF04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3E25 E8C26AC1FF call 0040A8EC 007F3E2A FFB504FFFFFF push dword ptr [ebp+$FFFFFF04] 007F3E30 68584B7F00 push $007F4B58 007F3E35 68B44A7F00 push $007F4AB4 007F3E3A 8D8508FFFFFF lea eax, [ebp+$FFFFFF08] 007F3E40 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3E45 E86A18C1FF call 004056B4 007F3E4A 8B8508FFFFFF mov eax, [ebp+$FFFFFF08] 007F3E50 50 push eax 007F3E51 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3E53 E854A1CEFF call 004DDFAC 007F3E58 5A pop edx 007F3E59 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3E5B FF5138 call dword ptr [ecx+$38] 007F3E5E 8D95FCFEFFFF lea edx, [ebp+$FFFFFEFC] 007F3E64 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.YFName : TEdit | 007F3E67 8B801C030000 mov eax, [eax+$031C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3E6D E87E47C9FF call 004885F0 007F3E72 83BDFCFEFFFF00 cmp dword ptr [ebp+$FFFFFEFC], +$00 007F3E79 745E jz 007F3ED9 * Possible String Reference to: ' and YFName like '%' | 007F3E7B 681C4C7F00 push $007F4C1C 007F3E80 8D95F0FEFFFF lea edx, [ebp+$FFFFFEF0] 007F3E86 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.YFName : TEdit | 007F3E89 8B801C030000 mov eax, [eax+$031C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3E8F E85C47C9FF call 004885F0 007F3E94 8B85F0FEFFFF mov eax, [ebp+$FFFFFEF0] 007F3E9A 8D95F4FEFFFF lea edx, [ebp+$FFFFFEF4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3EA0 E8476AC1FF call 0040A8EC 007F3EA5 FFB5F4FEFFFF push dword ptr [ebp+$FFFFFEF4] 007F3EAB 68584B7F00 push $007F4B58 007F3EB0 68B44A7F00 push $007F4AB4 007F3EB5 8D85F8FEFFFF lea eax, [ebp+$FFFFFEF8] 007F3EBB BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3EC0 E8EF17C1FF call 004056B4 007F3EC5 8B85F8FEFFFF mov eax, [ebp+$FFFFFEF8] 007F3ECB 50 push eax 007F3ECC 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3ECE E8D9A0CEFF call 004DDFAC 007F3ED3 5A pop edx 007F3ED4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3ED6 FF5138 call dword ptr [ecx+$38] 007F3ED9 8D95ECFEFFFF lea edx, [ebp+$FFFFFEEC] 007F3EDF 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Note : TEdit | 007F3EE2 8B80A4030000 mov eax, [eax+$03A4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3EE8 E80347C9FF call 004885F0 007F3EED 83BDECFEFFFF00 cmp dword ptr [ebp+$FFFFFEEC], +$00 007F3EF4 745E jz 007F3F54 * Possible String Reference to: ' and Note like '%' | 007F3EF6 68384C7F00 push $007F4C38 007F3EFB 8D95E0FEFFFF lea edx, [ebp+$FFFFFEE0] 007F3F01 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Note : TEdit | 007F3F04 8B80A4030000 mov eax, [eax+$03A4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3F0A E8E146C9FF call 004885F0 007F3F0F 8B85E0FEFFFF mov eax, [ebp+$FFFFFEE0] 007F3F15 8D95E4FEFFFF lea edx, [ebp+$FFFFFEE4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3F1B E8CC69C1FF call 0040A8EC 007F3F20 FFB5E4FEFFFF push dword ptr [ebp+$FFFFFEE4] 007F3F26 68584B7F00 push $007F4B58 007F3F2B 68B44A7F00 push $007F4AB4 007F3F30 8D85E8FEFFFF lea eax, [ebp+$FFFFFEE8] 007F3F36 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3F3B E87417C1FF call 004056B4 007F3F40 8B85E8FEFFFF mov eax, [ebp+$FFFFFEE8] 007F3F46 50 push eax 007F3F47 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3F49 E85EA0CEFF call 004DDFAC 007F3F4E 5A pop edx 007F3F4F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3F51 FF5138 call dword ptr [ecx+$38] 007F3F54 8D95DCFEFFFF lea edx, [ebp+$FFFFFEDC] 007F3F5A 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FactoryName : TEdit | 007F3F5D 8B80B4030000 mov eax, [eax+$03B4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3F63 E88846C9FF call 004885F0 007F3F68 83BDDCFEFFFF00 cmp dword ptr [ebp+$FFFFFEDC], +$00 007F3F6F 745E jz 007F3FCF * Possible String Reference to: ' and FactoryName like '%' | 007F3F71 68544C7F00 push $007F4C54 007F3F76 8D95D0FEFFFF lea edx, [ebp+$FFFFFED0] 007F3F7C 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FactoryName : TEdit | 007F3F7F 8B80B4030000 mov eax, [eax+$03B4] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3F85 E86646C9FF call 004885F0 007F3F8A 8B85D0FEFFFF mov eax, [ebp+$FFFFFED0] 007F3F90 8D95D4FEFFFF lea edx, [ebp+$FFFFFED4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F3F96 E85169C1FF call 0040A8EC 007F3F9B FFB5D4FEFFFF push dword ptr [ebp+$FFFFFED4] 007F3FA1 68584B7F00 push $007F4B58 007F3FA6 68B44A7F00 push $007F4AB4 007F3FAB 8D85D8FEFFFF lea eax, [ebp+$FFFFFED8] 007F3FB1 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F3FB6 E8F916C1FF call 004056B4 007F3FBB 8B85D8FEFFFF mov eax, [ebp+$FFFFFED8] 007F3FC1 50 push eax 007F3FC2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F3FC4 E8E39FCEFF call 004DDFAC 007F3FC9 5A pop edx 007F3FCA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F3FCC FF5138 call dword ptr [ecx+$38] 007F3FCF 8D95CCFEFFFF lea edx, [ebp+$FFFFFECC] 007F3FD5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FKTaiTou : TEdit | 007F3FD8 8B80EC030000 mov eax, [eax+$03EC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F3FDE E80D46C9FF call 004885F0 007F3FE3 83BDCCFEFFFF00 cmp dword ptr [ebp+$FFFFFECC], +$00 007F3FEA 745E jz 007F404A * Possible String Reference to: ' and FKTaiTou like '%' | 007F3FEC 68784C7F00 push $007F4C78 007F3FF1 8D95C0FEFFFF lea edx, [ebp+$FFFFFEC0] 007F3FF7 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.FKTaiTou : TEdit | 007F3FFA 8B80EC030000 mov eax, [eax+$03EC] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F4000 E8EB45C9FF call 004885F0 007F4005 8B85C0FEFFFF mov eax, [ebp+$FFFFFEC0] 007F400B 8D95C4FEFFFF lea edx, [ebp+$FFFFFEC4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F4011 E8D668C1FF call 0040A8EC 007F4016 FFB5C4FEFFFF push dword ptr [ebp+$FFFFFEC4] 007F401C 68584B7F00 push $007F4B58 007F4021 68B44A7F00 push $007F4AB4 007F4026 8D85C8FEFFFF lea eax, [ebp+$FFFFFEC8] 007F402C BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F4031 E87E16C1FF call 004056B4 007F4036 8B85C8FEFFFF mov eax, [ebp+$FFFFFEC8] 007F403C 50 push eax 007F403D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F403F E8689FCEFF call 004DDFAC 007F4044 5A pop edx 007F4045 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F4047 FF5138 call dword ptr [ecx+$38] 007F404A 8D95BCFEFFFF lea edx, [ebp+$FFFFFEBC] 007F4050 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankNo : TEdit | 007F4053 8B8000040000 mov eax, [eax+$0400] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F4059 E89245C9FF call 004885F0 007F405E 83BDBCFEFFFF00 cmp dword ptr [ebp+$FFFFFEBC], +$00 007F4065 745E jz 007F40C5 * Possible String Reference to: ' and BankNo like '%' | 007F4067 68984C7F00 push $007F4C98 007F406C 8D95B0FEFFFF lea edx, [ebp+$FFFFFEB0] 007F4072 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BankNo : TEdit | 007F4075 8B8000040000 mov eax, [eax+$0400] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F407B E87045C9FF call 004885F0 007F4080 8B85B0FEFFFF mov eax, [ebp+$FFFFFEB0] 007F4086 8D95B4FEFFFF lea edx, [ebp+$FFFFFEB4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F408C E85B68C1FF call 0040A8EC 007F4091 FFB5B4FEFFFF push dword ptr [ebp+$FFFFFEB4] 007F4097 68584B7F00 push $007F4B58 007F409C 68B44A7F00 push $007F4AB4 007F40A1 8D85B8FEFFFF lea eax, [ebp+$FFFFFEB8] 007F40A7 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F40AC E80316C1FF call 004056B4 007F40B1 8B85B8FEFFFF mov eax, [ebp+$FFFFFEB8] 007F40B7 50 push eax 007F40B8 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F40BA E8ED9ECEFF call 004DDFAC 007F40BF 5A pop edx 007F40C0 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F40C2 FF5138 call dword ptr [ecx+$38] 007F40C5 8D95ACFEFFFF lea edx, [ebp+$FFFFFEAC] 007F40CB 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BZType : TEdit | 007F40CE 8B8008040000 mov eax, [eax+$0408] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F40D4 E81745C9FF call 004885F0 007F40D9 83BDACFEFFFF00 cmp dword ptr [ebp+$FFFFFEAC], +$00 007F40E0 745E jz 007F4140 * Possible String Reference to: ' and BZType like '%' | 007F40E2 68B44C7F00 push $007F4CB4 007F40E7 8D95A0FEFFFF lea edx, [ebp+$FFFFFEA0] 007F40ED 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.BZType : TEdit | 007F40F0 8B8008040000 mov eax, [eax+$0408] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F40F6 E8F544C9FF call 004885F0 007F40FB 8B85A0FEFFFF mov eax, [ebp+$FFFFFEA0] 007F4101 8D95A4FEFFFF lea edx, [ebp+$FFFFFEA4] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F4107 E8E067C1FF call 0040A8EC 007F410C FFB5A4FEFFFF push dword ptr [ebp+$FFFFFEA4] 007F4112 68584B7F00 push $007F4B58 007F4117 68B44A7F00 push $007F4AB4 007F411C 8D85A8FEFFFF lea eax, [ebp+$FFFFFEA8] 007F4122 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F4127 E88815C1FF call 004056B4 007F412C 8B85A8FEFFFF mov eax, [ebp+$FFFFFEA8] 007F4132 50 push eax 007F4133 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F4135 E8729ECEFF call 004DDFAC 007F413A 5A pop edx 007F413B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F413D FF5138 call dword ptr [ecx+$38] 007F4140 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F4142 E8659ECEFF call 004DDFAC * Possible String Reference to: ' order by A.CRTime,SRMoney desc' | 007F4147 BAE04E7F00 mov edx, $007F4EE0 007F414C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F414E FF5138 call dword ptr [ecx+$38] 007F4151 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007F4153 E87017CDFF call 004C58C8 007F4158 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F415B 8B905C030000 mov edx, [eax+$035C] 007F4161 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4164 8B8020030000 mov eax, [eax+$0320] | 007F416A E8212DFCFF call 007B6E90 007F416F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F4172 8B985C030000 mov ebx, [eax+$035C] 007F4178 8BC3 mov eax, ebx | 007F417A E81144CDFF call 004C8590 * Possible String Reference to: 'Ssel' | 007F417F BA084F7F00 mov edx, $007F4F08 007F4184 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4186 E8292ACDFF call 004C6BB4 007F418B 33D2 xor edx, edx 007F418D 8B08 mov ecx, [eax] * Reference to method TClientDataSet.ClearCalcFields(PChar) | 007F418F FF9194000000 call dword ptr [ecx+$0094] * Possible String Reference to: 'CRTime' | 007F4195 BA184F7F00 mov edx, $007F4F18 007F419A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F419C E8132ACDFF call 004C6BB4 007F41A1 50 push eax 007F41A2 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.begdate : TDateTimePicker | 007F41A5 8B804C030000 mov eax, [eax+$034C] 007F41AB DD8010020000 fld qword ptr [eax+$0210] 007F41B1 8D8590FEFFFF lea eax, [ebp+$FFFFFE90] * Reference to: Variants.@VarFromTDateTime; | 007F41B7 E8E44BC2FF call 00418DA0 007F41BC 8D9590FEFFFF lea edx, [ebp+$FFFFFE90] 007F41C2 58 pop eax 007F41C3 8B08 mov ecx, [eax] 007F41C5 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'YFName' | 007F41CB BA284F7F00 mov edx, $007F4F28 007F41D0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F41D2 E8DD29CDFF call 004C6BB4 007F41D7 50 push eax 007F41D8 8D8580FEFFFF lea eax, [ebp+$FFFFFE80] * Possible String Reference to: '上月结转' | 007F41DE BA384F7F00 mov edx, $007F4F38 * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F41E3 E8E04BC2FF call 00418DC8 007F41E8 8D9580FEFFFF lea edx, [ebp+$FFFFFE80] 007F41EE 58 pop eax 007F41EF 8B08 mov ecx, [eax] 007F41F1 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'YEMoney' | 007F41F7 BAD04C7F00 mov edx, $007F4CD0 007F41FC 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F41FE E8B129CDFF call 004C6BB4 007F4203 50 push eax 007F4204 DD45F0 fld qword ptr [ebp-$10] 007F4207 8D8570FEFFFF lea eax, [ebp+$FFFFFE70] * Reference to: Variants.@VarFromReal; | 007F420D E87A4BC2FF call 00418D8C 007F4212 8D9570FEFFFF lea edx, [ebp+$FFFFFE70] 007F4218 58 pop eax 007F4219 8B08 mov ecx, [eax] 007F421B FF91B4000000 call dword ptr [ecx+$00B4] 007F4221 8BC3 mov eax, ebx 007F4223 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F4225 FF924C020000 call dword ptr [edx+$024C] 007F422B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F422E 8BB020030000 mov esi, [eax+$0320] 007F4234 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 007F4236 E8F53DCDFF call 004C8030 007F423B E952040000 jmp 007F4692 007F4240 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.CDS_HZ : TClientDataSet | 007F4243 8B985C030000 mov ebx, [eax+$035C] 007F4249 8BC3 mov eax, ebx | 007F424B E84043CDFF call 004C8590 * Possible String Reference to: 'Ssel' | 007F4250 BA084F7F00 mov edx, $007F4F08 007F4255 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4257 E85829CDFF call 004C6BB4 007F425C 33D2 xor edx, edx 007F425E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.ClearCalcFields(PChar) | 007F4260 FF9194000000 call dword ptr [ecx+$0094] 007F4266 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4269 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'CRTime' | 007F426F BA184F7F00 mov edx, $007F4F18 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4274 E83B29CDFF call 004C6BB4 007F4279 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_50 | 007F427B FF5250 call dword ptr [edx+$50] 007F427E 8D8560FEFFFF lea eax, [ebp+$FFFFFE60] * Reference to: Variants.@VarFromTDateTime; | 007F4284 E8174BC2FF call 00418DA0 007F4289 8D8560FEFFFF lea eax, [ebp+$FFFFFE60] 007F428F 50 push eax * Possible String Reference to: 'CRTime' | 007F4290 BA184F7F00 mov edx, $007F4F18 007F4295 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4297 E81829CDFF call 004C6BB4 007F429C 5A pop edx 007F429D 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F429F FF91B4000000 call dword ptr [ecx+$00B4] 007F42A5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F42A8 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'BankName' | 007F42AE BA4C4F7F00 mov edx, $007F4F4C * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F42B3 E8FC28CDFF call 004C6BB4 007F42B8 8D954CFEFFFF lea edx, [ebp+$FFFFFE4C] 007F42BE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F42C0 FF5160 call dword ptr [ecx+$60] 007F42C3 8B954CFEFFFF mov edx, [ebp+$FFFFFE4C] 007F42C9 8D8550FEFFFF lea eax, [ebp+$FFFFFE50] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F42CF E8F44AC2FF call 00418DC8 007F42D4 8D8550FEFFFF lea eax, [ebp+$FFFFFE50] 007F42DA 50 push eax * Possible String Reference to: 'BankName' | 007F42DB BA4C4F7F00 mov edx, $007F4F4C 007F42E0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F42E2 E8CD28CDFF call 004C6BB4 007F42E7 5A pop edx 007F42E8 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F42EA FF91B4000000 call dword ptr [ecx+$00B4] 007F42F0 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F42F3 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'IFSC' | 007F42F9 BA604F7F00 mov edx, $007F4F60 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F42FE E8B128CDFF call 004C6BB4 007F4303 8D9538FEFFFF lea edx, [ebp+$FFFFFE38] 007F4309 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F430B FF5160 call dword ptr [ecx+$60] 007F430E 8B9538FEFFFF mov edx, [ebp+$FFFFFE38] 007F4314 8D853CFEFFFF lea eax, [ebp+$FFFFFE3C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F431A E8A94AC2FF call 00418DC8 007F431F 8D853CFEFFFF lea eax, [ebp+$FFFFFE3C] 007F4325 50 push eax * Possible String Reference to: 'IFSC' | 007F4326 BA604F7F00 mov edx, $007F4F60 007F432B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F432D E88228CDFF call 004C6BB4 007F4332 5A pop edx 007F4333 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4335 FF91B4000000 call dword ptr [ecx+$00B4] 007F433B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F433E 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'CRFlag' | 007F4344 BA704F7F00 mov edx, $007F4F70 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4349 E86628CDFF call 004C6BB4 007F434E 8D9524FEFFFF lea edx, [ebp+$FFFFFE24] 007F4354 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F4356 FF5160 call dword ptr [ecx+$60] 007F4359 8B9524FEFFFF mov edx, [ebp+$FFFFFE24] 007F435F 8D8528FEFFFF lea eax, [ebp+$FFFFFE28] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F4365 E85E4AC2FF call 00418DC8 007F436A 8D8528FEFFFF lea eax, [ebp+$FFFFFE28] 007F4370 50 push eax * Possible String Reference to: 'CRFlag' | 007F4371 BA704F7F00 mov edx, $007F4F70 007F4376 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4378 E83728CDFF call 004C6BB4 007F437D 5A pop edx 007F437E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4380 FF91B4000000 call dword ptr [ecx+$00B4] 007F4386 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4389 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'FactoryName' | 007F438F BA804F7F00 mov edx, $007F4F80 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4394 E81B28CDFF call 004C6BB4 007F4399 8D9510FEFFFF lea edx, [ebp+$FFFFFE10] 007F439F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F43A1 FF5160 call dword ptr [ecx+$60] 007F43A4 8B9510FEFFFF mov edx, [ebp+$FFFFFE10] 007F43AA 8D8514FEFFFF lea eax, [ebp+$FFFFFE14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F43B0 E8134AC2FF call 00418DC8 007F43B5 8D8514FEFFFF lea eax, [ebp+$FFFFFE14] 007F43BB 50 push eax * Possible String Reference to: 'FactoryName' | 007F43BC BA804F7F00 mov edx, $007F4F80 007F43C1 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F43C3 E8EC27CDFF call 004C6BB4 007F43C8 5A pop edx 007F43C9 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F43CB FF91B4000000 call dword ptr [ecx+$00B4] 007F43D1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F43D4 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'YFName' | 007F43DA BA284F7F00 mov edx, $007F4F28 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F43DF E8D027CDFF call 004C6BB4 007F43E4 8D95FCFDFFFF lea edx, [ebp+$FFFFFDFC] 007F43EA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F43EC FF5160 call dword ptr [ecx+$60] 007F43EF 8B95FCFDFFFF mov edx, [ebp+$FFFFFDFC] 007F43F5 8D8500FEFFFF lea eax, [ebp+$FFFFFE00] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F43FB E8C849C2FF call 00418DC8 007F4400 8D8500FEFFFF lea eax, [ebp+$FFFFFE00] 007F4406 50 push eax * Possible String Reference to: 'YFName' | 007F4407 BA284F7F00 mov edx, $007F4F28 007F440C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F440E E8A127CDFF call 004C6BB4 007F4413 5A pop edx 007F4414 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4416 FF91B4000000 call dword ptr [ecx+$00B4] 007F441C 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F441F 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'SRMoney' | 007F4425 BA944F7F00 mov edx, $007F4F94 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F442A E88527CDFF call 004C6BB4 007F442F 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_54 | 007F4431 FF5254 call dword ptr [edx+$54] 007F4434 8D85ECFDFFFF lea eax, [ebp+$FFFFFDEC] * Reference to: Variants.@VarFromReal; | 007F443A E84D49C2FF call 00418D8C 007F443F 8D85ECFDFFFF lea eax, [ebp+$FFFFFDEC] 007F4445 50 push eax * Possible String Reference to: 'SRMoney' | 007F4446 BA944F7F00 mov edx, $007F4F94 007F444B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F444D E86227CDFF call 004C6BB4 007F4452 5A pop edx 007F4453 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4455 FF91B4000000 call dword ptr [ecx+$00B4] 007F445B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F445E 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'ZCMoney' | 007F4464 BAA44F7F00 mov edx, $007F4FA4 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4469 E84627CDFF call 004C6BB4 007F446E 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_54 | 007F4470 FF5254 call dword ptr [edx+$54] 007F4473 8D85DCFDFFFF lea eax, [ebp+$FFFFFDDC] * Reference to: Variants.@VarFromReal; | 007F4479 E80E49C2FF call 00418D8C 007F447E 8D85DCFDFFFF lea eax, [ebp+$FFFFFDDC] 007F4484 50 push eax * Possible String Reference to: 'ZCMoney' | 007F4485 BAA44F7F00 mov edx, $007F4FA4 007F448A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F448C E82327CDFF call 004C6BB4 007F4491 5A pop edx 007F4492 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4494 FF91B4000000 call dword ptr [ecx+$00B4] 007F449A 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F449D 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'Note' | 007F44A3 BAB44F7F00 mov edx, $007F4FB4 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F44A8 E80727CDFF call 004C6BB4 007F44AD 8D95C8FDFFFF lea edx, [ebp+$FFFFFDC8] 007F44B3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F44B5 FF5160 call dword ptr [ecx+$60] 007F44B8 8B95C8FDFFFF mov edx, [ebp+$FFFFFDC8] 007F44BE 8D85CCFDFFFF lea eax, [ebp+$FFFFFDCC] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F44C4 E8FF48C2FF call 00418DC8 007F44C9 8D85CCFDFFFF lea eax, [ebp+$FFFFFDCC] 007F44CF 50 push eax * Possible String Reference to: 'Note' | 007F44D0 BAB44F7F00 mov edx, $007F4FB4 007F44D5 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F44D7 E8D826CDFF call 004C6BB4 007F44DC 5A pop edx 007F44DD 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F44DF FF91B4000000 call dword ptr [ecx+$00B4] 007F44E5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F44E8 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'YFID' | 007F44EE BAC44F7F00 mov edx, $007F4FC4 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F44F3 E8BC26CDFF call 004C6BB4 007F44F8 8D95B4FDFFFF lea edx, [ebp+$FFFFFDB4] 007F44FE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F4500 FF5160 call dword ptr [ecx+$60] 007F4503 8B95B4FDFFFF mov edx, [ebp+$FFFFFDB4] 007F4509 8D85B8FDFFFF lea eax, [ebp+$FFFFFDB8] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F450F E8B448C2FF call 00418DC8 007F4514 8D85B8FDFFFF lea eax, [ebp+$FFFFFDB8] 007F451A 50 push eax * Possible String Reference to: 'YFID' | 007F451B BAC44F7F00 mov edx, $007F4FC4 007F4520 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4522 E88D26CDFF call 004C6BB4 007F4527 5A pop edx 007F4528 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F452A FF91B4000000 call dword ptr [ecx+$00B4] 007F4530 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4533 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'FKTaiTou' | 007F4539 BAD44F7F00 mov edx, $007F4FD4 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F453E E87126CDFF call 004C6BB4 007F4543 8D95A0FDFFFF lea edx, [ebp+$FFFFFDA0] 007F4549 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F454B FF5160 call dword ptr [ecx+$60] 007F454E 8B95A0FDFFFF mov edx, [ebp+$FFFFFDA0] 007F4554 8D85A4FDFFFF lea eax, [ebp+$FFFFFDA4] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F455A E86948C2FF call 00418DC8 007F455F 8D85A4FDFFFF lea eax, [ebp+$FFFFFDA4] 007F4565 50 push eax * Possible String Reference to: 'FKTaiTou' | 007F4566 BAD44F7F00 mov edx, $007F4FD4 007F456B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F456D E84226CDFF call 004C6BB4 007F4572 5A pop edx 007F4573 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F4575 FF91B4000000 call dword ptr [ecx+$00B4] 007F457B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F457E 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'BankNo' | 007F4584 BAE84F7F00 mov edx, $007F4FE8 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4589 E82626CDFF call 004C6BB4 007F458E 8D958CFDFFFF lea edx, [ebp+$FFFFFD8C] 007F4594 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F4596 FF5160 call dword ptr [ecx+$60] 007F4599 8B958CFDFFFF mov edx, [ebp+$FFFFFD8C] 007F459F 8D8590FDFFFF lea eax, [ebp+$FFFFFD90] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F45A5 E81E48C2FF call 00418DC8 007F45AA 8D8590FDFFFF lea eax, [ebp+$FFFFFD90] 007F45B0 50 push eax * Possible String Reference to: 'BankNo' | 007F45B1 BAE84F7F00 mov edx, $007F4FE8 007F45B6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F45B8 E8F725CDFF call 004C6BB4 007F45BD 5A pop edx 007F45BE 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F45C0 FF91B4000000 call dword ptr [ecx+$00B4] 007F45C6 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F45C9 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'BZType' | 007F45CF BAF84F7F00 mov edx, $007F4FF8 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F45D4 E8DB25CDFF call 004C6BB4 007F45D9 8D9578FDFFFF lea edx, [ebp+$FFFFFD78] 007F45DF 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007F45E1 FF5160 call dword ptr [ecx+$60] 007F45E4 8B9578FDFFFF mov edx, [ebp+$FFFFFD78] 007F45EA 8D857CFDFFFF lea eax, [ebp+$FFFFFD7C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F45F0 E8D347C2FF call 00418DC8 007F45F5 8D857CFDFFFF lea eax, [ebp+$FFFFFD7C] 007F45FB 50 push eax * Possible String Reference to: 'BZType' | 007F45FC BAF84F7F00 mov edx, $007F4FF8 007F4601 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4603 E8AC25CDFF call 004C6BB4 007F4608 5A pop edx 007F4609 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007F460B FF91B4000000 call dword ptr [ecx+$00B4] 007F4611 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4614 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'SRMoney' | 007F461A BA944F7F00 mov edx, $007F4F94 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F461F E89025CDFF call 004C6BB4 007F4624 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_54 | 007F4626 FF5254 call dword ptr [edx+$54] 007F4629 DC45F0 fadd qword ptr [ebp-$10] 007F462C DBBD6CFDFFFF fstp tbyte ptr [ebp+$FFFFFD6C] 007F4632 9B wait 007F4633 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F4636 8B8020030000 mov eax, [eax+$0320] * Possible String Reference to: 'ZCMoney' | 007F463C BAA44F7F00 mov edx, $007F4FA4 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F4641 E86E25CDFF call 004C6BB4 007F4646 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_54 | 007F4648 FF5254 call dword ptr [edx+$54] 007F464B DBAD6CFDFFFF fld tbyte ptr [ebp+$FFFFFD6C] 007F4651 DEE1 fsubrp st(1), st(0) 007F4653 DD5DF0 fstp qword ptr [ebp-$10] 007F4656 9B wait * Possible String Reference to: 'YEMoney' | 007F4657 BAD04C7F00 mov edx, $007F4CD0 007F465C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F465E E85125CDFF call 004C6BB4 007F4663 50 push eax 007F4664 DD45F0 fld qword ptr [ebp-$10] 007F4667 8D855CFDFFFF lea eax, [ebp+$FFFFFD5C] * Reference to: Variants.@VarFromReal; | 007F466D E81A47C2FF call 00418D8C 007F4672 8D955CFDFFFF lea edx, [ebp+$FFFFFD5C] 007F4678 58 pop eax 007F4679 8B08 mov ecx, [eax] 007F467B FF91B4000000 call dword ptr [ecx+$00B4] 007F4681 8BC3 mov eax, ebx 007F4683 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007F4685 FF924C020000 call dword ptr [edx+$024C] 007F468B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 007F468D E8BA3CCDFF call 004C834C * Reference to field TADOQuery.OFFS_00A1 | 007F4692 80BEA100000000 cmp byte ptr [esi+$00A1], $00 007F4699 0F84A1FBFFFF jz 007F4240 007F469F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.Label13 : TLabel | 007F46A2 8B809C030000 mov eax, [eax+$039C] 007F46A8 BA08507F00 mov edx, $007F5008 * Reference to: Controls.TControl.SetText(TControl;TCaption); | 007F46AD E86E3FC9FF call 00488620 007F46B2 33C0 xor eax, eax 007F46B4 5A pop edx 007F46B5 59 pop ecx 007F46B6 59 pop ecx 007F46B7 648910 mov fs:[eax], edx ****** FINALLY | 007F46BA 68D5467F00 push $007F46D5 007F46BF 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryMain : TADOQuery | 007F46C2 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 007F46C8 E8A72ECDFF call 004C7574 007F46CD C3 ret * Reference to: System.@HandleFinally; | 007F46CE E92104C1FF jmp 00404AF4 007F46D3 EBEA jmp 007F46BF ****** END | 007F46D5 33C0 xor eax, eax 007F46D7 5A pop edx 007F46D8 59 pop ecx 007F46D9 59 pop ecx 007F46DA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]"' | 007F46DD 68324A7F00 push $007F4A32 007F46E2 8D855CFDFFFF lea eax, [ebp+$FFFFFD5C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F46E8 E887FFC1FF call 00414674 007F46ED 8D8578FDFFFF lea eax, [ebp+$FFFFFD78] * Reference to: System.@LStrClr(void;void); | 007F46F3 E82C0CC1FF call 00405324 007F46F8 8D857CFDFFFF lea eax, [ebp+$FFFFFD7C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F46FE E871FFC1FF call 00414674 007F4703 8D858CFDFFFF lea eax, [ebp+$FFFFFD8C] * Reference to: System.@LStrClr(void;void); | 007F4709 E8160CC1FF call 00405324 007F470E 8D8590FDFFFF lea eax, [ebp+$FFFFFD90] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F4714 E85BFFC1FF call 00414674 007F4719 8D85A0FDFFFF lea eax, [ebp+$FFFFFDA0] * Reference to: System.@LStrClr(void;void); | 007F471F E8000CC1FF call 00405324 007F4724 8D85A4FDFFFF lea eax, [ebp+$FFFFFDA4] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F472A E845FFC1FF call 00414674 007F472F 8D85B4FDFFFF lea eax, [ebp+$FFFFFDB4] * Reference to: System.@LStrClr(void;void); | 007F4735 E8EA0BC1FF call 00405324 007F473A 8D85B8FDFFFF lea eax, [ebp+$FFFFFDB8] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F4740 E82FFFC1FF call 00414674 007F4745 8D85C8FDFFFF lea eax, [ebp+$FFFFFDC8] * Reference to: System.@LStrClr(void;void); | 007F474B E8D40BC1FF call 00405324 007F4750 8D85CCFDFFFF lea eax, [ebp+$FFFFFDCC] * Reference to object Variant | 007F4756 8B153C114000 mov edx, [$0040113C] 007F475C B903000000 mov ecx, $00000003 * Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal); | 007F4761 E8AE19C1FF call 00406114 007F4766 8D85FCFDFFFF lea eax, [ebp+$FFFFFDFC] * Reference to: System.@LStrClr(void;void); | 007F476C E8B30BC1FF call 00405324 007F4771 8D8500FEFFFF lea eax, [ebp+$FFFFFE00] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F4777 E8F8FEC1FF call 00414674 007F477C 8D8510FEFFFF lea eax, [ebp+$FFFFFE10] * Reference to: System.@LStrClr(void;void); | 007F4782 E89D0BC1FF call 00405324 007F4787 8D8514FEFFFF lea eax, [ebp+$FFFFFE14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F478D E8E2FEC1FF call 00414674 007F4792 8D8524FEFFFF lea eax, [ebp+$FFFFFE24] * Reference to: System.@LStrClr(void;void); | 007F4798 E8870BC1FF call 00405324 007F479D 8D8528FEFFFF lea eax, [ebp+$FFFFFE28] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F47A3 E8CCFEC1FF call 00414674 007F47A8 8D8538FEFFFF lea eax, [ebp+$FFFFFE38] * Reference to: System.@LStrClr(void;void); | 007F47AE E8710BC1FF call 00405324 007F47B3 8D853CFEFFFF lea eax, [ebp+$FFFFFE3C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007F47B9 E8B6FEC1FF call 00414674 007F47BE 8D854CFEFFFF lea eax, [ebp+$FFFFFE4C] * Reference to: System.@LStrClr(void;void); | 007F47C4 E85B0BC1FF call 00405324 007F47C9 8D8550FEFFFF lea eax, [ebp+$FFFFFE50] * Reference to object Variant | 007F47CF 8B153C114000 mov edx, [$0040113C] 007F47D5 B905000000 mov ecx, $00000005 * Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal); | 007F47DA E83519C1FF call 00406114 007F47DF 8D85A0FEFFFF lea eax, [ebp+$FFFFFEA0] * Reference to: System.@LStrClr(void;void); | 007F47E5 E83A0BC1FF call 00405324 007F47EA 8D85A4FEFFFF lea eax, [ebp+$FFFFFEA4] 007F47F0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F47F5 E84E0BC1FF call 00405348 007F47FA 8D85ACFEFFFF lea eax, [ebp+$FFFFFEAC] 007F4800 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4805 E83E0BC1FF call 00405348 007F480A 8D85B4FEFFFF lea eax, [ebp+$FFFFFEB4] 007F4810 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4815 E82E0BC1FF call 00405348 007F481A 8D85BCFEFFFF lea eax, [ebp+$FFFFFEBC] 007F4820 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4825 E81E0BC1FF call 00405348 007F482A 8D85C4FEFFFF lea eax, [ebp+$FFFFFEC4] 007F4830 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4835 E80E0BC1FF call 00405348 007F483A 8D85CCFEFFFF lea eax, [ebp+$FFFFFECC] 007F4840 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4845 E8FE0AC1FF call 00405348 007F484A 8D85D4FEFFFF lea eax, [ebp+$FFFFFED4] 007F4850 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4855 E8EE0AC1FF call 00405348 007F485A 8D85DCFEFFFF lea eax, [ebp+$FFFFFEDC] 007F4860 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4865 E8DE0AC1FF call 00405348 007F486A 8D85E4FEFFFF lea eax, [ebp+$FFFFFEE4] 007F4870 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4875 E8CE0AC1FF call 00405348 007F487A 8D85ECFEFFFF lea eax, [ebp+$FFFFFEEC] 007F4880 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4885 E8BE0AC1FF call 00405348 007F488A 8D85F4FEFFFF lea eax, [ebp+$FFFFFEF4] 007F4890 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4895 E8AE0AC1FF call 00405348 007F489A 8D85FCFEFFFF lea eax, [ebp+$FFFFFEFC] 007F48A0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48A5 E89E0AC1FF call 00405348 007F48AA 8D8504FFFFFF lea eax, [ebp+$FFFFFF04] 007F48B0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48B5 E88E0AC1FF call 00405348 007F48BA 8D850CFFFFFF lea eax, [ebp+$FFFFFF0C] 007F48C0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48C5 E87E0AC1FF call 00405348 007F48CA 8D8514FFFFFF lea eax, [ebp+$FFFFFF14] 007F48D0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48D5 E86E0AC1FF call 00405348 007F48DA 8D851CFFFFFF lea eax, [ebp+$FFFFFF1C] 007F48E0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48E5 E85E0AC1FF call 00405348 007F48EA 8D8524FFFFFF lea eax, [ebp+$FFFFFF24] 007F48F0 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F48F5 E84E0AC1FF call 00405348 007F48FA 8D852CFFFFFF lea eax, [ebp+$FFFFFF2C] * Reference to: System.@LStrClr(void;void); | 007F4900 E81F0AC1FF call 00405324 007F4905 8D8530FFFFFF lea eax, [ebp+$FFFFFF30] 007F490B BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4910 E8330AC1FF call 00405348 007F4915 8D854CFFFFFF lea eax, [ebp+$FFFFFF4C] * Reference to: System.@LStrClr(void;void); | 007F491B E8040AC1FF call 00405324 007F4920 8D8550FFFFFF lea eax, [ebp+$FFFFFF50] 007F4926 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F492B E8180AC1FF call 00405348 007F4930 8D8558FFFFFF lea eax, [ebp+$FFFFFF58] 007F4936 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F493B E8080AC1FF call 00405348 007F4940 8D8560FFFFFF lea eax, [ebp+$FFFFFF60] 007F4946 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F494B E8F809C1FF call 00405348 007F4950 8D8568FFFFFF lea eax, [ebp+$FFFFFF68] 007F4956 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F495B E8E809C1FF call 00405348 007F4960 8D8570FFFFFF lea eax, [ebp+$FFFFFF70] 007F4966 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F496B E8D809C1FF call 00405348 007F4970 8D8578FFFFFF lea eax, [ebp+$FFFFFF78] 007F4976 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F497B E8C809C1FF call 00405348 007F4980 8D4580 lea eax, [ebp-$80] 007F4983 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4988 E8BB09C1FF call 00405348 007F498D 8D4588 lea eax, [ebp-$78] 007F4990 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4995 E8AE09C1FF call 00405348 007F499A 8D4590 lea eax, [ebp-$70] 007F499D BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49A2 E8A109C1FF call 00405348 007F49A7 8D4598 lea eax, [ebp-$68] 007F49AA BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49AF E89409C1FF call 00405348 007F49B4 8D45A0 lea eax, [ebp-$60] 007F49B7 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49BC E88709C1FF call 00405348 007F49C1 8D45A8 lea eax, [ebp-$58] 007F49C4 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49C9 E87A09C1FF call 00405348 007F49CE 8D45B0 lea eax, [ebp-$50] 007F49D1 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49D6 E86D09C1FF call 00405348 007F49DB 8D45B8 lea eax, [ebp-$48] * Reference to: System.@LStrClr(void;void); | 007F49DE E84109C1FF call 00405324 007F49E3 8D45C0 lea eax, [ebp-$40] 007F49E6 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F49EB E85809C1FF call 00405348 007F49F0 8D45BC lea eax, [ebp-$44] * Reference to: System.@LStrClr(void;void); | 007F49F3 E82C09C1FF call 00405324 007F49F8 8D45C8 lea eax, [ebp-$38] 007F49FB BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4A00 E84309C1FF call 00405348 007F4A05 8D45D0 lea eax, [ebp-$30] 007F4A08 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4A0D E83609C1FF call 00405348 007F4A12 8D45D8 lea eax, [ebp-$28] * Reference to: System.@LStrClr(void;void); | 007F4A15 E80A09C1FF call 00405324 007F4A1A 8D45DC lea eax, [ebp-$24] 007F4A1D BA05000000 mov edx, $00000005 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F4A22 E82109C1FF call 00405348 007F4A27 C3 ret * Reference to: System.@HandleFinally; | 007F4A28 E9C700C1FF jmp 00404AF4 007F4A2D E9B0FCFFFF jmp 007F46E2 ****** END | 007F4A32 5E pop esi 007F4A33 5B pop ebx 007F4A34 8BE5 mov esp, ebp 007F4A36 5D pop ebp 007F4A37 C3 ret *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F5641(Sender : TObject); begin (* 007F5641 8BEC mov ebp, esp 007F5643 B91C000000 mov ecx, $0000001C 007F5648 6A00 push $00 007F564A 6A00 push $00 007F564C 49 dec ecx 007F564D 75F9 jnz 007F5648 007F564F 53 push ebx 007F5650 56 push esi 007F5651 57 push edi 007F5652 8945FC mov [ebp-$04], eax 007F5655 33C0 xor eax, eax 007F5657 55 push ebp * Possible String Reference to: '間鹄関嬅_^[嬪]' | 007F5658 68885A7F00 push $007F5A88 ***** TRY | 007F565D 64FF30 push dword ptr fs:[eax] 007F5660 648920 mov fs:[eax], esp 007F5663 33C0 xor eax, eax 007F5665 55 push ebp 007F5666 68C4597F00 push $007F59C4 ***** TRY | 007F566B 64FF30 push dword ptr fs:[eax] 007F566E 648920 mov fs:[eax], esp 007F5671 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F5674 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 007F567A E8AD67CEFF call 004DBE2C * Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer; | 007F567F E810CCCDFF call 004D2294 * Possible String Reference to: 'YF_Money_CR' | 007F5684 68A45A7F00 push $007F5AA4 007F5689 6A04 push $04 007F568B 6A01 push $01 007F568D 8D55F8 lea edx, [ebp-$08] 007F5690 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F5693 8B800C030000 mov eax, [eax+$030C] * Possible String Reference to: 'YC' | 007F5699 B9B85A7F00 mov ecx, $007F5AB8 * Reference to : TfrmSelExportField._PROC_007B7708() | 007F569E E86520FCFF call 007B7708 007F56A3 84C0 test al, al 007F56A5 753A jnz 007F56E1 007F56A7 33DB xor ebx, ebx 007F56A9 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYSCRPB_ZHYH.ADOQueryCmd : TADOQuery | 007F56AC 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 007F56B2 E87567CEFF call 004DBE2C * Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection); | 007F56B7 E824CCCDFF call 004D22E0 007F56BC 6A00 push $00 * Possible String Reference to: '提示' | 007F56BE B9BC5A7F00 mov ecx, $007F5ABC * Possible String Reference to: '取最大号失败！' | 007F56C3 BAC45A7F00 mov edx, $007F5AC4 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F5E11(Sender : TObject); begin (* 007F5E11 50 push eax 007F5E12 6461 popa 007F5E14 7465 jz 007F5E7B 007F5E16 205943 and [ecx+$43], bl 007F5E19 4C dec esp 007F5E1A 5F pop edi 007F5E1B 53 push ebx 007F5E1C 47 inc edi 007F5E1D 5F pop edi 007F5E1E 48 dec eax 007F5E1F 5A pop edx 007F5E20 2000 and [eax], al 007F5E22 0000 add [eax], al 007F5E24 FFFF DB $FF, $FF // 007F5E26 FFFF DB $FF, $FF // 007F5E28 0500000020 add eax, +$20000000 007F5E2D 53 push ebx 007F5E2E 657420 jz 007F5E51 007F5E31 0000 add [eax], al 007F5E33 00FF add bh, bh 007F5E35 FFFF DB $FF, $FF // 007F5E37 FF02 inc dword ptr [edx] 007F5E39 0000 add [eax], al 007F5E3B 003D270000FF add [$FF000027], bh 007F5E41 FFFF DB $FF, $FF // 007F5E43 FF01 inc dword ptr [ecx] 007F5E45 0000 add [eax], al 007F5E47 0027 add [edi], ah 007F5E49 0000 add [eax], al 007F5E4B 00FF add bh, bh 007F5E4D FFFF DB $FF, $FF // 007F5E4F FF050000003D inc dword ptr [$3D000000] 007F5E55 4E dec esi 007F5E56 55 push ebp 007F5E57 4C dec esp 007F5E58 4C dec esp 007F5E59 0000 add [eax], al 007F5E5B 00FF add bh, bh 007F5E5D FFFF DB $FF, $FF // 007F5E5F FF09 dec dword ptr [ecx] 007F5E61 0000 add [eax], al 007F5E63 002C4564697465 add [$65746964+eax*2], ch 007F5E6A 723D jb 007F5EA9 007F5E6C 27 daa 007F5E6D 0000 add [eax], al 007F5E6F 00FF add bh, bh 007F5E71 FFFF DB $FF, $FF // 007F5E73 FF1400 call dword ptr [eax+eax] 007F5E76 0000 add [eax], al 007F5E78 2C45 sub al, $45 007F5E7A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F5E83 657464 jz 007F5EEA 007F5E86 61 popa 007F5E87 7465 jz 007F5EEE 007F5E89 2829 sub [ecx], ch 007F5E8B 2000 and [eax], al 007F5E8D 0000 add [eax], al 007F5E8F 00FF add bh, bh 007F5E91 FFFF DB $FF, $FF // 007F5E93 FF0E dec dword ptr [esi] 007F5E95 0000 add [eax], al 007F5E97 0020 add [eax], ah 007F5E99 7768 jnbe 007F5F03 007F5E9B 657265 jb 007F5F03 007F5E9E 205375 and [ebx+$75], dl 007F5EA1 624964 bound ecx, qword ptr [ecx+$64] 007F5EA4 3D270000FF cmp eax, $FF000027 007F5EA9 FFFF DB $FF, $FF // 007F5EAB FF0500000053 inc dword ptr [$53000000] 007F5EB1 7562 jnz 007F5F15 007F5EB3 49 dec ecx 007F5EB4 640000 add fs:[eax], al 007F5EB7 00558B add [ebp-$75], dl 007F5EBA EC in al, dx 007F5EBB B921000000 mov ecx, $00000021 007F5EC0 6A00 push $00 007F5EC2 6A00 push $00 007F5EC4 49 dec ecx 007F5EC5 75F9 jnz 007F5EC0 007F5EC7 51 push ecx 007F5EC8 53 push ebx 007F5EC9 56 push esi 007F5ECA 8BF2 mov esi, edx 007F5ECC 8BD8 mov ebx, eax 007F5ECE 33C0 xor eax, eax 007F5ED0 55 push ebp * Possible String Reference to: '殒淅霛^[嬪]' | 007F5ED1 6809667F00 push $007F6609 ***** TRY | 007F5ED6 64FF30 push dword ptr fs:[eax] 007F5ED9 648920 mov fs:[eax], esp 007F5EDC 8D55FC lea edx, [ebp-$04] 007F5EDF 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; | 007F5EE1 E8D697D9FF call 0058F6BC 007F5EE6 8D55D8 lea edx, [ebp-$28] 007F5EE9 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5EEC E8FB49C1FF call 0040A8EC 007F5EF1 837DD800 cmp dword ptr [ebp-$28], +$00 007F5EF5 7513 jnz 007F5F0A 007F5EF7 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); | 007F5EFA E86174C2FF call 0041D360 007F5EFF 8D55C8 lea edx, [ebp-$38] 007F5F02 8D45FC lea eax, [ebp-$04] * Reference to: Variants.@VarToWStr(WideString;WideString;TVarData;TVarData); | 007F5F05 E8061EC2FF call 00417D10 * Reference to control v1PRTColor : N.A. | 007F5F0A 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; | 007F5F10 E83764E6FF 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; | 007F5F15 E84ABCE5FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007F5F1A 8B4050 mov eax, [eax+$50] 007F5F1D 8D55C4 lea edx, [ebp-$3C] 007F5F20 8B08 mov ecx, [eax] 007F5F22 FF5110 call dword ptr [ecx+$10] 007F5F25 8B45C4 mov eax, [ebp-$3C] 007F5F28 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5F2B E8BC49C1FF call 0040A8EC * Reference to control Label10 : TLabel | 007F5F30 8BB35C030000 mov esi, [ebx+$035C] 007F5F36 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007F5F38 E80325CDFF call 004C8440 007F5F3D 8D55B0 lea edx, [ebp-$50] 007F5F40 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F5F43 E8A449C1FF call 0040A8EC 007F5F48 8B55B0 mov edx, [ebp-$50] 007F5F4B 8D45B4 lea eax, [ebp-$4C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F5F4E E8752EC2FF call 00418DC8 007F5F53 8D45B4 lea eax, [ebp-$4C] 007F5F56 50 push eax 007F5F57 8B55E0 mov edx, [ebp-$20] 007F5F5A 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5F5C E8530CCDFF call 004C6BB4 007F5F61 5A pop edx 007F5F62 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 007F5F64 FF91B4000000 call dword ptr [ecx+$00B4] 007F5F6A 8BC6 mov eax, esi 007F5F6C 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007F5F6E FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 007F5F74 8BB308030000 mov esi, [ebx+$0308] 007F5F7A 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 007F5F7C E853F9CCFF call 004C58D4 007F5F81 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F5F83 E82480CEFF call 004DDFAC 007F5F88 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007F5F8A FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 007F5F8D 6820667F00 push $007F6620 * Possible String Reference to: 'YFID' | 007F5F92 BA68667F00 mov edx, $007F6668 * Reference to control Label10 : TLabel | 007F5F97 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5F9D E8120CCDFF call 004C6BB4 007F5FA2 8D55A8 lea edx, [ebp-$58] 007F5FA5 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F5FA7 FF5160 call dword ptr [ecx+$60] 007F5FAA FF75A8 push dword ptr [ebp-$58] 007F5FAD 6878667F00 push $007F6678 007F5FB2 8D45AC lea eax, [ebp-$54] 007F5FB5 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F5FBA E8F5F6C0FF call 004056B4 007F5FBF 8B45AC mov eax, [ebp-$54] 007F5FC2 50 push eax 007F5FC3 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F5FC5 E8E27FCEFF call 004DDFAC 007F5FCA 5A pop edx 007F5FCB 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F5FCD FF5138 call dword ptr [ecx+$38] 007F5FD0 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 007F5FD2 E8F1F8CCFF call 004C58C8 * Possible String Reference to: 'BBMoney' | 007F5FD7 BA84667F00 mov edx, $007F6684 * Reference to control Label3 : TLabel | 007F5FDC 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5FE2 E8CD0BCDFF call 004C6BB4 007F5FE7 8D55E4 lea edx, [ebp-$1C] 007F5FEA 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F5FEC FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 007F5FEF BA94667F00 mov edx, $007F6694 * Reference to control Label10 : TLabel | 007F5FF4 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F5FFA E8B50BCDFF call 004C6BB4 007F5FFF 8D55A4 lea edx, [ebp-$5C] 007F6002 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F6004 FF5160 call dword ptr [ecx+$60] 007F6007 8B45A4 mov eax, [ebp-$5C] 007F600A 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F600D E8DA48C1FF call 0040A8EC 007F6012 8D55A0 lea edx, [ebp-$60] 007F6015 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6018 E8CF48C1FF call 0040A8EC 007F601D 837DA000 cmp dword ptr [ebp-$60], +$00 007F6021 750D jnz 007F6030 007F6023 8D45F8 lea eax, [ebp-$08] 007F6026 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F602B E88CF3C0FF call 004053BC * Possible String Reference to: 'Price' | 007F6030 BAAC667F00 mov edx, $007F66AC * Reference to control Label10 : TLabel | 007F6035 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F603B E8740BCDFF call 004C6BB4 007F6040 8D559C lea edx, [ebp-$64] 007F6043 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F6045 FF5160 call dword ptr [ecx+$60] 007F6048 8B459C mov eax, [ebp-$64] 007F604B 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F604E E89948C1FF call 0040A8EC 007F6053 8D5598 lea edx, [ebp-$68] 007F6056 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6059 E88E48C1FF call 0040A8EC 007F605E 837D9800 cmp dword ptr [ebp-$68], +$00 007F6062 750D jnz 007F6071 007F6064 8D45F4 lea eax, [ebp-$0C] 007F6067 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F606C E84BF3C0FF call 004053BC * Possible String Reference to: 'Qty' | 007F6071 BA94667F00 mov edx, $007F6694 * Reference to control Label10 : TLabel | 007F6076 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F607C E8330BCDFF call 004C6BB4 007F6081 8D5594 lea edx, [ebp-$6C] 007F6084 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F6086 FF5160 call dword ptr [ecx+$60] 007F6089 8B4594 mov eax, [ebp-$6C] 007F608C 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F608F E85848C1FF call 0040A8EC 007F6094 8D5590 lea edx, [ebp-$70] 007F6097 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F609A E84D48C1FF call 0040A8EC 007F609F 837D9000 cmp dword ptr [ebp-$70], +$00 007F60A3 750D jnz 007F60B2 007F60A5 8D45F8 lea eax, [ebp-$08] 007F60A8 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F60AD E80AF3C0FF call 004053BC * Possible String Reference to: 'Money' | 007F60B2 BABC667F00 mov edx, $007F66BC * Reference to control Label10 : TLabel | 007F60B7 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F60BD E8F20ACDFF call 004C6BB4 007F60C2 8D558C lea edx, [ebp-$74] 007F60C5 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F60C7 FF5160 call dword ptr [ecx+$60] 007F60CA 8B458C mov eax, [ebp-$74] 007F60CD 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F60D0 E81748C1FF call 0040A8EC 007F60D5 8D5588 lea edx, [ebp-$78] 007F60D8 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F60DB E80C48C1FF call 0040A8EC 007F60E0 837D8800 cmp dword ptr [ebp-$78], +$00 007F60E4 750D jnz 007F60F3 007F60E6 8D45F0 lea eax, [ebp-$10] 007F60E9 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F60EE E8C9F2C0FF call 004053BC * Possible String Reference to: 'HuiLv' | 007F60F3 BACC667F00 mov edx, $007F66CC * Reference to control Label10 : TLabel | 007F60F8 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F60FE E8B10ACDFF call 004C6BB4 007F6103 8D5584 lea edx, [ebp-$7C] 007F6106 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F6108 FF5160 call dword ptr [ecx+$60] 007F610B 8B4584 mov eax, [ebp-$7C] 007F610E 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6111 E8D647C1FF call 0040A8EC 007F6116 8D5580 lea edx, [ebp-$80] 007F6119 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F611C E8CB47C1FF call 0040A8EC 007F6121 837D8000 cmp dword ptr [ebp-$80], +$00 007F6125 750D jnz 007F6134 007F6127 8D45EC lea eax, [ebp-$14] 007F612A BADC667F00 mov edx, $007F66DC * Reference to: System.@LStrLAsg(void;void;void;void); | 007F612F E888F2C0FF call 004053BC * Possible String Reference to: 'SLV' | 007F6134 BAE8667F00 mov edx, $007F66E8 * Reference to control Label10 : TLabel | 007F6139 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F613F E8700ACDFF call 004C6BB4 007F6144 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 007F614A 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F614C FF5160 call dword ptr [ecx+$60] 007F614F 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C] 007F6155 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6158 E88F47C1FF call 0040A8EC 007F615D 8D9578FFFFFF lea edx, [ebp+$FFFFFF78] 007F6163 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6166 E88147C1FF call 0040A8EC 007F616B 83BD78FFFFFF00 cmp dword ptr [ebp+$FFFFFF78], +$00 007F6172 750D jnz 007F6181 007F6174 8D45DC lea eax, [ebp-$24] 007F6177 BAA0667F00 mov edx, $007F66A0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F617C E83BF2C0FF call 004053BC 007F6181 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] 007F6187 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F618A E85D47C1FF call 0040A8EC 007F618F 8B8574FFFFFF mov eax, [ebp+$FFFFFF74] * Possible String Reference to: 'Money' | 007F6195 BABC667F00 mov edx, $007F66BC * Reference to: System.@LStrCmp; | 007F619A E8A1F5C0FF call 00405740 007F619F 0F84FA000000 jz 007F629F 007F61A5 8D9570FFFFFF lea edx, [ebp+$FFFFFF70] 007F61AB 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F61AE E83947C1FF call 0040A8EC 007F61B3 8B8570FFFFFF mov eax, [ebp+$FFFFFF70] * Possible String Reference to: 'HuiLv' | 007F61B9 BACC667F00 mov edx, $007F66CC * Reference to: System.@LStrCmp; | 007F61BE E87DF5C0FF call 00405740 007F61C3 0F848F000000 jz 007F6258 007F61C9 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61CC E85B75C1FF call 0040D72C 007F61D1 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F61D7 9B wait 007F61D8 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61DB E84C75C1FF call 0040D72C 007F61E0 DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F61E6 DEC9 fmulp st(1), st(0) 007F61E8 DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F61EE 9B wait 007F61EF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F61F2 E83575C1FF call 0040D72C 007F61F7 DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F61FD DEC9 fmulp st(1), st(0) 007F61FF DBBD4CFFFFFF fstp tbyte ptr [ebp+$FFFFFF4C] 007F6205 9B wait 007F6206 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6209 E81E75C1FF call 0040D72C 007F620E DBAD4CFFFFFF fld tbyte ptr [ebp+$FFFFFF4C] 007F6214 DEC9 fmulp st(1), st(0) 007F6216 83C4F4 add esp, -$0C 007F6219 DB3C24 fstp tbyte ptr [esp] 007F621C 9B wait 007F621D 8D45E8 lea eax, [ebp-$18] | 007F6220 E88773C1FF call 0040D5AC 007F6225 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6228 E8FF74C1FF call 0040D72C 007F622D DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F6233 9B wait 007F6234 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6237 E8F074C1FF call 0040D72C 007F623C DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F6242 DEC9 fmulp st(1), st(0) 007F6244 83C4F4 add esp, -$0C 007F6247 DB3C24 fstp tbyte ptr [esp] 007F624A 9B wait 007F624B 8D45F0 lea eax, [ebp-$10] | 007F624E E85973C1FF call 0040D5AC 007F6253 E98C000000 jmp 007F62E4 007F6258 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F625B E8CC74C1FF call 0040D72C 007F6260 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F6266 9B wait 007F6267 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F626A E8BD74C1FF call 0040D72C 007F626F DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F6275 DEC9 fmulp st(1), st(0) 007F6277 DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F627D 9B wait 007F627E 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6281 E8A674C1FF call 0040D72C 007F6286 DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F628C DEC9 fmulp st(1), st(0) 007F628E 83C4F4 add esp, -$0C 007F6291 DB3C24 fstp tbyte ptr [esp] 007F6294 9B wait 007F6295 8D45E8 lea eax, [ebp-$18] | 007F6298 E80F73C1FF call 0040D5AC 007F629D EB45 jmp 007F62E4 007F629F 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62A2 E88574C1FF call 0040D72C 007F62A7 DBBD64FFFFFF fstp tbyte ptr [ebp+$FFFFFF64] 007F62AD 9B wait 007F62AE 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62B1 E87674C1FF call 0040D72C 007F62B6 DBAD64FFFFFF fld tbyte ptr [ebp+$FFFFFF64] 007F62BC DEC9 fmulp st(1), st(0) 007F62BE DBBD58FFFFFF fstp tbyte ptr [ebp+$FFFFFF58] 007F62C4 9B wait 007F62C5 8B45DC mov eax, [ebp-$24] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F62C8 E85F74C1FF call 0040D72C 007F62CD DBAD58FFFFFF fld tbyte ptr [ebp+$FFFFFF58] 007F62D3 DEC9 fmulp st(1), st(0) 007F62D5 83C4F4 add esp, -$0C 007F62D8 DB3C24 fstp tbyte ptr [esp] 007F62DB 9B wait 007F62DC 8D45E8 lea eax, [ebp-$18] | 007F62DF E8C872C1FF call 0040D5AC * Reference to control Label10 : TLabel | 007F62E4 8BB35C030000 mov esi, [ebx+$035C] 007F62EA 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007F62EC E84F21CDFF call 004C8440 * Possible String Reference to: 'Money' | 007F62F1 BABC667F00 mov edx, $007F66BC 007F62F6 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F62F8 E8B708CDFF call 004C6BB4 007F62FD 50 push eax 007F62FE 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6301 E82674C1FF call 0040D72C 007F6306 8D853CFFFFFF lea eax, [ebp+$FFFFFF3C] * Reference to: Variants.@VarFromReal; | 007F630C E87B2AC2FF call 00418D8C 007F6311 8D953CFFFFFF lea edx, [ebp+$FFFFFF3C] 007F6317 58 pop eax 007F6318 8B08 mov ecx, [eax] 007F631A FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 007F6320 BA84667F00 mov edx, $007F6684 007F6325 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F6327 E88808CDFF call 004C6BB4 007F632C 50 push eax 007F632D 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007F6330 E8F773C1FF call 0040D72C 007F6335 8D852CFFFFFF lea eax, [ebp+$FFFFFF2C] * Reference to: Variants.@VarFromReal; | 007F633B E84C2AC2FF call 00418D8C 007F6340 8D952CFFFFFF lea edx, [ebp+$FFFFFF2C] 007F6346 58 pop eax 007F6347 8B08 mov ecx, [eax] 007F6349 FF91B4000000 call dword ptr [ecx+$00B4] 007F634F 8BC6 mov eax, esi 007F6351 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007F6353 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007F6359 8BB30C030000 mov esi, [ebx+$030C] 007F635F 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 007F6361 E86EF5CCFF call 004C58D4 007F6366 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007F6368 E83F7CCEFF call 004DDFAC 007F636D 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007F636F FF5244 call dword ptr [edx+$44] 007F6372 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007F6374 E8337CCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F6379 BAF4667F00 mov edx, $007F66F4 007F637E 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F6380 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F6383 6810677F00 push $007F6710 007F6388 FF75E0 push dword ptr [ebp-$20] 007F638B 6820677F00 push $007F6720 007F6390 8D9524FFFFFF lea edx, [ebp+$FFFFFF24] 007F6396 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F6399 E84E45C1FF call 0040A8EC 007F639E FFB524FFFFFF push dword ptr [ebp+$FFFFFF24] 007F63A4 8D8528FFFFFF lea eax, [ebp+$FFFFFF28] 007F63AA BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F63AF E800F3C0FF call 004056B4 007F63B4 8B8528FFFFFF mov eax, [ebp+$FFFFFF28] 007F63BA 50 push eax 007F63BB 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007F63BD E8EA7BCEFF call 004DDFAC 007F63C2 5A pop edx 007F63C3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F63C5 FF5138 call dword ptr [ecx+$38] 007F63C8 8D9520FFFFFF lea edx, [ebp+$FFFFFF20] 007F63CE 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F63D1 E81645C1FF call 0040A8EC 007F63D6 8B8520FFFFFF mov eax, [ebp+$FFFFFF20] * Possible String Reference to: 'Money' | 007F63DC BABC667F00 mov edx, $007F66BC * Reference to: System.@LStrCmp; | 007F63E1 E85AF3C0FF call 00405740 007F63E6 7427 jz 007F640F 007F63E8 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007F63EA E8BD7BCEFF call 004DDFAC 007F63EF 50 push eax 007F63F0 8D851CFFFFFF lea eax, [ebp+$FFFFFF1C] 007F63F6 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 007F63F9 BA2C677F00 mov edx, $007F672C * Reference to: System.@LStrCat3; | 007F63FE E83DF2C0FF call 00405640 007F6403 8B951CFFFFFF mov edx, [ebp+$FFFFFF1C] 007F6409 58 pop eax 007F640A 8B08 mov ecx, [eax] 007F640C FF5138 call dword ptr [ecx+$38] 007F640F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007F6411 E8967BCEFF call 004DDFAC 007F6416 50 push eax 007F6417 8D8518FFFFFF lea eax, [ebp+$FFFFFF18] 007F641D 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 007F6420 BA3C677F00 mov edx, $007F673C * Reference to: System.@LStrCat3; | 007F6425 E816F2C0FF call 00405640 007F642A 8B9518FFFFFF mov edx, [ebp+$FFFFFF18] 007F6430 58 pop eax 007F6431 8B08 mov ecx, [eax] 007F6433 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F6436 6850677F00 push $007F6750 007F643B 8D9510FFFFFF lea edx, [ebp+$FFFFFF10] *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F66F5(Sender : TObject); begin (* 007F66F5 50 push eax 007F66F6 6461 popa 007F66F8 7465 jz 007F675F 007F66FA 205946 and [ecx+$46], bl 007F66FD 5F pop edi 007F66FE 4D dec ebp 007F66FF 6F outsd 007F6700 6E outsb 007F6701 65795F jns 007F6763 007F6704 43 inc ebx 007F6705 52 push edx 007F6706 2000 and [eax], al 007F6708 FFFF DB $FF, $FF // 007F670A FFFF DB $FF, $FF // 007F670C 0500000020 add eax, +$20000000 007F6711 53 push ebx 007F6712 657420 jz 007F6735 007F6715 0000 add [eax], al 007F6717 00FF add bh, bh 007F6719 FFFF DB $FF, $FF // 007F671B FF01 inc dword ptr [ecx] 007F671D 0000 add [eax], al 007F671F 003D000000FF add [$FF000000], bh 007F6725 FFFF DB $FF, $FF // 007F6727 FF07 inc dword ptr [edi] 007F6729 0000 add [eax], al 007F672B 002C4D6F6E6579 add [$79656E6F+ecx*2], ch 007F6732 3D00FFFFFF cmp eax, $FFFFFF00 007F6737 FF09 dec dword ptr [ecx] 007F6739 0000 add [eax], al 007F673B 002C42 add [edx+eax*2], ch 007F673E 42 inc edx 007F673F 4D dec ebp 007F6740 6F outsd 007F6741 6E outsb 007F6742 65793D jns 007F6782 007F6745 0000 add [eax], al 007F6747 00FF add bh, bh 007F6749 FFFF DB $FF, $FF // 007F674B FF09 dec dword ptr [ecx] 007F674D 0000 add [eax], al 007F674F 002C4564697465 add [$65746964+eax*2], ch 007F6756 723D jb 007F6795 007F6758 27 daa 007F6759 0000 add [eax], al 007F675B 00FF add bh, bh 007F675D FFFF DB $FF, $FF // 007F675F FF1400 call dword ptr [eax+eax] 007F6762 0000 add [eax], al 007F6764 2C45 sub al, $45 007F6766 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F676F 657464 jz 007F67D6 007F6772 61 popa 007F6773 7465 jz 007F67DA 007F6775 2829 sub [ecx], ch 007F6777 2000 and [eax], al 007F6779 0000 add [eax], al 007F677B 00FF add bh, bh 007F677D FFFF DB $FF, $FF // 007F677F FF0D00000020 dec dword ptr [$20000000] 007F6785 7768 jnbe 007F67EF 007F6787 657265 jb 007F67EF 007F678A 205946 and [ecx+$46], bl 007F678D 49 dec ecx 007F678E 643D27000000 cmp eax, $00000027 007F6794 FFFF DB $FF, $FF // 007F6796 FFFF DB $FF, $FF // 007F6798 0400 add al, +$00 007F679A 0000 add [eax], al 007F679C 59 pop ecx 007F679D 46 inc esi 007F679E 49 dec ecx 007F679F 640000 add fs:[eax], al 007F67A2 0000 add [eax], al 007F67A4 FFFF DB $FF, $FF // 007F67A6 FFFF DB $FF, $FF // 007F67A8 2B00 sub eax, dword ptr [eax] 007F67AA 0000 add [eax], al 007F67AC 55 push ebp 007F67AD 7064 jo 007F6813 007F67AF 61 popa 007F67B0 7465 jz 007F6817 007F67B2 205946 and [ecx+$46], bl 007F67B5 5F pop edi 007F67B6 4D dec ebp 007F67B7 6F outsd 007F67B8 6E outsb 007F67B9 65795F jns 007F681B 007F67BC 4B dec ebx 007F67BD 43 inc ebx 007F67BE 205365 and [ebx+$65], dl 007F67C1 7420 jz 007F67E3 007F67C3 4B dec ebx 007F67C4 43 inc ebx 007F67C5 42 inc edx 007F67C6 42 inc edx 007F67C7 4D dec ebp 007F67C8 6F outsd 007F67C9 6E outsb 007F67CA 65793D jns 007F680A 007F67CD 4B dec ebx 007F67CE 43 inc ebx 007F67CF 42 inc edx 007F67D0 42 inc edx 007F67D1 4D dec ebp 007F67D2 6F outsd 007F67D3 6E outsb 007F67D4 65792D jns 007F6804 007F67D7 00FF add bh, bh 007F67D9 FFFF DB $FF, $FF // 007F67DB FF01 inc dword ptr [ecx] 007F67DD 0000 add [eax], al 007F67DF 002B add [ebx], ch 007F67E1 0000 add [eax], al 007F67E3 00FF add bh, bh 007F67E5 FFFF DB $FF, $FF // 007F67E7 FF0D00000020 dec dword ptr [$20000000] 007F67ED 7768 jnbe 007F6857 007F67EF 657265 jb 007F6857 007F67F2 204352 and [ebx+$52], al 007F67F5 49 dec ecx 007F67F6 44 inc esp 007F67F7 3D27000000 cmp eax, $00000027 007F67FC FFFF DB $FF, $FF // 007F67FE FFFF DB $FF, $FF // 007F6800 0400 add al, +$00 007F6802 0000 add [eax], al 007F6804 43 inc ebx 007F6805 52 push edx 007F6806 49 dec ecx 007F6807 44 inc esp 007F6808 0000 add [eax], al 007F680A 0000 add [eax], al 007F680C 55 push ebp 007F680D 8BEC mov ebp, esp 007F680F B909000000 mov ecx, $00000009 007F6814 6A00 push $00 007F6816 6A00 push $00 007F6818 49 dec ecx 007F6819 75F9 jnz 007F6814 007F681B 51 push ecx 007F681C 53 push ebx 007F681D 56 push esi 007F681E 8BDA mov ebx, edx 007F6820 8BF0 mov esi, eax 007F6822 33C0 xor eax, eax 007F6824 55 push ebp * Possible String Reference to: '閺嗬胫^[嬪]' | 007F6825 68606A7F00 push $007F6A60 ***** TRY | 007F682A 64FF30 push dword ptr fs:[eax] 007F682D 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 007F6830 BA786A7F00 mov edx, $007F6A78 * Reference to control Label10 : TLabel | 007F6835 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F683B E87403CDFF call 004C6BB4 007F6840 8D55F0 lea edx, [ebp-$10] 007F6843 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F6845 FF5160 call dword ptr [ecx+$60] 007F6848 8B45F0 mov eax, [ebp-$10] 007F684B 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F684E E89940C1FF call 0040A8EC 007F6853 837DF400 cmp dword ptr [ebp-$0C], +$00 007F6857 741D jz 007F6876 007F6859 6A00 push $00 * Possible String Reference to: '提示' | 007F685B B9806A7F00 mov ecx, $007F6A80 * Possible String Reference to: '自动生成数据不能更改!' | 007F6860 BA886A7F00 mov edx, $007F6A88 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F6AA9(Sender : TObject); begin (* 007F6AA9 50 push eax 007F6AAA 6461 popa 007F6AAC 7465 jz 007F6B13 007F6AAE 205946 and [ecx+$46], bl 007F6AB1 5F pop edi 007F6AB2 4D dec ebp 007F6AB3 6F outsd 007F6AB4 6E outsb 007F6AB5 65795F jns 007F6B17 007F6AB8 43 inc ebx 007F6AB9 52 push edx 007F6ABA 2000 and [eax], al 007F6ABC FFFF DB $FF, $FF // 007F6ABE FFFF DB $FF, $FF // 007F6AC0 0500000020 add eax, +$20000000 007F6AC5 53 push ebx 007F6AC6 657420 jz 007F6AE9 007F6AC9 0000 add [eax], al 007F6ACB 00FF add bh, bh 007F6ACD FFFF DB $FF, $FF // 007F6ACF FF02 inc dword ptr [edx] 007F6AD1 0000 add [eax], al 007F6AD3 003D270000FF add [$FF000027], bh 007F6AD9 FFFF DB $FF, $FF // 007F6ADB FF01 inc dword ptr [ecx] 007F6ADD 0000 add [eax], al 007F6ADF 0027 add [edi], ah 007F6AE1 0000 add [eax], al 007F6AE3 00FF add bh, bh 007F6AE5 FFFF DB $FF, $FF // 007F6AE7 FF050000003D inc dword ptr [$3D000000] 007F6AED 4E dec esi 007F6AEE 55 push ebp 007F6AEF 4C dec esp 007F6AF0 4C dec esp 007F6AF1 0000 add [eax], al 007F6AF3 00FF add bh, bh 007F6AF5 FFFF DB $FF, $FF // 007F6AF7 FF09 dec dword ptr [ecx] 007F6AF9 0000 add [eax], al 007F6AFB 002C4564697465 add [$65746964+eax*2], ch 007F6B02 723D jb 007F6B41 007F6B04 27 daa 007F6B05 0000 add [eax], al 007F6B07 00FF add bh, bh 007F6B09 FFFF DB $FF, $FF // 007F6B0B FF1400 call dword ptr [eax+eax] 007F6B0E 0000 add [eax], al 007F6B10 2C45 sub al, $45 007F6B12 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F6B1B 657464 jz 007F6B82 007F6B1E 61 popa 007F6B1F 7465 jz 007F6B86 007F6B21 2829 sub [ecx], ch 007F6B23 2000 and [eax], al 007F6B25 0000 add [eax], al 007F6B27 00FF add bh, bh 007F6B29 FFFF DB $FF, $FF // 007F6B2B FF0D00000020 dec dword ptr [$20000000] 007F6B31 7768 jnbe 007F6B9B 007F6B33 657265 jb 007F6B9B 007F6B36 205946 and [ecx+$46], bl 007F6B39 49 dec ecx 007F6B3A 643D27000000 cmp eax, $00000027 007F6B40 FFFF DB $FF, $FF // 007F6B42 FFFF DB $FF, $FF // 007F6B44 0400 add al, +$00 007F6B46 0000 add [eax], al 007F6B48 59 pop ecx 007F6B49 46 inc esi 007F6B4A 49 dec ecx 007F6B4B 640000 add fs:[eax], al 007F6B4E 0000 add [eax], al 007F6B50 55 push ebp 007F6B51 8BEC mov ebp, esp 007F6B53 B90E000000 mov ecx, $0000000E 007F6B58 6A00 push $00 007F6B5A 6A00 push $00 007F6B5C 49 dec ecx 007F6B5D 75F9 jnz 007F6B58 007F6B5F 51 push ecx 007F6B60 56 push esi 007F6B61 57 push edi 007F6B62 8BF8 mov edi, eax 007F6B64 33C0 xor eax, eax 007F6B66 55 push ebp 007F6B67 68EA6C7F00 push $007F6CEA ***** TRY | 007F6B6C 64FF30 push dword ptr fs:[eax] 007F6B6F 648920 mov fs:[eax], esp 007F6B72 8BB75C030000 mov esi, [edi+$035C] 007F6B78 8BC6 mov eax, esi | 007F6B7A E8111ACDFF call 004C8590 * Possible String Reference to: 'CRTime' | 007F6B7F BA006D7F00 mov edx, $007F6D00 007F6B84 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F6B86 E82900CDFF call 004C6BB4 007F6B8B 50 push eax 007F6B8C 8B8708030000 mov eax, [edi+$0308] | 007F6B92 E8F1DDFBFF call 007B4988 007F6B97 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarFromTDateTime; | 007F6B9A E80122C2FF call 00418DA0 007F6B9F 8D55F0 lea edx, [ebp-$10] 007F6BA2 58 pop eax 007F6BA3 8B08 mov ecx, [eax] 007F6BA5 FF91B4000000 call dword ptr [ecx+$00B4] 007F6BAB 8D55DC lea edx, [ebp-$24] *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F71BD(Sender : TObject); begin (* 007F71BD 50 push eax 007F71BE 6461 popa 007F71C0 7465 jz 007F7227 007F71C2 205946 and [ecx+$46], bl 007F71C5 5F pop edi 007F71C6 4D dec ebp 007F71C7 6F outsd 007F71C8 6E outsb 007F71C9 65795F jns 007F722B 007F71CC 43 inc ebx 007F71CD 52 push edx 007F71CE 2000 and [eax], al 007F71D0 FFFF DB $FF, $FF // 007F71D2 FFFF DB $FF, $FF // 007F71D4 0D00000020 or eax, $20000000 007F71D9 53 push ebx 007F71DA 657420 jz 007F71FD 007F71DD 59 pop ecx 007F71DE 46 inc esi 007F71DF 43 inc ebx 007F71E0 6F outsd 007F71E1 64653D27000000 cmp eax, $00000027 007F71E8 FFFF DB $FF, $FF // 007F71EA FFFF DB $FF, $FF // 007F71EC 0100 add [eax], eax 007F71EE 0000 add [eax], al 007F71F0 27 daa 007F71F1 0000 add [eax], al 007F71F3 00FF add bh, bh 007F71F5 FFFF DB $FF, $FF // 007F71F7 FF0A dec dword ptr [edx] 007F71F9 0000 add [eax], al 007F71FB 0020 add [eax], ah 007F71FD 2C59 sub al, $59 007F71FF 46 inc esi 007F7200 4E dec esi 007F7201 61 popa 007F7202 6D insd 007F7203 653D270000FF cmp eax, $FF000027 007F7209 FFFF DB $FF, $FF // 007F720B FF09 dec dword ptr [ecx] 007F720D 0000 add [eax], al 007F720F 002C4564697465 add [$65746964+eax*2], ch 007F7216 723D jb 007F7255 007F7218 27 daa 007F7219 0000 add [eax], al 007F721B 00FF add bh, bh 007F721D FFFF DB $FF, $FF // 007F721F FF1400 call dword ptr [eax+eax] 007F7222 0000 add [eax], al 007F7224 2C45 sub al, $45 007F7226 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F722F 657464 jz 007F7296 007F7232 61 popa 007F7233 7465 jz 007F729A 007F7235 2829 sub [ecx], ch 007F7237 2000 and [eax], al 007F7239 0000 add [eax], al 007F723B 00FF add bh, bh 007F723D FFFF DB $FF, $FF // 007F723F FF0D00000020 dec dword ptr [$20000000] 007F7245 7768 jnbe 007F72AF 007F7247 657265 jb 007F72AF 007F724A 205946 and [ecx+$46], bl 007F724D 49 dec ecx 007F724E 643D27000000 cmp eax, $00000027 007F7254 FFFF DB $FF, $FF // 007F7256 FFFF DB $FF, $FF // 007F7258 0400 add al, +$00 007F725A 0000 add [eax], al 007F725C 59 pop ecx 007F725D 46 inc esi 007F725E 49 dec ecx 007F725F 640000 add fs:[eax], al 007F7262 0000 add [eax], al 007F7264 55 push ebp 007F7265 8BEC mov ebp, esp 007F7267 51 push ecx 007F7268 B906000000 mov ecx, $00000006 007F726D 6A00 push $00 007F726F 6A00 push $00 007F7271 49 dec ecx 007F7272 75F9 jnz 007F726D 007F7274 51 push ecx 007F7275 874DFC xchg [ebp-$04], ecx 007F7278 53 push ebx 007F7279 56 push esi 007F727A 8BF0 mov esi, eax 007F727C 33C0 xor eax, eax 007F727E 55 push ebp * Possible String Reference to: '2掷脬^[嬪]' | 007F727F 68BD747F00 push $007F74BD ***** TRY | 007F7284 64FF30 push dword ptr fs:[eax] 007F7287 648920 mov fs:[eax], esp 007F728A 33C0 xor eax, eax 007F728C 55 push ebp 007F728D 6893747F00 push $007F7493 ***** TRY | 007F7292 64FF30 push dword ptr fs:[eax] 007F7295 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F74DA(Sender : TObject); begin (* 007F74DA 6E outsb 007F74DB 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 007F74E3 FF08 dec dword ptr [eax] 007F74E5 0000 add [eax], al *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F7510(Sender : TObject); begin (* 007F7510 6E outsb 007F7511 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 007F7519 0000 add [eax], al *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F751D(Sender : TObject); begin (* 007F751D 50 push eax 007F751E 6461 popa 007F7520 7465 jz 007F7587 007F7522 205946 and [ecx+$46], bl 007F7525 5F pop edi 007F7526 4D dec ebp 007F7527 6F outsd 007F7528 6E outsb 007F7529 65795F jns 007F758B 007F752C 43 inc ebx 007F752D 52 push edx 007F752E 2000 and [eax], al 007F7530 FFFF DB $FF, $FF // 007F7532 FFFF DB $FF, $FF // 007F7534 0E push cs 007F7535 0000 add [eax], al 007F7537 0020 add [eax], ah 007F7539 53 push ebx 007F753A 657420 jz 007F755D 007F753D 51 push ecx 007F753E 7479 jz 007F75B9 007F7540 55 push ebp 007F7541 6E outsb 007F7542 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 007F754A FFFF DB $FF, $FF // 007F754C 07 pop es 007F754D 0000 add [eax], al 007F754F 005A64 add [edx+$64], bl 007F7552 794E jns 007F75A2 007F7554 61 popa 007F7555 6D insd 007F7556 6500FF add bh, bh 007F7559 FFFF DB $FF, $FF // 007F755B FF01 inc dword ptr [ecx] 007F755D 0000 add [eax], al 007F755F 0027 add [edi], ah 007F7561 0000 add [eax], al 007F7563 00FF add bh, bh 007F7565 FFFF DB $FF, $FF // 007F7567 FF09 dec dword ptr [ecx] 007F7569 0000 add [eax], al 007F756B 002C4564697465 add [$65746964+eax*2], ch 007F7572 723D jb 007F75B1 007F7574 27 daa 007F7575 0000 add [eax], al 007F7577 00FF add bh, bh 007F7579 FFFF DB $FF, $FF // 007F757B FF1400 call dword ptr [eax+eax] 007F757E 0000 add [eax], al 007F7580 2C45 sub al, $45 007F7582 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F758B 657464 jz 007F75F2 007F758E 61 popa 007F758F 7465 jz 007F75F6 007F7591 2829 sub [ecx], ch 007F7593 2000 and [eax], al 007F7595 0000 add [eax], al 007F7597 00FF add bh, bh 007F7599 FFFF DB $FF, $FF // 007F759B FF0D00000020 dec dword ptr [$20000000] 007F75A1 7768 jnbe 007F760B 007F75A3 657265 jb 007F760B 007F75A6 205946 and [ecx+$46], bl 007F75A9 49 dec ecx 007F75AA 643D27000000 cmp eax, $00000027 007F75B0 FFFF DB $FF, $FF // 007F75B2 FFFF DB $FF, $FF // 007F75B4 0400 add al, +$00 007F75B6 0000 add [eax], al 007F75B8 59 pop ecx 007F75B9 46 inc esi 007F75BA 49 dec ecx 007F75BB 640000 add fs:[eax], al 007F75BE 0000 add [eax], al 007F75C0 55 push ebp 007F75C1 8BEC mov ebp, esp 007F75C3 51 push ecx 007F75C4 B906000000 mov ecx, $00000006 007F75C9 6A00 push $00 007F75CB 6A00 push $00 007F75CD 49 dec ecx 007F75CE 75F9 jnz 007F75C9 007F75D0 51 push ecx 007F75D1 874DFC xchg [ebp-$04], ecx 007F75D4 53 push ebx 007F75D5 56 push esi 007F75D6 8BF0 mov esi, eax 007F75D8 33C0 xor eax, eax 007F75DA 55 push ebp * Possible String Reference to: '橹依脬^[嬪]' | 007F75DB 6819787F00 push $007F7819 ***** TRY | 007F75E0 64FF30 push dword ptr fs:[eax] 007F75E3 648920 mov fs:[eax], esp 007F75E6 33C0 xor eax, eax 007F75E8 55 push ebp 007F75E9 68EF777F00 push $007F77EF ***** TRY | 007F75EE 64FF30 push dword ptr fs:[eax] 007F75F1 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F7879(Sender : TObject); begin (* 007F7879 50 push eax 007F787A 6461 popa 007F787C 7465 jz 007F78E3 007F787E 205946 and [ecx+$46], bl 007F7881 5F pop edi 007F7882 4D dec ebp 007F7883 6F outsd 007F7884 6E outsb 007F7885 65795F jns 007F78E7 007F7888 43 inc ebx 007F7889 52 push edx 007F788A 2000 and [eax], al 007F788C FFFF DB $FF, $FF // 007F788E FFFF DB $FF, $FF // 007F7890 1100 adc [eax], eax 007F7892 0000 add [eax], al 007F7894 205365 and [ebx+$65], dl 007F7897 7420 jz 007F78B9 007F7899 50 push eax 007F789A 5F pop edi 007F789B 43 inc ebx 007F789C 6F outsd 007F789D 64654E dec esi 007F78A0 61 popa 007F78A1 6D insd 007F78A2 653D27000000 cmp eax, $00000027 007F78A8 FFFF DB $FF, $FF // 007F78AA FFFF DB $FF, $FF // 007F78AC 07 pop es 007F78AD 0000 add [eax], al 007F78AF 005A64 add [edx+$64], bl 007F78B2 794E jns 007F7902 007F78B4 61 popa 007F78B5 6D insd 007F78B6 6500FF add bh, bh 007F78B9 FFFF DB $FF, $FF // 007F78BB FF01 inc dword ptr [ecx] 007F78BD 0000 add [eax], al 007F78BF 0027 add [edi], ah 007F78C1 0000 add [eax], al 007F78C3 00FF add bh, bh 007F78C5 FFFF DB $FF, $FF // 007F78C7 FF09 dec dword ptr [ecx] 007F78C9 0000 add [eax], al 007F78CB 002C4564697465 add [$65746964+eax*2], ch 007F78D2 723D jb 007F7911 007F78D4 27 daa 007F78D5 0000 add [eax], al 007F78D7 00FF add bh, bh 007F78D9 FFFF DB $FF, $FF // 007F78DB FF1400 call dword ptr [eax+eax] 007F78DE 0000 add [eax], al 007F78E0 2C45 sub al, $45 007F78E2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F78EB 657464 jz 007F7952 007F78EE 61 popa 007F78EF 7465 jz 007F7956 007F78F1 2829 sub [ecx], ch 007F78F3 2000 and [eax], al 007F78F5 0000 add [eax], al 007F78F7 00FF add bh, bh 007F78F9 FFFF DB $FF, $FF // 007F78FB FF0D00000020 dec dword ptr [$20000000] 007F7901 7768 jnbe 007F796B 007F7903 657265 jb 007F796B 007F7906 205946 and [ecx+$46], bl 007F7909 49 dec ecx 007F790A 643D27000000 cmp eax, $00000027 007F7910 FFFF DB $FF, $FF // 007F7912 FFFF DB $FF, $FF // 007F7914 0400 add al, +$00 007F7916 0000 add [eax], al 007F7918 59 pop ecx 007F7919 46 inc esi 007F791A 49 dec ecx 007F791B 640000 add fs:[eax], al 007F791E 0000 add [eax], al 007F7920 53 push ebx 007F7921 8BD8 mov ebx, eax * Reference to control ToolButton1 : TToolButton | 007F7923 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F7929 E89205CDFF call 004C7EC0 007F792E 84C0 test al, al 007F7930 7516 jnz 007F7948 * Possible String Reference to: '应收款列表' | 007F7932 B954797F00 mov ecx, $007F7954 * Reference to control ToolButton1 : TToolButton | 007F7937 8B9320030000 mov edx, [ebx+$0320] * Reference to control v1PRTColor : N.A. | 007F793D 8B8334030000 mov eax, [ebx+$0334] | 007F7943 E8E808FCFF call 007B8230 007F7948 5B pop ebx 007F7949 C3 ret 007F794A 0000 add [eax], al 007F794C FFFF DB $FF, $FF // 007F794E FFFF DB $FF, $FF // 007F7950 0A00 or al, byte ptr [eax] 007F7952 0000 add [eax], al 007F7954 D3A6CAD5BFEE shl dword ptr [esi+$EEBFD5CA], cl 007F795A C1D0B1 rcl eax, $B1 007F795D ED in eax, dx 007F795E 0000 add [eax], al 007F7960 55 push ebp 007F7961 8BEC mov ebp, esp 007F7963 51 push ecx 007F7964 B919000000 mov ecx, $00000019 007F7969 6A00 push $00 007F796B 6A00 push $00 007F796D 49 dec ecx 007F796E 75F9 jnz 007F7969 007F7970 874DFC xchg [ebp-$04], ecx 007F7973 53 push ebx 007F7974 8945FC mov [ebp-$04], eax 007F7977 33C0 xor eax, eax 007F7979 55 push ebp * Possible String Reference to: '轾死雽[嬪]' | 007F797A 68F67E7F00 push $007F7EF6 ***** TRY | 007F797F 64FF30 push dword ptr fs:[eax] 007F7982 648920 mov fs:[eax], esp 007F7985 33C0 xor eax, eax 007F7987 55 push ebp 007F7988 68757E7F00 push $007F7E75 ***** TRY | 007F798D 64FF30 push dword ptr fs:[eax] 007F7990 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F7F8D(Sender : TObject); begin (* 007F7F8D 50 push eax 007F7F8E 6461 popa 007F7F90 7465 jz 007F7FF7 007F7F92 205946 and [ecx+$46], bl 007F7F95 5F pop edi 007F7F96 4D dec ebp 007F7F97 6F outsd 007F7F98 6E outsb 007F7F99 65795F jns 007F7FFB 007F7F9C 43 inc ebx 007F7F9D 52 push edx 007F7F9E 2000 and [eax], al 007F7FA0 FFFF DB $FF, $FF // 007F7FA2 FFFF DB $FF, $FF // 007F7FA4 0D00000020 or eax, $20000000 007F7FA9 53 push ebx 007F7FAA 657420 jz 007F7FCD 007F7FAD 4D dec ebp 007F7FAE 61 popa 007F7FAF 696E49643D2700 imul ebp, [esi+$49], $00273D64 007F7FB6 0000 add [eax], al 007F7FB8 FFFF DB $FF, $FF // 007F7FBA FFFF DB $FF, $FF // 007F7FBC 0100 add [eax], eax 007F7FBE 0000 add [eax], al 007F7FC0 27 daa 007F7FC1 0000 add [eax], al 007F7FC3 00FF add bh, bh 007F7FC5 FFFF DB $FF, $FF // 007F7FC7 FF09 dec dword ptr [ecx] 007F7FC9 0000 add [eax], al 007F7FCB 0020 add [eax], ah 007F7FCD 2C53 sub al, $53 007F7FCF 7562 jnz 007F8033 007F7FD1 49 dec ecx 007F7FD2 643D27000000 cmp eax, $00000027 007F7FD8 FFFF DB $FF, $FF // 007F7FDA FFFF DB $FF, $FF // 007F7FDC 0500000053 add eax, +$53000000 007F7FE1 7562 jnz 007F8045 007F7FE3 49 dec ecx 007F7FE4 640000 add fs:[eax], al 007F7FE7 00FF add bh, bh 007F7FE9 FFFF DB $FF, $FF // 007F7FEB FF0E dec dword ptr [esi] 007F7FED 0000 add [eax], al 007F7FEF 0020 add [eax], ah 007F7FF1 2C70 sub al, $70 007F7FF3 5F pop edi 007F7FF4 43 inc ebx 007F7FF5 6F outsd 007F7FF6 64654E dec esi 007F7FF9 61 popa 007F7FFA 6D insd 007F7FFB 653D270000FF cmp eax, $FF000027 007F8001 FFFF DB $FF, $FF // 007F8003 FF0A dec dword ptr [edx] 007F8005 0000 add [eax], al 007F8007 0020 add [eax], ah 007F8009 2C50 sub al, $50 007F800B 5F pop edi 007F800C 53 push ebx 007F800D 7065 jo 007F8074 007F800F 633D270000FF arpl [$FF000027], di 007F8015 FFFF DB $FF, $FF // 007F8017 FF0B dec dword ptr [ebx] 007F8019 0000 add [eax], al 007F801B 0020 add [eax], ah 007F801D 2C4F sub al, $4F 007F801F 7264 jb 007F8085 007F8021 65724E jb 007F8072 007F8024 6F outsd 007F8025 3D2700FFFF cmp eax, $FFFF0027 007F802A FFFF DB $FF, $FF // 007F802C 0900 or [eax], eax 007F802E 0000 add [eax], al 007F8030 2C45 sub al, $45 007F8032 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D 007F803B 00FF add bh, bh 007F803D FFFF DB $FF, $FF // 007F803F FF1400 call dword ptr [eax+eax] 007F8042 0000 add [eax], al 007F8044 2C45 sub al, $45 007F8046 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F804F 657464 jz 007F80B6 007F8052 61 popa 007F8053 7465 jz 007F80BA 007F8055 2829 sub [ecx], ch 007F8057 2000 and [eax], al 007F8059 0000 add [eax], al 007F805B 00FF add bh, bh 007F805D FFFF DB $FF, $FF // 007F805F FF0D00000020 dec dword ptr [$20000000] 007F8065 7768 jnbe 007F80CF 007F8067 657265 jb 007F80CF 007F806A 205946 and [ecx+$46], bl 007F806D 49 dec ecx 007F806E 643D27000000 cmp eax, $00000027 007F8074 FFFF DB $FF, $FF // 007F8076 FFFF DB $FF, $FF // 007F8078 0400 add al, +$00 007F807A 0000 add [eax], al 007F807C 59 pop ecx 007F807D 46 inc esi 007F807E 49 dec ecx 007F807F 640000 add fs:[eax], al 007F8082 0000 add [eax], al 007F8084 55 push ebp 007F8085 8BEC mov ebp, esp 007F8087 B908000000 mov ecx, $00000008 007F808C 6A00 push $00 007F808E 6A00 push $00 007F8090 49 dec ecx 007F8091 75F9 jnz 007F808C 007F8093 53 push ebx 007F8094 56 push esi 007F8095 8BDA mov ebx, edx 007F8097 8BF0 mov esi, eax 007F8099 33C0 xor eax, eax 007F809B 55 push ebp * Possible String Reference to: '閮壤胫^[嬪]' | 007F809C 686C827F00 push $007F826C ***** TRY | 007F80A1 64FF30 push dword ptr fs:[eax] 007F80A4 648920 mov fs:[eax], esp 007F80A7 8D55FC lea edx, [ebp-$04] 007F80AA 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; | 007F80AC E80B76D9FF call 0058F6BC 007F80B1 8D55F4 lea edx, [ebp-$0C] 007F80B4 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F80B7 E83028C1FF call 0040A8EC 007F80BC 837DF400 cmp dword ptr [ebp-$0C], +$00 007F80C0 750D jnz 007F80CF 007F80C2 8D45FC lea eax, [ebp-$04] 007F80C5 BA84827F00 mov edx, $007F8284 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F80CA E8EDD2C0FF call 004053BC * Reference to control v1PRTColor : N.A. | 007F80CF 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; | 007F80D5 E87242E6FF 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; | 007F80DA E8859AE5FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007F80DF 8B4050 mov eax, [eax+$50] 007F80E2 8D55F0 lea edx, [ebp-$10] 007F80E5 8B08 mov ecx, [eax] 007F80E7 FF5110 call dword ptr [ecx+$10] 007F80EA 8B45F0 mov eax, [ebp-$10] 007F80ED 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F80F0 E8F727C1FF call 0040A8EC * Reference to control Label10 : TLabel | 007F80F5 8B9E5C030000 mov ebx, [esi+$035C] 007F80FB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F80FD E83E03CDFF call 004C8440 007F8102 8D55DC lea edx, [ebp-$24] 007F8105 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8108 E8DF27C1FF call 0040A8EC 007F810D 8B55DC mov edx, [ebp-$24] 007F8110 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F8113 E8B00CC2FF call 00418DC8 007F8118 8D45E0 lea eax, [ebp-$20] 007F811B 50 push eax 007F811C 8B55F8 mov edx, [ebp-$08] 007F811F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8121 E88EEACCFF call 004C6BB4 007F8126 5A pop edx 007F8127 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 007F8129 FF91B4000000 call dword ptr [ecx+$00B4] 007F812F 8BC3 mov eax, ebx 007F8131 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007F8133 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007F8139 8B9E0C030000 mov ebx, [esi+$030C] 007F813F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8141 E88ED7CCFF call 004C58D4 007F8146 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; | 007F8148 E85F5ECEFF call 004DDFAC 007F814D 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007F814F FF5244 call dword ptr [edx+$44] 007F8152 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; | 007F8154 E8535ECEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F8159 BA90827F00 mov edx, $007F8290 007F815E 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F8160 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F8163 68AC827F00 push $007F82AC 007F8168 FF75F8 push dword ptr [ebp-$08] 007F816B 68BC827F00 push $007F82BC 007F8170 8D55D4 lea edx, [ebp-$2C] 007F8173 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8176 E87127C1FF call 0040A8EC 007F817B FF75D4 push dword ptr [ebp-$2C] 007F817E 8D45D8 lea eax, [ebp-$28] 007F8181 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F8186 E829D5C0FF call 004056B4 007F818B 8B45D8 mov eax, [ebp-$28] 007F818E 50 push eax 007F818F 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; | 007F8191 E8165ECEFF call 004DDFAC 007F8196 5A pop edx 007F8197 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F8199 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F819C 68C8827F00 push $007F82C8 007F81A1 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F8291(Sender : TObject); begin (* 007F8291 50 push eax 007F8292 6461 popa 007F8294 7465 jz 007F82FB 007F8296 205946 and [ecx+$46], bl 007F8299 5F pop edi 007F829A 4D dec ebp 007F829B 6F outsd 007F829C 6E outsb 007F829D 65795F jns 007F82FF 007F82A0 43 inc ebx 007F82A1 52 push edx 007F82A2 2000 and [eax], al 007F82A4 FFFF DB $FF, $FF // 007F82A6 FFFF DB $FF, $FF // 007F82A8 0500000020 add eax, +$20000000 007F82AD 53 push ebx 007F82AE 657420 jz 007F82D1 007F82B1 0000 add [eax], al 007F82B3 00FF add bh, bh 007F82B5 FFFF DB $FF, $FF // 007F82B7 FF01 inc dword ptr [ecx] 007F82B9 0000 add [eax], al 007F82BB 003D000000FF add [$FF000000], bh 007F82C1 FFFF DB $FF, $FF // 007F82C3 FF09 dec dword ptr [ecx] 007F82C5 0000 add [eax], al 007F82C7 002C4564697465 add [$65746964+eax*2], ch 007F82CE 723D jb 007F830D 007F82D0 27 daa 007F82D1 0000 add [eax], al 007F82D3 00FF add bh, bh 007F82D5 FFFF DB $FF, $FF // 007F82D7 FF01 inc dword ptr [ecx] 007F82D9 0000 add [eax], al 007F82DB 0027 add [edi], ah 007F82DD 0000 add [eax], al 007F82DF 00FF add bh, bh 007F82E1 FFFF DB $FF, $FF // 007F82E3 FF1400 call dword ptr [eax+eax] 007F82E6 0000 add [eax], al 007F82E8 2C45 sub al, $45 007F82EA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F82F3 657464 jz 007F835A 007F82F6 61 popa 007F82F7 7465 jz 007F835E 007F82F9 2829 sub [ecx], ch 007F82FB 2000 and [eax], al 007F82FD 0000 add [eax], al 007F82FF 00FF add bh, bh 007F8301 FFFF DB $FF, $FF // 007F8303 FF0D00000020 dec dword ptr [$20000000] 007F8309 7768 jnbe 007F8373 007F830B 657265 jb 007F8373 007F830E 205946 and [ecx+$46], bl 007F8311 49 dec ecx 007F8312 643D27000000 cmp eax, $00000027 007F8318 FFFF DB $FF, $FF // 007F831A FFFF DB $FF, $FF // 007F831C 0400 add al, +$00 007F831E 0000 add [eax], al 007F8320 59 pop ecx 007F8321 46 inc esi 007F8322 49 dec ecx 007F8323 640000 add fs:[eax], al 007F8326 0000 add [eax], al 007F8328 55 push ebp 007F8329 8BEC mov ebp, esp 007F832B B907000000 mov ecx, $00000007 007F8330 6A00 push $00 007F8332 6A00 push $00 007F8334 49 dec ecx 007F8335 75F9 jnz 007F8330 007F8337 51 push ecx 007F8338 53 push ebx 007F8339 56 push esi 007F833A 8BDA mov ebx, edx 007F833C 8BF0 mov esi, eax 007F833E 33C0 xor eax, eax 007F8340 55 push ebp 007F8341 6847857F00 push $007F8547 ***** TRY | 007F8346 64FF30 push dword ptr fs:[eax] 007F8349 648920 mov fs:[eax], esp 007F834C 8D55FC lea edx, [ebp-$04] 007F834F 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; | 007F8351 E86673D9FF call 0058F6BC * Reference to control v1PRTColor : N.A. | 007F8356 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; | 007F835C E8EB3FE6FF 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; | 007F8361 E8FE97E5FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007F8366 8B4050 mov eax, [eax+$50] 007F8369 8D55F4 lea edx, [ebp-$0C] 007F836C 8B08 mov ecx, [eax] 007F836E FF5110 call dword ptr [ecx+$10] 007F8371 8B45F4 mov eax, [ebp-$0C] 007F8374 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8377 E87025C1FF call 0040A8EC * Reference to control Label10 : TLabel | 007F837C 8B9E5C030000 mov ebx, [esi+$035C] 007F8382 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F8384 E8B700CDFF call 004C8440 007F8389 8D55E0 lea edx, [ebp-$20] 007F838C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F838F E85825C1FF call 0040A8EC 007F8394 8B55E0 mov edx, [ebp-$20] 007F8397 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F839A E8290AC2FF call 00418DC8 007F839F 8D45E4 lea eax, [ebp-$1C] 007F83A2 50 push eax 007F83A3 8B55F8 mov edx, [ebp-$08] 007F83A6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F83A8 E807E8CCFF call 004C6BB4 007F83AD 5A pop edx 007F83AE 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 007F83B0 FF91B4000000 call dword ptr [ecx+$00B4] 007F83B6 8BC3 mov eax, ebx 007F83B8 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007F83BA FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 007F83C0 8B9E08030000 mov ebx, [esi+$0308] 007F83C6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F83C8 E807D5CCFF call 004C58D4 007F83CD 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F83CF E8D85BCEFF call 004DDFAC 007F83D4 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007F83D6 FF5244 call dword ptr [edx+$44] 007F83D9 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F83DB E8CC5BCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F83E0 BA5C857F00 mov edx, $007F855C 007F83E5 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F83E7 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F83EA 6878857F00 push $007F8578 007F83EF FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007F83F2 6888857F00 push $007F8588 007F83F7 8D55D8 lea edx, [ebp-$28] 007F83FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F83FD E8EA24C1FF call 0040A8EC 007F8402 FF75D8 push dword ptr [ebp-$28] 007F8405 6894857F00 push $007F8594 007F840A 8D45DC lea eax, [ebp-$24] 007F840D BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007F8412 E89DD2C0FF call 004056B4 007F8417 8B45DC mov eax, [ebp-$24] 007F841A 50 push eax 007F841B 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F841D E88A5BCEFF call 004DDFAC 007F8422 5A pop edx 007F8423 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F8425 FF5138 call dword ptr [ecx+$38] 007F8428 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'CRFlag' | 007F842B BAA0857F00 mov edx, $007F85A0 * Reference to: System.@LStrCmp; | 007F8430 E80BD3C0FF call 00405740 007F8435 7540 jnz 007F8477 007F8437 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '收' | 007F843A BAB0857F00 mov edx, $007F85B0 * Reference to: System.@LStrCmp; | 007F843F E8FCD2C0FF call 00405740 007F8444 7511 jnz 007F8457 007F8446 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F8448 E85F5BCEFF call 004DDFAC * Possible String Reference to: ',QtyFlag=1' | 007F844D BABC857F00 mov edx, $007F85BC 007F8452 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F8454 FF5138 call dword ptr [ecx+$38] 007F8457 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '付' | 007F845A BAD0857F00 mov edx, $007F85D0 * Reference to: System.@LStrCmp; | 007F845F E8DCD2C0FF call 00405740 007F8464 7511 jnz 007F8477 007F8466 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F8468 E83F5BCEFF call 004DDFAC * Possible String Reference to: ',QtyFlag=-1' | 007F846D BADC857F00 mov edx, $007F85DC 007F8472 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F8474 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F8477 68F0857F00 push $007F85F0 007F847C 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F855D(Sender : TObject); begin (* 007F855D 50 push eax 007F855E 6461 popa 007F8560 7465 jz 007F85C7 007F8562 205946 and [ecx+$46], bl 007F8565 5F pop edi 007F8566 4D dec ebp 007F8567 6F outsd 007F8568 6E outsb 007F8569 65795F jns 007F85CB 007F856C 43 inc ebx 007F856D 52 push edx 007F856E 2000 and [eax], al 007F8570 FFFF DB $FF, $FF // 007F8572 FFFF DB $FF, $FF // 007F8574 0500000020 add eax, +$20000000 007F8579 53 push ebx 007F857A 657420 jz 007F859D 007F857D 0000 add [eax], al 007F857F 00FF add bh, bh 007F8581 FFFF DB $FF, $FF // 007F8583 FF02 inc dword ptr [edx] 007F8585 0000 add [eax], al 007F8587 003D270000FF add [$FF000027], bh 007F858D FFFF DB $FF, $FF // 007F858F FF01 inc dword ptr [ecx] 007F8591 0000 add [eax], al 007F8593 0027 add [edi], ah 007F8595 0000 add [eax], al 007F8597 00FF add bh, bh 007F8599 FFFF DB $FF, $FF // 007F859B FF06 inc dword ptr [esi] 007F859D 0000 add [eax], al 007F859F 004352 add [ebx+$52], al 007F85A2 46 inc esi 007F85A3 6C insb 007F85A4 61 popa 007F85A5 670000 add [bx+si], al 007F85A8 FFFF DB $FF, $FF // 007F85AA FFFF DB $FF, $FF // 007F85AC 0200 add al, byte ptr [eax] 007F85AE 0000 add [eax], al 007F85B0 CA ret 007F85B1 D5 aad 007F85B2 0000 add [eax], al 007F85B4 FFFF DB $FF, $FF // 007F85B6 FFFF DB $FF, $FF // 007F85B8 0A00 or al, byte ptr [eax] 007F85BA 0000 add [eax], al 007F85BC 2C51 sub al, $51 007F85BE 7479 jz 007F8639 007F85C0 46 inc esi 007F85C1 6C insb 007F85C2 61 popa 007F85C3 673D310000FF cmp eax, $FF000031 007F85C9 FFFF DB $FF, $FF // 007F85CB FF02 inc dword ptr [edx] 007F85CD 0000 add [eax], al 007F85CF 00B8B60000FF add [eax+$FF0000B6], bh 007F85D5 FFFF DB $FF, $FF // 007F85D7 FF0B dec dword ptr [ebx] 007F85D9 0000 add [eax], al 007F85DB 002C51 add [ecx+edx*2], ch 007F85DE 7479 jz 007F8659 007F85E0 46 inc esi 007F85E1 6C insb 007F85E2 61 popa 007F85E3 673D2D3100FF cmp eax, $FF00312D 007F85E9 FFFF DB $FF, $FF // 007F85EB FF09 dec dword ptr [ecx] 007F85ED 0000 add [eax], al 007F85EF 002C4564697465 add [$65746964+eax*2], ch 007F85F6 723D jb 007F8635 007F85F8 27 daa 007F85F9 0000 add [eax], al 007F85FB 00FF add bh, bh 007F85FD FFFF DB $FF, $FF // 007F85FF FF1400 call dword ptr [eax+eax] 007F8602 0000 add [eax], al 007F8604 2C45 sub al, $45 007F8606 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F860F 657464 jz 007F8676 007F8612 61 popa 007F8613 7465 jz 007F867A 007F8615 2829 sub [ecx], ch 007F8617 2000 and [eax], al 007F8619 0000 add [eax], al 007F861B 00FF add bh, bh 007F861D FFFF DB $FF, $FF // 007F861F FF0D00000020 dec dword ptr [$20000000] 007F8625 7768 jnbe 007F868F 007F8627 657265 jb 007F868F 007F862A 205946 and [ecx+$46], bl 007F862D 49 dec ecx 007F862E 643D27000000 cmp eax, $00000027 007F8634 FFFF DB $FF, $FF // 007F8636 FFFF DB $FF, $FF // 007F8638 0400 add al, +$00 007F863A 0000 add [eax], al 007F863C 59 pop ecx 007F863D 46 inc esi 007F863E 49 dec ecx 007F863F 640000 add fs:[eax], al 007F8642 0000 add [eax], al 007F8644 55 push ebp 007F8645 8BEC mov ebp, esp 007F8647 B90C000000 mov ecx, $0000000C 007F864C 6A00 push $00 007F864E 6A00 push $00 007F8650 49 dec ecx 007F8651 75F9 jnz 007F864C 007F8653 53 push ebx 007F8654 56 push esi 007F8655 8BDA mov ebx, edx 007F8657 8BF0 mov esi, eax 007F8659 33C0 xor eax, eax 007F865B 55 push ebp 007F865C 683B897F00 push $007F893B ***** TRY | 007F8661 64FF30 push dword ptr fs:[eax] 007F8664 648920 mov fs:[eax], esp 007F8667 8D55FC lea edx, [ebp-$04] 007F866A 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; | 007F866C E84B70D9FF call 0058F6BC 007F8671 8D55EC lea edx, [ebp-$14] 007F8674 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F8677 E87022C1FF call 0040A8EC 007F867C 837DEC00 cmp dword ptr [ebp-$14], +$00 007F8680 750D jnz 007F868F 007F8682 8D45FC lea eax, [ebp-$04] 007F8685 BA50897F00 mov edx, $007F8950 * Reference to: System.@LStrLAsg(void;void;void;void); | 007F868A E82DCDC0FF call 004053BC * Reference to control v1PRTColor : N.A. | 007F868F 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; | 007F8695 E8B23CE6FF 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; | 007F869A E8C594E5FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007F869F 8B4050 mov eax, [eax+$50] 007F86A2 8D55E8 lea edx, [ebp-$18] 007F86A5 8B08 mov ecx, [eax] 007F86A7 FF5110 call dword ptr [ecx+$10] 007F86AA 8B45E8 mov eax, [ebp-$18] 007F86AD 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F86B0 E83722C1FF call 0040A8EC * Reference to control Label10 : TLabel | 007F86B5 8B9E5C030000 mov ebx, [esi+$035C] 007F86BB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007F86BD E87EFDCCFF call 004C8440 007F86C2 8D55D4 lea edx, [ebp-$2C] 007F86C5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F86C8 E81F22C1FF call 0040A8EC 007F86CD 8B55D4 mov edx, [ebp-$2C] 007F86D0 8D45D8 lea eax, [ebp-$28] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007F86D3 E8F006C2FF call 00418DC8 007F86D8 8D45D8 lea eax, [ebp-$28] 007F86DB 50 push eax 007F86DC 8B55F0 mov edx, [ebp-$10] 007F86DF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F86E1 E8CEE4CCFF call 004C6BB4 007F86E6 5A pop edx 007F86E7 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 007F86E9 FF91B4000000 call dword ptr [ecx+$00B4] 007F86EF 8BC3 mov eax, ebx 007F86F1 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007F86F3 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 007F86F9 8B9E08030000 mov ebx, [esi+$0308] 007F86FF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8701 E8CED1CCFF call 004C58D4 007F8706 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F8708 E89F58CEFF call 004DDFAC 007F870D 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007F870F FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 007F8712 685C897F00 push $007F895C * Possible String Reference to: 'YFID' | 007F8717 BAA4897F00 mov edx, $007F89A4 * Reference to control Label10 : TLabel | 007F871C 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8722 E88DE4CCFF call 004C6BB4 007F8727 8D55CC lea edx, [ebp-$34] 007F872A 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F872C FF5160 call dword ptr [ecx+$60] 007F872F FF75CC push dword ptr [ebp-$34] 007F8732 68B4897F00 push $007F89B4 007F8737 8D45D0 lea eax, [ebp-$30] 007F873A BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007F873F E870CFC0FF call 004056B4 007F8744 8B45D0 mov eax, [ebp-$30] 007F8747 50 push eax 007F8748 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007F874A E85D58CEFF call 004DDFAC 007F874F 5A pop edx 007F8750 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007F8752 FF5138 call dword ptr [ecx+$38] 007F8755 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007F8757 E86CD1CCFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 007F875C BAC0897F00 mov edx, $007F89C0 * Reference to control Label3 : TLabel | 007F8761 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F8767 E848E4CCFF call 004C6BB4 007F876C 8D55F4 lea edx, [ebp-$0C] 007F876F 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F8771 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 007F8774 BAC0897F00 mov edx, $007F89C0 * Reference to control Label10 : TLabel | 007F8779 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007F877F E830E4CCFF call 004C6BB4 007F8784 8D55F8 lea edx, [ebp-$08] 007F8787 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007F8789 FF5160 call dword ptr [ecx+$60] * Reference to control OrdDate : N.A. | 007F878C 8B9E0C030000 mov ebx, [esi+$030C] 007F8792 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F8794 E83BD1CCFF call 004C58D4 007F8799 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; | 007F879B E80C58CEFF call 004DDFAC 007F87A0 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007F87A2 FF5244 call dword ptr [edx+$44] 007F87A5 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; | 007F87A7 E80058CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007F87AC BAD0897F00 mov edx, $007F89D0 007F87B1 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F87B3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007F87B6 68EC897F00 push $007F89EC 007F87BB FF75F0 push dword ptr [ebp-$10] 007F87BE 68FC897F00 push $007F89FC 007F87C3 8D55C4 lea edx, [ebp-$3C] 007F87C6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F87C9 E81E21C1FF call 0040A8EC 007F87CE FF75C4 push dword ptr [ebp-$3C] 007F87D1 8D45C8 lea eax, [ebp-$38] 007F87D4 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F87D9 E8D6CEC0FF call 004056B4 007F87DE 8B45C8 mov eax, [ebp-$38] 007F87E1 50 push eax 007F87E2 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; | 007F87E4 E8C357CEFF call 004DDFAC 007F87E9 5A pop edx 007F87EA 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007F87EC FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007F87EF 68088A7F00 push $007F8A08 007F87F4 8D55BC lea edx, [ebp-$44] *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F89D1(Sender : TObject); begin (* 007F89D1 50 push eax 007F89D2 6461 popa 007F89D4 7465 jz 007F8A3B 007F89D6 205946 and [ecx+$46], bl 007F89D9 5F pop edi 007F89DA 4D dec ebp 007F89DB 6F outsd 007F89DC 6E outsb 007F89DD 65795F jns 007F8A3F 007F89E0 43 inc ebx 007F89E1 52 push edx 007F89E2 2000 and [eax], al 007F89E4 FFFF DB $FF, $FF // 007F89E6 FFFF DB $FF, $FF // 007F89E8 0500000020 add eax, +$20000000 007F89ED 53 push ebx 007F89EE 657420 jz 007F8A11 007F89F1 0000 add [eax], al 007F89F3 00FF add bh, bh 007F89F5 FFFF DB $FF, $FF // 007F89F7 FF01 inc dword ptr [ecx] 007F89F9 0000 add [eax], al 007F89FB 003D000000FF add [$FF000000], bh 007F8A01 FFFF DB $FF, $FF // 007F8A03 FF09 dec dword ptr [ecx] 007F8A05 0000 add [eax], al 007F8A07 002C4564697465 add [$65746964+eax*2], ch 007F8A0E 723D jb 007F8A4D 007F8A10 27 daa 007F8A11 0000 add [eax], al 007F8A13 00FF add bh, bh 007F8A15 FFFF DB $FF, $FF // 007F8A17 FF1400 call dword ptr [eax+eax] 007F8A1A 0000 add [eax], al 007F8A1C 2C45 sub al, $45 007F8A1E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F8A27 657464 jz 007F8A8E 007F8A2A 61 popa 007F8A2B 7465 jz 007F8A92 007F8A2D 2829 sub [ecx], ch 007F8A2F 2000 and [eax], al 007F8A31 0000 add [eax], al 007F8A33 00FF add bh, bh 007F8A35 FFFF DB $FF, $FF // 007F8A37 FF0D00000020 dec dword ptr [$20000000] 007F8A3D 7768 jnbe 007F8AA7 007F8A3F 657265 jb 007F8AA7 007F8A42 205946 and [ecx+$46], bl 007F8A45 49 dec ecx 007F8A46 643D27000000 cmp eax, $00000027 007F8A4C FFFF DB $FF, $FF // 007F8A4E FFFF DB $FF, $FF // 007F8A50 0400 add al, +$00 007F8A52 0000 add [eax], al 007F8A54 59 pop ecx 007F8A55 46 inc esi 007F8A56 49 dec ecx 007F8A57 640000 add fs:[eax], al 007F8A5A 0000 add [eax], al 007F8A5C FFFF DB $FF, $FF // 007F8A5E FFFF DB $FF, $FF // 007F8A60 2B00 sub eax, dword ptr [eax] 007F8A62 0000 add [eax], al 007F8A64 55 push ebp 007F8A65 7064 jo 007F8ACB 007F8A67 61 popa 007F8A68 7465 jz 007F8ACF 007F8A6A 205946 and [ecx+$46], bl 007F8A6D 5F pop edi 007F8A6E 4D dec ebp 007F8A6F 6F outsd 007F8A70 6E outsb 007F8A71 65795F jns 007F8AD3 007F8A74 4B dec ebx 007F8A75 43 inc ebx 007F8A76 205365 and [ebx+$65], dl 007F8A79 7420 jz 007F8A9B 007F8A7B 4B dec ebx 007F8A7C 43 inc ebx 007F8A7D 4B dec ebx 007F8A7E 50 push eax 007F8A7F 4D dec ebp 007F8A80 6F outsd 007F8A81 6E outsb 007F8A82 65793D jns 007F8AC2 007F8A85 4B dec ebx 007F8A86 43 inc ebx 007F8A87 4B dec ebx 007F8A88 50 push eax 007F8A89 4D dec ebp 007F8A8A 6F outsd 007F8A8B 6E outsb 007F8A8C 65792D jns 007F8ABC 007F8A8F 00FF add bh, bh 007F8A91 FFFF DB $FF, $FF // 007F8A93 FF01 inc dword ptr [ecx] 007F8A95 0000 add [eax], al 007F8A97 002B add [ebx], ch 007F8A99 0000 add [eax], al 007F8A9B 00FF add bh, bh 007F8A9D FFFF DB $FF, $FF // 007F8A9F FF0D00000020 dec dword ptr [$20000000] 007F8AA5 7768 jnbe 007F8B0F 007F8AA7 657265 jb 007F8B0F 007F8AAA 204352 and [ebx+$52], al 007F8AAD 49 dec ecx 007F8AAE 44 inc esp 007F8AAF 3D27000000 cmp eax, $00000027 007F8AB4 FFFF DB $FF, $FF // 007F8AB6 FFFF DB $FF, $FF // 007F8AB8 0400 add al, +$00 007F8ABA 0000 add [eax], al 007F8ABC 43 inc ebx 007F8ABD 52 push edx 007F8ABE 49 dec ecx 007F8ABF 44 inc esp 007F8AC0 0000 add [eax], al 007F8AC2 0000 add [eax], al 007F8AC4 55 push ebp 007F8AC5 8BEC mov ebp, esp 007F8AC7 B910000000 mov ecx, $00000010 007F8ACC 6A00 push $00 007F8ACE 6A00 push $00 007F8AD0 49 dec ecx 007F8AD1 75F9 jnz 007F8ACC 007F8AD3 51 push ecx 007F8AD4 53 push ebx 007F8AD5 56 push esi 007F8AD6 57 push edi 007F8AD7 8945FC mov [ebp-$04], eax 007F8ADA 33C0 xor eax, eax 007F8ADC 55 push ebp * Possible String Reference to: '闅祭霠_^[嬪]' | 007F8ADD 68558E7F00 push $007F8E55 ***** TRY | 007F8AE2 64FF30 push dword ptr fs:[eax] 007F8AE5 648920 mov fs:[eax], esp 007F8AE8 8B45FC mov eax, [ebp-$04] * Reference to control Label10 : TLabel | 007F8AEB 8B805C030000 mov eax, [eax+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F8AF1 E8CAF3CCFF call 004C7EC0 007F8AF6 84C0 test al, al 007F8AF8 0F85F1020000 jnz 007F8DEF 007F8AFE A0648E7F00 mov al, byte ptr [$007F8E64] 007F8B03 50 push eax 007F8B04 8D45EC lea eax, [ebp-$14] 007F8B07 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F8B09 E85602C2FF call 00418D64 007F8B0E 8D4DEC lea ecx, [ebp-$14] 007F8B11 8B45FC mov eax, [ebp-$04] * Reference to control Label10 : TLabel | 007F8B14 8B805C030000 mov eax, [eax+$035C] * Possible String Reference to: 'ssel' | 007F8B1A BA708E7F00 mov edx, $007F8E70 007F8B1F 8B18 mov ebx, [eax] * Possible reference to virtual method TLabel.OFFS_0244 | 007F8B21 FF9344020000 call dword ptr [ebx+$0244] 007F8B27 84C0 test al, al 007F8B29 751D jnz 007F8B48 007F8B2B 6A00 push $00 * Possible String Reference to: '提示' | 007F8B2D B9788E7F00 mov ecx, $007F8E78 * Possible String Reference to: '没有选择数据!' | 007F8B32 BA808E7F00 mov edx, $007F8E80 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007F9929(Sender : TObject); begin (* 007F9929 50 push eax 007F992A 6461 popa 007F992C 7465 jz 007F9993 007F992E 205946 and [ecx+$46], bl 007F9931 5F pop edi 007F9932 4D dec ebp 007F9933 6F outsd 007F9934 6E outsb 007F9935 65795F jns 007F9997 007F9938 43 inc ebx 007F9939 52 push edx 007F993A 2000 and [eax], al 007F993C FFFF DB $FF, $FF // 007F993E FFFF DB $FF, $FF // 007F9940 1000 adc [eax], al 007F9942 0000 add [eax], al 007F9944 205365 and [ebx+$65], dl 007F9947 7420 jz 007F9969 007F9949 43 inc ebx 007F994A 6F outsd 007F994B 6D insd 007F994C 54 push esp 007F994D 61 popa 007F994E 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D 007F9956 0000 add [eax], al 007F9958 FFFF DB $FF, $FF // 007F995A FFFF DB $FF, $FF // 007F995C 0100 add [eax], eax 007F995E 0000 add [eax], al 007F9960 27 daa 007F9961 0000 add [eax], al 007F9963 00FF add bh, bh 007F9965 FFFF DB $FF, $FF // 007F9967 FF09 dec dword ptr [ecx] 007F9969 0000 add [eax], al 007F996B 002C4564697465 add [$65746964+eax*2], ch 007F9972 723D jb 007F99B1 007F9974 27 daa 007F9975 0000 add [eax], al 007F9977 00FF add bh, bh 007F9979 FFFF DB $FF, $FF // 007F997B FF1400 call dword ptr [eax+eax] 007F997E 0000 add [eax], al 007F9980 2C45 sub al, $45 007F9982 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007F998B 657464 jz 007F99F2 007F998E 61 popa 007F998F 7465 jz 007F99F6 007F9991 2829 sub [ecx], ch 007F9993 2000 and [eax], al 007F9995 0000 add [eax], al 007F9997 00FF add bh, bh 007F9999 FFFF DB $FF, $FF // 007F999B FF0D00000020 dec dword ptr [$20000000] 007F99A1 7768 jnbe 007F9A0B 007F99A3 657265 jb 007F9A0B 007F99A6 205946 and [ecx+$46], bl 007F99A9 49 dec ecx 007F99AA 643D27000000 cmp eax, $00000027 007F99B0 FFFF DB $FF, $FF // 007F99B2 FFFF DB $FF, $FF // 007F99B4 0400 add al, +$00 007F99B6 0000 add [eax], al 007F99B8 59 pop ecx 007F99B9 46 inc esi 007F99BA 49 dec ecx 007F99BB 640000 add fs:[eax], al 007F99BE 0000 add [eax], al 007F99C0 55 push ebp 007F99C1 8BEC mov ebp, esp 007F99C3 B916000000 mov ecx, $00000016 007F99C8 6A00 push $00 007F99CA 6A00 push $00 007F99CC 49 dec ecx 007F99CD 75F9 jnz 007F99C8 007F99CF 53 push ebx 007F99D0 56 push esi 007F99D1 8945FC mov [ebp-$04], eax 007F99D4 33C0 xor eax, eax 007F99D6 55 push ebp 007F99D7 68B79D7F00 push $007F9DB7 ***** TRY | 007F99DC 64FF30 push dword ptr fs:[eax] 007F99DF 648920 mov fs:[eax], esp 007F99E2 8B4DFC mov ecx, [ebp-$04] 007F99E5 B201 mov dl, $01 * Reference to class TfrmFKCR | 007F99E7 A1C4C67F00 mov eax, dword ptr [$007FC6C4] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 007F99EC E8DF83CAFF call 004A1DD0 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FA135(Sender : TObject); begin (* 007FA135 50 push eax 007FA136 6461 popa 007FA138 7465 jz 007FA19F 007FA13A 205946 and [ecx+$46], bl 007FA13D 5F pop edi 007FA13E 4D dec ebp 007FA13F 6F outsd 007FA140 6E outsb 007FA141 65795F jns 007FA1A3 007FA144 43 inc ebx 007FA145 52 push edx 007FA146 2000 and [eax], al 007FA148 FFFF DB $FF, $FF // 007FA14A FFFF DB $FF, $FF // 007FA14C 0D00000020 or eax, $20000000 007FA151 53 push ebx 007FA152 657420 jz 007FA175 007FA155 42 inc edx 007FA156 5A pop edx 007FA157 54 push esp 007FA158 7970 jns 007FA1CA 007FA15A 653D27000000 cmp eax, $00000027 007FA160 FFFF DB $FF, $FF // 007FA162 FFFF DB $FF, $FF // 007FA164 07 pop es 007FA165 0000 add [eax], al 007FA167 005A64 add [edx+$64], bl 007FA16A 794E jns 007FA1BA 007FA16C 61 popa 007FA16D 6D insd 007FA16E 6500FF add bh, bh 007FA171 FFFF DB $FF, $FF // 007FA173 FF01 inc dword ptr [ecx] 007FA175 0000 add [eax], al 007FA177 0027 add [edi], ah 007FA179 0000 add [eax], al 007FA17B 00FF add bh, bh 007FA17D FFFF DB $FF, $FF // 007FA17F FF09 dec dword ptr [ecx] 007FA181 0000 add [eax], al 007FA183 002C4564697465 add [$65746964+eax*2], ch 007FA18A 723D jb 007FA1C9 007FA18C 27 daa 007FA18D 0000 add [eax], al 007FA18F 00FF add bh, bh 007FA191 FFFF DB $FF, $FF // 007FA193 FF1400 call dword ptr [eax+eax] 007FA196 0000 add [eax], al 007FA198 2C45 sub al, $45 007FA19A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FA1A3 657464 jz 007FA20A 007FA1A6 61 popa 007FA1A7 7465 jz 007FA20E 007FA1A9 2829 sub [ecx], ch 007FA1AB 2000 and [eax], al 007FA1AD 0000 add [eax], al 007FA1AF 00FF add bh, bh 007FA1B1 FFFF DB $FF, $FF // 007FA1B3 FF0D00000020 dec dword ptr [$20000000] 007FA1B9 7768 jnbe 007FA223 007FA1BB 657265 jb 007FA223 007FA1BE 205946 and [ecx+$46], bl 007FA1C1 49 dec ecx 007FA1C2 643D27000000 cmp eax, $00000027 007FA1C8 FFFF DB $FF, $FF // 007FA1CA FFFF DB $FF, $FF // 007FA1CC 0400 add al, +$00 007FA1CE 0000 add [eax], al 007FA1D0 59 pop ecx 007FA1D1 46 inc esi 007FA1D2 49 dec ecx 007FA1D3 640000 add fs:[eax], al 007FA1D6 0000 add [eax], al 007FA1D8 55 push ebp 007FA1D9 8BEC mov ebp, esp 007FA1DB 51 push ecx 007FA1DC B906000000 mov ecx, $00000006 007FA1E1 6A00 push $00 007FA1E3 6A00 push $00 007FA1E5 49 dec ecx 007FA1E6 75F9 jnz 007FA1E1 007FA1E8 51 push ecx 007FA1E9 874DFC xchg [ebp-$04], ecx 007FA1EC 53 push ebx 007FA1ED 56 push esi 007FA1EE 8BF0 mov esi, eax 007FA1F0 33C0 xor eax, eax 007FA1F2 55 push ebp * Possible String Reference to: '榫脬^[嬪]' | 007FA1F3 6831A47F00 push $007FA431 ***** TRY | 007FA1F8 64FF30 push dword ptr fs:[eax] 007FA1FB 648920 mov fs:[eax], esp 007FA1FE 33C0 xor eax, eax 007FA200 55 push ebp 007FA201 6807A47F00 push $007FA407 ***** TRY | 007FA206 64FF30 push dword ptr fs:[eax] 007FA209 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FA489(Sender : TObject); begin (* 007FA489 50 push eax 007FA48A 6461 popa 007FA48C 7465 jz 007FA4F3 007FA48E 205946 and [ecx+$46], bl 007FA491 5F pop edi 007FA492 4D dec ebp 007FA493 6F outsd 007FA494 6E outsb 007FA495 65795F jns 007FA4F7 007FA498 43 inc ebx 007FA499 52 push edx 007FA49A 2000 and [eax], al 007FA49C FFFF DB $FF, $FF // 007FA49E FFFF DB $FF, $FF // 007FA4A0 0D00000020 or eax, $20000000 007FA4A5 53 push ebx 007FA4A6 657420 jz 007FA4C9 007FA4A9 50 push eax 007FA4AA 5F pop edi 007FA4AB 53 push ebx 007FA4AC 7065 jo 007FA513 007FA4AE 633D27000000 arpl [$00000027], di 007FA4B4 FFFF DB $FF, $FF // 007FA4B6 FFFF DB $FF, $FF // 007FA4B8 07 pop es 007FA4B9 0000 add [eax], al 007FA4BB 005A64 add [edx+$64], bl 007FA4BE 794E jns 007FA50E 007FA4C0 61 popa 007FA4C1 6D insd 007FA4C2 6500FF add bh, bh 007FA4C5 FFFF DB $FF, $FF // 007FA4C7 FF01 inc dword ptr [ecx] 007FA4C9 0000 add [eax], al 007FA4CB 0027 add [edi], ah 007FA4CD 0000 add [eax], al 007FA4CF 00FF add bh, bh 007FA4D1 FFFF DB $FF, $FF // 007FA4D3 FF09 dec dword ptr [ecx] 007FA4D5 0000 add [eax], al 007FA4D7 002C4564697465 add [$65746964+eax*2], ch 007FA4DE 723D jb 007FA51D 007FA4E0 27 daa 007FA4E1 0000 add [eax], al 007FA4E3 00FF add bh, bh 007FA4E5 FFFF DB $FF, $FF // 007FA4E7 FF1400 call dword ptr [eax+eax] 007FA4EA 0000 add [eax], al 007FA4EC 2C45 sub al, $45 007FA4EE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FA4F7 657464 jz 007FA55E 007FA4FA 61 popa 007FA4FB 7465 jz 007FA562 007FA4FD 2829 sub [ecx], ch 007FA4FF 2000 and [eax], al 007FA501 0000 add [eax], al 007FA503 00FF add bh, bh 007FA505 FFFF DB $FF, $FF // 007FA507 FF0D00000020 dec dword ptr [$20000000] 007FA50D 7768 jnbe 007FA577 007FA50F 657265 jb 007FA577 007FA512 205946 and [ecx+$46], bl 007FA515 49 dec ecx 007FA516 643D27000000 cmp eax, $00000027 007FA51C FFFF DB $FF, $FF // 007FA51E FFFF DB $FF, $FF // 007FA520 0400 add al, +$00 007FA522 0000 add [eax], al 007FA524 59 pop ecx 007FA525 46 inc esi 007FA526 49 dec ecx 007FA527 640000 add fs:[eax], al 007FA52A 0000 add [eax], al 007FA52C 53 push ebx 007FA52D 56 push esi 007FA52E 8BD8 mov ebx, eax * Possible String Reference to: 'Money' | 007FA530 BA6CA57F00 mov edx, $007FA56C * Reference to control Label10 : TLabel | 007FA535 8BB35C030000 mov esi, [ebx+$035C] 007FA53B 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FA53D E872C6CCFF call 004C6BB4 007FA542 8B10 mov edx, [eax] * Reference to method TLabel.GetDragImages() | 007FA544 FF524C call dword ptr [edx+$4C] 007FA547 D83574A57F00 fdiv dword ptr [$007FA574] 007FA54D 83C4F8 add esp, -$08 007FA550 DD1C24 fstp qword ptr [esp] 007FA553 9B wait * Reference to control Payment : N.A. | 007FA554 8B939C030000 mov edx, [ebx+$039C] 007FA55A 8BC6 mov eax, esi * Reference to : TfrmSelExportField._PROC_007B6D90() | 007FA55C E82FC8FBFF call 007B6D90 007FA561 5E pop esi 007FA562 5B pop ebx 007FA563 C3 ret 007FA564 FFFF DB $FF, $FF // 007FA566 FFFF DB $FF, $FF // 007FA568 050000004D add eax, +$4D000000 007FA56D 6F outsd 007FA56E 6E outsb 007FA56F 657900 jns 007FA572 007FA572 0000 add [eax], al 007FA574 00401C add [eax+$1C], al 007FA577 46 inc esi 007FA578 55 push ebp 007FA579 8BEC mov ebp, esp 007FA57B 51 push ecx 007FA57C B90B000000 mov ecx, $0000000B 007FA581 6A00 push $00 007FA583 6A00 push $00 007FA585 49 dec ecx 007FA586 75F9 jnz 007FA581 007FA588 874DFC xchg [ebp-$04], ecx 007FA58B 53 push ebx 007FA58C 56 push esi 007FA58D 8BF0 mov esi, eax 007FA58F 33C0 xor eax, eax 007FA591 55 push ebp * Possible String Reference to: '棰⒗胛^[嬪]' | 007FA592 684DA87F00 push $007FA84D ***** TRY | 007FA597 64FF30 push dword ptr fs:[eax] 007FA59A 648920 mov fs:[eax], esp 007FA59D 8BCE mov ecx, esi 007FA59F B201 mov dl, $01 * Reference to class TfrmJYorderConCX | 007FA5A1 A164DF7D00 mov eax, dword ptr [$007DDF64] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 007FA5A6 E82578CAFF call 004A1DD0 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FA8A1(Sender : TObject); begin (* 007FA8A1 50 push eax 007FA8A2 6461 popa 007FA8A4 7465 jz 007FA90B 007FA8A6 205946 and [ecx+$46], bl 007FA8A9 5F pop edi 007FA8AA 4D dec ebp 007FA8AB 6F outsd 007FA8AC 6E outsb 007FA8AD 65795F jns 007FA90F 007FA8B0 43 inc ebx 007FA8B1 52 push edx 007FA8B2 2000 and [eax], al 007FA8B4 FFFF DB $FF, $FF // 007FA8B6 FFFF DB $FF, $FF // 007FA8B8 0C00 or al, $00 007FA8BA 0000 add [eax], al 007FA8BC 205365 and [ebx+$65], dl 007FA8BF 7420 jz 007FA8E1 007FA8C1 43 inc ebx 007FA8C2 6F outsd 007FA8C3 6E outsb 007FA8C4 69643D2700000000 imul esp, [ebp+edi+$27], $00000000 007FA8CC FFFF DB $FF, $FF // 007FA8CE FFFF DB $FF, $FF // 007FA8D0 0100 add [eax], eax 007FA8D2 0000 add [eax], al 007FA8D4 27 daa 007FA8D5 0000 add [eax], al 007FA8D7 00FF add bh, bh 007FA8D9 FFFF DB $FF, $FF // 007FA8DB FF08 dec dword ptr [eax] 007FA8DD 0000 add [eax], al 007FA8DF 002C43 add [ebx+eax*2], ch 007FA8E2 6F outsd 007FA8E3 6E outsb 007FA8E4 4E dec esi 007FA8E5 4F dec edi 007FA8E6 3D27000000 cmp eax, $00000027 007FA8EB 00FF add bh, bh 007FA8ED FFFF DB $FF, $FF // 007FA8EF FF0500000043 inc dword ptr [$43000000] 007FA8F5 6F outsd 007FA8F6 6E outsb 007FA8F7 4E dec esi 007FA8F8 4F dec edi 007FA8F9 0000 add [eax], al 007FA8FB 00FF add bh, bh 007FA8FD FFFF DB $FF, $FF // 007FA8FF FF09 dec dword ptr [ecx] 007FA901 0000 add [eax], al 007FA903 002C4564697465 add [$65746964+eax*2], ch 007FA90A 723D jb 007FA949 007FA90C 27 daa 007FA90D 0000 add [eax], al 007FA90F 00FF add bh, bh 007FA911 FFFF DB $FF, $FF // 007FA913 FF1400 call dword ptr [eax+eax] 007FA916 0000 add [eax], al 007FA918 2C45 sub al, $45 007FA91A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FA923 657464 jz 007FA98A 007FA926 61 popa 007FA927 7465 jz 007FA98E 007FA929 2829 sub [ecx], ch 007FA92B 2000 and [eax], al 007FA92D 0000 add [eax], al 007FA92F 00FF add bh, bh 007FA931 FFFF DB $FF, $FF // 007FA933 FF0D00000020 dec dword ptr [$20000000] 007FA939 7768 jnbe 007FA9A3 007FA93B 657265 jb 007FA9A3 007FA93E 205946 and [ecx+$46], bl 007FA941 49 dec ecx 007FA942 643D27000000 cmp eax, $00000027 007FA948 FFFF DB $FF, $FF // 007FA94A FFFF DB $FF, $FF // 007FA94C 0400 add al, +$00 007FA94E 0000 add [eax], al 007FA950 59 pop ecx 007FA951 46 inc esi 007FA952 49 dec ecx 007FA953 640000 add fs:[eax], al 007FA956 0000 add [eax], al 007FA958 55 push ebp 007FA959 8BEC mov ebp, esp 007FA95B 51 push ecx 007FA95C B905000000 mov ecx, $00000005 007FA961 6A00 push $00 007FA963 6A00 push $00 007FA965 49 dec ecx 007FA966 75F9 jnz 007FA961 007FA968 51 push ecx 007FA969 874DFC xchg [ebp-$04], ecx 007FA96C 53 push ebx 007FA96D 56 push esi 007FA96E 8BF0 mov esi, eax 007FA970 33C0 xor eax, eax 007FA972 55 push ebp * Possible String Reference to: '榉熇脬^[嬪]' | 007FA973 6838AB7F00 push $007FAB38 ***** TRY | 007FA978 64FF30 push dword ptr fs:[eax] 007FA97B 648920 mov fs:[eax], esp 007FA97E 33C0 xor eax, eax 007FA980 55 push ebp 007FA981 680EAB7F00 push $007FAB0E ***** TRY | 007FA986 64FF30 push dword ptr fs:[eax] 007FA989 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FAB71(Sender : TObject); begin (* 007FAB71 50 push eax 007FAB72 6461 popa 007FAB74 7465 jz 007FABDB 007FAB76 205946 and [ecx+$46], bl 007FAB79 5F pop edi 007FAB7A 4D dec ebp 007FAB7B 6F outsd 007FAB7C 6E outsb 007FAB7D 65795F jns 007FABDF 007FAB80 43 inc ebx 007FAB81 52 push edx 007FAB82 2000 and [eax], al 007FAB84 FFFF DB $FF, $FF // 007FAB86 FFFF DB $FF, $FF // 007FAB88 0E push cs 007FAB89 0000 add [eax], al 007FAB8B 0020 add [eax], ah 007FAB8D 53 push ebx 007FAB8E 657420 jz 007FABB1 007FAB91 47 inc edi 007FAB92 59 pop ecx 007FAB93 53 push ebx 007FAB94 4E dec esi 007FAB95 61 popa 007FAB96 6D insd 007FAB97 653D270000FF cmp eax, $FF000027 007FAB9D FFFF DB $FF, $FF // 007FAB9F FF01 inc dword ptr [ecx] 007FABA1 0000 add [eax], al 007FABA3 0027 add [edi], ah 007FABA5 0000 add [eax], al 007FABA7 00FF add bh, bh 007FABA9 FFFF DB $FF, $FF // 007FABAB FF0D00000020 dec dword ptr [$20000000] 007FABB1 7768 jnbe 007FAC1B 007FABB3 657265 jb 007FAC1B 007FABB6 205946 and [ecx+$46], bl 007FABB9 49 dec ecx 007FABBA 643D27000000 cmp eax, $00000027 007FABC0 FFFF DB $FF, $FF // 007FABC2 FFFF DB $FF, $FF // 007FABC4 0400 add al, +$00 007FABC6 0000 add [eax], al 007FABC8 59 pop ecx 007FABC9 46 inc esi 007FABCA 49 dec ecx 007FABCB 640000 add fs:[eax], al 007FABCE 0000 add [eax], al 007FABD0 55 push ebp 007FABD1 8BEC mov ebp, esp 007FABD3 51 push ecx 007FABD4 B90C000000 mov ecx, $0000000C 007FABD9 6A00 push $00 007FABDB 6A00 push $00 007FABDD 49 dec ecx 007FABDE 75F9 jnz 007FABD9 007FABE0 51 push ecx 007FABE1 874DFC xchg [ebp-$04], ecx 007FABE4 53 push ebx 007FABE5 56 push esi 007FABE6 8BF0 mov esi, eax 007FABE8 33C0 xor eax, eax 007FABEA 55 push ebp * Possible String Reference to: '閍浝肓^[嬪]' | 007FABEB 688EAF7F00 push $007FAF8E ***** TRY | 007FABF0 64FF30 push dword ptr fs:[eax] 007FABF3 648920 mov fs:[eax], esp * Possible String Reference to: 'CRFlag' | 007FABF6 BAA4AF7F00 mov edx, $007FAFA4 * Reference to control Label10 : TLabel | 007FABFB 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FAC01 E8AEBFCCFF call 004C6BB4 007FAC06 8D55FC lea edx, [ebp-$04] 007FAC09 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007FAC0B FF5160 call dword ptr [ecx+$60] 007FAC0E 837DFC00 cmp dword ptr [ebp-$04], +$00 007FAC12 751D jnz 007FAC31 007FAC14 6A00 push $00 * Possible String Reference to: '提示' | 007FAC16 B9ACAF7F00 mov ecx, $007FAFAC * Possible String Reference to: '请先选择方向' | 007FAC1B BAB4AF7F00 mov edx, $007FAFB4 *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FAFFD(Sender : TObject); begin (* 007FAFFD 50 push eax 007FAFFE 6461 popa 007FB000 7465 jz 007FB067 007FB002 205946 and [ecx+$46], bl 007FB005 5F pop edi 007FB006 4D dec ebp 007FB007 6F outsd 007FB008 6E outsb 007FB009 65795F jns 007FB06B 007FB00C 43 inc ebx 007FB00D 52 push edx 007FB00E 2000 and [eax], al 007FB010 FFFF DB $FF, $FF // 007FB012 FFFF DB $FF, $FF // 007FB014 1200 adc al, byte ptr [eax] 007FB016 0000 add [eax], al 007FB018 205365 and [ebx+$65], dl 007FB01B 7420 jz 007FB03D 007FB01D 46 inc esi 007FB01E 61 popa 007FB01F 63746F72 arpl [edi+ebp*2+$72], si 007FB023 794E jns 007FB073 007FB025 61 popa 007FB026 6D insd 007FB027 653D270000FF cmp eax, $FF000027 007FB02D FFFF DB $FF, $FF // 007FB02F FF01 inc dword ptr [ecx] 007FB031 0000 add [eax], al 007FB033 0027 add [edi], ah 007FB035 0000 add [eax], al 007FB037 00FF add bh, bh 007FB039 FFFF DB $FF, $FF // 007FB03B FF0D00000020 dec dword ptr [$20000000] 007FB041 7768 jnbe 007FB0AB 007FB043 657265 jb 007FB0AB 007FB046 205946 and [ecx+$46], bl 007FB049 49 dec ecx 007FB04A 643D27000000 cmp eax, $00000027 007FB050 FFFF DB $FF, $FF // 007FB052 FFFF DB $FF, $FF // 007FB054 0400 add al, +$00 007FB056 0000 add [eax], al 007FB058 59 pop ecx 007FB059 46 inc esi 007FB05A 49 dec ecx 007FB05B 640000 add fs:[eax], al 007FB05E 0000 add [eax], al 007FB060 55 push ebp 007FB061 8BEC mov ebp, esp 007FB063 51 push ecx 007FB064 B906000000 mov ecx, $00000006 007FB069 6A00 push $00 007FB06B 6A00 push $00 007FB06D 49 dec ecx 007FB06E 75F9 jnz 007FB069 007FB070 51 push ecx 007FB071 874DFC xchg [ebp-$04], ecx 007FB074 53 push ebx 007FB075 56 push esi 007FB076 8BF0 mov esi, eax 007FB078 33C0 xor eax, eax 007FB07A 55 push ebp * Possible String Reference to: '6樌脬^[嬪]' | 007FB07B 68B9B27F00 push $007FB2B9 ***** TRY | 007FB080 64FF30 push dword ptr fs:[eax] 007FB083 648920 mov fs:[eax], esp 007FB086 33C0 xor eax, eax 007FB088 55 push ebp 007FB089 688FB27F00 push $007FB28F ***** TRY | 007FB08E 64FF30 push dword ptr fs:[eax] 007FB091 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FB31D(Sender : TObject); begin (* 007FB31D 50 push eax 007FB31E 6461 popa 007FB320 7465 jz 007FB387 007FB322 205946 and [ecx+$46], bl 007FB325 5F pop edi 007FB326 4D dec ebp 007FB327 6F outsd 007FB328 6E outsb 007FB329 65795F jns 007FB38B 007FB32C 43 inc ebx 007FB32D 52 push edx 007FB32E 2000 and [eax], al 007FB330 FFFF DB $FF, $FF // 007FB332 FFFF DB $FF, $FF // 007FB334 0F0000 sldt word ptr [eax] 007FB337 0020 add [eax], ah 007FB339 53 push ebx 007FB33A 657420 jz 007FB35D 007FB33D 42 inc edx 007FB33E 61 popa 007FB33F 6E outsb 007FB340 6B4E616D imul ecx, [esi+$61], $6D 007FB344 653D2700FFFF cmp eax, $FFFF0027 007FB34A FFFF DB $FF, $FF // 007FB34C 07 pop es 007FB34D 0000 add [eax], al 007FB34F 005A64 add [edx+$64], bl 007FB352 794E jns 007FB3A2 007FB354 61 popa 007FB355 6D insd 007FB356 6500FF add bh, bh 007FB359 FFFF DB $FF, $FF // 007FB35B FF01 inc dword ptr [ecx] 007FB35D 0000 add [eax], al 007FB35F 0027 add [edi], ah 007FB361 0000 add [eax], al 007FB363 00FF add bh, bh 007FB365 FFFF DB $FF, $FF // 007FB367 FF09 dec dword ptr [ecx] 007FB369 0000 add [eax], al 007FB36B 002C4564697465 add [$65746964+eax*2], ch 007FB372 723D jb 007FB3B1 007FB374 27 daa 007FB375 0000 add [eax], al 007FB377 00FF add bh, bh 007FB379 FFFF DB $FF, $FF // 007FB37B FF1400 call dword ptr [eax+eax] 007FB37E 0000 add [eax], al 007FB380 2C45 sub al, $45 007FB382 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FB38B 657464 jz 007FB3F2 007FB38E 61 popa 007FB38F 7465 jz 007FB3F6 007FB391 2829 sub [ecx], ch 007FB393 2000 and [eax], al 007FB395 0000 add [eax], al 007FB397 00FF add bh, bh 007FB399 FFFF DB $FF, $FF // 007FB39B FF0D00000020 dec dword ptr [$20000000] 007FB3A1 7768 jnbe 007FB40B 007FB3A3 657265 jb 007FB40B 007FB3A6 205946 and [ecx+$46], bl 007FB3A9 49 dec ecx 007FB3AA 643D27000000 cmp eax, $00000027 007FB3B0 FFFF DB $FF, $FF // 007FB3B2 FFFF DB $FF, $FF // 007FB3B4 0400 add al, +$00 007FB3B6 0000 add [eax], al 007FB3B8 59 pop ecx 007FB3B9 46 inc esi 007FB3BA 49 dec ecx 007FB3BB 640000 add fs:[eax], al 007FB3BE 0000 add [eax], al 007FB3C0 55 push ebp 007FB3C1 8BEC mov ebp, esp 007FB3C3 33C9 xor ecx, ecx 007FB3C5 51 push ecx 007FB3C6 51 push ecx 007FB3C7 51 push ecx 007FB3C8 51 push ecx 007FB3C9 51 push ecx 007FB3CA 51 push ecx 007FB3CB 53 push ebx 007FB3CC 56 push esi 007FB3CD 8BF0 mov esi, eax 007FB3CF 33C0 xor eax, eax 007FB3D1 55 push ebp * Possible String Reference to: '榫暲脬^[嬪]' | 007FB3D2 6831B57F00 push $007FB531 ***** TRY | 007FB3D7 64FF30 push dword ptr fs:[eax] 007FB3DA 648920 mov fs:[eax], esp * Reference to control Label10 : TLabel | 007FB3DD 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007FB3E3 E8D8CACCFF call 004C7EC0 007FB3E8 84C0 test al, al 007FB3EA 0F851E010000 jnz 007FB50E 007FB3F0 A040B57F00 mov al, byte ptr [$007FB540] 007FB3F5 50 push eax 007FB3F6 8D45F0 lea eax, [ebp-$10] 007FB3F9 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007FB3FB E864D9C1FF call 00418D64 007FB400 8D4DF0 lea ecx, [ebp-$10] * Possible String Reference to: 'Ssel' | 007FB403 BA4CB57F00 mov edx, $007FB54C * Reference to control Label10 : TLabel | 007FB408 8B865C030000 mov eax, [esi+$035C] 007FB40E 8B18 mov ebx, [eax] * Possible reference to virtual method TLabel.OFFS_0244 | 007FB410 FF9344020000 call dword ptr [ebx+$0244] 007FB416 84C0 test al, al 007FB418 751D jnz 007FB437 007FB41A 6A00 push $00 * Possible String Reference to: '提示' | 007FB41C B954B57F00 mov ecx, $007FB554 * Possible String Reference to: '没有选择数据' | 007FB421 BA5CB57F00 mov edx, $007FB55C *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FB825(Sender : TObject); begin (* 007FB825 50 push eax 007FB826 6461 popa 007FB828 7465 jz 007FB88F 007FB82A 205946 and [ecx+$46], bl 007FB82D 5F pop edi 007FB82E 4D dec ebp 007FB82F 6F outsd 007FB830 6E outsb 007FB831 65795F jns 007FB893 007FB834 43 inc ebx 007FB835 52 push edx 007FB836 2000 and [eax], al 007FB838 FFFF DB $FF, $FF // 007FB83A FFFF DB $FF, $FF // 007FB83C 0C00 or al, $00 007FB83E 0000 add [eax], al 007FB840 205365 and [ebx+$65], dl 007FB843 7420 jz 007FB865 007FB845 4D dec ebp 007FB846 6F outsd 007FB847 6E outsb 007FB848 65793D jns 007FB888 007FB84B 27 daa 007FB84C 0000 add [eax], al 007FB84E 0000 add [eax], al 007FB850 FFFF DB $FF, $FF // 007FB852 FFFF DB $FF, $FF // 007FB854 0100 add [eax], eax 007FB856 0000 add [eax], al 007FB858 27 daa 007FB859 0000 add [eax], al 007FB85B 00FF add bh, bh 007FB85D FFFF DB $FF, $FF // 007FB85F FF0F dec dword ptr [edi] 007FB861 0000 add [eax], al 007FB863 0020 add [eax], ah 007FB865 53 push ebx 007FB866 657420 jz 007FB889 007FB869 4D dec ebp 007FB86A 6F outsd 007FB86B 6E outsb 007FB86C 65793D jns 007FB8AC 007FB86F 4E dec esi 007FB870 55 push ebp 007FB871 4C dec esp 007FB872 4C dec esp 007FB873 00FF add bh, bh 007FB875 FFFF DB $FF, $FF // 007FB877 FF09 dec dword ptr [ecx] 007FB879 0000 add [eax], al 007FB87B 002C4564697465 add [$65746964+eax*2], ch 007FB882 723D jb 007FB8C1 007FB884 27 daa 007FB885 0000 add [eax], al 007FB887 00FF add bh, bh 007FB889 FFFF DB $FF, $FF // 007FB88B FF1400 call dword ptr [eax+eax] 007FB88E 0000 add [eax], al 007FB890 2C45 sub al, $45 007FB892 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FB89B 657464 jz 007FB902 007FB89E 61 popa 007FB89F 7465 jz 007FB906 007FB8A1 2829 sub [ecx], ch 007FB8A3 2000 and [eax], al 007FB8A5 0000 add [eax], al 007FB8A7 00FF add bh, bh 007FB8A9 FFFF DB $FF, $FF // 007FB8AB FF0D00000020 dec dword ptr [$20000000] 007FB8B1 7768 jnbe 007FB91B 007FB8B3 657265 jb 007FB91B 007FB8B6 205946 and [ecx+$46], bl 007FB8B9 49 dec ecx 007FB8BA 643D27000000 cmp eax, $00000027 007FB8C0 FFFF DB $FF, $FF // 007FB8C2 FFFF DB $FF, $FF // 007FB8C4 0400 add al, +$00 007FB8C6 0000 add [eax], al 007FB8C8 59 pop ecx 007FB8C9 46 inc esi 007FB8CA 49 dec ecx 007FB8CB 640000 add fs:[eax], al 007FB8CE 0000 add [eax], al 007FB8D0 55 push ebp 007FB8D1 8BEC mov ebp, esp 007FB8D3 B907000000 mov ecx, $00000007 007FB8D8 6A00 push $00 007FB8DA 6A00 push $00 007FB8DC 49 dec ecx 007FB8DD 75F9 jnz 007FB8D8 007FB8DF 51 push ecx 007FB8E0 53 push ebx 007FB8E1 56 push esi 007FB8E2 8BDA mov ebx, edx 007FB8E4 8BF0 mov esi, eax 007FB8E6 33C0 xor eax, eax 007FB8E8 55 push ebp 007FB8E9 68E6BA7F00 push $007FBAE6 ***** TRY | 007FB8EE 64FF30 push dword ptr fs:[eax] 007FB8F1 648920 mov fs:[eax], esp * Possible String Reference to: 'CRFlag' | 007FB8F4 BAFCBA7F00 mov edx, $007FBAFC * Reference to control Label10 : TLabel | 007FB8F9 8B865C030000 mov eax, [esi+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FB8FF E8B0B2CCFF call 004C6BB4 007FB904 8D55F8 lea edx, [ebp-$08] 007FB907 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007FB909 FF5160 call dword ptr [ecx+$60] 007FB90C 837DF800 cmp dword ptr [ebp-$08], +$00 007FB910 751D jnz 007FB92F 007FB912 6A00 push $00 * Possible String Reference to: '提示' | 007FB914 B904BB7F00 mov ecx, $007FBB04 * Possible String Reference to: '请先选择方向' | 007FB919 BA0CBB7F00 mov edx, $007FBB0C *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FBB41(Sender : TObject); begin (* 007FBB41 50 push eax 007FBB42 6461 popa 007FBB44 7465 jz 007FBBAB 007FBB46 205946 and [ecx+$46], bl 007FBB49 5F pop edi 007FBB4A 4D dec ebp 007FBB4B 6F outsd 007FBB4C 6E outsb 007FBB4D 65795F jns 007FBBAF 007FBB50 43 inc ebx 007FBB51 52 push edx 007FBB52 2000 and [eax], al 007FBB54 FFFF DB $FF, $FF // 007FBB56 FFFF DB $FF, $FF // 007FBB58 0C00 or al, $00 007FBB5A 0000 add [eax], al 007FBB5C 205365 and [ebx+$65], dl 007FBB5F 7420 jz 007FBB81 007FBB61 4D dec ebp 007FBB62 6F outsd 007FBB63 6E outsb 007FBB64 65793D jns 007FBBA4 007FBB67 27 daa 007FBB68 0000 add [eax], al 007FBB6A 0000 add [eax], al 007FBB6C FFFF DB $FF, $FF // 007FBB6E FFFF DB $FF, $FF // 007FBB70 0100 add [eax], eax 007FBB72 0000 add [eax], al 007FBB74 27 daa 007FBB75 0000 add [eax], al 007FBB77 00FF add bh, bh 007FBB79 FFFF DB $FF, $FF // 007FBB7B FF0F dec dword ptr [edi] 007FBB7D 0000 add [eax], al 007FBB7F 0020 add [eax], ah 007FBB81 53 push ebx 007FBB82 657420 jz 007FBBA5 007FBB85 4D dec ebp 007FBB86 6F outsd 007FBB87 6E outsb 007FBB88 65793D jns 007FBBC8 007FBB8B 4E dec esi 007FBB8C 55 push ebp 007FBB8D 4C dec esp 007FBB8E 4C dec esp 007FBB8F 00FF add bh, bh 007FBB91 FFFF DB $FF, $FF // 007FBB93 FF09 dec dword ptr [ecx] 007FBB95 0000 add [eax], al 007FBB97 002C4564697465 add [$65746964+eax*2], ch 007FBB9E 723D jb 007FBBDD 007FBBA0 27 daa 007FBBA1 0000 add [eax], al 007FBBA3 00FF add bh, bh 007FBBA5 FFFF DB $FF, $FF // 007FBBA7 FF1400 call dword ptr [eax+eax] 007FBBAA 0000 add [eax], al 007FBBAC 2C45 sub al, $45 007FBBAE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007FBBB7 657464 jz 007FBC1E 007FBBBA 61 popa 007FBBBB 7465 jz 007FBC22 007FBBBD 2829 sub [ecx], ch 007FBBBF 2000 and [eax], al 007FBBC1 0000 add [eax], al 007FBBC3 00FF add bh, bh 007FBBC5 FFFF DB $FF, $FF // 007FBBC7 FF0D00000020 dec dword ptr [$20000000] 007FBBCD 7768 jnbe 007FBC37 007FBBCF 657265 jb 007FBC37 007FBBD2 205946 and [ecx+$46], bl 007FBBD5 49 dec ecx 007FBBD6 643D27000000 cmp eax, $00000027 007FBBDC FFFF DB $FF, $FF // 007FBBDE FFFF DB $FF, $FF // 007FBBE0 0400 add al, +$00 007FBBE2 0000 add [eax], al 007FBBE4 59 pop ecx 007FBBE5 46 inc esi 007FBBE6 49 dec ecx 007FBBE7 640000 add fs:[eax], al 007FBBEA 0000 add [eax], al 007FBBEC 55 push ebp 007FBBED 8BEC mov ebp, esp 007FBBEF 51 push ecx 007FBBF0 B905000000 mov ecx, $00000005 007FBBF5 6A00 push $00 007FBBF7 6A00 push $00 007FBBF9 49 dec ecx 007FBBFA 75F9 jnz 007FBBF5 007FBBFC 51 push ecx 007FBBFD 874DFC xchg [ebp-$04], ecx 007FBC00 53 push ebx 007FBC01 56 push esi 007FBC02 8BF0 mov esi, eax 007FBC04 33C0 xor eax, eax 007FBC06 55 push ebp * Possible String Reference to: '轺尷脬^[嬪]' | 007FBC07 68F8BD7F00 push $007FBDF8 ***** TRY | 007FBC0C 64FF30 push dword ptr fs:[eax] 007FBC0F 648920 mov fs:[eax], esp 007FBC12 33C0 xor eax, eax 007FBC14 55 push ebp 007FBC15 68CEBD7F00 push $007FBDCE ***** TRY | 007FBC1A 64FF30 push dword ptr fs:[eax] 007FBC1D 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FBE49(Sender : TObject); begin (* 007FBE49 50 push eax 007FBE4A 6461 popa 007FBE4C 7465 jz 007FBEB3 007FBE4E 205946 and [ecx+$46], bl 007FBE51 5F pop edi 007FBE52 4D dec ebp 007FBE53 6F outsd 007FBE54 6E outsb 007FBE55 65795F jns 007FBEB7 007FBE58 43 inc ebx 007FBE59 52 push edx 007FBE5A 2000 and [eax], al 007FBE5C FFFF DB $FF, $FF // 007FBE5E FFFF DB $FF, $FF // 007FBE60 0F0000 sldt word ptr [eax] 007FBE63 0020 add [eax], ah 007FBE65 53 push ebx 007FBE66 657420 jz 007FBE89 007FBE69 46 inc esi 007FBE6A 4B dec ebx 007FBE6B 54 push esp 007FBE6C 61 popa 007FBE6D 69746F753D2700FF imul esi, [edi+ebp*2+$75], $FF00273D 007FBE75 FFFF DB $FF, $FF // 007FBE77 FF01 inc dword ptr [ecx] 007FBE79 0000 add [eax], al 007FBE7B 0027 add [edi], ah 007FBE7D 0000 add [eax], al 007FBE7F 00FF add bh, bh 007FBE81 FFFF DB $FF, $FF // 007FBE83 FF0D00000020 dec dword ptr [$20000000] 007FBE89 7768 jnbe 007FBEF3 007FBE8B 657265 jb 007FBEF3 007FBE8E 205946 and [ecx+$46], bl 007FBE91 49 dec ecx 007FBE92 643D27000000 cmp eax, $00000027 007FBE98 FFFF DB $FF, $FF // 007FBE9A FFFF DB $FF, $FF // 007FBE9C 0400 add al, +$00 007FBE9E 0000 add [eax], al 007FBEA0 59 pop ecx 007FBEA1 46 inc esi 007FBEA2 49 dec ecx 007FBEA3 640000 add fs:[eax], al 007FBEA6 0000 add [eax], al 007FBEA8 55 push ebp 007FBEA9 8BEC mov ebp, esp 007FBEAB 6A00 push $00 007FBEAD 6A00 push $00 007FBEAF 6A00 push $00 007FBEB1 6A00 push $00 007FBEB3 53 push ebx 007FBEB4 8BD8 mov ebx, eax 007FBEB6 33C0 xor eax, eax 007FBEB8 55 push ebp 007FBEB9 68AEBF7F00 push $007FBFAE ***** TRY | 007FBEBE 64FF30 push dword ptr fs:[eax] 007FBEC1 648920 mov fs:[eax], esp * Reference to control Label10 : TLabel | 007FBEC4 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007FBECA E8F1BFCCFF call 004C7EC0 007FBECF 84C0 test al, al 007FBED1 0F85BC000000 jnz 007FBF93 * Reference to control ConNo : N.A. | 007FBED7 8B8360030000 mov eax, [ebx+$0360] * Reference to field N.A..OFFS_0057 | 007FBEDD 80785701 cmp byte ptr [eax+$57], $01 007FBEE1 0F85AC000000 jnz 007FBF93 * Reference to control Label11 : TLabel | 007FBEE7 8B8364030000 mov eax, [ebx+$0364] | 007FBEED E8DEE2E5FF call 0065A1D0 007FBEF2 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBEF4 E867D0E2FF call 00628F60 * Reference to control BankAddress : N.A. | 007FBEF9 8B83C4030000 mov eax, [ebx+$03C4] | 007FBEFF E8CCE2E5FF call 0065A1D0 007FBF04 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF06 E855D0E2FF call 00628F60 * Possible String Reference to: 'CRFlag' | 007FBF0B BAC4BF7F00 mov edx, $007FBFC4 * Reference to control Label10 : TLabel | 007FBF10 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FBF16 E899ACCCFF call 004C6BB4 007FBF1B 8D55F8 lea edx, [ebp-$08] 007FBF1E 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007FBF20 FF5160 call dword ptr [ecx+$60] 007FBF23 8B45F8 mov eax, [ebp-$08] 007FBF26 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007FBF29 E8BEE9C0FF call 0040A8EC 007FBF2E 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '收' | 007FBF31 BAD4BF7F00 mov edx, $007FBFD4 * Reference to: System.@LStrCmp; | 007FBF36 E80598C0FF call 00405740 007FBF3B 7512 jnz 007FBF4F * Reference to control Label11 : TLabel | 007FBF3D 8B8364030000 mov eax, [ebx+$0364] | 007FBF43 E888E2E5FF call 0065A1D0 007FBF48 B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF4A E811D0E2FF call 00628F60 * Possible String Reference to: 'CRFlag' | 007FBF4F BAC4BF7F00 mov edx, $007FBFC4 * Reference to control Label10 : TLabel | 007FBF54 8B835C030000 mov eax, [ebx+$035C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007FBF5A E855ACCCFF call 004C6BB4 007FBF5F 8D55F0 lea edx, [ebp-$10] 007FBF62 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007FBF64 FF5160 call dword ptr [ecx+$60] 007FBF67 8B45F0 mov eax, [ebp-$10] 007FBF6A 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007FBF6D E87AE9C0FF call 0040A8EC 007FBF72 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '付' | 007FBF75 BAE0BF7F00 mov edx, $007FBFE0 * Reference to: System.@LStrCmp; | 007FBF7A E8C197C0FF call 00405740 007FBF7F 7512 jnz 007FBF93 * Reference to control BankAddress : N.A. | 007FBF81 8B83C4030000 mov eax, [ebx+$03C4] | 007FBF87 E844E2E5FF call 0065A1D0 007FBF8C B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FBF8E E8CDCFE2FF call 00628F60 007FBF93 33C0 xor eax, eax 007FBF95 5A pop edx 007FBF96 59 pop ecx 007FBF97 59 pop ecx 007FBF98 648910 mov fs:[eax], edx ****** FINALLY | 007FBF9B 68B5BF7F00 push $007FBFB5 007FBFA0 8D45F0 lea eax, [ebp-$10] 007FBFA3 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007FBFA8 E89B93C0FF call 00405348 007FBFAD C3 ret *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FC239(Sender : TObject); begin (* 007FC239 50 push eax 007FC23A 6461 popa 007FC23C 7465 jz 007FC2A3 007FC23E 205946 and [ecx+$46], bl 007FC241 5F pop edi 007FC242 4D dec ebp 007FC243 6F outsd 007FC244 6E outsb 007FC245 65795F jns 007FC2A7 007FC248 43 inc ebx 007FC249 52 push edx 007FC24A 2000 and [eax], al 007FC24C FFFF DB $FF, $FF // 007FC24E FFFF DB $FF, $FF // 007FC250 0D00000020 or eax, $20000000 007FC255 53 push ebx 007FC256 657420 jz 007FC279 007FC259 42 inc edx 007FC25A 5A pop edx 007FC25B 54 push esp 007FC25C 7970 jns 007FC2CE 007FC25E 653D27000000 cmp eax, $00000027 007FC264 FFFF DB $FF, $FF // 007FC266 FFFF DB $FF, $FF // 007FC268 0100 add [eax], eax 007FC26A 0000 add [eax], al 007FC26C 27 daa 007FC26D 0000 add [eax], al 007FC26F 00FF add bh, bh 007FC271 FFFF DB $FF, $FF // 007FC273 FF0D00000020 dec dword ptr [$20000000] 007FC279 7768 jnbe 007FC2E3 007FC27B 657265 jb 007FC2E3 007FC27E 205946 and [ecx+$46], bl 007FC281 49 dec ecx 007FC282 643D27000000 cmp eax, $00000027 007FC288 FFFF DB $FF, $FF // 007FC28A FFFF DB $FF, $FF // 007FC28C 0400 add al, +$00 007FC28E 0000 add [eax], al 007FC290 59 pop ecx 007FC291 46 inc esi 007FC292 49 dec ecx 007FC293 640000 add fs:[eax], al 007FC296 0000 add [eax], al 007FC298 55 push ebp 007FC299 8BEC mov ebp, esp 007FC29B 51 push ecx 007FC29C B90A000000 mov ecx, $0000000A 007FC2A1 6A00 push $00 007FC2A3 6A00 push $00 007FC2A5 49 dec ecx 007FC2A6 75F9 jnz 007FC2A1 007FC2A8 874DFC xchg [ebp-$04], ecx 007FC2AB 53 push ebx 007FC2AC 56 push esi 007FC2AD 8BF0 mov esi, eax 007FC2AF 33C0 xor eax, eax 007FC2B1 55 push ebp 007FC2B2 6897C57F00 push $007FC597 ***** TRY | 007FC2B7 64FF30 push dword ptr fs:[eax] 007FC2BA 648920 mov fs:[eax], esp 007FC2BD 33C0 xor eax, eax 007FC2BF 55 push ebp 007FC2C0 6858C57F00 push $007FC558 ***** TRY | 007FC2C5 64FF30 push dword ptr fs:[eax] 007FC2C8 648920 mov fs:[eax], esp *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FC619(Sender : TObject); begin (* 007FC619 50 push eax 007FC61A 6461 popa 007FC61C 7465 jz 007FC683 007FC61E 205946 and [ecx+$46], bl 007FC621 5F pop edi 007FC622 4D dec ebp 007FC623 6F outsd 007FC624 6E outsb 007FC625 65795F jns 007FC687 007FC628 43 inc ebx 007FC629 52 push edx 007FC62A 2000 and [eax], al 007FC62C FFFF DB $FF, $FF // 007FC62E FFFF DB $FF, $FF // 007FC630 0D00000020 or eax, $20000000 007FC635 53 push ebx 007FC636 657420 jz 007FC659 007FC639 42 inc edx 007FC63A 61 popa 007FC63B 6E outsb 007FC63C 6B4E6F3D imul ecx, [esi+$6F], $3D 007FC640 27 daa 007FC641 0000 add [eax], al 007FC643 00FF add bh, bh 007FC645 FFFF DB $FF, $FF // 007FC647 FF01 inc dword ptr [ecx] 007FC649 0000 add [eax], al 007FC64B 0027 add [edi], ah 007FC64D 0000 add [eax], al 007FC64F 00FF add bh, bh 007FC651 FFFF DB $FF, $FF // 007FC653 FF0B dec dword ptr [ebx] 007FC655 0000 add [eax], al 007FC657 002C42 add [edx+eax*2], ch 007FC65A 61 popa 007FC65B 6E outsb 007FC65C 6B4E616D imul ecx, [esi+$61], $6D 007FC660 653D2700FFFF cmp eax, $FFFF0027 007FC666 FFFF DB $FF, $FF // 007FC668 0D00000020 or eax, $20000000 007FC66D 7768 jnbe 007FC6D7 007FC66F 657265 jb 007FC6D7 007FC672 205946 and [ecx+$46], bl 007FC675 49 dec ecx 007FC676 643D27000000 cmp eax, $00000027 007FC67C FFFF DB $FF, $FF // 007FC67E FFFF DB $FF, $FF // 007FC680 0400 add al, +$00 007FC682 0000 add [eax], al 007FC684 59 pop ecx 007FC685 46 inc esi 007FC686 49 dec ecx 007FC687 640000 add fs:[eax], al 007FC68A 0000 add [eax], al 007FC68C 55 push ebp 007FC68D 8BEC mov ebp, esp 007FC68F 33C0 xor eax, eax 007FC691 55 push ebp * Possible String Reference to: '>劺滕]脣纼-<' | 007FC692 68B1C67F00 push $007FC6B1 ***** TRY | 007FC697 64FF30 push dword ptr fs:[eax] 007FC69A 648920 mov fs:[eax], esp 007FC69D FF05E43C8900 inc dword ptr [$00893CE4] 007FC6A3 33C0 xor eax, eax 007FC6A5 5A pop edx 007FC6A6 59 pop ecx 007FC6A7 59 pop ecx 007FC6A8 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']脣纼-<' | 007FC6AB 68B8C67F00 push $007FC6B8 007FC6B0 C3 ret * Reference to: System.@HandleFinally; | 007FC6B1 E93E84C0FF jmp 00404AF4 007FC6B6 EBF8 jmp 007FC6B0 ****** END | 007FC6B8 5D pop ebp 007FC6B9 C3 ret 007FC6BA 8BC0 mov eax, eax 007FC6BC 832DE43C890001 sub dword ptr [$00893CE4], +$01 007FC6C3 C3 ret 007FC6C4 10C7 adc bh, al 007FC6C6 7F00 jnle 007FC6C8 007FC6C8 0000 add [eax], al 007FC6CA 0000 add [eax], al 007FC6CC 0000 add [eax], al 007FC6CE 0000 add [eax], al 007FC6D0 04C8 add al, -$38 007FC6D2 7F00 jnle 007FC6D4 007FC6D4 44 inc esp 007FC6D5 D27F00 sar byte ptr [edi+$00], cl 007FC6D8 26C87F enter , $7F 007FC6DB 006DCC add [ebp-$34], ch 007FC6DE 7F00 jnle 007FC6E0 007FC6E0 0000 add [eax], al *) end; procedure TfrmYSCRPB_ZHYH._PROC_007FC72A(Sender : TObject); begin (* 007FC72A 48 dec eax 007FC72B 0050D4 add [eax-$2C], dl 007FC72E 42 inc edx 007FC72F 0008 add [eax], cl 007FC731 2D4A007CD0 sub eax, $D07C004A 007FC736 42 inc edx 007FC737 00F4 add ah, dh 007FC739 6B4A00D0 imul ecx, [edx+$00], $D0 007FC73D 1D4A0030F6 sbb eax, $F630004A 007FC742 48 dec eax 007FC743 004CFB48 add [ebx+edi*8+$48], cl 007FC747 0098FA48000C add [eax+$C0048FA], bl 007FC74D 7948 jns 007FC797 007FC74F 00ACF04800E829 add [eax+esi*8+$29E80048], ch 007FC756 4A dec edx 007FC757 00E4 add ah, ah 007FC759 ED in eax, dx 007FC75A 48 dec eax 007FC75B 00547848 add [eax+edi*2+$48], dl 007FC75F 005878 add [eax+$78], bl 007FC762 48 dec eax 007FC763 00DC add ah, bl 007FC765 2A4A00 sub cl, byte ptr [edx+$00] 007FC768 3CA9 cmp al, $A9 007FC76A 48 dec eax 007FC76B 00C0 add al, al 007FC76D 834800D0 or dword ptr [eax+$00], -$30 007FC771 7948 jns 007FC7BB 007FC773 004C8548 add [ebp+eax*4+$48], cl 007FC777 00D0 add al, dl 007FC779 2C4A sub al, $4A 007FC77B 009C2B4A008486 add [ebx+ebp+$8684004A], bl 007FC782 48 dec eax 007FC783 00482D add [eax+$2D], cl 007FC786 4A dec edx 007FC787 00C0 add al, al 007FC789 A9480038EE test eax, $EE380048 007FC78E 48 dec eax 007FC78F 00F4 add ah, dh 007FC791 EE out dx, al 007FC792 48 dec eax 007FC793 00F0 add al, dh 007FC795 E94800D8EE jmp EF57C7E2 007FC79A 48 dec eax 007FC79B 00D8 add al, bl 007FC79D 1B4A00 sbb ecx, [edx+$00] 007FC7A0 EC in al, dx 007FC7A1 334A00 xor ecx, [edx+$00] 007FC7A4 20C4 and ah, al 007FC7A6 48 dec eax 007FC7A7 00B0404A0010 add [eax+$10004A40], dh 007FC7AD 44 inc esp 007FC7AE 4A dec edx 007FC7AF 00CC add ah, cl 007FC7B1 42 inc edx 007FC7B2 4A dec edx 007FC7B3 00B8C44800BC add [eax+$BC0048C4], bh 007FC7B9 C44800 les ecx, [eax+$00] 007FC7BC 48 dec eax 007FC7BD 45 inc ebp 007FC7BE 4A dec edx 007FC7BF 001CC3 add [ebx+eax*8], bl 007FC7C2 48 dec eax 007FC7C3 0018 add [eax], bl 007FC7C5 F0 lock 007FC7C6 48 dec eax 007FC7C7 00444C4A add [esp+ecx*2+$4A], al 007FC7CB 000C02 add [edx+eax], cl 007FC7CE 49 dec ecx 007FC7CF 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 007FC7D6 4A dec edx 007FC7D7 008C154A003C18 add [ebp+edx+$183C004A], cl 007FC7DE 4A dec edx 007FC7DF 0038 add [eax], bh 007FC7E1 52 push edx 007FC7E2 4A dec edx 007FC7E3 005C224A add [edx+$4A], bl 007FC7E7 00D8 add al, bl 007FC7E9 224A00 and cl, byte ptr [edx+$00] 007FC7EC 7C68 jl 007FC856 007FC7EE 4A dec edx 007FC7EF 00941F4A003C60 add [edi+ebx+$603C004A], dl 007FC7F6 4A dec edx 007FC7F7 001447 add [edi+eax*2], dl 007FC7FA 4A dec edx 007FC7FB 0034654A00CC2C add [$2CCC004A], dh 007FC802 4A dec edx 007FC803 000E add [esi], cl 007FC805 0000 add [eax], al 007FC807 0000 add [eax], al 007FC809 0003 add [ebx], al 007FC80B 0000 add [eax], al 007FC80D 0020 add [eax], ah 007FC80F 114000 adc [eax+$00], eax 007FC812 2404 and al, $04 007FC814 0000 add [eax], al 007FC816 2011 and [ecx], dl 007FC818 40 inc eax 007FC819 0028 add [eax], ch 007FC81B 0400 add al, +$00 007FC81D 0020 add [eax], ah 007FC81F 114000 adc [eax+$00], eax 007FC822 2C04 sub al, $04 007FC824 0000 add [eax], al 007FC826 4A dec edx 007FC827 00E9 add cl, ch 007FC829 D17F00 sar dword ptr [edi+$00], 1 007FC82C F8 clc 007FC82D 0200 add al, byte ptr [eax] 007FC82F 0000 add [eax], al 007FC831 0008 add [eax], cl 007FC833 54 push esp 007FC834 6F outsd 007FC835 6F outsd 007FC836 6C insb 007FC837 42 inc edx 007FC838 61 popa 007FC839 7231 jb 007FC86C 007FC83B FC cld 007FC83C 0200 add al, byte ptr [eax] 007FC83E 0001 add [ecx], al 007FC840 0009 add [ecx], cl 007FC842 54 push esp 007FC843 42 inc edx 007FC844 52 push edx 007FC845 61 popa 007FC846 667265 jb 007FC8AE 007FC849 7368 jnb 007FC8B3 007FC84B 0003 add [ebx], al 007FC84D 0000 add [eax], al 007FC84F 0100 add [eax], eax 007FC851 0554424465 add eax, +$65444254 007FC856 6C insb 007FC857 0403 add al, +$03 007FC859 0000 add [eax], al 007FC85B 0100 add [eax], eax 007FC85D 07 pop es 007FC85E 54 push esp 007FC85F 42 inc edx 007FC860 43 inc ebx 007FC861 6C insb 007FC862 6F outsd 007FC863 7365 jnb 007FC8CA 007FC865 0803 or [ebx], al 007FC867 0000 add [eax], al 007FC869 0200 add al, byte ptr [eax] 007FC86B 0C41 or al, $41 007FC86D 44 inc esp 007FC86E 4F dec edi 007FC86F 51 push ecx 007FC870 7565 jnz 007FC8D7 007FC872 7279 jb 007FC8ED 007FC874 54 push esp 007FC875 656D insd 007FC877 700C jo 007FC885 007FC879 0300 add eax, [eax] 007FC87B 0002 add [edx], al 007FC87D 000B add [ebx], cl 007FC87F 41 inc ecx 007FC880 44 inc esp 007FC881 4F dec edi 007FC882 51 push ecx 007FC883 7565 jnz 007FC8EA 007FC885 7279 jb 007FC900 007FC887 43 inc ebx 007FC888 6D insd 007FC889 641003 adc fs:[ebx], al 007FC88C 0000 add [eax], al 007FC88E 0300 add eax, [eax] 007FC890 06 push es 007FC891 50 push eax 007FC892 61 popa 007FC893 6E outsb 007FC894 656C insb 007FC896 311403 xor [ebx+eax], edx 007FC899 0000 add [eax], al 007FC89B 0100 add [eax], eax 007FC89D 0B546F6F or edx, [edi+ebp*2+$6F] 007FC8A1 6C insb 007FC8A2 42 inc edx 007FC8A3 7574 jnz 007FC919 007FC8A5 746F jz 007FC916 007FC8A7 6E outsb 007FC8A8 3218 xor bl, byte ptr [eax] 007FC8AA 0300 add eax, [eax] 007FC8AC 000400 add [eax+eax], al 007FC8AF 06 push es 007FC8B0 4C dec esp 007FC8B1 61 popa 007FC8B2 62656C bound esp, qword ptr [ebp+$6C] 007FC8B5 311C03 xor [ebx+eax], ebx 007FC8B8 0000 add [eax], al 007FC8BA 0500065946 add eax, +$46590600 007FC8BF 4E dec esi 007FC8C0 61 popa 007FC8C1 6D insd 007FC8C2 652003 and gs:[ebx], al 007FC8C5 0000 add [eax], al 007FC8C7 0200 add al, byte ptr [eax] 007FC8C9 0C41 or al, $41 007FC8CB 44 inc esp 007FC8CC 4F dec edi 007FC8CD 51 push ecx 007FC8CE 7565 jnz 007FC935 007FC8D0 7279 jb 007FC94B 007FC8D2 4D dec ebp 007FC8D3 61 popa 007FC8D4 696E2403000001 imul ebp, [esi+$24], $01000003 007FC8DB 000B add [ebx], cl 007FC8DD 54 push esp 007FC8DE 6F outsd 007FC8DF 6F outsd 007FC8E0 6C insb 007FC8E1 42 inc edx 007FC8E2 7574 jnz 007FC958 007FC8E4 746F jz 007FC955 007FC8E6 6E outsb 007FC8E7 3128 xor [eax], ebp 007FC8E9 0300 add eax, [eax] 007FC8EB 0006 add [esi], al 007FC8ED 0003 add [ebx], al 007FC8EF 52 push edx 007FC8F0 4D dec ebp 007FC8F1 312C03 xor [ebx+eax], ebp 007FC8F4 0000 add [eax], al 007FC8F6 07 pop es 007FC8F7 0009 add [ecx], cl 007FC8F9 52 push edx 007FC8FA 4D dec ebp 007FC8FB 44 inc esp 007FC8FC 42 inc edx 007FC8FD 5F pop edi 007FC8FE 4D dec ebp 007FC8FF 61 popa 007FC900 696E3003000004 imul ebp, [esi+$30], $04000003 007FC907 0006 add [esi], al 007FC909 4C dec esp 007FC90A 61 popa 007FC90B 62656C bound esp, qword ptr [ebp+$6C] 007FC90E 333403 xor esi, [ebx+eax] 007FC911 0000 add [eax], al 007FC913 05000B4661 add eax, +$61460B00 007FC918 63746F72 arpl [edi+ebp*2+$72], si 007FC91C 794E jns 007FC96C 007FC91E 61 popa 007FC91F 6D insd 007FC920 653803 cmp gs:[ebx], al 007FC923 0000 add [eax], al 007FC925 0800 or [eax], al 007FC927 07 pop es 007FC928 637847 arpl [eax+$47], di 007FC92B 7269 jb 007FC996 007FC92D 64323C03 xor bh, byte ptr fs:[ebx+eax] 007FC931 0000 add [eax], al 007FC933 0900 or [eax], eax 007FC935 03547632 add edx, [esi+esi*2+$32] 007FC939 40 inc eax 007FC93A 0300 add eax, [eax] 007FC93C 000A add [edx], cl 007FC93E 000F add [edi], cl 007FC940 637847 arpl [eax+$47], di 007FC943 7269 jb 007FC9AE 007FC945 6444 inc esp 007FC947 42 inc edx 007FC948 43 inc ebx 007FC949 6F outsd 007FC94A 6C insb 007FC94B 756D jnz 007FC9BA 007FC94D 6E outsb 007FC94E 31440300 xor [ebx+eax+$00], eax 007FC952 000A add [edx], cl 007FC954 000F add [edi], cl 007FC956 637847 arpl [eax+$47], di 007FC959 7269 jb 007FC9C4 007FC95B 6444 inc esp 007FC95D 42 inc edx 007FC95E 43 inc ebx 007FC95F 6F outsd 007FC960 6C insb 007FC961 756D jnz 007FC9D0 007FC963 6E outsb 007FC964 334803 xor ecx, [eax+$03] 007FC967 0000 add [eax], al 007FC969 0B00 or eax, [eax] 007FC96B 0C63 or al, $63 007FC96D 7847 js 007FC9B6 007FC96F 7269 jb 007FC9DA 007FC971 644C dec esp 007FC973 657665 jbe 007FC9DB 007FC976 6C insb 007FC977 314C0300 xor [ebx+eax+$00], ecx 007FC97B 000400 add [eax+eax], al 007FC97E 06 push es 007FC97F 4C dec esp 007FC980 61 popa 007FC981 62656C bound esp, qword ptr [ebp+$6C] 007FC984 325003 xor dl, byte ptr [eax+$03] 007FC987 0000 add [eax], al 007FC989 0400 add al, +$00 007FC98B 06 push es 007FC98C 4C dec esp 007FC98D 61 popa 007FC98E 62656C bound esp, qword ptr [ebp+$6C] 007FC991 3654 push esp 007FC993 0300 add eax, [eax] 007FC995 000C00 add [eax+eax], cl 007FC998 07 pop es 007FC999 626567 bound esp, qword ptr [ebp+$67] 007FC99C 6461 popa 007FC99E 7465 jz 007FCA05 007FC9A0 58 pop eax 007FC9A1 0300 add eax, [eax] 007FC9A3 000C00 add [eax+eax], cl 007FC9A6 07 pop es 007FC9A7 45 inc ebp 007FC9A8 6E outsb 007FC9A9 646461 popa 007FC9AC 7465 jz 007FCA13 007FC9AE 5C pop esp 007FC9AF 0300 add eax, [eax] 007FC9B1 000D00106378 add [$78631000], cl 007FC9B7 47 inc edi 007FC9B8 7269 jb 007FCA23 007FC9BA 6450 push eax 007FC9BC 6F outsd 007FC9BD 7075 jo 007FCA34 007FC9BF 704D jo 007FCA0E 007FC9C1 656E outsb 007FC9C3 7532 jnz 007FC9F7 007FC9C5 60 pusha 007FC9C6 0300 add eax, [eax] 007FC9C8 000E add [esi], cl 007FC9CA 000544535F48 add [$485F5344], al 007FC9D0 5A pop edx 007FC9D1 640300 add eax, fs:[eax] 007FC9D4 000F add [edi], cl 007FC9D6 0006 add [esi], al 007FC9D8 43 inc ebx 007FC9D9 44 inc esp 007FC9DA 53 push ebx 007FC9DB 5F pop edi 007FC9DC 48 dec eax 007FC9DD 5A pop edx 007FC9DE 680300000A push $0A000003 007FC9E3 0003 add [ebx], al 007FC9E5 56 push esi 007FC9E6 48 dec eax 007FC9E7 4C dec esp 007FC9E8 6C insb 007FC9E9 0300 add eax, [eax] 007FC9EB 000A add [edx], cl 007FC9ED 0003 add [ebx], al 007FC9EF 56 push esi 007FC9F0 42 inc edx 007FC9F1 5A pop edx 007FC9F2 7003 jo 007FC9F7 007FC9F4 0000 add [eax], al 007FC9F6 0A00 or al, byte ptr [eax] 007FC9F8 035659 add edx, [esi+$59] 007FC9FB 42 inc edx 007FC9FC 7403 jz 007FCA01 007FC9FE 0000 add [eax], al 007FCA00 0A00 or al, byte ptr [eax] 007FCA02 035642 add edx, [esi+$42] 007FCA05 42 inc edx 007FCA06 7803 js 007FCA0B 007FCA08 0000 add [eax], al 007FCA0A 0A00 or al, byte ptr [eax] 007FCA0C 097632 or [esi+$32], esi 007FCA0F 43 inc ebx 007FCA10 6F outsd 007FCA11 6C insb 007FCA12 756D jnz 007FCA81 007FCA14 6E outsb 007FCA15 367C03 jl 007FCA1B 007FCA18 0000 add [eax], al 007FCA1A 0400 add al, +$00 007FCA1C 06 push es 007FCA1D 4C dec esp 007FCA1E 61 popa 007FCA1F 62656C bound esp, qword ptr [ebp+$6C] 007FCA22 3480 xor al, $80 007FCA24 0300 add eax, [eax] 007FCA26 00050005636F add [$6F630500], al 007FCA2C 6E outsb 007FCA2D 4E dec esi 007FCA2E 6F outsd 007FCA2F 8403 test [ebx], al 007FCA31 0000 add [eax], al 007FCA33 0A00 or al, byte ptr [eax] 007FCA35 097632 or [esi+$32], esi 007FCA38 43 inc ebx 007FCA39 6F outsd 007FCA3A 6C insb 007FCA3B 756D jnz 007FCAAA 007FCA3D 6E outsb 007FCA3E 31880300000A xor [eax+$A000003], ecx 007FCA44 0006 add [esi], al 007FCA46 7632 jbe 007FCA7A 007FCA48 53 push ebx 007FCA49 7365 jnb 007FCAB0 007FCA4B 6C insb 007FCA4C 8C03 mov word ptr [ebx], es 007FCA4E 0000 add [eax], al 007FCA50 0A00 or al, byte ptr [eax] 007FCA52 0B7632 or esi, [esi+$32] 007FCA55 43 inc ebx 007FCA56 6F outsd 007FCA57 6D insd 007FCA58 54 push esp 007FCA59 61 popa 007FCA5A 69546F7590030000 imul edx, [edi+ebp*2+$75], $00000390 007FCA62 0400 add al, +$00 007FCA64 06 push es 007FCA65 4C dec esp 007FCA66 61 popa 007FCA67 62656C bound esp, qword ptr [ebp+$6C] 007FCA6A 3594030000 xor eax, $00000394 007FCA6F 050009436F add eax, +$6F430900 007FCA74 6D insd 007FCA75 54 push esp 007FCA76 61 popa 007FCA77 69546F7598030000 imul edx, [edi+ebp*2+$75], $00000398 007FCA7F 0400 add al, +$00 007FCA81 07 pop es 007FCA82 4C dec esp 007FCA83 61 popa 007FCA84 62656C bound esp, qword ptr [ebp+$6C] 007FCA87 3130 xor [eax], esi 007FCA89 9C pushf 007FCA8A 0300 add eax, [eax] 007FCA8C 000400 add [eax+eax], al 007FCA8F 07 pop es 007FCA90 4C dec esp 007FCA91 61 popa 007FCA92 62656C bound esp, qword ptr [ebp+$6C] 007FCA95 3132 xor [edx], esi 007FCA97 A00300000A mov al, byte ptr [$0A000003] 007FCA9C 000B add [ebx], cl 007FCA9E 7632 jbe 007FCAD2 007FCAA0 43 inc ebx 007FCAA1 686B737461 push $6174736B 007FCAA6 7475 jz 007FCB1D 007FCAA8 73A4 jnb 007FCA4E 007FCAAA 0300 add eax, [eax] 007FCAAC 0010 add [eax], dl 007FCAAE 000A add [edx], cl 007FCAB0 50 push eax 007FCAB1 6F outsd 007FCAB2 7075 jo 007FCB29 007FCAB4 704D jo 007FCB03 007FCAB6 656E outsb 007FCAB8 7531 jnz 007FCAEB 007FCABA A803 test al, $03 007FCABC 0000 add [eax], al 007FCABE 1100 adc [eax], eax 007FCAC0 024E31 add cl, byte ptr [esi+$31] 007FCAC3 AC lodsb 007FCAC4 0300 add eax, [eax] 007FCAC6 0011 add [ecx], dl 007FCAC8 0002 add [edx], al 007FCACA 4E dec esi 007FCACB 32B00300000A xor dh, byte ptr [eax+$A000003] 007FCAD1 0008 add [eax], cl 007FCAD3 7632 jbe 007FCB07 007FCAD5 46 inc esi 007FCAD6 4B dec ebx 007FCAD7 54 push esp 007FCAD8 7970 jns 007FCB4A 007FCADA 65B403 mov ah, $03 007FCADD 0000 add [eax], al 007FCADF 0A00 or al, byte ptr [eax] 007FCAE1 097632 or [esi+$32], esi 007FCAE4 63686B arpl [eax+$6B], bp 007FCAE7 6E outsb 007FCAE8 6F outsd 007FCAE9 7465 jz 007FCB50 007FCAEB B803000012 mov eax, $12000003 007FCAF0 0009 add [ecx], cl 007FCAF2 43 inc ebx 007FCAF3 6865636B42 push $426B6365 007FCAF8 6F outsd 007FCAF9 7831 js 007FCB2C 007FCAFB BC03000004 mov esp, $04000003 007FCB00 0006 add [esi], al 007FCB02 4C dec esp 007FCB03 61 popa 007FCB04 62656C bound esp, qword ptr [ebp+$6C] 007FCB07 37 aaa 007FCB08 C00300 rol byte ptr [ebx], $00 007FCB0B 00050006464B add [$4B460600], al 007FCB11 54 push esp 007FCB12 7970 jns 007FCB84 007FCB14 65C403 les eax, gs:[ebx] 007FCB17 0000 add [eax], al 007FCB19 0A00 or al, byte ptr [eax] 007FCB1B 0A7632 or dh, byte ptr [esi+$32] 007FCB1E 42 inc edx 007FCB1F 61 popa 007FCB20 6E outsb 007FCB21 6B4E616D imul ecx, [esi+$61], $6D 007FCB25 65C803 enter , $03 007FCB28 0000 add [eax], al 007FCB2A 0A00 or al, byte ptr [eax] 007FCB2C 087632 or [esi+$32], dh 007FCB2F 42 inc edx 007FCB30 61 popa 007FCB31 6E outsb 007FCB32 6B4E6FCC imul ecx, [esi+$6F], $CC 007FCB36 0300 add eax, [eax] 007FCB38 000400 add [eax+eax], al 007FCB3B 06 push es 007FCB3C 4C dec esp 007FCB3D 61 popa 007FCB3E 62656C bound esp, qword ptr [ebp+$6C] 007FCB41 38D0 cmp al, dl 007FCB43 0300 add eax, [eax] 007FCB45 000500084261 add [$61420800], al 007FCB4B 6E outsb 007FCB4C 6B4E616D imul ecx, [esi+$61], $6D 007FCB50 65D4 aam 007FCB52 0300 add eax, [eax] 007FCB54 0002 add [edx], al 007FCB56 0009 add [ecx], cl 007FCB58 41 inc ecx 007FCB59 44 inc esp 007FCB5A 4F dec edi 007FCB5B 51 push ecx 007FCB5C 7565 jnz 007FCBC3 007FCB5E 7279 jb 007FCBD9 007FCB60 31D8 xor eax, ebx 007FCB62 0300 add eax, [eax] 007FCB64 0001 add [ecx], al 007FCB66 0006 add [esi], al 007FCB68 54 push esp 007FCB69 50 push eax 007FCB6A 7269 jb 007FCBD5 007FCB6C 6E outsb 007FCB6D 74DC jz 007FCB4B 007FCB6F 0300 add eax, [eax] 007FCB71 000F add [edi], cl 007FCB73 0008 add [eax], cl 007FCB75 4F dec edi 007FCB76 7264 jb 007FCBDC 007FCB78 65725F jb 007FCBDA 007FCB7B 46 inc esi 007FCB7C 4B dec ebx 007FCB7D E003 loopn +$03 007FCB7F 0000 add [eax], al 007FCB81 1200 adc al, byte ptr [eax] 007FCB83 094368 or [ebx+$68], eax 007FCB86 65636B42 arpl gs:[ebx+$42], bp 007FCB8A 6F outsd 007FCB8B 7832 js 007FCBBF 007FCB8D E403 in al, $03 007FCB8F 0000 add [eax], al 007FCB91 0100 add [eax], eax 007FCB93 0554537365 add eax, +$65735354 007FCB98 6C insb 007FCB99 E803000013 call 137FCBA1 007FCB9E 000C52 add [edx+edx*2], cl 007FCBA1 4D dec ebp 007FCBA2 58 pop eax 007FCBA3 4C dec esp 007FCBA4 53 push ebx 007FCBA5 45 inc ebp 007FCBA6 7870 js 007FCC18 007FCBA8 6F outsd 007FCBA9 7274 jb 007FCC1F 007FCBAB 31EC xor esp, ebp 007FCBAD 0300 add eax, [eax] 007FCBAF 000A add [edx], cl 007FCBB1 0009 add [ecx], cl 007FCBB3 7632 jbe 007FCBE7 007FCBB5 46 inc esi 007FCBB6 58 pop eax 007FCBB7 4D dec ebp 007FCBB8 6F outsd 007FCBB9 6E outsb 007FCBBA 6579F0 jns 007FCBAD 007FCBBD 0300 add eax, [eax] 007FCBBF 000A add [edx], cl 007FCBC1 0009 add [ecx], cl 007FCBC3 7632 jbe 007FCBF7 007FCBC5 53 push ebx 007FCBC6 58 pop eax 007FCBC7 4D dec ebp 007FCBC8 6F outsd 007FCBC9 6E outsb 007FCBCA 6579F4 jns 007FCBC1 007FCBCD 0300 add eax, [eax] 007FCBCF 0001 add [ecx], al 007FCBD1 0003 add [ebx], al 007FCBD3 54 push esp 007FCBD4 54 push esp 007FCBD5 4A dec edx 007FCBD6 F8 clc 007FCBD7 0300 add eax, [eax] 007FCBD9 0001 add [ecx], al 007FCBDB 000554435854 add [$54584354], al 007FCBE1 4A dec edx 007FCBE2 FC cld 007FCBE3 0300 add eax, [eax] 007FCBE5 001400 add [eax+eax], dl 007FCBE8 0D63785461 or eax, $61547863 007FCBED 62436F bound eax, qword ptr [ebx+$6F] 007FCBF0 6E outsb 007FCBF1 7472 jz 007FCC65 007FCBF3 6F outsd 007FCBF4 6C insb 007FCBF5 3100 xor [eax], eax 007FCBF7 0400 add al, +$00 007FCBF9 0001 add [ecx], al 007FCBFB 0006 add [esi], al 007FCBFD 54 push esp 007FCBFE 53 push ebx 007FCBFF 44 inc esp 007FCC00 41 inc ecx 007FCC01 44 inc esp 007FCC02 44 inc esp 007FCC03 0404 add al, +$04 007FCC05 0000 add [eax], al 007FCC07 0A00 or al, byte ptr [eax] 007FCC09 0A7632 or dh, byte ptr [esi+$32] 007FCC0C 46 inc esi 007FCC0D 4B dec ebx 007FCC0E 54 push esp 007FCC0F 61 popa 007FCC10 69746F7508040000 imul esi, [edi+ebp*2+$75], $00000408 007FCC18 0A00 or al, byte ptr [eax] 007FCC1A 07 pop es 007FCC1B 7632 jbe 007FCC4F 007FCC1D 48 dec eax 007FCC1E 7569 jnz 007FCC89 007FCC20 4C dec esp 007FCC21 760C jbe 007FCC2F 007FCC23 0400 add al, +$00 007FCC25 000A add [edx], cl 007FCC27 0008 add [eax], cl 007FCC29 7632 jbe 007FCC5D 007FCC2B 4B dec ebx 007FCC2C 50 push eax 007FCC2D 54 push esp 007FCC2E 7970 jns 007FCCA0 007FCC30 65100400 adc gs:[eax+eax], al 007FCC34 000A add [edx], cl 007FCC36 000A add [edx], cl 007FCC38 7632 jbe 007FCC6C 007FCC3A 4B dec ebx 007FCC3B 50 push eax 007FCC3C 53 push ebx 007FCC3D 7461 jz 007FCCA0 007FCC3F 7475 jz 007FCCB6 007FCC41 7314 jnb 007FCC57 007FCC43 0400 add al, +$00 007FCC45 000A add [edx], cl 007FCC47 0009 add [ecx], cl 007FCC49 7632 jbe 007FCC7D 007FCC4B 4F dec edi 007FCC4C 7264 jb 007FCCB2 007FCC4E 65724E jb 007FCC9F 007FCC51 4F dec edi 007FCC52 180400 sbb [eax+eax], al 007FCC55 000400 add [eax+eax], al 007FCC58 06 push es 007FCC59 4C dec esp 007FCC5A 61 popa 007FCC5B 62656C bound esp, qword ptr [ebp+$6C] 007FCC5E 391C04 cmp [esp+eax], ebx 007FCC61 0000 add [eax], al 007FCC63 0500074F72 add eax, +$724F0700 007FCC68 6465724E jb 007FCCBA 007FCC6C 4F dec edi 007FCC6D 3000 xor [eax], al 007FCC6F 1200 adc al, byte ptr [eax] 007FCC71 A8D7 test al, $D7 007FCC73 7F00 jnle 007FCC75 007FCC75 0B466F or eax, [esi+$6F] 007FCC78 726D jb 007FCCE7 007FCC7A 44 inc esp 007FCC7B 657374 jnb 007FCCF2 007FCC7E 726F jb 007FCCEF 007FCC80 7910 jns 007FCC92 007FCC82 00B0D77F0009 add [eax+$9007FD7], dh 007FCC88 46 inc esi 007FCC89 6F outsd 007FCC8A 726D jb 007FCCF9 007FCC8C 43 inc ebx 007FCC8D 6C insb 007FCC8E 6F outsd 007FCC8F 7365 jnb 007FCCF6 007FCC91 1300 adc eax, [eax] 007FCC93 B4D7 mov ah, $D7 007FCC95 7F00 jnle 007FCC97 007FCC97 0C54 or al, $54 007FCC99 42 inc edx 007FCC9A 43 inc ebx 007FCC9B 6C insb 007FCC9C 6F outsd 007FCC9D 7365 jnb 007FCD04 007FCC9F 43 inc ebx 007FCCA0 6C insb 007FCCA1 69636B110000D8 imul esp, [ebx+$6B], $D8000011 007FCCA8 7F00 jnle 007FCCAA 007FCCAA 0A544244 or dl, byte ptr [edx+eax*2+$44] 007FCCAE 656C insb 007FCCB0 43 inc ebx 007FCCB1 6C insb 007FCCB2 69636B0F00B4DA imul esp, [ebx+$6B], $DAB4000F 007FCCB9 7F00 jnle 007FCCBB 007FCCBB 08466F or [esi+$6F], al 007FCCBE 726D jb 007FCD2D 007FCCC0 53 push ebx 007FCCC1 686F771500 push $0015776F 007FCCC6 50 push eax 007FCCC7 DB7F00 fstp tbyte ptr [edi+$00] 007FCCCA 0E push cs 007FCCCB 54 push esp 007FCCCC 42 inc edx 007FCCCD 52 push edx 007FCCCE 61 popa 007FCCCF 667265 jb 007FCD37 007FCCD2 7368 jnb 007FCD3C 007FCCD4 43 inc ebx 007FCCD5 6C insb 007FCCD6 69636B17006CDB imul esp, [ebx+$6B], $DB6C0017 007FCCDD 7F00 jnle 007FCCDF 007FCCDF 10546F6F adc [edi+ebp*2+$6F], dl 007FCCE3 6C insb 007FCCE4 42 inc edx 007FCCE5 7574 jnz 007FCD5B 007FCCE7 746F jz 007FCD58 007FCCE9 6E outsb 007FCCEA 32436C xor al, byte ptr [ebx+$6C] 007FCCED 69636B180018DC imul esp, [ebx+$6B], $DC180018 007FCCF4 7F00 jnle 007FCCF6 007FCCF6 114661 adc [esi+$61], eax 007FCCF9 63746F72 arpl [edi+ebp*2+$72], si 007FCCFD 794E jns 007FCD4D 007FCCFF 61 popa 007FCD00 6D insd 007FCD01 6543 inc ebx 007FCD03 68616E6765 push $65676E61 007FCD08 1300 adc eax, [eax] 007FCD0A 2CDC sub al, $DC 007FCD0C 7F00 jnle 007FCD0E 007FCD0E 0C42 or al, $42 007FCD10 7574 jnz 007FCD86 007FCD12 746F jz 007FCD83 007FCD14 6E outsb 007FCD15 32436C xor al, byte ptr [ebx+$6C] 007FCD18 69636B3000A0EC imul esp, [ebx+$6B], $ECA00030 007FCD1F 7F00 jnle 007FCD21 007FCD21 296378 sub dword ptr [ebx+$78], esp 007FCD24 47 inc edi 007FCD25 7269 jb 007FCD90 007FCD27 6444 inc esp 007FCD29 42 inc edx 007FCD2A 43 inc ebx 007FCD2B 6F outsd 007FCD2C 6C insb 007FCD2D 756D jnz 007FCD9C 007FCD2F 6E outsb 007FCD30 385072 cmp [eax+$72], dl 007FCD33 6F outsd 007FCD34 7065 jo 007FCD9B 007FCD36 7274 jb 007FCDAC 007FCD38 69657345646974 imul esp, [ebp+$73], $74696445 007FCD3F 56 push esi 007FCD40 61 popa 007FCD41 6C insb 007FCD42 7565 jnz 007FCDA9 007FCD44 43 inc ebx 007FCD45 68616E6765 push $65676E61 007FCD4A 643000 xor fs:[eax], al 007FCD4D 6C insb 007FCD4E EF out dx, eax 007FCD4F 7F00 jnle 007FCD51 007FCD51 296378 sub dword ptr [ebx+$78], esp 007FCD54 47 inc edi 007FCD55 7269 jb 007FCDC0 007FCD57 6444 inc esp 007FCD59 42 inc edx 007FCD5A 43 inc ebx 007FCD5B 6F outsd 007FCD5C 6C insb 007FCD5D 756D jnz 007FCDCC 007FCD5F 6E outsb 007FCD60 3550726F70 xor eax, $706F7250 007FCD65 657274 jb 007FCDDC 007FCD68 69657345646974 imul esp, [ebp+$73], $74696445 007FCD6F 56 push esi 007FCD70 61 popa 007FCD71 6C insb 007FCD72 7565 jnz 007FCDD9 007FCD74 43 inc ebx 007FCD75 68616E6765 push $65676E61 007FCD7A 643000 xor fs:[eax], al 007FCD7D B8F77F0029 mov eax, $29007FF7 007FCD82 637847 arpl [eax+$47], di 007FCD85 7269 jb 007FCDF0 007FCD87 6444 inc esp 007FCD89 42 inc edx 007FCD8A 43 inc ebx 007FCD8B 6F outsd 007FCD8C 6C insb 007FCD8D 756D jnz 007FCDFC 007FCD8F 6E outsb 007FCD90 315072 xor [eax+$72], edx 007FCD93 6F outsd 007FCD94 7065 jo 007FCDFB 007FCD96 7274 jb 007FCE0C 007FCD98 69657345646974 imul esp, [ebp+$73], $74696445 007FCD9F 56 push esi 007FCDA0 61 popa 007FCDA1 6C insb 007FCDA2 7565 jnz 007FCE09 007FCDA4 43 inc ebx 007FCDA5 68616E6765 push $65676E61 007FCDAA 6417 pop ss 007FCDAC 0084FA7F001054 add [edx+edi*8+$5410007F], al 007FCDB3 6F outsd 007FCDB4 6F outsd 007FCDB5 6C insb 007FCDB6 42 inc edx 007FCDB7 7574 jnz 007FCE2D 007FCDB9 746F jz 007FCE2A 007FCDBB 6E outsb 007FCDBC 33436C xor eax, [ebx+$6C] 007FCDBF 69636B2B00BC02 imul esp, [ebx+$6B], $02BC002B 007FCDC6 800024 add byte ptr [eax], $24 007FCDC9 637847 arpl [eax+$47], di 007FCDCC 7269 jb 007FCE37 007FCDCE 6444 inc esp 007FCDD0 42 inc edx 007FCDD1 43 inc ebx 007FCDD2 6F outsd 007FCDD3 6C insb 007FCDD4 756D jnz 007FCE43 007FCDD6 6E outsb 007FCDD7 335072 xor edx, [eax+$72] 007FCDDA 6F outsd 007FCDDB 7065 jo 007FCE42 007FCDDD 7274 jb 007FCE53 007FCDDF 69657342757474 imul esp, [ebp+$73], $74747542 007FCDE6 6F outsd 007FCDE7 6E outsb 007FCDE8 43 inc ebx 007FCDE9 6C insb 007FCDEA 69636B2B009007 imul esp, [ebx+$6B], $0790002B 007FCDF1 800024 add byte ptr [eax], $24 007FCDF4 637847 arpl [eax+$47], di 007FCDF7 7269 jb 007FCE62 007FCDF9 6444 inc esp 007FCDFB 42 inc edx 007FCDFC 43 inc ebx 007FCDFD 6F outsd 007FCDFE 6C insb 007FCDFF 756D jnz 007FCE6E 007FCE01 6E outsb 007FCE02 3650 push eax 007FCE04 726F jb 007FCE75 007FCE06 7065 jo 007FCE6D 007FCE08 7274 jb 007FCE7E 007FCE0A 69657342757474 imul esp, [ebp+$73], $74747542 007FCE11 6F outsd 007FCE12 6E outsb 007FCE13 43 inc ebx 007FCE14 6C insb 007FCE15 69636B2500EC0A imul esp, [ebx+$6B], $0AEC0025 007FCE1C 80001E add byte ptr [eax], $1E 007FCE1F 7632 jbe 007FCE53 007FCE21 43 inc ebx 007FCE22 6F outsd 007FCE23 6C insb 007FCE24 756D jnz 007FCE93 007FCE26 6E outsb 007FCE27 335072 xor edx, [eax+$72] 007FCE2A 6F outsd 007FCE2B 7065 jo 007FCE92 007FCE2D 7274 jb 007FCEA3 007FCE2F 69657342757474 imul esp, [ebp+$73], $74747542 007FCE36 6F outsd 007FCE37 6E outsb 007FCE38 43 inc ebx 007FCE39 6C insb 007FCE3A 69636B1700300E imul esp, [ebx+$6B], $0E300017 007FCE41 800010 add byte ptr [eax], $10 007FCE44 54 push esp 007FCE45 6F outsd 007FCE46 6F outsd 007FCE47 6C insb 007FCE48 42 inc edx 007FCE49 7574 jnz 007FCEBF 007FCE4B 746F jz 007FCEBC 007FCE4D 6E outsb 007FCE4E 31436C xor [ebx+$6C], eax 007FCE51 69636B2A00700E imul esp, [ebx+$6B], $0E70002A 007FCE58 800023 add byte ptr [eax], $23 007FCE5B 7632 jbe 007FCE8F 007FCE5D 43 inc ebx 007FCE5E 6F outsd 007FCE5F 6C insb 007FCE60 756D jnz 007FCECF 007FCE62 6E outsb 007FCE63 3450 xor al, $50 007FCE65 726F jb 007FCED6 007FCE67 7065 jo 007FCECE 007FCE69 7274 jb 007FCEDF 007FCE6B 69657345646974 imul esp, [ebp+$73], $74696445 007FCE72 56 push esi 007FCE73 61 popa 007FCE74 6C insb 007FCE75 7565 jnz 007FCEDC 007FCE77 43 inc ebx 007FCE78 68616E6765 push $65676E61 007FCE7D 642500E81480 and eax, $8014E800 007FCE83 001E add [esi], bl 007FCE85 7632 jbe 007FCEB9 007FCE87 43 inc ebx 007FCE88 6F outsd 007FCE89 6C insb 007FCE8A 756D jnz 007FCEF9 007FCE8C 6E outsb 007FCE8D 315072 xor [eax+$72], edx 007FCE90 6F outsd 007FCE91 7065 jo 007FCEF8 007FCE93 7274 jb 007FCF09 007FCE95 69657342757474 imul esp, [ebp+$73], $74747542 007FCE9C 6F outsd 007FCE9D 6E outsb 007FCE9E 43 inc ebx 007FCE9F 6C insb 007FCEA0 69636B24005819 imul esp, [ebx+$6B], $19580024 007FCEA7 80001D add byte ptr [eax], $1D 007FCEAA 56 push esi 007FCEAB 42 inc edx 007FCEAC 42 inc edx 007FCEAD 50 push eax 007FCEAE 726F jb 007FCF1F 007FCEB0 7065 jo 007FCF17 007FCEB2 7274 jb 007FCF28 007FCEB4 69657345646974 imul esp, [ebp+$73], $74696445 007FCEBB 56 push esi 007FCEBC 61 popa 007FCEBD 6C insb 007FCEBE 7565 jnz 007FCF25 007FCEC0 43 inc ebx 007FCEC1 68616E6765 push $65676E61 007FCEC6 641200 adc al, byte ptr fs:[eax] 007FCEC9 7C1D jl 007FCEE8 007FCECB 80000B add byte ptr [eax], $0B 007FCECE 636F6E arpl [edi+$6E], bp 007FCED1 4E dec esi 007FCED2 6F outsd 007FCED3 43 inc ebx 007FCED4 68616E6765 push $65676E61 007FCED9 2A00 sub al, byte ptr [eax] 007FCEDB F8 clc 007FCEDC 1D80002376 sbb eax, $76230080 007FCEE1 32436F xor al, byte ptr [ebx+$6F] 007FCEE4 6C insb 007FCEE5 756D jnz 007FCF54 007FCEE7 6E outsb 007FCEE8 315072 xor [eax+$72], edx 007FCEEB 6F outsd 007FCEEC 7065 jo 007FCF53 007FCEEE 7274 jb 007FCF64 007FCEF0 69657345646974 imul esp, [ebp+$73], $74696445 007FCEF7 56 push esi 007FCEF8 61 popa 007FCEF9 6C insb 007FCEFA 7565 jnz 007FCF61 007FCEFC 43 inc ebx 007FCEFD 68616E6765 push $65676E61 007FCF02 642E00F4 add ah, dh 007FCF06 208000277632 and [eax+$32762700], al 007FCF0C 44 inc esp 007FCF0D 657261 jb 007FCF71 007FCF10 7465 jz 007FCF77 007FCF12 4D dec ebp 007FCF13 6F outsd 007FCF14 6E outsb 007FCF15 657950 jns 007FCF68 007FCF18 726F jb 007FCF89 007FCF1A 7065 jo 007FCF81 007FCF1C 7274 jb 007FCF92 007FCF1E 69657345646974 imul esp, [ebp+$73], $74696445 007FCF25 56 push esi 007FCF26 61 popa 007FCF27 6C insb 007FCF28 7565 jnz 007FCF8F 007FCF2A 43 inc ebx 007FCF2B 68616E6765 push $65676E61 007FCF30 642800 sub fs:[eax], al 007FCF33 F0 lock 007FCF34 228000217632 and al, byte ptr [eax+$32762100] 007FCF3A 667374 jnb 007FCFB1 007FCF3D 7231 jb 007FCF70 007FCF3F 50 push eax 007FCF40 726F jb 007FCFB1 007FCF42 7065 jo 007FCFA9 007FCF44 7274 jb 007FCFBA 007FCF46 69657345646974 imul esp, [ebp+$73], $74696445 007FCF4D 56 push esi 007FCF4E 61 popa 007FCF4F 6C insb 007FCF50 7565 jnz 007FCFB7 007FCF52 43 inc ebx 007FCF53 68616E6765 push $65676E61 007FCF58 641000 adc fs:[eax], al 007FCF5B 5C pop esp 007FCF5C 2480 and al, $80 007FCF5E 0009 add [ecx], cl 007FCF60 54 push esp 007FCF61 63686B arpl [eax+$6B], bp 007FCF64 43 inc ebx 007FCF65 6C insb 007FCF66 69636B12001027 imul esp, [ebx+$6B], $27100012 007FCF6D 80000B add byte ptr [eax], $0B 007FCF70 54 push esp 007FCF71 4E dec esi 007FCF72 6F outsd 007FCF73 63686B arpl [eax+$6B], bp 007FCF76 43 inc ebx 007FCF77 6C insb 007FCF78 69636B1A00B829 imul esp, [ebx+$6B], $29B8001A 007FCF7F 800013 add byte ptr [eax], $13 007FCF82 637854 arpl [eax+$54], di 007FCF85 61 popa 007FCF86 62436F bound eax, qword ptr [ebx+$6F] 007FCF89 6E outsb 007FCF8A 7472 jz 007FCFFE 007FCF8C 6F outsd 007FCF8D 6C insb 007FCF8E 314368 xor [ebx+$68], eax 007FCF91 61 popa 007FCF92 6E outsb 007FCF93 676527 daa 007FCF96 00CC add ah, cl 007FCF98 298000207632 sub dword ptr [eax+$32762000], eax 007FCF9E 43 inc ebx 007FCF9F 6F outsd 007FCFA0 6D insd 007FCFA1 54 push esp 007FCFA2 61 popa 007FCFA3 69546F7550726F70 imul edx, [edi+ebp*2+$75], $706F7250 007FCFAB 657274 jb 007FD022 007FCFAE 69657342757474 imul esp, [ebp+$73], $74747542 007FCFB5 6F outsd 007FCFB6 6E outsb 007FCFB7 43 inc ebx 007FCFB8 6C insb 007FCFB9 69636B1D00942D imul esp, [ebx+$6B], $2D94001D 007FCFC0 800016 add byte ptr [eax], $16 007FCFC3 7632 jbe 007FCFF7 007FCFC5 53 push ebx 007FCFC6 7365 jnb 007FD02D 007FCFC8 6C insb 007FCFC9 50 push eax 007FCFCA 726F jb 007FD03B 007FCFCC 7065 jo 007FD033 007FCFCE 7274 jb 007FD044 007FCFD0 6965734368616E imul esp, [ebp+$73], $6E616843 007FCFD7 67651F pop ds 007FCFDA 00E0 add al, ah 007FCFDC 2D80001854 sub eax, $54180080 007FCFE1 7632 jbe 007FD015 007FCFE3 53 push ebx 007FCFE4 7479 jz 007FD05F 007FCFE6 6C insb 007FCFE7 657347 jnb 007FD031 007FCFEA 657443 jz 007FD030 007FCFED 6F outsd 007FCFEE 6E outsb 007FCFEF 7465 jz 007FD056 007FCFF1 6E outsb 007FCFF2 7453 jz 007FD047 007FCFF4 7479 jz 007FD06F 007FCFF6 6C insb 007FCFF7 650F00A82E800008 verw word ptr gs:[eax+$800802E] 007FCFFF 54 push esp 007FD000 48 dec eax 007FD001 58 pop eax 007FD002 43 inc ebx 007FD003 6C insb 007FD004 69636B0E004831 imul esp, [ebx+$6B], $3148000E 007FD00B 800007 add byte ptr [eax], $07 007FD00E 4E dec esi 007FD00F 31436C xor [ebx+$6C], eax 007FD012 69636B0E005831 imul esp, [ebx+$6B], $3158000E 007FD019 800007 add byte ptr [eax], $07 007FD01C 4E dec esi 007FD01D 32436C xor al, byte ptr [ebx+$6C] 007FD020 69636B24006831 imul esp, [ebx+$6B], $31680024 007FD027 80001D add byte ptr [eax], $1D 007FD02A 7632 jbe 007FD05E 007FD02C 46 inc esi 007FD02D 4B dec ebx 007FD02E 54 push esp 007FD02F 7970 jns 007FD0A1 007FD031 6550 push eax 007FD033 726F jb 007FD0A4 007FD035 7065 jo 007FD09C 007FD037 7274 jb 007FD0AD 007FD039 69657342757474 imul esp, [ebp+$73], $74747542 007FD040 6F outsd 007FD041 6E outsb 007FD042 43 inc ebx 007FD043 6C insb 007FD044 69636B1500AC34 imul esp, [ebx+$6B], $34AC0015 007FD04B 80000E add byte ptr [eax], $0E 007FD04E 43 inc ebx 007FD04F 6865636B42 push $426B6365 007FD054 6F outsd 007FD055 7831 js 007FD088 007FD057 43 inc ebx 007FD058 6C insb 007FD059 69636B26003C36 imul esp, [ebx+$6B], $363C0026 007FD060 80001F add byte ptr [eax], $1F 007FD063 7632 jbe 007FD097 007FD065 42 inc edx 007FD066 61 popa 007FD067 6E outsb 007FD068 6B4E616D imul ecx, [esi+$61], $6D 007FD06C 6550 push eax 007FD06E 726F jb 007FD0DF 007FD070 7065 jo 007FD0D7 007FD072 7274 jb 007FD0E8 007FD074 69657342757474 imul esp, [ebp+$73], $74747542 007FD07B 6F outsd 007FD07C 6E outsb 007FD07D 43 inc ebx 007FD07E 6C insb 007FD07F 69636B2400B83A imul esp, [ebx+$6B], $3AB80024 007FD086 80001D add byte ptr [eax], $1D 007FD089 7632 jbe 007FD0BD 007FD08B 42 inc edx 007FD08C 61 popa 007FD08D 6E outsb 007FD08E 6B4E6F50 imul ecx, [esi+$6F], $50 007FD092 726F jb 007FD103 007FD094 7065 jo 007FD0FB 007FD096 7274 jb 007FD10C 007FD098 69657342757474 imul esp, [ebp+$73], $74747542 007FD09F 6F outsd 007FD0A0 6E outsb 007FD0A1 43 inc ebx 007FD0A2 6C insb 007FD0A3 69636B2600103E imul esp, [ebx+$6B], $3E100026 007FD0AA 80001F add byte ptr [eax], $1F 007FD0AD 7632 jbe 007FD0E1 007FD0AF 46 inc esi 007FD0B0 4B dec ebx 007FD0B1 54 push esp 007FD0B2 61 popa 007FD0B3 69546F7550726F70 imul edx, [edi+ebp*2+$75], $706F7250 007FD0BB 657274 jb 007FD132 007FD0BE 69657342757474 imul esp, [ebp+$73], $74747542 007FD0C5 6F outsd 007FD0C6 6E outsb 007FD0C7 43 inc ebx 007FD0C8 6C insb 007FD0C9 69636B1200D042 imul esp, [ebx+$6B], $42D00012 007FD0D0 80000B add byte ptr [eax], $0B 007FD0D3 54 push esp 007FD0D4 50 push eax 007FD0D5 7269 jb 007FD140 007FD0D7 6E outsb 007FD0D8 7443 jz 007FD11D 007FD0DA 6C insb 007FD0DB 69636B26005C4D imul esp, [ebx+$6B], $4D5C0026 007FD0E2 80001F add byte ptr [eax], $1F 007FD0E5 7632 jbe 007FD119 007FD0E7 51 push ecx 007FD0E8 7479 jz 007FD163 007FD0EA 50 push eax 007FD0EB 726F jb 007FD15C 007FD0ED 7065 jo 007FD154 007FD0EF 7274 jb 007FD165 007FD0F1 69657345646974 imul esp, [ebp+$73], $74696445 007FD0F8 56 push esi 007FD0F9 61 popa 007FD0FA 6C insb 007FD0FB 7565 jnz 007FD162 007FD0FD 43 inc ebx 007FD0FE 68616E6765 push $65676E61 007FD103 642800 sub fs:[eax], al 007FD106 60 pusha 007FD107 50 push eax 007FD108 800021 add byte ptr [eax], $21 007FD10B 7632 jbe 007FD13F 007FD10D 50 push eax 007FD10E 7269 jb 007FD179 007FD110 636550 arpl [ebp+$50], sp 007FD113 726F jb 007FD184 007FD115 7065 jo 007FD17C 007FD117 7274 jb 007FD18D 007FD119 69657345646974 imul esp, [ebp+$73], $74696445 007FD120 56 push esi 007FD121 61 popa 007FD122 6C insb 007FD123 7565 jnz 007FD18A 007FD125 43 inc ebx 007FD126 68616E6765 push $65676E61 007FD12B 6426006853 add es:[eax+$53], ch 007FD130 80001F add byte ptr [eax], $1F 007FD133 7632 jbe 007FD167 007FD135 53 push ebx 007FD136 51 push ecx 007FD137 50 push eax 007FD138 657270 jb 007FD1AB 007FD13B 6F outsd 007FD13C 6E outsb 007FD13D 50 push eax 007FD13E 726F jb 007FD1AF 007FD140 7065 jo 007FD1A7 007FD142 7274 jb 007FD1B8 007FD144 69657342757474 imul esp, [ebp+$73], $74747542 007FD14B 6F outsd 007FD14C 6E outsb 007FD14D 43 inc ebx 007FD14E 6C insb 007FD14F 69636B11002056 imul esp, [ebx+$6B], $56200011 007FD156 80000A add byte ptr [eax], $0A 007FD159 54 push esp 007FD15A 53 push ebx 007FD15B 7365 jnb 007FD1C2 007FD15D 6C insb 007FD15E 43 inc ebx 007FD15F 6C insb 007FD160 69636B0F004056 imul esp, [ebx+$6B], $5640000F 007FD167 800008 add byte ptr [eax], $08 007FD16A 54 push esp 007FD16B 54 push esp 007FD16C 4A dec edx 007FD16D 43 inc ebx 007FD16E 6C insb 007FD16F 69636B1100E858 imul esp, [ebx+$6B], $58E80011 007FD176 80000A add byte ptr [eax], $0A 007FD179 54 push esp 007FD17A 43 inc ebx 007FD17B 58 pop eax 007FD17C 54 push esp 007FD17D 4A dec edx 007FD17E 43 inc ebx 007FD17F 6C insb 007FD180 69636B1200905B imul esp, [ebx+$6B], $5B900012 007FD187 80000B add byte ptr [eax], $0B 007FD18A 54 push esp 007FD18B 53 push ebx 007FD18C 44 inc esp 007FD18D 41 inc ecx 007FD18E 44 inc esp 007FD18F 44 inc esp 007FD190 43 inc ebx 007FD191 6C insb 007FD192 69636B2600F45E imul esp, [ebx+$6B], $5EF40026 007FD199 80001F add byte ptr [eax], $1F 007FD19C 7632 jbe 007FD1D0 007FD19E 4B dec ebx 007FD19F 50 push eax 007FD1A0 53 push ebx 007FD1A1 7461 jz 007FD204 007FD1A3 7475 jz 007FD21A 007FD1A5 7350 jnb 007FD1F7 007FD1A7 726F jb 007FD218 007FD1A9 7065 jo 007FD210 007FD1AB 7274 jb 007FD221 007FD1AD 69657342757474 imul esp, [ebp+$73], $74747542 007FD1B4 6F outsd 007FD1B5 6E outsb 007FD1B6 43 inc ebx 007FD1B7 6C insb 007FD1B8 69636B2500B061 imul esp, [ebx+$6B], $61B00025 007FD1BF 80001E add byte ptr [eax], $1E 007FD1C2 7632 jbe 007FD1F6 007FD1C4 4F dec edi 007FD1C5 7264 jb 007FD22B 007FD1C7 65724E jb 007FD218 007FD1CA 4F dec edi 007FD1CB 50 push eax 007FD1CC 726F jb 007FD23D 007FD1CE 7065 jo 007FD235 007FD1D0 7274 jb 007FD246 007FD1D2 69657342757474 imul esp, [ebp+$73], $74747542 007FD1D9 6F outsd 007FD1DA 6E outsb 007FD1DB 43 inc ebx 007FD1DC 6C insb 007FD1DD 69636B08546672 imul esp, [ebx+$6B], $72665408 007FD1E4 6D insd 007FD1E5 46 inc esi 007FD1E6 4B dec ebx 007FD1E7 43 inc ebx 007FD1E8 52 push edx 007FD1E9 1500289445 adc eax, $45942800 007FD1EE 00648A45 add [edx+ecx*4+$45], ah 007FD1F2 00B8124D0020 add [eax+$20004D12], bh 007FD1F8 42 inc edx 007FD1F9 44 inc esp 007FD1FA 001C5F add [edi+ebx*2], bl 007FD1FD 47 inc edi 007FD1FE 00B867470064 add [eax+$64004767], bh 007FD204 D37800 sar dword ptr [eax+$00], cl 007FD207 A80A test al, $0A 007FD209 7800 js 007FD20B 007FD20B 0016 add [esi], dl 007FD20D 6300 arpl [eax], ax 007FD20F F4 hlt 007FD210 B466 mov ah, $66 007FD212 0034B1 add [ecx+esi*4], dh 007FD215 6600A40E6400E0A5 add [esi+ecx+$A5E00064], ah 007FD21D 45 inc ebp 007FD21E 005876 add [eax+$76], bl 007FD221 7C00 jl 007FD223 007FD223 087F4B or [edi+$4B], bh 007FD226 0088996A0088 add [eax+$88006A99], cl 007FD22C 7E49 jle 007FD277 007FD22E 008C764900C096 add [esi+esi*2+$96C00049], cl 007FD235 47 inc edi 007FD236 006C157B add [ebp+edx+$7B], ch 007FD23A 00645D57 add [ebp+ebx*2+$57], ah 007FD23E 009044D27F00 add [eax+$7FD244], dl 007FD244 07 pop es 007FD245 08546672 or [esi+$72], dl 007FD249 6D insd 007FD24A 46 inc esi 007FD24B 4B dec ebx 007FD24C 43 inc ebx 007FD24D 52 push edx 007FD24E 10C7 adc bh, al 007FD250 7F00 jnle 007FD252 007FD252 D0F2 DB $D0, $F2 // dl, 1 007FD254 49 dec ecx 007FD255 005E00 add [esi+$00], bl 007FD258 06 push es 007FD259 55 push ebp 007FD25A 5F pop edi 007FD25B 46 inc esi 007FD25C 4B dec ebx 007FD25D 43 inc ebx 007FD25E 52 push edx 007FD25F 0000 add [eax], al 007FD261 8D4000 lea eax, [eax+$00] 007FD264 55 push ebp 007FD265 8BEC mov ebp, esp 007FD267 6A00 push $00 007FD269 6A00 push $00 007FD26B 53 push ebx 007FD26C 56 push esi 007FD26D 57 push edi 007FD26E 8BD8 mov ebx, eax 007FD270 33C0 xor eax, eax 007FD272 55 push ebp * Possible String Reference to: '镽w腚_^[YY]' | 007FD273 689DD37F00 push $007FD39D ***** TRY | 007FD278 64FF30 push dword ptr fs:[eax] 007FD27B 648920 mov fs:[eax], esp 007FD27E 33D2 xor edx, edx * Reference to control TBClose : TToolButton | 007FD280 8B8300030000 mov eax, [ebx+$0300] * Reference to: Controls.TControl.SetVisible(TControl;Boolean); | 007FD286 E885B2C8FF call 00488510 007FD28B 33D2 xor edx, edx * Reference to control Label29 : N.A. | 007FD28D 8B83F4030000 mov eax, [ebx+$03F4] 007FD293 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007FD295 FF5164 call dword ptr [ecx+$64] 007FD298 33D2 xor edx, edx * Reference to control KHConNo : N.A. | 007FD29A 8B83F8030000 mov eax, [ebx+$03F8] 007FD2A0 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007FD2A2 FF5164 call dword ptr [ecx+$64] * Reference to control ADOTemp : N.A. | 007FD2A5 8B833C030000 mov eax, [ebx+$033C] * 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); | 007FD2AB E894F0E5FF call 0065C344 007FD2B0 8BF0 mov esi, eax 007FD2B2 4E dec esi 007FD2B3 85F6 test esi, esi 007FD2B5 7C54 jl 007FD30B 007FD2B7 46 inc esi 007FD2B8 33FF xor edi, edi 007FD2BA 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 007FD2BC 8B833C030000 mov eax, [ebx+$033C] * 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; | 007FD2C2 E809E7E6FF call 0066B9D0 | 007FD2C7 E854E5E6FF call 0066B820 007FD2CC 8D55F8 lea edx, [ebp-$08] | 007FD2CF E8F4DAE6FF call 0066ADC8 007FD2D4 8B45F8 mov eax, [ebp-$08] 007FD2D7 8D55FC lea edx, [ebp-$04] | 007FD2DA E89DD1C0FF call 0040A47C 007FD2DF 8B45FC mov eax, [ebp-$04] * Possible String Reference to: 'SSEL' | 007FD2E2 BAB4D37F00 mov edx, $007FD3B4 * Reference to: System.@LStrCmp; | 007FD2E7 E85484C0FF call 00405740 007FD2EC 7419 jz 007FD307 007FD2EE 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 007FD2F0 8B833C030000 mov eax, [ebx+$033C] * 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; | 007FD2F6 E8D5E6E6FF call 0066B9D0 | 007FD2FB E8D0CEE5FF call 0065A1D0 007FD300 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FD302 E859BCE2FF call 00628F60 007FD307 47 inc edi 007FD308 4E dec esi 007FD309 75AF jnz 007FD2BA * Reference to control v1Column5 : N.A. | 007FD30B 8B83FC030000 mov eax, [ebx+$03FC] * Reference to control ADOTemp : N.A. | 007FD311 83B83C03000000 cmp dword ptr [eax+$033C], +$00 007FD318 754C jnz 007FD366 007FD31A B201 mov dl, $01 * Reference to control TBClose : TToolButton | 007FD31C 8B8300030000 mov eax, [ebx+$0300] * Reference to: Controls.TControl.SetVisible(TControl;Boolean); | 007FD322 E8E9B1C8FF call 00488510 007FD327 B201 mov dl, $01 * Reference to control Label29 : N.A. | 007FD329 8B83F4030000 mov eax, [ebx+$03F4] 007FD32F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007FD331 FF5164 call dword ptr [ecx+$64] * Reference to control ADOTemp : N.A. | 007FD334 8B833C030000 mov eax, [ebx+$033C] * 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); | 007FD33A E805F0E5FF call 0065C344 007FD33F 8BF0 mov esi, eax 007FD341 4E dec esi 007FD342 85F6 test esi, esi 007FD344 7C20 jl 007FD366 007FD346 46 inc esi 007FD347 33FF xor edi, edi 007FD349 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 007FD34B 8B833C030000 mov eax, [ebx+$033C] * 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; | 007FD351 E87AE6E6FF call 0066B9D0 | 007FD356 E875CEE5FF call 0065A1D0 007FD35B B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007FD35D E8FEBBE2FF call 00628F60 007FD362 47 inc edi 007FD363 4E dec esi 007FD364 75E3 jnz 007FD349 * Reference to control v1Column5 : N.A. | 007FD366 8B83FC030000 mov eax, [ebx+$03FC] * Reference to control ADOTemp : N.A. | 007FD36C 83B83C03000001 cmp dword ptr [eax+$033C], +$01 007FD373 750D jnz 007FD382 007FD375 B201 mov dl, $01 * Reference to control KHConNo : N.A. | 007FD377 8B83F8030000 mov eax, [ebx+$03F8] 007FD37D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007FD37F FF5164 call dword ptr [ecx+$64] 007FD382 33C0 xor eax, eax 007FD384 5A pop edx 007FD385 59 pop ecx 007FD386 59 pop ecx 007FD387 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[YY]' | 007FD38A 68A4D37F00 push $007FD3A4 007FD38F 8D45F8 lea eax, [ebp-$08] 007FD392 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007FD397 E8AC7FC0FF call 00405348 007FD39C C3 ret *) end; end.