unit U_CaiWuHuilV; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmCaiWuHuiLV=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBClose: TToolButton; ADOQueryTemp: TADOQuery; ADOQueryCmd: TADOQuery; Panel1: TPanel; ToolButton2: TToolButton; ADOQueryMain: TADOQuery; ToolButton1: TToolButton; RM1: TRMGridReport; RMDB_Main: TRMDBDataSet; cxGrid2: TcxGrid; Tv2: TcxGridDBTableView; V1BegDate: TcxGridDBColumn; V1HuiLv: TcxGridDBColumn; cxGridLevel1: TcxGridLevel; Label2: TLabel; begdate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; v2EndDate: TcxGridDBColumn; v2ssel: TcxGridDBColumn; Edit1: TEdit; Label7: TLabel; Button1: TToolButton; TADD: TToolButton; TDel: TToolButton; cxStyleRepository1: TcxStyleRepository; cxStyle1: TcxStyle; PopupMenu1: TPopupMenu; N1: TMenuItem; N2: TMenuItem; TSel: TToolButton; v2Filler: TcxGridDBColumn; v2Note: TcxGridDBColumn; Label1: TLabel; HuiLV: TfrmCaiWuHuiLV; TSave: TToolButton; ADOQuery1: TADOQuery; v2GSType: TcxGridDBColumn; Label3: TLabel; Label4: TLabel; GSType: TComboBox; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure FactoryNameChange(Sender : TObject); procedure Button2Click(Sender : TObject); procedure cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn3PropertiesButtonClick(Sender : TObject); procedure cxGridDBColumn6PropertiesButtonClick(Sender : TObject); procedure v2Column3PropertiesButtonClick(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure v2Column2PropertiesEditValueChanged(Sender : TObject); procedure v2PSPropertiesEditValueChanged(Sender : TObject); procedure v2BatchNoPropertiesEditValueChanged(Sender : TObject); procedure v2PayMentPropertiesButtonClick(Sender : TObject); procedure v2T_qtyPropertiesEditValueChanged(Sender : TObject); procedure Button1Click(Sender : TObject); procedure v2T_PricePropertiesEditValueChanged(Sender : TObject); procedure v2OrderNOPropertiesButtonClick(Sender : TObject); procedure v2ComTaiTouPropertiesButtonClick(Sender : TObject); procedure v2P_ColorPropertiesButtonClick(Sender : TObject); procedure TADDClick(Sender : TObject); procedure TDelClick(Sender : TObject); procedure N1Click(Sender : TObject); procedure N2Click(Sender : TObject); procedure v2KPTypePropertiesEditValueChanged(Sender : TObject); procedure cxTabControl2Change(Sender : TObject); procedure TSelClick(Sender : TObject); procedure HuiLVChange(Sender : TObject); procedure TSaveClick(Sender : TObject); procedure v2GSTypePropertiesButtonClick(Sender : TObject); procedure GSTypeChange(Sender : TObject); procedure begdateChange(Sender : TObject); procedure _PROC_00872311(Sender : TObject); procedure _PROC_00872C39(Sender : TObject); procedure _PROC_00873031(Sender : TObject); procedure _PROC_00873549(Sender : TObject); procedure _PROC_00873866(Sender : TObject); procedure _PROC_0087389C(Sender : TObject); procedure _PROC_008738A9(Sender : TObject); procedure _PROC_00873BED(Sender : TObject); procedure _PROC_00873F6D(Sender : TObject); procedure _PROC_00874211(Sender : TObject); procedure _PROC_008745F1(Sender : TObject); procedure _PROC_00874921(Sender : TObject); procedure _PROC_00874CCD(Sender : TObject); procedure _PROC_008754D9(Sender : TObject); procedure _PROC_00875975(Sender : TObject); procedure _PROC_00875CE9(Sender : TObject); procedure _PROC_008760BD(Sender : TObject); procedure _PROC_0087638F(Sender : TObject); procedure _PROC_0087659D(Sender : TObject); procedure _PROC_00876C45(Sender : TObject); procedure _PROC_00876C74(Sender : TObject); procedure _PROC_00876C7C(Sender : TObject); procedure _PROC_00876CAC(Sender : TObject); procedure _PROC_00876CB4(Sender : TObject); procedure _PROC_00876CE4(Sender : TObject); procedure _PROC_00876CEC(Sender : TObject); procedure _PROC_00876D1C(Sender : TObject); procedure _PROC_00876D24(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmCaiWuHuiLV: TfrmCaiWuHuiLV; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmCaiWuHuiLV.FormDestroy(Sender : TObject); begin (* 00871DF8 33C0 xor eax, eax * Reference to GlobalVar_00895AB8 | 00871DFA A3B85A8900 mov dword ptr [$00895AB8], eax 00871DFF C3 ret *) end; procedure TfrmCaiWuHuiLV.FormClose(Sender : TObject); begin (* 00871E00 C60102 mov byte ptr [ecx], $02 00871E03 C3 ret *) end; procedure TfrmCaiWuHuiLV.TBCloseClick(Sender : TObject); begin (* 00871E04 53 push ebx 00871E05 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00871E07 B9301E8700 mov ecx, $00871E30 * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 00871E0C 8B9328030000 mov edx, [ebx+$0328] * Possible String Reference to: '»ãÂÊÐÅÏ¢' | 00871E12 B8441E8700 mov eax, $00871E44 | 00871E17 E8845DF4FF call 007B7BA0 00871E1C 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 00871E1E E87541C3FF call 004A5F98 00871E23 5B pop ebx 00871E24 C3 ret *) end; procedure TfrmCaiWuHuiLV.FormShow(Sender : TObject); begin (* 00871E50 53 push ebx 00871E51 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00871E53 B99C1E8700 mov ecx, $00871E9C * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 00871E58 8B9328030000 mov edx, [ebx+$0328] * Possible String Reference to: '»ãÂÊÐÅÏ¢' | 00871E5E B8B01E8700 mov eax, $00871EB0 | 00871E63 E83C5BF4FF call 007B79A4 * Reference to control TfrmCaiWuHuiLV.ADOQueryTemp : TADOQuery | 00871E68 8B8304030000 mov eax, [ebx+$0304] | 00871E6E E8152BF4FF call 007B4988 00871E73 D825BC1E8700 fsub dword ptr [$00871EBC] 00871E79 83C4F8 add esp, -$08 00871E7C DD1C24 fstp qword ptr [esp] 00871E7F 9B wait * Reference to control TfrmCaiWuHuiLV.begdate : TDateTimePicker | 00871E80 8B833C030000 mov eax, [ebx+$033C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00871E86 E8A103C0FF call 0047222C 00871E8B 8BC3 mov eax, ebx | 00871E8D E8FEFCFFFF call 00871B90 00871E92 5B pop ebx 00871E93 C3 ret *) end; procedure TfrmCaiWuHuiLV.TBRafreshClick(Sender : TObject); begin (* 00871EC0 53 push ebx 00871EC1 8BD8 mov ebx, eax * Reference to control TfrmCaiWuHuiLV.ToolBar1 : TToolBar | 00871EC3 8B83F8020000 mov eax, [ebx+$02F8] 00871EC9 8B10 mov edx, [eax] * Reference to method TToolBar.SetFocus() | 00871ECB FF92C4000000 call dword ptr [edx+$00C4] 00871ED1 8BC3 mov eax, ebx | 00871ED3 E8B8FCFFFF call 00871B90 00871ED8 5B pop ebx 00871ED9 C3 ret *) end; procedure TfrmCaiWuHuiLV.ToolButton2Click(Sender : TObject); begin (* 00871EDC 55 push ebp 00871EDD 8BEC mov ebp, esp 00871EDF 6A00 push $00 00871EE1 53 push ebx 00871EE2 8BD8 mov ebx, eax 00871EE4 33C0 xor eax, eax 00871EE6 55 push ebp 00871EE7 68511F8700 push $00871F51 ***** TRY | 00871EEC 64FF30 push dword ptr fs:[eax] 00871EEF 648920 mov fs:[eax], esp 00871EF2 8D45FC lea eax, [ebp-$04] 00871EF5 50 push eax 00871EF6 B902000000 mov ecx, $00000002 00871EFB BA01000000 mov edx, $00000001 * Reference to control TfrmCaiWuHuiLV.Panel1 : TPanel | 00871F00 8B830C030000 mov eax, [ebx+$030C] | 00871F06 E8A541F4FF call 007B60B0 00871F0B 8B55FC mov edx, [ebp-$04] * Reference to control TfrmCaiWuHuiLV.ADOQueryMain : TADOQuery | 00871F0E 8B8314030000 mov eax, [ebx+$0314] | 00871F14 E8AF4DF4FF call 007B6CC8 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00871F19 8B9348030000 mov edx, [ebx+$0348] * Reference to control TfrmCaiWuHuiLV.ADOQueryMain : TADOQuery | 00871F1F 8B8314030000 mov eax, [ebx+$0314] | 00871F25 E8664FF4FF call 007B6E90 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00871F2A 8B9348030000 mov edx, [ebx+$0348] * Reference to control TfrmCaiWuHuiLV.ADOQueryMain : TADOQuery | 00871F30 8B8314030000 mov eax, [ebx+$0314] | 00871F36 E8DD50F4FF call 007B7018 00871F3B 33C0 xor eax, eax 00871F3D 5A pop edx 00871F3E 59 pop ecx 00871F3F 59 pop ecx 00871F40 648910 mov fs:[eax], edx ****** FINALLY | 00871F43 68581F8700 push $00871F58 00871F48 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00871F4B E8D433B9FF call 00405324 00871F50 C3 ret * Reference to: System.@HandleFinally; | 00871F51 E99E2BB9FF jmp 00404AF4 00871F56 EBF0 jmp 00871F48 ****** END | 00871F58 5B pop ebx 00871F59 59 pop ecx 00871F5A 5D pop ebp 00871F5B C3 ret *) end; procedure TfrmCaiWuHuiLV.FactoryNameChange(Sender : TObject); begin (* 00871F5C 56 push esi * Reference to control TfrmCaiWuHuiLV.ToolButton2 : TToolButton | 00871F5D 8B8010030000 mov eax, [eax+$0310] 00871F63 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00871F67 E8E825B9FF call 00404554 00871F6C 5E pop esi 00871F6D C3 ret *) end; procedure TfrmCaiWuHuiLV.Button2Click(Sender : TObject); begin (* 00871F70 55 push ebp 00871F71 8BEC mov ebp, esp 00871F73 33C9 xor ecx, ecx 00871F75 51 push ecx 00871F76 51 push ecx 00871F77 51 push ecx 00871F78 51 push ecx 00871F79 51 push ecx 00871F7A 53 push ebx 00871F7B 56 push esi 00871F7C 8BD8 mov ebx, eax 00871F7E 33C0 xor eax, eax 00871F80 55 push ebp * Possible String Reference to: 'ér*¹ÿëë^[‹å]Ã' | 00871F81 687D208700 push $0087207D ***** TRY | 00871F86 64FF30 push dword ptr fs:[eax] 00871F89 648920 mov fs:[eax], esp * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00871F8C 8B8348030000 mov eax, [ebx+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00871F92 E8295FC5FF call 004C7EC0 00871F97 84C0 test al, al 00871F99 0F85C3000000 jnz 00872062 00871F9F 6A24 push $24 * Possible String Reference to: 'Ìáʾ' | 00871FA1 B98C208700 mov ecx, $0087208C * Possible String Reference to: 'È·¶¨ÒªÉ¾³ýÊý¾ÝÂð£¿' | 00871FA6 BA94208700 mov edx, $00872094 *) end; procedure TfrmCaiWuHuiLV.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 008720EC 55 push ebp 008720ED 8BEC mov ebp, esp 008720EF B908000000 mov ecx, $00000008 008720F4 6A00 push $00 008720F6 6A00 push $00 008720F8 49 dec ecx 008720F9 75F9 jnz 008720F4 008720FB 51 push ecx 008720FC 53 push ebx 008720FD 56 push esi 008720FE 8BDA mov ebx, edx 00872100 8BF0 mov esi, eax 00872102 33C0 xor eax, eax 00872104 55 push ebp * Possible String Reference to: 'éõ'¹ÿëÖ^[‹å]Ã' | 00872105 68FA228700 push $008722FA ***** TRY | 0087210A 64FF30 push dword ptr fs:[eax] 0087210D 648920 mov fs:[eax], esp 00872110 8D55FC lea edx, [ebp-$04] 00872113 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; | 00872115 E8A2D5D1FF call 0058F6BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 0087211A 8B8628030000 mov eax, [esi+$0328] * 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; | 00872120 E827A2DEFF 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; | 00872125 E83AFADDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 0087212A 8B4050 mov eax, [eax+$50] 0087212D 8D55F4 lea edx, [ebp-$0C] 00872130 8B08 mov ecx, [eax] 00872132 FF5110 call dword ptr [ecx+$10] 00872135 8B45F4 mov eax, [ebp-$0C] 00872138 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087213B E8AC87B9FF call 0040A8EC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00872140 8B9E48030000 mov ebx, [esi+$0348] 00872146 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00872148 E8F362C5FF call 004C8440 0087214D 8D55E0 lea edx, [ebp-$20] 00872150 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00872153 E89487B9FF call 0040A8EC 00872158 8B55E0 mov edx, [ebp-$20] 0087215B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0087215E E8656CBAFF call 00418DC8 00872163 8D45E4 lea eax, [ebp-$1C] 00872166 50 push eax 00872167 8B55F8 mov edx, [ebp-$08] 0087216A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0087216C E8434AC5FF call 004C6BB4 00872171 5A pop edx 00872172 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00872174 FF91B4000000 call dword ptr [ecx+$00B4] 0087217A 8BC3 mov eax, ebx 0087217C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0087217E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmCaiWuHuiLV.ADOQueryCmd : TADOQuery | 00872184 8B9E08030000 mov ebx, [esi+$0308] 0087218A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0087218C E84337C5FF call 004C58D4 00872191 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00872193 E814BEC6FF call 004DDFAC 00872198 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0087219A FF5244 call dword ptr [edx+$44] 0087219D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0087219F E808BEC6FF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 008721A4 BA10238700 mov edx, $00872310 008721A9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008721AB FF5138 call dword ptr [ecx+$38] 008721AE 8D55DC lea edx, [ebp-$24] 008721B1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008721B4 E83387B9FF call 0040A8EC 008721B9 837DDC00 cmp dword ptr [ebp-$24], +$00 008721BD 7440 jz 008721FF * Possible String Reference to: ' Set ' | 008721BF 682C238700 push $0087232C 008721C4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008721C7 683C238700 push $0087233C 008721CC 8D55D4 lea edx, [ebp-$2C] 008721CF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008721D2 E81587B9FF call 0040A8EC 008721D7 FF75D4 push dword ptr [ebp-$2C] 008721DA 6848238700 push $00872348 008721DF 8D45D8 lea eax, [ebp-$28] 008721E2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008721E7 E8C834B9FF call 004056B4 008721EC 8B45D8 mov eax, [ebp-$28] 008721EF 50 push eax 008721F0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008721F2 E8B5BDC6FF call 004DDFAC 008721F7 5A pop edx 008721F8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008721FA FF5138 call dword ptr [ecx+$38] 008721FD EB2B jmp 0087222A 008721FF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00872201 E8A6BDC6FF call 004DDFAC 00872206 50 push eax * Possible String Reference to: ' Set ' | 00872207 682C238700 push $0087232C 0087220C FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 0087220F 6854238700 push $00872354 00872214 8D45D0 lea eax, [ebp-$30] 00872217 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0087221C E89334B9FF call 004056B4 00872221 8B55D0 mov edx, [ebp-$30] 00872224 58 pop eax 00872225 8B08 mov ecx, [eax] 00872227 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 0087222A 6864238700 push $00872364 0087222F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmCaiWuHuiLV.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 008723B8 55 push ebp 008723B9 8BEC mov ebp, esp 008723BB B921000000 mov ecx, $00000021 008723C0 6A00 push $00 008723C2 6A00 push $00 008723C4 49 dec ecx 008723C5 75F9 jnz 008723C0 008723C7 53 push ebx 008723C8 56 push esi 008723C9 8BF2 mov esi, edx 008723CB 8BD8 mov ebx, eax 008723CD 33C0 xor eax, eax 008723CF 55 push ebp 008723D0 68452B8700 push $00872B45 ***** TRY | 008723D5 64FF30 push dword ptr fs:[eax] 008723D8 648920 mov fs:[eax], esp 008723DB 8D55FC lea edx, [ebp-$04] 008723DE 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; | 008723E0 E8D7D2D1FF call 0058F6BC 008723E5 8D55DC lea edx, [ebp-$24] 008723E8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008723EB E8FC84B9FF call 0040A8EC 008723F0 837DDC00 cmp dword ptr [ebp-$24], +$00 008723F4 750D jnz 00872403 008723F6 8D45FC lea eax, [ebp-$04] 008723F9 BA5C2B8700 mov edx, $00872B5C * Reference to: System.@LStrLAsg(void;void;void;void); | 008723FE E8B92FB9FF call 004053BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 00872403 8B8328030000 mov eax, [ebx+$0328] * 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; | 00872409 E83E9FDEFF 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; | 0087240E E851F7DDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00872413 8B4050 mov eax, [eax+$50] 00872416 8D55D8 lea edx, [ebp-$28] 00872419 8B08 mov ecx, [eax] 0087241B FF5110 call dword ptr [ecx+$10] 0087241E 8B45D8 mov eax, [ebp-$28] 00872421 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00872424 E8C384B9FF call 0040A8EC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00872429 8BB348030000 mov esi, [ebx+$0348] 0087242F 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00872431 E80A60C5FF call 004C8440 00872436 8D55C4 lea edx, [ebp-$3C] 00872439 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087243C E8AB84B9FF call 0040A8EC 00872441 8B55C4 mov edx, [ebp-$3C] 00872444 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00872447 E87C69BAFF call 00418DC8 0087244C 8D45C8 lea eax, [ebp-$38] 0087244F 50 push eax 00872450 8B55E0 mov edx, [ebp-$20] 00872453 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00872455 E85A47C5FF call 004C6BB4 0087245A 5A pop edx 0087245B 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 0087245D FF91B4000000 call dword ptr [ecx+$00B4] 00872463 8D55C0 lea edx, [ebp-$40] *) end; procedure TfrmCaiWuHuiLV.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 00872D60 55 push ebp 00872D61 8BEC mov ebp, esp 00872D63 B909000000 mov ecx, $00000009 00872D68 6A00 push $00 00872D6A 6A00 push $00 00872D6C 49 dec ecx 00872D6D 75F9 jnz 00872D68 00872D6F 51 push ecx 00872D70 53 push ebx 00872D71 56 push esi 00872D72 8BDA mov ebx, edx 00872D74 8BF0 mov esi, eax 00872D76 33C0 xor eax, eax 00872D78 55 push ebp 00872D79 68D52F8700 push $00872FD5 ***** TRY | 00872D7E 64FF30 push dword ptr fs:[eax] 00872D81 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 00872D84 BAEC2F8700 mov edx, $00872FEC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00872D89 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00872D8F E8203EC5FF call 004C6BB4 00872D94 8D55F0 lea edx, [ebp-$10] 00872D97 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00872D99 FF5160 call dword ptr [ecx+$60] 00872D9C 8B45F0 mov eax, [ebp-$10] 00872D9F 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00872DA2 E8457BB9FF call 0040A8EC 00872DA7 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '×Ô¶¯Éú³É' | 00872DAA BAFC2F8700 mov edx, $00872FFC * Reference to: System.@LStrCmp; | 00872DAF E88C29B9FF call 00405740 00872DB4 751D jnz 00872DD3 00872DB6 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00872DB8 B908308700 mov ecx, $00873008 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00872DBD BA10308700 mov edx, $00873010 *) end; procedure TfrmCaiWuHuiLV.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 008730D8 55 push ebp 008730D9 8BEC mov ebp, esp 008730DB 51 push ecx 008730DC B90C000000 mov ecx, $0000000C 008730E1 6A00 push $00 008730E3 6A00 push $00 008730E5 49 dec ecx 008730E6 75F9 jnz 008730E1 008730E8 51 push ecx 008730E9 874DFC xchg [ebp-$04], ecx 008730EC 53 push ebx 008730ED 56 push esi 008730EE 8BF0 mov esi, eax 008730F0 33C0 xor eax, eax 008730F2 55 push ebp 008730F3 6877348700 push $00873477 ***** TRY | 008730F8 64FF30 push dword ptr fs:[eax] 008730FB 648920 mov fs:[eax], esp * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 008730FE 8B8648030000 mov eax, [esi+$0348] * Possible String Reference to: 'YFType' | 00873104 BA8C348700 mov edx, $0087348C * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00873109 E8A63AC5FF call 004C6BB4 0087310E 8D55F8 lea edx, [ebp-$08] 00873111 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00873113 FF5160 call dword ptr [ecx+$60] 00873116 8B45F8 mov eax, [ebp-$08] 00873119 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087311C E8CB77B9FF call 0040A8EC 00873121 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '×Ô¶¯Éú³É' | 00873124 BA9C348700 mov edx, $0087349C * Reference to: System.@LStrCmp; | 00873129 E81226B9FF call 00405740 0087312E 751D jnz 0087314D 00873130 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00873132 B9A8348700 mov ecx, $008734A8 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00873137 BAB0348700 mov edx, $008734B0 *) end; procedure TfrmCaiWuHuiLV.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 008735F0 55 push ebp 008735F1 8BEC mov ebp, esp 008735F3 51 push ecx 008735F4 B906000000 mov ecx, $00000006 008735F9 6A00 push $00 008735FB 6A00 push $00 008735FD 49 dec ecx 008735FE 75F9 jnz 008735F9 00873600 51 push ecx 00873601 874DFC xchg [ebp-$04], ecx 00873604 53 push ebx 00873605 56 push esi 00873606 8BF0 mov esi, eax 00873608 33C0 xor eax, eax 0087360A 55 push ebp 0087360B 6849388700 push $00873849 ***** TRY | 00873610 64FF30 push dword ptr fs:[eax] 00873613 648920 mov fs:[eax], esp 00873616 33C0 xor eax, eax 00873618 55 push ebp 00873619 681F388700 push $0087381F ***** TRY | 0087361E 64FF30 push dword ptr fs:[eax] 00873621 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 0087394C 55 push ebp 0087394D 8BEC mov ebp, esp 0087394F 51 push ecx 00873950 B906000000 mov ecx, $00000006 00873955 6A00 push $00 00873957 6A00 push $00 00873959 49 dec ecx 0087395A 75F9 jnz 00873955 0087395C 51 push ecx 0087395D 874DFC xchg [ebp-$04], ecx 00873960 53 push ebx 00873961 56 push esi 00873962 8BF0 mov esi, eax 00873964 33C0 xor eax, eax 00873966 55 push ebp 00873967 68A53B8700 push $00873BA5 ***** TRY | 0087396C 64FF30 push dword ptr fs:[eax] 0087396F 648920 mov fs:[eax], esp 00873972 33C0 xor eax, eax 00873974 55 push ebp 00873975 687B3B8700 push $00873B7B ***** TRY | 0087397A 64FF30 push dword ptr fs:[eax] 0087397D 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.ToolButton1Click(Sender : TObject); begin (* 00873C90 53 push ebx 00873C91 8BD8 mov ebx, eax * Reference to control TfrmCaiWuHuiLV.ADOQueryMain : TADOQuery | 00873C93 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00873C99 E82242C5FF call 004C7EC0 00873C9E 84C0 test al, al 00873CA0 7516 jnz 00873CB8 * Possible String Reference to: 'Ó¦¸¶¿îÁбí' | 00873CA2 B9C43C8700 mov ecx, $00873CC4 * Reference to control TfrmCaiWuHuiLV.ADOQueryMain : TADOQuery | 00873CA7 8B9314030000 mov edx, [ebx+$0314] * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 00873CAD 8B8328030000 mov eax, [ebx+$0328] | 00873CB3 E87845F4FF call 007B8230 00873CB8 5B pop ebx 00873CB9 C3 ret *) end; procedure TfrmCaiWuHuiLV.v2Column2PropertiesEditValueChanged(Sender : TObject); begin (* 00873CD0 55 push ebp 00873CD1 8BEC mov ebp, esp 00873CD3 B909000000 mov ecx, $00000009 00873CD8 6A00 push $00 00873CDA 6A00 push $00 00873CDC 49 dec ecx 00873CDD 75F9 jnz 00873CD8 00873CDF 53 push ebx 00873CE0 56 push esi 00873CE1 8BDA mov ebx, edx 00873CE3 8BF0 mov esi, eax 00873CE5 33C0 xor eax, eax 00873CE7 55 push ebp 00873CE8 68073F8700 push $00873F07 ***** TRY | 00873CED 64FF30 push dword ptr fs:[eax] 00873CF0 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 00873CF3 BA1C3F8700 mov edx, $00873F1C * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00873CF8 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00873CFE E8B12EC5FF call 004C6BB4 00873D03 8D55F0 lea edx, [ebp-$10] 00873D06 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00873D08 FF5160 call dword ptr [ecx+$60] 00873D0B 8B45F0 mov eax, [ebp-$10] 00873D0E 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00873D11 E8D66BB9FF call 0040A8EC 00873D16 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '×Ô¶¯Éú³É' | 00873D19 BA2C3F8700 mov edx, $00873F2C * Reference to: System.@LStrCmp; | 00873D1E E81D1AB9FF call 00405740 00873D23 751D jnz 00873D42 00873D25 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00873D27 B9383F8700 mov ecx, $00873F38 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00873D2C BA403F8700 mov edx, $00873F40 *) end; procedure TfrmCaiWuHuiLV.v2PSPropertiesEditValueChanged(Sender : TObject); begin (* 00874004 55 push ebp 00874005 8BEC mov ebp, esp 00874007 B908000000 mov ecx, $00000008 0087400C 6A00 push $00 0087400E 6A00 push $00 00874010 49 dec ecx 00874011 75F9 jnz 0087400C 00874013 53 push ebx 00874014 56 push esi 00874015 8BDA mov ebx, edx 00874017 8BF0 mov esi, eax 00874019 33C0 xor eax, eax 0087401B 55 push ebp 0087401C 68EC418700 push $008741EC ***** TRY | 00874021 64FF30 push dword ptr fs:[eax] 00874024 648920 mov fs:[eax], esp 00874027 8D55FC lea edx, [ebp-$04] 0087402A 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; | 0087402C E88BB6D1FF call 0058F6BC 00874031 8D55F4 lea edx, [ebp-$0C] 00874034 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874037 E8B068B9FF call 0040A8EC 0087403C 837DF400 cmp dword ptr [ebp-$0C], +$00 00874040 750D jnz 0087404F 00874042 8D45FC lea eax, [ebp-$04] 00874045 BA04428700 mov edx, $00874204 * Reference to: System.@LStrLAsg(void;void;void;void); | 0087404A E86D13B9FF call 004053BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 0087404F 8B8628030000 mov eax, [esi+$0328] * 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; | 00874055 E8F282DEFF 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; | 0087405A E805DBDDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 0087405F 8B4050 mov eax, [eax+$50] 00874062 8D55F0 lea edx, [ebp-$10] 00874065 8B08 mov ecx, [eax] 00874067 FF5110 call dword ptr [ecx+$10] 0087406A 8B45F0 mov eax, [ebp-$10] 0087406D 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874070 E87768B9FF call 0040A8EC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874075 8B9E48030000 mov ebx, [esi+$0348] 0087407B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0087407D E8BE43C5FF call 004C8440 00874082 8D55DC lea edx, [ebp-$24] 00874085 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874088 E85F68B9FF call 0040A8EC 0087408D 8B55DC mov edx, [ebp-$24] 00874090 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874093 E8304DBAFF call 00418DC8 00874098 8D45E0 lea eax, [ebp-$20] 0087409B 50 push eax 0087409C 8B55F8 mov edx, [ebp-$08] 0087409F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008740A1 E80E2BC5FF call 004C6BB4 008740A6 5A pop edx 008740A7 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008740A9 FF91B4000000 call dword ptr [ecx+$00B4] 008740AF 8BC3 mov eax, ebx 008740B1 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008740B3 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmCaiWuHuiLV.ADOQueryCmd : TADOQuery | 008740B9 8B9E08030000 mov ebx, [esi+$0308] 008740BF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008740C1 E80E18C5FF call 004C58D4 008740C6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008740C8 E8DF9EC6FF call 004DDFAC 008740CD 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008740CF FF5244 call dword ptr [edx+$44] 008740D2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008740D4 E8D39EC6FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008740D9 BA10428700 mov edx, $00874210 008740DE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008740E0 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008740E3 682C428700 push $0087422C 008740E8 FF75F8 push dword ptr [ebp-$08] 008740EB 683C428700 push $0087423C 008740F0 8D55D4 lea edx, [ebp-$2C] 008740F3 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008740F6 E8F167B9FF call 0040A8EC 008740FB FF75D4 push dword ptr [ebp-$2C] 008740FE 8D45D8 lea eax, [ebp-$28] 00874101 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00874106 E8A915B9FF call 004056B4 0087410B 8B45D8 mov eax, [ebp-$28] 0087410E 50 push eax 0087410F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00874111 E8969EC6FF call 004DDFAC 00874116 5A pop edx 00874117 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00874119 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 0087411C 6848428700 push $00874248 00874121 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmCaiWuHuiLV.v2BatchNoPropertiesEditValueChanged(Sender : TObject); begin (* 008742A8 55 push ebp 008742A9 8BEC mov ebp, esp 008742AB B90E000000 mov ecx, $0000000E 008742B0 6A00 push $00 008742B2 6A00 push $00 008742B4 49 dec ecx 008742B5 75F9 jnz 008742B0 008742B7 53 push ebx 008742B8 56 push esi 008742B9 8BDA mov ebx, edx 008742BB 8BF0 mov esi, eax 008742BD 33C0 xor eax, eax 008742BF 55 push ebp 008742C0 68A1458700 push $008745A1 ***** TRY | 008742C5 64FF30 push dword ptr fs:[eax] 008742C8 648920 mov fs:[eax], esp 008742CB 8D55FC lea edx, [ebp-$04] 008742CE 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; | 008742D0 E8E7B3D1FF call 0058F6BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 008742D5 8B8628030000 mov eax, [esi+$0328] * 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; | 008742DB E86C80DEFF 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; | 008742E0 E87FD8DDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 008742E5 8B4050 mov eax, [eax+$50] 008742E8 8D55F4 lea edx, [ebp-$0C] 008742EB 8B08 mov ecx, [eax] 008742ED FF5110 call dword ptr [ecx+$10] 008742F0 8B45F4 mov eax, [ebp-$0C] 008742F3 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008742F6 E8F165B9FF call 0040A8EC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 008742FB 8B9E48030000 mov ebx, [esi+$0348] 00874301 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00874303 E83841C5FF call 004C8440 00874308 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 0087430B BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 00874310 E82B14B9FF call 00405740 00874315 751E jnz 00874335 00874317 8D55F0 lea edx, [ebp-$10] 0087431A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087431D E8CA65B9FF call 0040A8EC 00874322 837DF000 cmp dword ptr [ebp-$10], +$00 00874326 750D jnz 00874335 00874328 8D45FC lea eax, [ebp-$04] 0087432B BAC8458700 mov edx, $008745C8 * Reference to: System.@LStrLAsg(void;void;void;void); | 00874330 E88710B9FF call 004053BC 00874335 8D55DC lea edx, [ebp-$24] 00874338 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087433B E8AC65B9FF call 0040A8EC 00874340 8B55DC mov edx, [ebp-$24] 00874343 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874346 E87D4ABAFF call 00418DC8 0087434B 8D45E0 lea eax, [ebp-$20] 0087434E 50 push eax 0087434F 8B55F8 mov edx, [ebp-$08] 00874352 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874354 E85B28C5FF call 004C6BB4 00874359 5A pop edx 0087435A 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 0087435C FF91B4000000 call dword ptr [ecx+$00B4] 00874362 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 00874365 BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 0087436A E8D113B9FF call 00405740 0087436F 7553 jnz 008743C4 * Possible String Reference to: 'GCPrice' | 00874371 BAB8458700 mov edx, $008745B8 00874376 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874378 E83728C5FF call 004C6BB4 0087437D 8D55CC lea edx, [ebp-$34] 00874380 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_64 | 00874382 FF5164 call dword ptr [ecx+$64] 00874385 8D45CC lea eax, [ebp-$34] 00874388 50 push eax * Possible String Reference to: 'Qty' | 00874389 BAD4458700 mov edx, $008745D4 0087438E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874390 E81F28C5FF call 004C6BB4 00874395 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00874397 FF5254 call dword ptr [edx+$54] 0087439A 8D45BC lea eax, [ebp-$44] * Reference to: Variants.@VarFromReal; | 0087439D E8EA49BAFF call 00418D8C 008743A2 8D55BC lea edx, [ebp-$44] 008743A5 58 pop eax * Reference to: System.@Initialize(Pointer;Pointer); | or: System.@Finalize(Pointer;Pointer); | or: System.@AddRef; | or: Variants.@VarAdd(TVarData;TVarData;TVarData;TVarData); | or: Variants.@VarSub(TVarData;TVarData;TVarData;TVarData); | or: Variants.@VarMul(TVarData;TVarData;TVarData;TVarData); | 008743A6 E8D58FBAFF call 0041D380 008743AB 8D45CC lea eax, [ebp-$34] 008743AE 50 push eax * Possible String Reference to: 'GCMoney' | 008743AF BAE0458700 mov edx, $008745E0 008743B4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008743B6 E8F927C5FF call 004C6BB4 008743BB 5A pop edx 008743BC 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008743BE FF91B4000000 call dword ptr [ecx+$00B4] 008743C4 8BC3 mov eax, ebx 008743C6 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008743C8 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmCaiWuHuiLV.ADOQueryCmd : TADOQuery | 008743CE 8B9E08030000 mov ebx, [esi+$0308] 008743D4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008743D6 E8F914C5FF call 004C58D4 008743DB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008743DD E8CA9BC6FF call 004DDFAC 008743E2 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008743E4 FF5244 call dword ptr [edx+$44] 008743E7 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008743E9 E8BE9BC6FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008743EE BAF0458700 mov edx, $008745F0 008743F3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008743F5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008743F8 680C468700 push $0087460C 008743FD FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00874400 681C468700 push $0087461C 00874405 8D55B4 lea edx, [ebp-$4C] 00874408 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087440B E8DC64B9FF call 0040A8EC 00874410 FF75B4 push dword ptr [ebp-$4C] 00874413 6828468700 push $00874628 00874418 8D45B8 lea eax, [ebp-$48] 0087441B BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00874420 E88F12B9FF call 004056B4 00874425 8B45B8 mov eax, [ebp-$48] 00874428 50 push eax 00874429 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0087442B E87C9BC6FF call 004DDFAC 00874430 5A pop edx 00874431 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00874433 FF5138 call dword ptr [ecx+$38] 00874436 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 00874439 BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 0087443E E8FD12B9FF call 00405740 00874443 754E jnz 00874493 * Possible String Reference to: ',GCMoney='' | 00874445 6834468700 push $00874634 * Possible String Reference to: 'GCMoney' | 0087444A BAE0458700 mov edx, $008745E0 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087444F 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874455 E85A27C5FF call 004C6BB4 0087445A 8D55A8 lea edx, [ebp-$58] 0087445D 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0087445F FF5160 call dword ptr [ecx+$60] 00874462 8B45A8 mov eax, [ebp-$58] 00874465 8D55AC lea edx, [ebp-$54] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874468 E87F64B9FF call 0040A8EC 0087446D FF75AC push dword ptr [ebp-$54] 00874470 6828468700 push $00874628 00874475 8D45B0 lea eax, [ebp-$50] 00874478 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0087447D E83212B9FF call 004056B4 00874482 8B45B0 mov eax, [ebp-$50] 00874485 50 push eax 00874486 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00874488 E81F9BC6FF call 004DDFAC 0087448D 5A pop edx 0087448E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00874490 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'GCMoney' | 00874493 BAE0458700 mov edx, $008745E0 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874498 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0087449E E81127C5FF call 004C6BB4 008744A3 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 008744A5 FF5254 call dword ptr [edx+$54] 008744A8 D81D40468700 fcomp dword ptr [$00874640] 008744AE DFE0 fstsw ax 008744B0 9E sahf 008744B1 744E jz 00874501 * Possible String Reference to: ',BBMoney='' | 008744B3 684C468700 push $0087464C * Possible String Reference to: 'GCMoney' | 008744B8 BAE0458700 mov edx, $008745E0 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 008744BD 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008744C3 E8EC26C5FF call 004C6BB4 008744C8 8D559C lea edx, [ebp-$64] 008744CB 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008744CD FF5160 call dword ptr [ecx+$60] 008744D0 8B459C mov eax, [ebp-$64] 008744D3 8D55A0 lea edx, [ebp-$60] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008744D6 E81164B9FF call 0040A8EC 008744DB FF75A0 push dword ptr [ebp-$60] 008744DE 6828468700 push $00874628 008744E3 8D45A4 lea eax, [ebp-$5C] 008744E6 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008744EB E8C411B9FF call 004056B4 008744F0 8B45A4 mov eax, [ebp-$5C] 008744F3 50 push eax 008744F4 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008744F6 E8B19AC6FF call 004DDFAC 008744FB 5A pop edx 008744FC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008744FE FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00874501 6860468700 push $00874660 * Possible String Reference to: 'YFId' | 00874506 BA78468700 mov edx, $00874678 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087450B 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874511 E89E26C5FF call 004C6BB4 00874516 8D5590 lea edx, [ebp-$70] 00874519 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0087451B FF5160 call dword ptr [ecx+$60] 0087451E 8B4590 mov eax, [ebp-$70] 00874521 8D5594 lea edx, [ebp-$6C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874524 E8C363B9FF call 0040A8EC 00874529 FF7594 push dword ptr [ebp-$6C] 0087452C 6828468700 push $00874628 00874531 8D4598 lea eax, [ebp-$68] 00874534 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00874539 E87611B9FF call 004056B4 0087453E 8B4598 mov eax, [ebp-$68] 00874541 50 push eax 00874542 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00874544 E8639AC6FF call 004DDFAC 00874549 5A pop edx 0087454A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0087454C FF5138 call dword ptr [ecx+$38] 0087454F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00874551 E87E99C6FF call 004DDED4 00874556 33C0 xor eax, eax 00874558 5A pop edx 00874559 59 pop ecx 0087455A 59 pop ecx 0087455B 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 0087455E 68A8458700 push $008745A8 00874563 8D4590 lea eax, [ebp-$70] 00874566 BA0B000000 mov edx, $0000000B * Reference to: System.@LStrArrayClr(void;void;Integer); | 0087456B E8D80DB9FF call 00405348 00874570 8D45BC lea eax, [ebp-$44] * Reference to object Variant | 00874573 8B153C114000 mov edx, [$0040113C] 00874579 B902000000 mov ecx, $00000002 * Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal); | 0087457E E8911BB9FF call 00406114 00874583 8D45DC lea eax, [ebp-$24] * Reference to: System.@LStrClr(void;void); | 00874586 E8990DB9FF call 00405324 0087458B 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0087458E E8E100BAFF call 00414674 00874593 8D45F0 lea eax, [ebp-$10] 00874596 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0087459B E8A80DB9FF call 00405348 008745A0 C3 ret * Reference to: System.@HandleFinally; | 008745A1 E94E05B9FF jmp 00404AF4 008745A6 EBBB jmp 00874563 ****** END | 008745A8 5E pop esi 008745A9 5B pop ebx 008745AA 8BE5 mov esp, ebp 008745AC 5D pop ebp 008745AD C3 ret *) end; procedure TfrmCaiWuHuiLV.v2PayMentPropertiesButtonClick(Sender : TObject); begin (* 00874680 55 push ebp 00874681 8BEC mov ebp, esp 00874683 51 push ecx 00874684 B906000000 mov ecx, $00000006 00874689 6A00 push $00 0087468B 6A00 push $00 0087468D 49 dec ecx 0087468E 75F9 jnz 00874689 00874690 51 push ecx 00874691 874DFC xchg [ebp-$04], ecx 00874694 53 push ebx 00874695 56 push esi 00874696 8BF0 mov esi, eax 00874698 33C0 xor eax, eax 0087469A 55 push ebp 0087469B 68D7488700 push $008748D7 ***** TRY | 008746A0 64FF30 push dword ptr fs:[eax] 008746A3 648920 mov fs:[eax], esp 008746A6 33C0 xor eax, eax 008746A8 55 push ebp 008746A9 68AD488700 push $008748AD ***** TRY | 008746AE 64FF30 push dword ptr fs:[eax] 008746B1 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.v2T_qtyPropertiesEditValueChanged(Sender : TObject); begin (* 008749B4 55 push ebp 008749B5 8BEC mov ebp, esp 008749B7 B910000000 mov ecx, $00000010 008749BC 6A00 push $00 008749BE 6A00 push $00 008749C0 49 dec ecx 008749C1 75F9 jnz 008749BC 008749C3 51 push ecx 008749C4 53 push ebx 008749C5 56 push esi 008749C6 8BDA mov ebx, edx 008749C8 8BF0 mov esi, eax 008749CA 33C0 xor eax, eax 008749CC 55 push ebp 008749CD 685B4C8700 push $00874C5B ***** TRY | 008749D2 64FF30 push dword ptr fs:[eax] 008749D5 648920 mov fs:[eax], esp 008749D8 8D55FC lea edx, [ebp-$04] 008749DB 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; | 008749DD E8DAACD1FF call 0058F6BC 008749E2 8D55F0 lea edx, [ebp-$10] 008749E5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008749E8 E8FF5EB9FF call 0040A8EC 008749ED 837DF000 cmp dword ptr [ebp-$10], +$00 008749F1 750D jnz 00874A00 008749F3 8D45FC lea eax, [ebp-$04] 008749F6 BA704C8700 mov edx, $00874C70 * Reference to: System.@LStrLAsg(void;void;void;void); | 008749FB E8BC09B9FF call 004053BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 00874A00 8B8628030000 mov eax, [esi+$0328] * 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; | 00874A06 E84179DEFF 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; | 00874A0B E854D1DDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00874A10 8B4050 mov eax, [eax+$50] 00874A13 8D55EC lea edx, [ebp-$14] 00874A16 8B08 mov ecx, [eax] 00874A18 FF5110 call dword ptr [ecx+$10] 00874A1B 8B45EC mov eax, [ebp-$14] 00874A1E 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874A21 E8C65EB9FF call 0040A8EC 00874A26 8D45F4 lea eax, [ebp-$0C] 00874A29 50 push eax * Possible String Reference to: 'T_Price' | 00874A2A BA7C4C8700 mov edx, $00874C7C * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874A2F 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874A35 E87A21C5FF call 004C6BB4 00874A3A 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00874A3C FF5254 call dword ptr [edx+$54] 00874A3F DD5DDC fstp qword ptr [ebp-$24] 00874A42 9B wait 00874A43 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00874A46 E8E18CB9FF call 0040D72C 00874A4B DC4DDC fmul qword ptr [ebp-$24] 00874A4E DB7DD0 fstp tbyte ptr [ebp-$30] 00874A51 9B wait 00874A52 8D45D0 lea eax, [ebp-$30] 00874A55 8945E4 mov [ebp-$1C], eax 00874A58 C645E803 mov byte ptr [ebp-$18], $03 00874A5C 8D55E4 lea edx, [ebp-$1C] 00874A5F 33C9 xor ecx, ecx * Possible String Reference to: '%.2f' | 00874A61 B88C4C8700 mov eax, $00874C8C | 00874A66 E81981B9FF call 0040CB84 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874A6B 8B9E48030000 mov ebx, [esi+$0348] 00874A71 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00874A73 E8C839C5FF call 004C8440 00874A78 8D55BC lea edx, [ebp-$44] 00874A7B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874A7E E8695EB9FF call 0040A8EC 00874A83 8B55BC mov edx, [ebp-$44] 00874A86 8D45C0 lea eax, [ebp-$40] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874A89 E83A43BAFF call 00418DC8 00874A8E 8D45C0 lea eax, [ebp-$40] 00874A91 50 push eax 00874A92 8B55F8 mov edx, [ebp-$08] 00874A95 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874A97 E81821C5FF call 004C6BB4 00874A9C 5A pop edx 00874A9D 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00874A9F FF91B4000000 call dword ptr [ecx+$00B4] 00874AA5 8D55A8 lea edx, [ebp-$58] 00874AA8 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874AAB E83C5EB9FF call 0040A8EC 00874AB0 8B55A8 mov edx, [ebp-$58] 00874AB3 8D45AC lea eax, [ebp-$54] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874AB6 E80D43BAFF call 00418DC8 00874ABB 8D45AC lea eax, [ebp-$54] 00874ABE 50 push eax * Possible String Reference to: 'T_Money' | 00874ABF BA9C4C8700 mov edx, $00874C9C 00874AC4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874AC6 E8E920C5FF call 004C6BB4 00874ACB 5A pop edx 00874ACC 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00874ACE FF91B4000000 call dword ptr [ecx+$00B4] 00874AD4 8D55A4 lea edx, [ebp-$5C] *) end; procedure TfrmCaiWuHuiLV.Button1Click(Sender : TObject); begin (* 00874D44 55 push ebp 00874D45 8BEC mov ebp, esp 00874D47 B910000000 mov ecx, $00000010 00874D4C 6A00 push $00 00874D4E 6A00 push $00 00874D50 49 dec ecx 00874D51 75F9 jnz 00874D4C 00874D53 51 push ecx 00874D54 53 push ebx 00874D55 56 push esi 00874D56 57 push edi 00874D57 8945FC mov [ebp-$04], eax 00874D5A 33C0 xor eax, eax 00874D5C 55 push ebp 00874D5D 68D5508700 push $008750D5 ***** TRY | 00874D62 64FF30 push dword ptr fs:[eax] 00874D65 648920 mov fs:[eax], esp 00874D68 8B45FC mov eax, [ebp-$04] * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874D6B 8B8048030000 mov eax, [eax+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00874D71 E84A31C5FF call 004C7EC0 00874D76 84C0 test al, al 00874D78 0F85F1020000 jnz 0087506F 00874D7E A0E4508700 mov al, byte ptr [$008750E4] 00874D83 50 push eax 00874D84 8D45EC lea eax, [ebp-$14] 00874D87 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00874D89 E8D63FBAFF call 00418D64 00874D8E 8D4DEC lea ecx, [ebp-$14] 00874D91 8B45FC mov eax, [ebp-$04] * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00874D94 8B8048030000 mov eax, [eax+$0348] * Possible String Reference to: 'ssel' | 00874D9A BAF0508700 mov edx, $008750F0 00874D9F 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 00874DA1 FF9344020000 call dword ptr [ebx+$0244] 00874DA7 84C0 test al, al 00874DA9 751D jnz 00874DC8 00874DAB 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00874DAD B9F8508700 mov ecx, $008750F8 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00874DB2 BA00518700 mov edx, $00875100 *) end; procedure TfrmCaiWuHuiLV.v2T_PricePropertiesEditValueChanged(Sender : TObject); begin (* 008751C0 55 push ebp 008751C1 8BEC mov ebp, esp 008751C3 B910000000 mov ecx, $00000010 008751C8 6A00 push $00 008751CA 6A00 push $00 008751CC 49 dec ecx 008751CD 75F9 jnz 008751C8 008751CF 51 push ecx 008751D0 53 push ebx 008751D1 56 push esi 008751D2 8BDA mov ebx, edx 008751D4 8BF0 mov esi, eax 008751D6 33C0 xor eax, eax 008751D8 55 push ebp 008751D9 6867548700 push $00875467 ***** TRY | 008751DE 64FF30 push dword ptr fs:[eax] 008751E1 648920 mov fs:[eax], esp 008751E4 8D55FC lea edx, [ebp-$04] 008751E7 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; | 008751E9 E8CEA4D1FF call 0058F6BC 008751EE 8D55F0 lea edx, [ebp-$10] 008751F1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008751F4 E8F356B9FF call 0040A8EC 008751F9 837DF000 cmp dword ptr [ebp-$10], +$00 008751FD 750D jnz 0087520C 008751FF 8D45FC lea eax, [ebp-$04] 00875202 BA7C548700 mov edx, $0087547C * Reference to: System.@LStrLAsg(void;void;void;void); | 00875207 E8B001B9FF call 004053BC * Reference to control TfrmCaiWuHuiLV.Tv2 : TcxGridDBTableView | 0087520C 8B8628030000 mov eax, [esi+$0328] * 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; | 00875212 E83571DEFF 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; | 00875217 E848C9DDFF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 0087521C 8B4050 mov eax, [eax+$50] 0087521F 8D55EC lea edx, [ebp-$14] 00875222 8B08 mov ecx, [eax] 00875224 FF5110 call dword ptr [ecx+$10] 00875227 8B45EC mov eax, [ebp-$14] 0087522A 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087522D E8BA56B9FF call 0040A8EC 00875232 8D45F4 lea eax, [ebp-$0C] 00875235 50 push eax * Possible String Reference to: 'T_Qty' | 00875236 BA88548700 mov edx, $00875488 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087523B 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00875241 E86E19C5FF call 004C6BB4 00875246 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00875248 FF5254 call dword ptr [edx+$54] 0087524B DD5DDC fstp qword ptr [ebp-$24] 0087524E 9B wait 0087524F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00875252 E8D584B9FF call 0040D72C 00875257 DC4DDC fmul qword ptr [ebp-$24] 0087525A DB7DD0 fstp tbyte ptr [ebp-$30] 0087525D 9B wait 0087525E 8D45D0 lea eax, [ebp-$30] 00875261 8945E4 mov [ebp-$1C], eax 00875264 C645E803 mov byte ptr [ebp-$18], $03 00875268 8D55E4 lea edx, [ebp-$1C] 0087526B 33C9 xor ecx, ecx * Possible String Reference to: '%.2f' | 0087526D B898548700 mov eax, $00875498 | 00875272 E80D79B9FF call 0040CB84 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00875277 8B9E48030000 mov ebx, [esi+$0348] 0087527D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0087527F E8BC31C5FF call 004C8440 00875284 8D55BC lea edx, [ebp-$44] 00875287 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087528A E85D56B9FF call 0040A8EC 0087528F 8B55BC mov edx, [ebp-$44] 00875292 8D45C0 lea eax, [ebp-$40] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00875295 E82E3BBAFF call 00418DC8 0087529A 8D45C0 lea eax, [ebp-$40] 0087529D 50 push eax 0087529E 8B55F8 mov edx, [ebp-$08] 008752A1 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008752A3 E80C19C5FF call 004C6BB4 008752A8 5A pop edx 008752A9 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008752AB FF91B4000000 call dword ptr [ecx+$00B4] 008752B1 8D55A8 lea edx, [ebp-$58] 008752B4 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008752B7 E83056B9FF call 0040A8EC 008752BC 8B55A8 mov edx, [ebp-$58] 008752BF 8D45AC lea eax, [ebp-$54] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008752C2 E8013BBAFF call 00418DC8 008752C7 8D45AC lea eax, [ebp-$54] 008752CA 50 push eax * Possible String Reference to: 'T_Money' | 008752CB BAA8548700 mov edx, $008754A8 008752D0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008752D2 E8DD18C5FF call 004C6BB4 008752D7 5A pop edx 008752D8 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008752DA FF91B4000000 call dword ptr [ecx+$00B4] 008752E0 8D55A4 lea edx, [ebp-$5C] *) end; procedure TfrmCaiWuHuiLV.v2OrderNOPropertiesButtonClick(Sender : TObject); begin (* 00875550 55 push ebp 00875551 8BEC mov ebp, esp 00875553 51 push ecx 00875554 B90F000000 mov ecx, $0000000F 00875559 6A00 push $00 0087555B 6A00 push $00 0087555D 49 dec ecx 0087555E 75F9 jnz 00875559 00875560 51 push ecx 00875561 874DFC xchg [ebp-$04], ecx 00875564 53 push ebx 00875565 56 push esi 00875566 8BF0 mov esi, eax 00875568 33C0 xor eax, eax 0087556A 55 push ebp * Possible String Reference to: 'éóñ¸ÿë¹^[‹å]Ã' | 0087556B 68FC588700 push $008758FC ***** TRY | 00875570 64FF30 push dword ptr fs:[eax] 00875573 648920 mov fs:[eax], esp 00875576 33C0 xor eax, eax 00875578 55 push ebp 00875579 68A8588700 push $008758A8 ***** TRY | 0087557E 64FF30 push dword ptr fs:[eax] 00875581 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.v2ComTaiTouPropertiesButtonClick(Sender : TObject); begin (* 00875A44 55 push ebp 00875A45 8BEC mov ebp, esp 00875A47 51 push ecx 00875A48 B906000000 mov ecx, $00000006 00875A4D 6A00 push $00 00875A4F 6A00 push $00 00875A51 49 dec ecx 00875A52 75F9 jnz 00875A4D 00875A54 51 push ecx 00875A55 874DFC xchg [ebp-$04], ecx 00875A58 53 push ebx 00875A59 56 push esi 00875A5A 8BF0 mov esi, eax 00875A5C 33C0 xor eax, eax 00875A5E 55 push ebp 00875A5F 689B5C8700 push $00875C9B ***** TRY | 00875A64 64FF30 push dword ptr fs:[eax] 00875A67 648920 mov fs:[eax], esp 00875A6A 33C0 xor eax, eax 00875A6C 55 push ebp 00875A6D 68715C8700 push $00875C71 ***** TRY | 00875A72 64FF30 push dword ptr fs:[eax] 00875A75 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.v2P_ColorPropertiesButtonClick(Sender : TObject); begin (* 00875D80 55 push ebp 00875D81 8BEC mov ebp, esp 00875D83 51 push ecx 00875D84 B907000000 mov ecx, $00000007 00875D89 6A00 push $00 00875D8B 6A00 push $00 00875D8D 49 dec ecx 00875D8E 75F9 jnz 00875D89 00875D90 51 push ecx 00875D91 874DFC xchg [ebp-$04], ecx 00875D94 53 push ebx 00875D95 56 push esi 00875D96 8BF0 mov esi, eax 00875D98 33C0 xor eax, eax 00875D9A 55 push ebp 00875D9B 6833608700 push $00876033 ***** TRY | 00875DA0 64FF30 push dword ptr fs:[eax] 00875DA3 648920 mov fs:[eax], esp * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00875DA6 8B8648030000 mov eax, [esi+$0348] * Possible String Reference to: 'YFType' | 00875DAC BA48608700 mov edx, $00876048 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00875DB1 E8FE0DC5FF call 004C6BB4 00875DB6 8D55F8 lea edx, [ebp-$08] 00875DB9 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00875DBB FF5160 call dword ptr [ecx+$60] 00875DBE 8B45F8 mov eax, [ebp-$08] 00875DC1 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00875DC4 E8234BB9FF call 0040A8EC 00875DC9 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '×Ô¶¯Éú³É' | 00875DCC BA58608700 mov edx, $00876058 * Reference to: System.@LStrCmp; | 00875DD1 E86AF9B8FF call 00405740 00875DD6 751D jnz 00875DF5 00875DD8 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00875DDA B964608700 mov ecx, $00876064 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00875DDF BA6C608700 mov edx, $0087606C *) end; procedure TfrmCaiWuHuiLV.TADDClick(Sender : TObject); begin (* 00876150 55 push ebp 00876151 8BEC mov ebp, esp 00876153 6A00 push $00 00876155 56 push esi 00876156 57 push edi 00876157 8BF8 mov edi, eax 00876159 33C0 xor eax, eax 0087615B 55 push ebp * Possible String Reference to: 'éé¸ÿëð_^Y]Ã' | 0087615C 68E2618700 push $008761E2 ***** TRY | 00876161 64FF30 push dword ptr fs:[eax] 00876164 648920 mov fs:[eax], esp 00876167 8BB748030000 mov esi, [edi+$0348] 0087616D 8BC6 mov eax, esi | 0087616F E81C24C5FF call 004C8590 00876174 8D55FC lea edx, [ebp-$04] *) end; procedure TfrmCaiWuHuiLV.TDelClick(Sender : TObject); begin (* 00876210 55 push ebp 00876211 8BEC mov ebp, esp 00876213 33C9 xor ecx, ecx 00876215 51 push ecx 00876216 51 push ecx 00876217 51 push ecx 00876218 51 push ecx 00876219 51 push ecx 0087621A 53 push ebx 0087621B 56 push esi 0087621C 57 push edi 0087621D 8945FC mov [ebp-$04], eax 00876220 33C0 xor eax, eax 00876222 55 push ebp * Possible String Reference to: 'énç¸ÿëë_^[‹å]Ã' | 00876223 6881638700 push $00876381 ***** TRY | 00876228 64FF30 push dword ptr fs:[eax] 0087622B 648920 mov fs:[eax], esp 0087622E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00876231 8B8048030000 mov eax, [eax+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00876237 E8841CC5FF call 004C7EC0 0087623C 84C0 test al, al 0087623E 0F8522010000 jnz 00876366 00876244 6A01 push $01 * Possible String Reference to: 'Ìáʾ' | 00876246 B990638700 mov ecx, $00876390 * Possible String Reference to: 'È·¶¨ÒªÉ¾³ýÂð' | 0087624B BA98638700 mov edx, $00876398 *) end; procedure TfrmCaiWuHuiLV.N1Click(Sender : TObject); begin (* 0087640C B201 mov dl, $01 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087640E 8B8048030000 mov eax, [eax+$0348] * Reference to : TfrmSelExportField._PROC_007B84A4() | 00876414 E88B20F4FF call 007B84A4 00876419 C3 ret *) end; procedure TfrmCaiWuHuiLV.N2Click(Sender : TObject); begin (* 0087641C 33D2 xor edx, edx * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087641E 8B8048030000 mov eax, [eax+$0348] * Reference to : TfrmSelExportField._PROC_007B84A4() | 00876424 E87B20F4FF call 007B84A4 00876429 C3 ret *) end; procedure TfrmCaiWuHuiLV.v2KPTypePropertiesEditValueChanged(Sender : TObject); begin (* 0087642C 55 push ebp 0087642D 8BEC mov ebp, esp 0087642F B905000000 mov ecx, $00000005 00876434 6A00 push $00 00876436 6A00 push $00 00876438 49 dec ecx 00876439 75F9 jnz 00876434 0087643B 51 push ecx 0087643C 53 push ebx 0087643D 56 push esi 0087643E 8BDA mov ebx, edx 00876440 8BF0 mov esi, eax 00876442 33C0 xor eax, eax 00876444 55 push ebp * Possible String Reference to: 'éyå¸ÿëÛ^[‹å]Ã' | 00876445 6876658700 push $00876576 ***** TRY | 0087644A 64FF30 push dword ptr fs:[eax] 0087644D 648920 mov fs:[eax], esp 00876450 8D55FC lea edx, [ebp-$04] 00876453 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; | 00876455 E86292D1FF call 0058F6BC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087645A 8B9E48030000 mov ebx, [esi+$0348] 00876460 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00876462 E8D91FC5FF call 004C8440 00876467 8D55E8 lea edx, [ebp-$18] 0087646A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087646D E87A44B9FF call 0040A8EC 00876472 8B55E8 mov edx, [ebp-$18] 00876475 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00876478 E84B29BAFF call 00418DC8 0087647D 8D45EC lea eax, [ebp-$14] 00876480 50 push eax * Possible String Reference to: 'KPType' | 00876481 BA8C658700 mov edx, $0087658C 00876486 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00876488 E82707C5FF call 004C6BB4 0087648D 5A pop edx 0087648E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00876490 FF91B4000000 call dword ptr [ecx+$00B4] * Reference to control TfrmCaiWuHuiLV.ADOQueryCmd : TADOQuery | 00876496 8B9E08030000 mov ebx, [esi+$0308] 0087649C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0087649E E831F4C4FF call 004C58D4 008764A3 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008764A5 E8027BC6FF call 004DDFAC 008764AA 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008764AC FF5244 call dword ptr [edx+$44] 008764AF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008764B1 E8F67AC6FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008764B6 BA9C658700 mov edx, $0087659C 008764BB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008764BD FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPType='' | 008764C0 68B8658700 push $008765B8 008764C5 8D55E0 lea edx, [ebp-$20] 008764C8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008764CB E81C44B9FF call 0040A8EC 008764D0 FF75E0 push dword ptr [ebp-$20] 008764D3 68D0658700 push $008765D0 008764D8 8D45E4 lea eax, [ebp-$1C] 008764DB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008764E0 E8CFF1B8FF call 004056B4 008764E5 8B45E4 mov eax, [ebp-$1C] 008764E8 50 push eax 008764E9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008764EB E8BC7AC6FF call 004DDFAC 008764F0 5A pop edx 008764F1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008764F3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 008764F6 68DC658700 push $008765DC * Possible String Reference to: 'YFId' | 008764FB BAF4658700 mov edx, $008765F4 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00876500 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00876506 E8A906C5FF call 004C6BB4 0087650B 8D55D4 lea edx, [ebp-$2C] 0087650E 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00876510 FF5160 call dword ptr [ecx+$60] 00876513 8B45D4 mov eax, [ebp-$2C] 00876516 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00876519 E8CE43B9FF call 0040A8EC 0087651E FF75D8 push dword ptr [ebp-$28] 00876521 68D0658700 push $008765D0 00876526 8D45DC lea eax, [ebp-$24] 00876529 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0087652E E881F1B8FF call 004056B4 00876533 8B45DC mov eax, [ebp-$24] 00876536 50 push eax 00876537 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00876539 E86E7AC6FF call 004DDFAC 0087653E 5A pop edx 0087653F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00876541 FF5138 call dword ptr [ecx+$38] 00876544 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00876546 E88979C6FF call 004DDED4 0087654B 33C0 xor eax, eax 0087654D 5A pop edx 0087654E 59 pop ecx 0087654F 59 pop ecx 00876550 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 00876553 687D658700 push $0087657D 00876558 8D45D4 lea eax, [ebp-$2C] 0087655B BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00876560 E8E3EDB8FF call 00405348 00876565 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00876568 E807E1B9FF call 00414674 0087656D 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00876570 E8AFEDB8FF call 00405324 00876575 C3 ret * Reference to: System.@HandleFinally; | 00876576 E979E5B8FF jmp 00404AF4 0087657B EBDB jmp 00876558 ****** END | 0087657D 5E pop esi 0087657E 5B pop ebx 0087657F 8BE5 mov esp, ebp 00876581 5D pop ebp 00876582 C3 ret *) end; procedure TfrmCaiWuHuiLV.cxTabControl2Change(Sender : TObject); begin (* | 008765FC E88FB5FFFF call 00871B90 00876601 C3 ret *) end; procedure TfrmCaiWuHuiLV.TSelClick(Sender : TObject); begin (* 00876604 55 push ebp 00876605 8BEC mov ebp, esp 00876607 33C9 xor ecx, ecx 00876609 51 push ecx 0087660A 51 push ecx 0087660B 51 push ecx 0087660C 51 push ecx 0087660D 53 push ebx 0087660E 56 push esi 0087660F 8BD8 mov ebx, eax 00876611 33C0 xor eax, eax 00876613 55 push ebp * Possible String Reference to: 'é]ä¸ÿëð^[‹å]Ã' | 00876614 6892668700 push $00876692 ***** TRY | 00876619 64FF30 push dword ptr fs:[eax] 0087661C 648920 mov fs:[eax], esp * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087661F 8B8348030000 mov eax, [ebx+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00876625 E89618C5FF call 004C7EC0 0087662A 84C0 test al, al 0087662C 754E jnz 0087667C 0087662E A0A0668700 mov al, byte ptr [$008766A0] 00876633 50 push eax 00876634 8D45F0 lea eax, [ebp-$10] 00876637 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00876639 E82627BAFF call 00418D64 0087663E 8D4DF0 lea ecx, [ebp-$10] * Possible String Reference to: 'Ssel' | 00876641 BAAC668700 mov edx, $008766AC * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00876646 8B8348030000 mov eax, [ebx+$0348] 0087664C 8B30 mov esi, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 0087664E FF9644020000 call dword ptr [esi+$0244] 00876654 84C0 test al, al 00876656 751A jnz 00876672 00876658 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 0087665A B9B4668700 mov ecx, $008766B4 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý' | 0087665F BABC668700 mov edx, $008766BC *) end; procedure TfrmCaiWuHuiLV.HuiLVChange(Sender : TObject); begin (* 008766CC 56 push esi * Reference to control TfrmCaiWuHuiLV.ToolButton2 : TToolButton | 008766CD 8B8010030000 mov eax, [eax+$0310] 008766D3 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 008766D7 E878DEB8FF call 00404554 008766DC 5E pop esi 008766DD C3 ret *) end; procedure TfrmCaiWuHuiLV.TSaveClick(Sender : TObject); begin (* 008766E0 55 push ebp 008766E1 8BEC mov ebp, esp 008766E3 B908000000 mov ecx, $00000008 008766E8 6A00 push $00 008766EA 6A00 push $00 008766EC 49 dec ecx 008766ED 75F9 jnz 008766E8 008766EF 53 push ebx 008766F0 56 push esi 008766F1 8BD8 mov ebx, eax 008766F3 33C0 xor eax, eax 008766F5 55 push ebp * Possible String Reference to: 'éKá¸ÿëÓ^[‹å]Ã' | 008766F6 68A4698700 push $008769A4 ***** TRY | 008766FB 64FF30 push dword ptr fs:[eax] 008766FE 648920 mov fs:[eax], esp * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 00876701 8B8348030000 mov eax, [ebx+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00876707 E8B417C5FF call 004C7EC0 0087670C 84C0 test al, al 0087670E 0F855D020000 jnz 00876971 00876714 A0B4698700 mov al, byte ptr [$008769B4] 00876719 50 push eax 0087671A 8D45E4 lea eax, [ebp-$1C] 0087671D B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 0087671F E84026BAFF call 00418D64 00876724 8D4DE4 lea ecx, [ebp-$1C] * Possible String Reference to: 'ssel' | 00876727 BAC0698700 mov edx, $008769C0 * Reference to control TfrmCaiWuHuiLV.CDS_HZ : TClientDataSet | 0087672C 8B8348030000 mov eax, [ebx+$0348] 00876732 8B30 mov esi, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 00876734 FF9644020000 call dword ptr [esi+$0244] 0087673A 84C0 test al, al 0087673C 751D jnz 0087675B 0087673E 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00876740 B9C8698700 mov ecx, $008769C8 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00876745 BAD0698700 mov edx, $008769D0 *) end; procedure TfrmCaiWuHuiLV.v2GSTypePropertiesButtonClick(Sender : TObject); begin (* 00876AC0 55 push ebp 00876AC1 8BEC mov ebp, esp 00876AC3 6A00 push $00 00876AC5 6A00 push $00 00876AC7 6A00 push $00 00876AC9 6A00 push $00 00876ACB 6A00 push $00 00876ACD 6A00 push $00 00876ACF 53 push ebx 00876AD0 8BD8 mov ebx, eax 00876AD2 33C0 xor eax, eax 00876AD4 55 push ebp 00876AD5 68E76B8700 push $00876BE7 ***** TRY | 00876ADA 64FF30 push dword ptr fs:[eax] 00876ADD 648920 mov fs:[eax], esp 00876AE0 33C0 xor eax, eax 00876AE2 55 push ebp 00876AE3 68BD6B8700 push $00876BBD ***** TRY | 00876AE8 64FF30 push dword ptr fs:[eax] 00876AEB 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV.GSTypeChange(Sender : TObject); begin (* 00876C28 56 push esi * Reference to control TfrmCaiWuHuiLV.ToolButton2 : TToolButton | 00876C29 8B8010030000 mov eax, [eax+$0310] 00876C2F 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00876C33 E81CD9B8FF call 00404554 00876C38 5E pop esi 00876C39 C3 ret *) end; procedure TfrmCaiWuHuiLV.begdateChange(Sender : TObject); begin (* | 00876C3C E84FAFFFFF call 00871B90 00876C41 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00872311(Sender : TObject); begin (* 00872311 50 push eax 00872312 6461 popa 00872314 7465 jz 0087237B 00872316 205943 and [ecx+$43], bl 00872319 4C dec esp 0087231A 5F pop edi 0087231B 53 push ebx 0087231C 47 inc edi 0087231D 5F pop edi 0087231E 48 dec eax 0087231F 5A pop edx 00872320 2000 and [eax], al 00872322 0000 add [eax], al 00872324 FFFF DB $FF, $FF // 00872326 FFFF DB $FF, $FF // 00872328 0500000020 add eax, +$20000000 0087232D 53 push ebx 0087232E 657420 jz 00872351 00872331 0000 add [eax], al 00872333 00FF add bh, bh 00872335 FFFF DB $FF, $FF // 00872337 FF02 inc dword ptr [edx] 00872339 0000 add [eax], al 0087233B 003D270000FF add [$FF000027], bh 00872341 FFFF DB $FF, $FF // 00872343 FF01 inc dword ptr [ecx] 00872345 0000 add [eax], al 00872347 0027 add [edi], ah 00872349 0000 add [eax], al 0087234B 00FF add bh, bh 0087234D FFFF DB $FF, $FF // 0087234F FF050000003D inc dword ptr [$3D000000] 00872355 4E dec esi 00872356 55 push ebp 00872357 4C dec esp 00872358 4C dec esp 00872359 0000 add [eax], al 0087235B 00FF add bh, bh 0087235D FFFF DB $FF, $FF // 0087235F FF09 dec dword ptr [ecx] 00872361 0000 add [eax], al 00872363 002C4564697465 add [$65746964+eax*2], ch 0087236A 723D jb 008723A9 0087236C 27 daa 0087236D 0000 add [eax], al 0087236F 00FF add bh, bh 00872371 FFFF DB $FF, $FF // 00872373 FF1400 call dword ptr [eax+eax] 00872376 0000 add [eax], al 00872378 2C45 sub al, $45 0087237A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00872383 657464 jz 008723EA 00872386 61 popa 00872387 7465 jz 008723EE 00872389 2829 sub [ecx], ch 0087238B 2000 and [eax], al 0087238D 0000 add [eax], al 0087238F 00FF add bh, bh 00872391 FFFF DB $FF, $FF // 00872393 FF0E dec dword ptr [esi] 00872395 0000 add [eax], al 00872397 0020 add [eax], ah 00872399 7768 jnbe 00872403 0087239B 657265 jb 00872403 0087239E 205375 and [ebx+$75], dl 008723A1 624964 bound ecx, qword ptr [ecx+$64] 008723A4 3D270000FF cmp eax, $FF000027 008723A9 FFFF DB $FF, $FF // 008723AB FF0500000053 inc dword ptr [$53000000] 008723B1 7562 jnz 00872415 008723B3 49 dec ecx 008723B4 640000 add fs:[eax], al 008723B7 00558B add [ebp-$75], dl 008723BA EC in al, dx 008723BB B921000000 mov ecx, $00000021 008723C0 6A00 push $00 008723C2 6A00 push $00 008723C4 49 dec ecx 008723C5 75F9 jnz 008723C0 008723C7 53 push ebx 008723C8 56 push esi 008723C9 8BF2 mov esi, edx 008723CB 8BD8 mov ebx, eax 008723CD 33C0 xor eax, eax 008723CF 55 push ebp 008723D0 68452B8700 push $00872B45 ***** TRY | 008723D5 64FF30 push dword ptr fs:[eax] 008723D8 648920 mov fs:[eax], esp 008723DB 8D55FC lea edx, [ebp-$04] 008723DE 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; | 008723E0 E8D7D2D1FF call 0058F6BC 008723E5 8D55DC lea edx, [ebp-$24] 008723E8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008723EB E8FC84B9FF call 0040A8EC 008723F0 837DDC00 cmp dword ptr [ebp-$24], +$00 008723F4 750D jnz 00872403 008723F6 8D45FC lea eax, [ebp-$04] 008723F9 BA5C2B8700 mov edx, $00872B5C * Reference to: System.@LStrLAsg(void;void;void;void); | 008723FE E8B92FB9FF call 004053BC * Reference to control cxGrid1 : N.A. | 00872403 8B8328030000 mov eax, [ebx+$0328] * 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; | 00872409 E83E9FDEFF 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; | 0087240E E851F7DDFF call 00651B64 * Reference to field N.A..OFFS_0050 | 00872413 8B4050 mov eax, [eax+$50] 00872416 8D55D8 lea edx, [ebp-$28] 00872419 8B08 mov ecx, [eax] 0087241B FF5110 call dword ptr [ecx+$10] 0087241E 8B45D8 mov eax, [ebp-$28] 00872421 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00872424 E8C384B9FF call 0040A8EC * Reference to control Order_Sub : N.A. | 00872429 8BB348030000 mov esi, [ebx+$0348] 0087242F 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00872431 E80A60C5FF call 004C8440 00872436 8D55C4 lea edx, [ebp-$3C] 00872439 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087243C E8AB84B9FF call 0040A8EC 00872441 8B55C4 mov edx, [ebp-$3C] 00872444 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00872447 E87C69BAFF call 00418DC8 0087244C 8D45C8 lea eax, [ebp-$38] 0087244F 50 push eax 00872450 8B55E0 mov edx, [ebp-$20] 00872453 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00872455 E85A47C5FF call 004C6BB4 0087245A 5A pop edx 0087245B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 0087245D FF91B4000000 call dword ptr [ecx+$00B4] 00872463 8D55C0 lea edx, [ebp-$40] *) end; procedure TfrmCaiWuHuiLV._PROC_00872C39(Sender : TObject); begin (* 00872C39 50 push eax 00872C3A 6461 popa 00872C3C 7465 jz 00872CA3 00872C3E 205946 and [ecx+$46], bl 00872C41 5F pop edi 00872C42 4D dec ebp 00872C43 6F outsd 00872C44 6E outsb 00872C45 65795F jns 00872CA7 00872C48 43 inc ebx 00872C49 52 push edx 00872C4A 2000 and [eax], al 00872C4C FFFF DB $FF, $FF // 00872C4E FFFF DB $FF, $FF // 00872C50 0500000020 add eax, +$20000000 00872C55 53 push ebx 00872C56 657420 jz 00872C79 00872C59 0000 add [eax], al 00872C5B 00FF add bh, bh 00872C5D FFFF DB $FF, $FF // 00872C5F FF01 inc dword ptr [ecx] 00872C61 0000 add [eax], al 00872C63 003D000000FF add [$FF000000], bh 00872C69 FFFF DB $FF, $FF // 00872C6B FF07 inc dword ptr [edi] 00872C6D 0000 add [eax], al 00872C6F 002C4D6F6E6579 add [$79656E6F+ecx*2], ch 00872C76 3D00FFFFFF cmp eax, $FFFFFF00 00872C7B FF050000002C inc dword ptr [$2C000000] 00872C81 51 push ecx 00872C82 7479 jz 00872CFD 00872C84 3D000000FF cmp eax, $FF000000 00872C89 FFFF DB $FF, $FF // 00872C8B FF09 dec dword ptr [ecx] 00872C8D 0000 add [eax], al 00872C8F 002C42 add [edx+eax*2], ch 00872C92 42 inc edx 00872C93 4D dec ebp 00872C94 6F outsd 00872C95 6E outsb 00872C96 65793D jns 00872CD6 00872C99 0000 add [eax], al 00872C9B 00FF add bh, bh 00872C9D FFFF DB $FF, $FF // 00872C9F FF09 dec dword ptr [ecx] 00872CA1 0000 add [eax], al 00872CA3 002C4564697465 add [$65746964+eax*2], ch 00872CAA 723D jb 00872CE9 00872CAC 27 daa 00872CAD 0000 add [eax], al 00872CAF 00FF add bh, bh 00872CB1 FFFF DB $FF, $FF // 00872CB3 FF1400 call dword ptr [eax+eax] 00872CB6 0000 add [eax], al 00872CB8 2C45 sub al, $45 00872CBA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00872CC3 657464 jz 00872D2A 00872CC6 61 popa 00872CC7 7465 jz 00872D2E 00872CC9 2829 sub [ecx], ch 00872CCB 2000 and [eax], al 00872CCD 0000 add [eax], al 00872CCF 00FF add bh, bh 00872CD1 FFFF DB $FF, $FF // 00872CD3 FF0D00000020 dec dword ptr [$20000000] 00872CD9 7768 jnbe 00872D43 00872CDB 657265 jb 00872D43 00872CDE 205946 and [ecx+$46], bl 00872CE1 49 dec ecx 00872CE2 643D27000000 cmp eax, $00000027 00872CE8 FFFF DB $FF, $FF // 00872CEA FFFF DB $FF, $FF // 00872CEC 0400 add al, +$00 00872CEE 0000 add [eax], al 00872CF0 59 pop ecx 00872CF1 46 inc esi 00872CF2 49 dec ecx 00872CF3 640000 add fs:[eax], al 00872CF6 0000 add [eax], al 00872CF8 FFFF DB $FF, $FF // 00872CFA FFFF DB $FF, $FF // 00872CFC 2B00 sub eax, dword ptr [eax] 00872CFE 0000 add [eax], al 00872D00 55 push ebp 00872D01 7064 jo 00872D67 00872D03 61 popa 00872D04 7465 jz 00872D6B 00872D06 205946 and [ecx+$46], bl 00872D09 5F pop edi 00872D0A 4D dec ebp 00872D0B 6F outsd 00872D0C 6E outsb 00872D0D 65795F jns 00872D6F 00872D10 4B dec ebx 00872D11 43 inc ebx 00872D12 205365 and [ebx+$65], dl 00872D15 7420 jz 00872D37 00872D17 4B dec ebx 00872D18 43 inc ebx 00872D19 42 inc edx 00872D1A 42 inc edx 00872D1B 4D dec ebp 00872D1C 6F outsd 00872D1D 6E outsb 00872D1E 65793D jns 00872D5E 00872D21 4B dec ebx 00872D22 43 inc ebx 00872D23 42 inc edx 00872D24 42 inc edx 00872D25 4D dec ebp 00872D26 6F outsd 00872D27 6E outsb 00872D28 65792D jns 00872D58 00872D2B 00FF add bh, bh 00872D2D FFFF DB $FF, $FF // 00872D2F FF01 inc dword ptr [ecx] 00872D31 0000 add [eax], al 00872D33 002B add [ebx], ch 00872D35 0000 add [eax], al 00872D37 00FF add bh, bh 00872D39 FFFF DB $FF, $FF // 00872D3B FF0D00000020 dec dword ptr [$20000000] 00872D41 7768 jnbe 00872DAB 00872D43 657265 jb 00872DAB 00872D46 204352 and [ebx+$52], al 00872D49 49 dec ecx 00872D4A 44 inc esp 00872D4B 3D27000000 cmp eax, $00000027 00872D50 FFFF DB $FF, $FF // 00872D52 FFFF DB $FF, $FF // 00872D54 0400 add al, +$00 00872D56 0000 add [eax], al 00872D58 43 inc ebx 00872D59 52 push edx 00872D5A 49 dec ecx 00872D5B 44 inc esp 00872D5C 0000 add [eax], al 00872D5E 0000 add [eax], al 00872D60 55 push ebp 00872D61 8BEC mov ebp, esp 00872D63 B909000000 mov ecx, $00000009 00872D68 6A00 push $00 00872D6A 6A00 push $00 00872D6C 49 dec ecx 00872D6D 75F9 jnz 00872D68 00872D6F 51 push ecx 00872D70 53 push ebx 00872D71 56 push esi 00872D72 8BDA mov ebx, edx 00872D74 8BF0 mov esi, eax 00872D76 33C0 xor eax, eax 00872D78 55 push ebp 00872D79 68D52F8700 push $00872FD5 ***** TRY | 00872D7E 64FF30 push dword ptr fs:[eax] 00872D81 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 00872D84 BAEC2F8700 mov edx, $00872FEC * Reference to control Order_Sub : N.A. | 00872D89 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00872D8F E8203EC5FF call 004C6BB4 00872D94 8D55F0 lea edx, [ebp-$10] 00872D97 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00872D99 FF5160 call dword ptr [ecx+$60] 00872D9C 8B45F0 mov eax, [ebp-$10] 00872D9F 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00872DA2 E8457BB9FF call 0040A8EC 00872DA7 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '×Ô¶¯Éú³É' | 00872DAA BAFC2F8700 mov edx, $00872FFC * Reference to: System.@LStrCmp; | 00872DAF E88C29B9FF call 00405740 00872DB4 751D jnz 00872DD3 00872DB6 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00872DB8 B908308700 mov ecx, $00873008 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00872DBD BA10308700 mov edx, $00873010 *) end; procedure TfrmCaiWuHuiLV._PROC_00873031(Sender : TObject); begin (* 00873031 50 push eax 00873032 6461 popa 00873034 7465 jz 0087309B 00873036 205946 and [ecx+$46], bl 00873039 5F pop edi 0087303A 4D dec ebp 0087303B 6F outsd 0087303C 6E outsb 0087303D 65795F jns 0087309F 00873040 43 inc ebx 00873041 52 push edx 00873042 2000 and [eax], al 00873044 FFFF DB $FF, $FF // 00873046 FFFF DB $FF, $FF // 00873048 0500000020 add eax, +$20000000 0087304D 53 push ebx 0087304E 657420 jz 00873071 00873051 0000 add [eax], al 00873053 00FF add bh, bh 00873055 FFFF DB $FF, $FF // 00873057 FF02 inc dword ptr [edx] 00873059 0000 add [eax], al 0087305B 003D270000FF add [$FF000027], bh 00873061 FFFF DB $FF, $FF // 00873063 FF01 inc dword ptr [ecx] 00873065 0000 add [eax], al 00873067 0027 add [edi], ah 00873069 0000 add [eax], al 0087306B 00FF add bh, bh 0087306D FFFF DB $FF, $FF // 0087306F FF050000003D inc dword ptr [$3D000000] 00873075 4E dec esi 00873076 55 push ebp 00873077 4C dec esp 00873078 4C dec esp 00873079 0000 add [eax], al 0087307B 00FF add bh, bh 0087307D FFFF DB $FF, $FF // 0087307F FF09 dec dword ptr [ecx] 00873081 0000 add [eax], al 00873083 002C4564697465 add [$65746964+eax*2], ch 0087308A 723D jb 008730C9 0087308C 27 daa 0087308D 0000 add [eax], al 0087308F 00FF add bh, bh 00873091 FFFF DB $FF, $FF // 00873093 FF1400 call dword ptr [eax+eax] 00873096 0000 add [eax], al 00873098 2C45 sub al, $45 0087309A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008730A3 657464 jz 0087310A 008730A6 61 popa 008730A7 7465 jz 0087310E 008730A9 2829 sub [ecx], ch 008730AB 2000 and [eax], al 008730AD 0000 add [eax], al 008730AF 00FF add bh, bh 008730B1 FFFF DB $FF, $FF // 008730B3 FF0D00000020 dec dword ptr [$20000000] 008730B9 7768 jnbe 00873123 008730BB 657265 jb 00873123 008730BE 205946 and [ecx+$46], bl 008730C1 49 dec ecx 008730C2 643D27000000 cmp eax, $00000027 008730C8 FFFF DB $FF, $FF // 008730CA FFFF DB $FF, $FF // 008730CC 0400 add al, +$00 008730CE 0000 add [eax], al 008730D0 59 pop ecx 008730D1 46 inc esi 008730D2 49 dec ecx 008730D3 640000 add fs:[eax], al 008730D6 0000 add [eax], al 008730D8 55 push ebp 008730D9 8BEC mov ebp, esp 008730DB 51 push ecx 008730DC B90C000000 mov ecx, $0000000C 008730E1 6A00 push $00 008730E3 6A00 push $00 008730E5 49 dec ecx 008730E6 75F9 jnz 008730E1 008730E8 51 push ecx 008730E9 874DFC xchg [ebp-$04], ecx 008730EC 53 push ebx 008730ED 56 push esi 008730EE 8BF0 mov esi, eax 008730F0 33C0 xor eax, eax 008730F2 55 push ebp 008730F3 6877348700 push $00873477 ***** TRY | 008730F8 64FF30 push dword ptr fs:[eax] 008730FB 648920 mov fs:[eax], esp * Reference to control Order_Sub : N.A. | 008730FE 8B8648030000 mov eax, [esi+$0348] * Possible String Reference to: 'YFType' | 00873104 BA8C348700 mov edx, $0087348C * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00873109 E8A63AC5FF call 004C6BB4 0087310E 8D55F8 lea edx, [ebp-$08] 00873111 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00873113 FF5160 call dword ptr [ecx+$60] 00873116 8B45F8 mov eax, [ebp-$08] 00873119 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087311C E8CB77B9FF call 0040A8EC 00873121 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '×Ô¶¯Éú³É' | 00873124 BA9C348700 mov edx, $0087349C * Reference to: System.@LStrCmp; | 00873129 E81226B9FF call 00405740 0087312E 751D jnz 0087314D 00873130 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00873132 B9A8348700 mov ecx, $008734A8 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00873137 BAB0348700 mov edx, $008734B0 *) end; procedure TfrmCaiWuHuiLV._PROC_00873549(Sender : TObject); begin (* 00873549 50 push eax 0087354A 6461 popa 0087354C 7465 jz 008735B3 0087354E 205946 and [ecx+$46], bl 00873551 5F pop edi 00873552 4D dec ebp 00873553 6F outsd 00873554 6E outsb 00873555 65795F jns 008735B7 00873558 43 inc ebx 00873559 52 push edx 0087355A 2000 and [eax], al 0087355C FFFF DB $FF, $FF // 0087355E FFFF DB $FF, $FF // 00873560 0D00000020 or eax, $20000000 00873565 53 push ebx 00873566 657420 jz 00873589 00873569 59 pop ecx 0087356A 46 inc esi 0087356B 43 inc ebx 0087356C 6F outsd 0087356D 64653D27000000 cmp eax, $00000027 00873574 FFFF DB $FF, $FF // 00873576 FFFF DB $FF, $FF // 00873578 0100 add [eax], eax 0087357A 0000 add [eax], al 0087357C 27 daa 0087357D 0000 add [eax], al 0087357F 00FF add bh, bh 00873581 FFFF DB $FF, $FF // 00873583 FF0A dec dword ptr [edx] 00873585 0000 add [eax], al 00873587 0020 add [eax], ah 00873589 2C59 sub al, $59 0087358B 46 inc esi 0087358C 4E dec esi 0087358D 61 popa 0087358E 6D insd 0087358F 653D270000FF cmp eax, $FF000027 00873595 FFFF DB $FF, $FF // 00873597 FF09 dec dword ptr [ecx] 00873599 0000 add [eax], al 0087359B 002C4564697465 add [$65746964+eax*2], ch 008735A2 723D jb 008735E1 008735A4 27 daa 008735A5 0000 add [eax], al 008735A7 00FF add bh, bh 008735A9 FFFF DB $FF, $FF // 008735AB FF1400 call dword ptr [eax+eax] 008735AE 0000 add [eax], al 008735B0 2C45 sub al, $45 008735B2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008735BB 657464 jz 00873622 008735BE 61 popa 008735BF 7465 jz 00873626 008735C1 2829 sub [ecx], ch 008735C3 2000 and [eax], al 008735C5 0000 add [eax], al 008735C7 00FF add bh, bh 008735C9 FFFF DB $FF, $FF // 008735CB FF0D00000020 dec dword ptr [$20000000] 008735D1 7768 jnbe 0087363B 008735D3 657265 jb 0087363B 008735D6 205946 and [ecx+$46], bl 008735D9 49 dec ecx 008735DA 643D27000000 cmp eax, $00000027 008735E0 FFFF DB $FF, $FF // 008735E2 FFFF DB $FF, $FF // 008735E4 0400 add al, +$00 008735E6 0000 add [eax], al 008735E8 59 pop ecx 008735E9 46 inc esi 008735EA 49 dec ecx 008735EB 640000 add fs:[eax], al 008735EE 0000 add [eax], al 008735F0 55 push ebp 008735F1 8BEC mov ebp, esp 008735F3 51 push ecx 008735F4 B906000000 mov ecx, $00000006 008735F9 6A00 push $00 008735FB 6A00 push $00 008735FD 49 dec ecx 008735FE 75F9 jnz 008735F9 00873600 51 push ecx 00873601 874DFC xchg [ebp-$04], ecx 00873604 53 push ebx 00873605 56 push esi 00873606 8BF0 mov esi, eax 00873608 33C0 xor eax, eax 0087360A 55 push ebp 0087360B 6849388700 push $00873849 ***** TRY | 00873610 64FF30 push dword ptr fs:[eax] 00873613 648920 mov fs:[eax], esp 00873616 33C0 xor eax, eax 00873618 55 push ebp 00873619 681F388700 push $0087381F ***** TRY | 0087361E 64FF30 push dword ptr fs:[eax] 00873621 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV._PROC_00873866(Sender : TObject); begin (* 00873866 6E outsb 00873867 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 0087386F FF08 dec dword ptr [eax] 00873871 0000 add [eax], al *) end; procedure TfrmCaiWuHuiLV._PROC_0087389C(Sender : TObject); begin (* 0087389C 6E outsb 0087389D 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 008738A5 0000 add [eax], al *) end; procedure TfrmCaiWuHuiLV._PROC_008738A9(Sender : TObject); begin (* 008738A9 50 push eax 008738AA 6461 popa 008738AC 7465 jz 00873913 008738AE 205946 and [ecx+$46], bl 008738B1 5F pop edi 008738B2 4D dec ebp 008738B3 6F outsd 008738B4 6E outsb 008738B5 65795F jns 00873917 008738B8 43 inc ebx 008738B9 52 push edx 008738BA 2000 and [eax], al 008738BC FFFF DB $FF, $FF // 008738BE FFFF DB $FF, $FF // 008738C0 0E push cs 008738C1 0000 add [eax], al 008738C3 0020 add [eax], ah 008738C5 53 push ebx 008738C6 657420 jz 008738E9 008738C9 51 push ecx 008738CA 7479 jz 00873945 008738CC 55 push ebp 008738CD 6E outsb 008738CE 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 008738D6 FFFF DB $FF, $FF // 008738D8 07 pop es 008738D9 0000 add [eax], al 008738DB 005A64 add [edx+$64], bl 008738DE 794E jns 0087392E 008738E0 61 popa 008738E1 6D insd 008738E2 6500FF add bh, bh 008738E5 FFFF DB $FF, $FF // 008738E7 FF01 inc dword ptr [ecx] 008738E9 0000 add [eax], al 008738EB 0027 add [edi], ah 008738ED 0000 add [eax], al 008738EF 00FF add bh, bh 008738F1 FFFF DB $FF, $FF // 008738F3 FF09 dec dword ptr [ecx] 008738F5 0000 add [eax], al 008738F7 002C4564697465 add [$65746964+eax*2], ch 008738FE 723D jb 0087393D 00873900 27 daa 00873901 0000 add [eax], al 00873903 00FF add bh, bh 00873905 FFFF DB $FF, $FF // 00873907 FF1400 call dword ptr [eax+eax] 0087390A 0000 add [eax], al 0087390C 2C45 sub al, $45 0087390E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00873917 657464 jz 0087397E 0087391A 61 popa 0087391B 7465 jz 00873982 0087391D 2829 sub [ecx], ch 0087391F 2000 and [eax], al 00873921 0000 add [eax], al 00873923 00FF add bh, bh 00873925 FFFF DB $FF, $FF // 00873927 FF0D00000020 dec dword ptr [$20000000] 0087392D 7768 jnbe 00873997 0087392F 657265 jb 00873997 00873932 205946 and [ecx+$46], bl 00873935 49 dec ecx 00873936 643D27000000 cmp eax, $00000027 0087393C FFFF DB $FF, $FF // 0087393E FFFF DB $FF, $FF // 00873940 0400 add al, +$00 00873942 0000 add [eax], al 00873944 59 pop ecx 00873945 46 inc esi 00873946 49 dec ecx 00873947 640000 add fs:[eax], al 0087394A 0000 add [eax], al 0087394C 55 push ebp 0087394D 8BEC mov ebp, esp 0087394F 51 push ecx 00873950 B906000000 mov ecx, $00000006 00873955 6A00 push $00 00873957 6A00 push $00 00873959 49 dec ecx 0087395A 75F9 jnz 00873955 0087395C 51 push ecx 0087395D 874DFC xchg [ebp-$04], ecx 00873960 53 push ebx 00873961 56 push esi 00873962 8BF0 mov esi, eax 00873964 33C0 xor eax, eax 00873966 55 push ebp 00873967 68A53B8700 push $00873BA5 ***** TRY | 0087396C 64FF30 push dword ptr fs:[eax] 0087396F 648920 mov fs:[eax], esp 00873972 33C0 xor eax, eax 00873974 55 push ebp 00873975 687B3B8700 push $00873B7B ***** TRY | 0087397A 64FF30 push dword ptr fs:[eax] 0087397D 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV._PROC_00873BED(Sender : TObject); begin (* 00873BED 50 push eax 00873BEE 6461 popa 00873BF0 7465 jz 00873C57 00873BF2 205946 and [ecx+$46], bl 00873BF5 5F pop edi 00873BF6 4D dec ebp 00873BF7 6F outsd 00873BF8 6E outsb 00873BF9 65795F jns 00873C5B 00873BFC 43 inc ebx 00873BFD 52 push edx 00873BFE 2000 and [eax], al 00873C00 FFFF DB $FF, $FF // 00873C02 FFFF DB $FF, $FF // 00873C04 0D00000020 or eax, $20000000 00873C09 53 push ebx 00873C0A 657420 jz 00873C2D 00873C0D 42 inc edx 00873C0E 5A pop edx 00873C0F 54 push esp 00873C10 7970 jns 00873C82 00873C12 653D27000000 cmp eax, $00000027 00873C18 FFFF DB $FF, $FF // 00873C1A FFFF DB $FF, $FF // 00873C1C 07 pop es 00873C1D 0000 add [eax], al 00873C1F 005A64 add [edx+$64], bl 00873C22 794E jns 00873C72 00873C24 61 popa 00873C25 6D insd 00873C26 6500FF add bh, bh 00873C29 FFFF DB $FF, $FF // 00873C2B FF01 inc dword ptr [ecx] 00873C2D 0000 add [eax], al 00873C2F 0027 add [edi], ah 00873C31 0000 add [eax], al 00873C33 00FF add bh, bh 00873C35 FFFF DB $FF, $FF // 00873C37 FF09 dec dword ptr [ecx] 00873C39 0000 add [eax], al 00873C3B 002C4564697465 add [$65746964+eax*2], ch 00873C42 723D jb 00873C81 00873C44 27 daa 00873C45 0000 add [eax], al 00873C47 00FF add bh, bh 00873C49 FFFF DB $FF, $FF // 00873C4B FF1400 call dword ptr [eax+eax] 00873C4E 0000 add [eax], al 00873C50 2C45 sub al, $45 00873C52 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00873C5B 657464 jz 00873CC2 00873C5E 61 popa 00873C5F 7465 jz 00873CC6 00873C61 2829 sub [ecx], ch 00873C63 2000 and [eax], al 00873C65 0000 add [eax], al 00873C67 00FF add bh, bh 00873C69 FFFF DB $FF, $FF // 00873C6B FF0D00000020 dec dword ptr [$20000000] 00873C71 7768 jnbe 00873CDB 00873C73 657265 jb 00873CDB 00873C76 205946 and [ecx+$46], bl 00873C79 49 dec ecx 00873C7A 643D27000000 cmp eax, $00000027 00873C80 FFFF DB $FF, $FF // 00873C82 FFFF DB $FF, $FF // 00873C84 0400 add al, +$00 00873C86 0000 add [eax], al 00873C88 59 pop ecx 00873C89 46 inc esi 00873C8A 49 dec ecx 00873C8B 640000 add fs:[eax], al 00873C8E 0000 add [eax], al 00873C90 53 push ebx 00873C91 8BD8 mov ebx, eax * Reference to control DlyDate : N.A. | 00873C93 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00873C99 E82242C5FF call 004C7EC0 00873C9E 84C0 test al, al 00873CA0 7516 jnz 00873CB8 * Possible String Reference to: 'Ó¦¸¶¿îÁбí' | 00873CA2 B9C43C8700 mov ecx, $00873CC4 * Reference to control DlyDate : N.A. | 00873CA7 8B9314030000 mov edx, [ebx+$0314] * Reference to control cxGrid1 : N.A. | 00873CAD 8B8328030000 mov eax, [ebx+$0328] | 00873CB3 E87845F4FF call 007B8230 00873CB8 5B pop ebx 00873CB9 C3 ret 00873CBA 0000 add [eax], al 00873CBC FFFF DB $FF, $FF // 00873CBE FFFF DB $FF, $FF // 00873CC0 0A00 or al, byte ptr [eax] 00873CC2 0000 add [eax], al 00873CC4 D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl 00873CCA C1D0B1 rcl eax, $B1 00873CCD ED in eax, dx 00873CCE 0000 add [eax], al 00873CD0 55 push ebp 00873CD1 8BEC mov ebp, esp 00873CD3 B909000000 mov ecx, $00000009 00873CD8 6A00 push $00 00873CDA 6A00 push $00 00873CDC 49 dec ecx 00873CDD 75F9 jnz 00873CD8 00873CDF 53 push ebx 00873CE0 56 push esi 00873CE1 8BDA mov ebx, edx 00873CE3 8BF0 mov esi, eax 00873CE5 33C0 xor eax, eax 00873CE7 55 push ebp 00873CE8 68073F8700 push $00873F07 ***** TRY | 00873CED 64FF30 push dword ptr fs:[eax] 00873CF0 648920 mov fs:[eax], esp * Possible String Reference to: 'YFType' | 00873CF3 BA1C3F8700 mov edx, $00873F1C * Reference to control Order_Sub : N.A. | 00873CF8 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00873CFE E8B12EC5FF call 004C6BB4 00873D03 8D55F0 lea edx, [ebp-$10] 00873D06 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00873D08 FF5160 call dword ptr [ecx+$60] 00873D0B 8B45F0 mov eax, [ebp-$10] 00873D0E 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00873D11 E8D66BB9FF call 0040A8EC 00873D16 8B45F4 mov eax, [ebp-$0C] * Possible String Reference to: '×Ô¶¯Éú³É' | 00873D19 BA2C3F8700 mov edx, $00873F2C * Reference to: System.@LStrCmp; | 00873D1E E81D1AB9FF call 00405740 00873D23 751D jnz 00873D42 00873D25 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00873D27 B9383F8700 mov ecx, $00873F38 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00873D2C BA403F8700 mov edx, $00873F40 *) end; procedure TfrmCaiWuHuiLV._PROC_00873F6D(Sender : TObject); begin (* 00873F6D 50 push eax 00873F6E 6461 popa 00873F70 7465 jz 00873FD7 00873F72 205946 and [ecx+$46], bl 00873F75 5F pop edi 00873F76 4D dec ebp 00873F77 6F outsd 00873F78 6E outsb 00873F79 65795F jns 00873FDB 00873F7C 43 inc ebx 00873F7D 52 push edx 00873F7E 2000 and [eax], al 00873F80 FFFF DB $FF, $FF // 00873F82 FFFF DB $FF, $FF // 00873F84 0500000020 add eax, +$20000000 00873F89 53 push ebx 00873F8A 657420 jz 00873FAD 00873F8D 0000 add [eax], al 00873F8F 00FF add bh, bh 00873F91 FFFF DB $FF, $FF // 00873F93 FF01 inc dword ptr [ecx] 00873F95 0000 add [eax], al 00873F97 003D000000FF add [$FF000000], bh 00873F9D FFFF DB $FF, $FF // 00873F9F FF09 dec dword ptr [ecx] 00873FA1 0000 add [eax], al 00873FA3 002C4564697465 add [$65746964+eax*2], ch 00873FAA 723D jb 00873FE9 00873FAC 27 daa 00873FAD 0000 add [eax], al 00873FAF 00FF add bh, bh 00873FB1 FFFF DB $FF, $FF // 00873FB3 FF01 inc dword ptr [ecx] 00873FB5 0000 add [eax], al 00873FB7 0027 add [edi], ah 00873FB9 0000 add [eax], al 00873FBB 00FF add bh, bh 00873FBD FFFF DB $FF, $FF // 00873FBF FF1400 call dword ptr [eax+eax] 00873FC2 0000 add [eax], al 00873FC4 2C45 sub al, $45 00873FC6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00873FCF 657464 jz 00874036 00873FD2 61 popa 00873FD3 7465 jz 0087403A 00873FD5 2829 sub [ecx], ch 00873FD7 2000 and [eax], al 00873FD9 0000 add [eax], al 00873FDB 00FF add bh, bh 00873FDD FFFF DB $FF, $FF // 00873FDF FF0D00000020 dec dword ptr [$20000000] 00873FE5 7768 jnbe 0087404F 00873FE7 657265 jb 0087404F 00873FEA 205946 and [ecx+$46], bl 00873FED 49 dec ecx 00873FEE 643D27000000 cmp eax, $00000027 00873FF4 FFFF DB $FF, $FF // 00873FF6 FFFF DB $FF, $FF // 00873FF8 0400 add al, +$00 00873FFA 0000 add [eax], al 00873FFC 59 pop ecx 00873FFD 46 inc esi 00873FFE 49 dec ecx 00873FFF 640000 add fs:[eax], al 00874002 0000 add [eax], al 00874004 55 push ebp 00874005 8BEC mov ebp, esp 00874007 B908000000 mov ecx, $00000008 0087400C 6A00 push $00 0087400E 6A00 push $00 00874010 49 dec ecx 00874011 75F9 jnz 0087400C 00874013 53 push ebx 00874014 56 push esi 00874015 8BDA mov ebx, edx 00874017 8BF0 mov esi, eax 00874019 33C0 xor eax, eax 0087401B 55 push ebp 0087401C 68EC418700 push $008741EC ***** TRY | 00874021 64FF30 push dword ptr fs:[eax] 00874024 648920 mov fs:[eax], esp 00874027 8D55FC lea edx, [ebp-$04] 0087402A 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; | 0087402C E88BB6D1FF call 0058F6BC 00874031 8D55F4 lea edx, [ebp-$0C] 00874034 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874037 E8B068B9FF call 0040A8EC 0087403C 837DF400 cmp dword ptr [ebp-$0C], +$00 00874040 750D jnz 0087404F 00874042 8D45FC lea eax, [ebp-$04] 00874045 BA04428700 mov edx, $00874204 * Reference to: System.@LStrLAsg(void;void;void;void); | 0087404A E86D13B9FF call 004053BC * Reference to control cxGrid1 : N.A. | 0087404F 8B8628030000 mov eax, [esi+$0328] * 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; | 00874055 E8F282DEFF 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; | 0087405A E805DBDDFF call 00651B64 * Reference to field N.A..OFFS_0050 | 0087405F 8B4050 mov eax, [eax+$50] 00874062 8D55F0 lea edx, [ebp-$10] 00874065 8B08 mov ecx, [eax] 00874067 FF5110 call dword ptr [ecx+$10] 0087406A 8B45F0 mov eax, [ebp-$10] 0087406D 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874070 E87768B9FF call 0040A8EC * Reference to control Order_Sub : N.A. | 00874075 8B9E48030000 mov ebx, [esi+$0348] 0087407B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0087407D E8BE43C5FF call 004C8440 00874082 8D55DC lea edx, [ebp-$24] 00874085 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874088 E85F68B9FF call 0040A8EC 0087408D 8B55DC mov edx, [ebp-$24] 00874090 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874093 E8304DBAFF call 00418DC8 00874098 8D45E0 lea eax, [ebp-$20] 0087409B 50 push eax 0087409C 8B55F8 mov edx, [ebp-$08] 0087409F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008740A1 E80E2BC5FF call 004C6BB4 008740A6 5A pop edx 008740A7 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 008740A9 FF91B4000000 call dword ptr [ecx+$00B4] 008740AF 8BC3 mov eax, ebx 008740B1 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 008740B3 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 008740B9 8B9E08030000 mov ebx, [esi+$0308] 008740BF 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008740C1 E80E18C5FF call 004C58D4 008740C6 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008740C8 E8DF9EC6FF call 004DDFAC 008740CD 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 008740CF FF5244 call dword ptr [edx+$44] 008740D2 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008740D4 E8D39EC6FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008740D9 BA10428700 mov edx, $00874210 008740DE 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008740E0 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008740E3 682C428700 push $0087422C 008740E8 FF75F8 push dword ptr [ebp-$08] 008740EB 683C428700 push $0087423C 008740F0 8D55D4 lea edx, [ebp-$2C] 008740F3 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008740F6 E8F167B9FF call 0040A8EC 008740FB FF75D4 push dword ptr [ebp-$2C] 008740FE 8D45D8 lea eax, [ebp-$28] 00874101 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00874106 E8A915B9FF call 004056B4 0087410B 8B45D8 mov eax, [ebp-$28] 0087410E 50 push eax 0087410F 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00874111 E8969EC6FF call 004DDFAC 00874116 5A pop edx 00874117 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00874119 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 0087411C 6848428700 push $00874248 00874121 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmCaiWuHuiLV._PROC_00874211(Sender : TObject); begin (* 00874211 50 push eax 00874212 6461 popa 00874214 7465 jz 0087427B 00874216 205946 and [ecx+$46], bl 00874219 5F pop edi 0087421A 4D dec ebp 0087421B 6F outsd 0087421C 6E outsb 0087421D 65795F jns 0087427F 00874220 43 inc ebx 00874221 52 push edx 00874222 2000 and [eax], al 00874224 FFFF DB $FF, $FF // 00874226 FFFF DB $FF, $FF // 00874228 0500000020 add eax, +$20000000 0087422D 53 push ebx 0087422E 657420 jz 00874251 00874231 0000 add [eax], al 00874233 00FF add bh, bh 00874235 FFFF DB $FF, $FF // 00874237 FF01 inc dword ptr [ecx] 00874239 0000 add [eax], al 0087423B 003D000000FF add [$FF000000], bh 00874241 FFFF DB $FF, $FF // 00874243 FF09 dec dword ptr [ecx] 00874245 0000 add [eax], al 00874247 002C4564697465 add [$65746964+eax*2], ch 0087424E 723D jb 0087428D 00874250 27 daa 00874251 0000 add [eax], al 00874253 00FF add bh, bh 00874255 FFFF DB $FF, $FF // 00874257 FF01 inc dword ptr [ecx] 00874259 0000 add [eax], al 0087425B 0027 add [edi], ah 0087425D 0000 add [eax], al 0087425F 00FF add bh, bh 00874261 FFFF DB $FF, $FF // 00874263 FF1400 call dword ptr [eax+eax] 00874266 0000 add [eax], al 00874268 2C45 sub al, $45 0087426A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00874273 657464 jz 008742DA 00874276 61 popa 00874277 7465 jz 008742DE 00874279 2829 sub [ecx], ch 0087427B 2000 and [eax], al 0087427D 0000 add [eax], al 0087427F 00FF add bh, bh 00874281 FFFF DB $FF, $FF // 00874283 FF0D00000020 dec dword ptr [$20000000] 00874289 7768 jnbe 008742F3 0087428B 657265 jb 008742F3 0087428E 205946 and [ecx+$46], bl 00874291 49 dec ecx 00874292 643D27000000 cmp eax, $00000027 00874298 FFFF DB $FF, $FF // 0087429A FFFF DB $FF, $FF // 0087429C 0400 add al, +$00 0087429E 0000 add [eax], al 008742A0 59 pop ecx 008742A1 46 inc esi 008742A2 49 dec ecx 008742A3 640000 add fs:[eax], al 008742A6 0000 add [eax], al 008742A8 55 push ebp 008742A9 8BEC mov ebp, esp 008742AB B90E000000 mov ecx, $0000000E 008742B0 6A00 push $00 008742B2 6A00 push $00 008742B4 49 dec ecx 008742B5 75F9 jnz 008742B0 008742B7 53 push ebx 008742B8 56 push esi 008742B9 8BDA mov ebx, edx 008742BB 8BF0 mov esi, eax 008742BD 33C0 xor eax, eax 008742BF 55 push ebp 008742C0 68A1458700 push $008745A1 ***** TRY | 008742C5 64FF30 push dword ptr fs:[eax] 008742C8 648920 mov fs:[eax], esp 008742CB 8D55FC lea edx, [ebp-$04] 008742CE 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; | 008742D0 E8E7B3D1FF call 0058F6BC * Reference to control cxGrid1 : N.A. | 008742D5 8B8628030000 mov eax, [esi+$0328] * 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; | 008742DB E86C80DEFF 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; | 008742E0 E87FD8DDFF call 00651B64 * Reference to field N.A..OFFS_0050 | 008742E5 8B4050 mov eax, [eax+$50] 008742E8 8D55F4 lea edx, [ebp-$0C] 008742EB 8B08 mov ecx, [eax] 008742ED FF5110 call dword ptr [ecx+$10] 008742F0 8B45F4 mov eax, [ebp-$0C] 008742F3 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008742F6 E8F165B9FF call 0040A8EC * Reference to control Order_Sub : N.A. | 008742FB 8B9E48030000 mov ebx, [esi+$0348] 00874301 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00874303 E83841C5FF call 004C8440 00874308 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 0087430B BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 00874310 E82B14B9FF call 00405740 00874315 751E jnz 00874335 00874317 8D55F0 lea edx, [ebp-$10] 0087431A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087431D E8CA65B9FF call 0040A8EC 00874322 837DF000 cmp dword ptr [ebp-$10], +$00 00874326 750D jnz 00874335 00874328 8D45FC lea eax, [ebp-$04] 0087432B BAC8458700 mov edx, $008745C8 * Reference to: System.@LStrLAsg(void;void;void;void); | 00874330 E88710B9FF call 004053BC 00874335 8D55DC lea edx, [ebp-$24] 00874338 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087433B E8AC65B9FF call 0040A8EC 00874340 8B55DC mov edx, [ebp-$24] 00874343 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874346 E87D4ABAFF call 00418DC8 0087434B 8D45E0 lea eax, [ebp-$20] 0087434E 50 push eax 0087434F 8B55F8 mov edx, [ebp-$08] 00874352 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874354 E85B28C5FF call 004C6BB4 00874359 5A pop edx 0087435A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 0087435C FF91B4000000 call dword ptr [ecx+$00B4] 00874362 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 00874365 BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 0087436A E8D113B9FF call 00405740 0087436F 7553 jnz 008743C4 * Possible String Reference to: 'GCPrice' | 00874371 BAB8458700 mov edx, $008745B8 00874376 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874378 E83728C5FF call 004C6BB4 0087437D 8D55CC lea edx, [ebp-$34] 00874380 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 00874382 FF5164 call dword ptr [ecx+$64] 00874385 8D45CC lea eax, [ebp-$34] 00874388 50 push eax * Possible String Reference to: 'Qty' | 00874389 BAD4458700 mov edx, $008745D4 0087438E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874390 E81F28C5FF call 004C6BB4 00874395 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_54 | 00874397 FF5254 call dword ptr [edx+$54] 0087439A 8D45BC lea eax, [ebp-$44] * Reference to: Variants.@VarFromReal; | 0087439D E8EA49BAFF call 00418D8C 008743A2 8D55BC lea edx, [ebp-$44] 008743A5 58 pop eax * Reference to: System.@Initialize(Pointer;Pointer); | or: System.@Finalize(Pointer;Pointer); | or: System.@AddRef; | or: Variants.@VarAdd(TVarData;TVarData;TVarData;TVarData); | or: Variants.@VarSub(TVarData;TVarData;TVarData;TVarData); | or: Variants.@VarMul(TVarData;TVarData;TVarData;TVarData); | 008743A6 E8D58FBAFF call 0041D380 008743AB 8D45CC lea eax, [ebp-$34] 008743AE 50 push eax * Possible String Reference to: 'GCMoney' | 008743AF BAE0458700 mov edx, $008745E0 008743B4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008743B6 E8F927C5FF call 004C6BB4 008743BB 5A pop edx 008743BC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 008743BE FF91B4000000 call dword ptr [ecx+$00B4] 008743C4 8BC3 mov eax, ebx 008743C6 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 008743C8 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 008743CE 8B9E08030000 mov ebx, [esi+$0308] 008743D4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008743D6 E8F914C5FF call 004C58D4 008743DB 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008743DD E8CA9BC6FF call 004DDFAC 008743E2 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 008743E4 FF5244 call dword ptr [edx+$44] 008743E7 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008743E9 E8BE9BC6FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008743EE BAF0458700 mov edx, $008745F0 008743F3 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008743F5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008743F8 680C468700 push $0087460C 008743FD FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00874400 681C468700 push $0087461C 00874405 8D55B4 lea edx, [ebp-$4C] 00874408 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0087440B E8DC64B9FF call 0040A8EC 00874410 FF75B4 push dword ptr [ebp-$4C] 00874413 6828468700 push $00874628 00874418 8D45B8 lea eax, [ebp-$48] 0087441B BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00874420 E88F12B9FF call 004056B4 00874425 8B45B8 mov eax, [ebp-$48] 00874428 50 push eax 00874429 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0087442B E87C9BC6FF call 004DDFAC 00874430 5A pop edx 00874431 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00874433 FF5138 call dword ptr [ecx+$38] 00874436 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'GCPrice' | 00874439 BAB8458700 mov edx, $008745B8 * Reference to: System.@LStrCmp; | 0087443E E8FD12B9FF call 00405740 00874443 754E jnz 00874493 * Possible String Reference to: ',GCMoney='' | 00874445 6834468700 push $00874634 * Possible String Reference to: 'GCMoney' | 0087444A BAE0458700 mov edx, $008745E0 * Reference to control Order_Sub : N.A. | 0087444F 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874455 E85A27C5FF call 004C6BB4 0087445A 8D55A8 lea edx, [ebp-$58] 0087445D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 0087445F FF5160 call dword ptr [ecx+$60] 00874462 8B45A8 mov eax, [ebp-$58] 00874465 8D55AC lea edx, [ebp-$54] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874468 E87F64B9FF call 0040A8EC 0087446D FF75AC push dword ptr [ebp-$54] 00874470 6828468700 push $00874628 00874475 8D45B0 lea eax, [ebp-$50] 00874478 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0087447D E83212B9FF call 004056B4 00874482 8B45B0 mov eax, [ebp-$50] 00874485 50 push eax 00874486 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00874488 E81F9BC6FF call 004DDFAC 0087448D 5A pop edx 0087448E 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00874490 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'GCMoney' | 00874493 BAE0458700 mov edx, $008745E0 * Reference to control Order_Sub : N.A. | 00874498 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0087449E E81127C5FF call 004C6BB4 008744A3 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_54 | 008744A5 FF5254 call dword ptr [edx+$54] 008744A8 D81D40468700 fcomp dword ptr [$00874640] 008744AE DFE0 fstsw ax 008744B0 9E sahf 008744B1 744E jz 00874501 * Possible String Reference to: ',BBMoney='' | 008744B3 684C468700 push $0087464C * Possible String Reference to: 'GCMoney' | 008744B8 BAE0458700 mov edx, $008745E0 * Reference to control Order_Sub : N.A. | 008744BD 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008744C3 E8EC26C5FF call 004C6BB4 008744C8 8D559C lea edx, [ebp-$64] 008744CB 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008744CD FF5160 call dword ptr [ecx+$60] 008744D0 8B459C mov eax, [ebp-$64] 008744D3 8D55A0 lea edx, [ebp-$60] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008744D6 E81164B9FF call 0040A8EC 008744DB FF75A0 push dword ptr [ebp-$60] 008744DE 6828468700 push $00874628 008744E3 8D45A4 lea eax, [ebp-$5C] 008744E6 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008744EB E8C411B9FF call 004056B4 008744F0 8B45A4 mov eax, [ebp-$5C] 008744F3 50 push eax 008744F4 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008744F6 E8B19AC6FF call 004DDFAC 008744FB 5A pop edx 008744FC 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008744FE FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00874501 6860468700 push $00874660 * Possible String Reference to: 'YFId' | 00874506 BA78468700 mov edx, $00874678 * Reference to control Order_Sub : N.A. | 0087450B 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874511 E89E26C5FF call 004C6BB4 00874516 8D5590 lea edx, [ebp-$70] 00874519 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 0087451B FF5160 call dword ptr [ecx+$60] 0087451E 8B4590 mov eax, [ebp-$70] 00874521 8D5594 lea edx, [ebp-$6C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874524 E8C363B9FF call 0040A8EC 00874529 FF7594 push dword ptr [ebp-$6C] 0087452C 6828468700 push $00874628 00874531 8D4598 lea eax, [ebp-$68] 00874534 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00874539 E87611B9FF call 004056B4 0087453E 8B4598 mov eax, [ebp-$68] 00874541 50 push eax 00874542 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00874544 E8639AC6FF call 004DDFAC 00874549 5A pop edx 0087454A 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 0087454C FF5138 call dword ptr [ecx+$38] 0087454F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00874551 E87E99C6FF call 004DDED4 00874556 33C0 xor eax, eax 00874558 5A pop edx 00874559 59 pop ecx 0087455A 59 pop ecx 0087455B 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 0087455E 68A8458700 push $008745A8 00874563 8D4590 lea eax, [ebp-$70] 00874566 BA0B000000 mov edx, $0000000B * Reference to: System.@LStrArrayClr(void;void;Integer); | 0087456B E8D80DB9FF call 00405348 00874570 8D45BC lea eax, [ebp-$44] * Reference to object Variant | 00874573 8B153C114000 mov edx, [$0040113C] 00874579 B902000000 mov ecx, $00000002 * Reference to: System.@FinalizeArray(Pointer;Pointer;Cardinal); | 0087457E E8911BB9FF call 00406114 00874583 8D45DC lea eax, [ebp-$24] * Reference to: System.@LStrClr(void;void); | 00874586 E8990DB9FF call 00405324 0087458B 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0087458E E8E100BAFF call 00414674 00874593 8D45F0 lea eax, [ebp-$10] 00874596 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0087459B E8A80DB9FF call 00405348 008745A0 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_008745F1(Sender : TObject); begin (* 008745F1 50 push eax 008745F2 6461 popa 008745F4 7465 jz 0087465B 008745F6 205946 and [ecx+$46], bl 008745F9 5F pop edi 008745FA 4D dec ebp 008745FB 6F outsd 008745FC 6E outsb 008745FD 65795F jns 0087465F 00874600 43 inc ebx 00874601 52 push edx 00874602 2000 and [eax], al 00874604 FFFF DB $FF, $FF // 00874606 FFFF DB $FF, $FF // 00874608 0500000020 add eax, +$20000000 0087460D 53 push ebx 0087460E 657420 jz 00874631 00874611 0000 add [eax], al 00874613 00FF add bh, bh 00874615 FFFF DB $FF, $FF // 00874617 FF02 inc dword ptr [edx] 00874619 0000 add [eax], al 0087461B 003D270000FF add [$FF000027], bh 00874621 FFFF DB $FF, $FF // 00874623 FF01 inc dword ptr [ecx] 00874625 0000 add [eax], al 00874627 0027 add [edi], ah 00874629 0000 add [eax], al 0087462B 00FF add bh, bh 0087462D FFFF DB $FF, $FF // 0087462F FF0A dec dword ptr [edx] 00874631 0000 add [eax], al 00874633 002C47 add [edi+eax*2], ch 00874636 43 inc ebx 00874637 4D dec ebp 00874638 6F outsd 00874639 6E outsb 0087463A 65793D jns 0087467A 0087463D 27 daa 0087463E 0000 add [eax], al 00874640 0000 add [eax], al 00874642 0000 add [eax], al 00874644 FFFF DB $FF, $FF // 00874646 FFFF DB $FF, $FF // 00874648 0A00 or al, byte ptr [eax] 0087464A 0000 add [eax], al 0087464C 2C42 sub al, $42 0087464E 42 inc edx 0087464F 4D dec ebp 00874650 6F outsd 00874651 6E outsb 00874652 65793D jns 00874692 00874655 27 daa 00874656 0000 add [eax], al 00874658 FFFF DB $FF, $FF // 0087465A FFFF DB $FF, $FF // 0087465C 0D00000020 or eax, $20000000 00874661 7768 jnbe 008746CB 00874663 657265 jb 008746CB 00874666 205946 and [ecx+$46], bl 00874669 49 dec ecx 0087466A 643D27000000 cmp eax, $00000027 00874670 FFFF DB $FF, $FF // 00874672 FFFF DB $FF, $FF // 00874674 0400 add al, +$00 00874676 0000 add [eax], al 00874678 59 pop ecx 00874679 46 inc esi 0087467A 49 dec ecx 0087467B 640000 add fs:[eax], al 0087467E 0000 add [eax], al 00874680 55 push ebp 00874681 8BEC mov ebp, esp 00874683 51 push ecx 00874684 B906000000 mov ecx, $00000006 00874689 6A00 push $00 0087468B 6A00 push $00 0087468D 49 dec ecx 0087468E 75F9 jnz 00874689 00874690 51 push ecx 00874691 874DFC xchg [ebp-$04], ecx 00874694 53 push ebx 00874695 56 push esi 00874696 8BF0 mov esi, eax 00874698 33C0 xor eax, eax 0087469A 55 push ebp 0087469B 68D7488700 push $008748D7 ***** TRY | 008746A0 64FF30 push dword ptr fs:[eax] 008746A3 648920 mov fs:[eax], esp 008746A6 33C0 xor eax, eax 008746A8 55 push ebp 008746A9 68AD488700 push $008748AD ***** TRY | 008746AE 64FF30 push dword ptr fs:[eax] 008746B1 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV._PROC_00874921(Sender : TObject); begin (* 00874921 50 push eax 00874922 6461 popa 00874924 7465 jz 0087498B 00874926 205946 and [ecx+$46], bl 00874929 5F pop edi 0087492A 4D dec ebp 0087492B 6F outsd 0087492C 6E outsb 0087492D 65795F jns 0087498F 00874930 43 inc ebx 00874931 52 push edx 00874932 2000 and [eax], al 00874934 FFFF DB $FF, $FF // 00874936 FFFF DB $FF, $FF // 00874938 0E push cs 00874939 0000 add [eax], al 0087493B 0020 add [eax], ah 0087493D 53 push ebx 0087493E 657420 jz 00874961 00874941 50 push eax 00874942 61 popa 00874943 794D jns 00874992 00874945 656E outsb 00874947 743D jz 00874986 00874949 27 daa 0087494A 0000 add [eax], al 0087494C FFFF DB $FF, $FF // 0087494E FFFF DB $FF, $FF // 00874950 0100 add [eax], eax 00874952 0000 add [eax], al 00874954 27 daa 00874955 0000 add [eax], al 00874957 00FF add bh, bh 00874959 FFFF DB $FF, $FF // 0087495B FF09 dec dword ptr [ecx] 0087495D 0000 add [eax], al 0087495F 002C4564697465 add [$65746964+eax*2], ch 00874966 723D jb 008749A5 00874968 27 daa 00874969 0000 add [eax], al 0087496B 00FF add bh, bh 0087496D FFFF DB $FF, $FF // 0087496F FF1400 call dword ptr [eax+eax] 00874972 0000 add [eax], al 00874974 2C45 sub al, $45 00874976 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0087497F 657464 jz 008749E6 00874982 61 popa 00874983 7465 jz 008749EA 00874985 2829 sub [ecx], ch 00874987 2000 and [eax], al 00874989 0000 add [eax], al 0087498B 00FF add bh, bh 0087498D FFFF DB $FF, $FF // 0087498F FF0D00000020 dec dword ptr [$20000000] 00874995 7768 jnbe 008749FF 00874997 657265 jb 008749FF 0087499A 205946 and [ecx+$46], bl 0087499D 49 dec ecx 0087499E 643D27000000 cmp eax, $00000027 008749A4 FFFF DB $FF, $FF // 008749A6 FFFF DB $FF, $FF // 008749A8 0400 add al, +$00 008749AA 0000 add [eax], al 008749AC 59 pop ecx 008749AD 46 inc esi 008749AE 49 dec ecx 008749AF 640000 add fs:[eax], al 008749B2 0000 add [eax], al 008749B4 55 push ebp 008749B5 8BEC mov ebp, esp 008749B7 B910000000 mov ecx, $00000010 008749BC 6A00 push $00 008749BE 6A00 push $00 008749C0 49 dec ecx 008749C1 75F9 jnz 008749BC 008749C3 51 push ecx 008749C4 53 push ebx 008749C5 56 push esi 008749C6 8BDA mov ebx, edx 008749C8 8BF0 mov esi, eax 008749CA 33C0 xor eax, eax 008749CC 55 push ebp 008749CD 685B4C8700 push $00874C5B ***** TRY | 008749D2 64FF30 push dword ptr fs:[eax] 008749D5 648920 mov fs:[eax], esp 008749D8 8D55FC lea edx, [ebp-$04] 008749DB 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; | 008749DD E8DAACD1FF call 0058F6BC 008749E2 8D55F0 lea edx, [ebp-$10] 008749E5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008749E8 E8FF5EB9FF call 0040A8EC 008749ED 837DF000 cmp dword ptr [ebp-$10], +$00 008749F1 750D jnz 00874A00 008749F3 8D45FC lea eax, [ebp-$04] 008749F6 BA704C8700 mov edx, $00874C70 * Reference to: System.@LStrLAsg(void;void;void;void); | 008749FB E8BC09B9FF call 004053BC * Reference to control cxGrid1 : N.A. | 00874A00 8B8628030000 mov eax, [esi+$0328] * 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; | 00874A06 E84179DEFF 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; | 00874A0B E854D1DDFF call 00651B64 * Reference to field N.A..OFFS_0050 | 00874A10 8B4050 mov eax, [eax+$50] 00874A13 8D55EC lea edx, [ebp-$14] 00874A16 8B08 mov ecx, [eax] 00874A18 FF5110 call dword ptr [ecx+$10] 00874A1B 8B45EC mov eax, [ebp-$14] 00874A1E 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874A21 E8C65EB9FF call 0040A8EC 00874A26 8D45F4 lea eax, [ebp-$0C] 00874A29 50 push eax * Possible String Reference to: 'T_Price' | 00874A2A BA7C4C8700 mov edx, $00874C7C * Reference to control Order_Sub : N.A. | 00874A2F 8B8648030000 mov eax, [esi+$0348] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874A35 E87A21C5FF call 004C6BB4 00874A3A 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_54 | 00874A3C FF5254 call dword ptr [edx+$54] 00874A3F DD5DDC fstp qword ptr [ebp-$24] 00874A42 9B wait 00874A43 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00874A46 E8E18CB9FF call 0040D72C 00874A4B DC4DDC fmul qword ptr [ebp-$24] 00874A4E DB7DD0 fstp tbyte ptr [ebp-$30] 00874A51 9B wait 00874A52 8D45D0 lea eax, [ebp-$30] 00874A55 8945E4 mov [ebp-$1C], eax 00874A58 C645E803 mov byte ptr [ebp-$18], $03 00874A5C 8D55E4 lea edx, [ebp-$1C] 00874A5F 33C9 xor ecx, ecx * Possible String Reference to: '%.2f' | 00874A61 B88C4C8700 mov eax, $00874C8C | 00874A66 E81981B9FF call 0040CB84 * Reference to control Order_Sub : N.A. | 00874A6B 8B9E48030000 mov ebx, [esi+$0348] 00874A71 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00874A73 E8C839C5FF call 004C8440 00874A78 8D55BC lea edx, [ebp-$44] 00874A7B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874A7E E8695EB9FF call 0040A8EC 00874A83 8B55BC mov edx, [ebp-$44] 00874A86 8D45C0 lea eax, [ebp-$40] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874A89 E83A43BAFF call 00418DC8 00874A8E 8D45C0 lea eax, [ebp-$40] 00874A91 50 push eax 00874A92 8B55F8 mov edx, [ebp-$08] 00874A95 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874A97 E81821C5FF call 004C6BB4 00874A9C 5A pop edx 00874A9D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00874A9F FF91B4000000 call dword ptr [ecx+$00B4] 00874AA5 8D55A8 lea edx, [ebp-$58] 00874AA8 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00874AAB E83C5EB9FF call 0040A8EC 00874AB0 8B55A8 mov edx, [ebp-$58] 00874AB3 8D45AC lea eax, [ebp-$54] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00874AB6 E80D43BAFF call 00418DC8 00874ABB 8D45AC lea eax, [ebp-$54] 00874ABE 50 push eax * Possible String Reference to: 'T_Money' | 00874ABF BA9C4C8700 mov edx, $00874C9C 00874AC4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00874AC6 E8E920C5FF call 004C6BB4 00874ACB 5A pop edx 00874ACC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00874ACE FF91B4000000 call dword ptr [ecx+$00B4] 00874AD4 8D55A4 lea edx, [ebp-$5C] *) end; procedure TfrmCaiWuHuiLV._PROC_00874CCD(Sender : TObject); begin (* 00874CCD 50 push eax 00874CCE 6461 popa 00874CD0 7465 jz 00874D37 00874CD2 205946 and [ecx+$46], bl 00874CD5 5F pop edi 00874CD6 4D dec ebp 00874CD7 6F outsd 00874CD8 6E outsb 00874CD9 65795F jns 00874D3B 00874CDC 43 inc ebx 00874CDD 52 push edx 00874CDE 2000 and [eax], al 00874CE0 FFFF DB $FF, $FF // 00874CE2 FFFF DB $FF, $FF // 00874CE4 0500000020 add eax, +$20000000 00874CE9 53 push ebx 00874CEA 657420 jz 00874D0D 00874CED 0000 add [eax], al 00874CEF 00FF add bh, bh 00874CF1 FFFF DB $FF, $FF // 00874CF3 FF01 inc dword ptr [ecx] 00874CF5 0000 add [eax], al 00874CF7 003D000000FF add [$FF000000], bh 00874CFD FFFF DB $FF, $FF // 00874CFF FF09 dec dword ptr [ecx] 00874D01 0000 add [eax], al 00874D03 002C54 add [esp+edx*2], ch 00874D06 5F pop edi 00874D07 4D dec ebp 00874D08 6F outsd 00874D09 6E outsb 00874D0A 65793D jns 00874D4A 00874D0D 0000 add [eax], al 00874D0F 00FF add bh, bh 00874D11 FFFF DB $FF, $FF // 00874D13 FF0D00000020 dec dword ptr [$20000000] 00874D19 7768 jnbe 00874D83 00874D1B 657265 jb 00874D83 00874D1E 205946 and [ecx+$46], bl 00874D21 49 dec ecx 00874D22 643D27000000 cmp eax, $00000027 00874D28 FFFF DB $FF, $FF // 00874D2A FFFF DB $FF, $FF // 00874D2C 0400 add al, +$00 00874D2E 0000 add [eax], al 00874D30 59 pop ecx 00874D31 46 inc esi 00874D32 49 dec ecx 00874D33 640000 add fs:[eax], al 00874D36 0000 add [eax], al 00874D38 FFFF DB $FF, $FF // 00874D3A FFFF DB $FF, $FF // 00874D3C 0100 add [eax], eax 00874D3E 0000 add [eax], al 00874D40 27 daa 00874D41 0000 add [eax], al 00874D43 00558B add [ebp-$75], dl 00874D46 EC in al, dx 00874D47 B910000000 mov ecx, $00000010 00874D4C 6A00 push $00 00874D4E 6A00 push $00 00874D50 49 dec ecx 00874D51 75F9 jnz 00874D4C 00874D53 51 push ecx 00874D54 53 push ebx 00874D55 56 push esi 00874D56 57 push edi 00874D57 8945FC mov [ebp-$04], eax 00874D5A 33C0 xor eax, eax 00874D5C 55 push ebp 00874D5D 68D5508700 push $008750D5 ***** TRY | 00874D62 64FF30 push dword ptr fs:[eax] 00874D65 648920 mov fs:[eax], esp 00874D68 8B45FC mov eax, [ebp-$04] * Reference to control Order_Sub : N.A. | 00874D6B 8B8048030000 mov eax, [eax+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00874D71 E84A31C5FF call 004C7EC0 00874D76 84C0 test al, al 00874D78 0F85F1020000 jnz 0087506F 00874D7E A0E4508700 mov al, byte ptr [$008750E4] 00874D83 50 push eax 00874D84 8D45EC lea eax, [ebp-$14] 00874D87 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00874D89 E8D63FBAFF call 00418D64 00874D8E 8D4DEC lea ecx, [ebp-$14] 00874D91 8B45FC mov eax, [ebp-$04] * Reference to control Order_Sub : N.A. | 00874D94 8B8048030000 mov eax, [eax+$0348] * Possible String Reference to: 'ssel' | 00874D9A BAF0508700 mov edx, $008750F0 00874D9F 8B18 mov ebx, [eax] * Possible reference to virtual method TN.A..OFFS_0244 | 00874DA1 FF9344020000 call dword ptr [ebx+$0244] 00874DA7 84C0 test al, al 00874DA9 751D jnz 00874DC8 00874DAB 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00874DAD B9F8508700 mov ecx, $008750F8 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00874DB2 BA00518700 mov edx, $00875100 *) end; procedure TfrmCaiWuHuiLV._PROC_008754D9(Sender : TObject); begin (* 008754D9 50 push eax 008754DA 6461 popa 008754DC 7465 jz 00875543 008754DE 205946 and [ecx+$46], bl 008754E1 5F pop edi 008754E2 4D dec ebp 008754E3 6F outsd 008754E4 6E outsb 008754E5 65795F jns 00875547 008754E8 43 inc ebx 008754E9 52 push edx 008754EA 2000 and [eax], al 008754EC FFFF DB $FF, $FF // 008754EE FFFF DB $FF, $FF // 008754F0 0500000020 add eax, +$20000000 008754F5 53 push ebx 008754F6 657420 jz 00875519 008754F9 0000 add [eax], al 008754FB 00FF add bh, bh 008754FD FFFF DB $FF, $FF // 008754FF FF01 inc dword ptr [ecx] 00875501 0000 add [eax], al 00875503 003D000000FF add [$FF000000], bh 00875509 FFFF DB $FF, $FF // 0087550B FF09 dec dword ptr [ecx] 0087550D 0000 add [eax], al 0087550F 002C54 add [esp+edx*2], ch 00875512 5F pop edi 00875513 4D dec ebp 00875514 6F outsd 00875515 6E outsb 00875516 65793D jns 00875556 00875519 0000 add [eax], al 0087551B 00FF add bh, bh 0087551D FFFF DB $FF, $FF // 0087551F FF0D00000020 dec dword ptr [$20000000] 00875525 7768 jnbe 0087558F 00875527 657265 jb 0087558F 0087552A 205946 and [ecx+$46], bl 0087552D 49 dec ecx 0087552E 643D27000000 cmp eax, $00000027 00875534 FFFF DB $FF, $FF // 00875536 FFFF DB $FF, $FF // 00875538 0400 add al, +$00 0087553A 0000 add [eax], al 0087553C 59 pop ecx 0087553D 46 inc esi 0087553E 49 dec ecx 0087553F 640000 add fs:[eax], al 00875542 0000 add [eax], al 00875544 FFFF DB $FF, $FF // 00875546 FFFF DB $FF, $FF // 00875548 0100 add [eax], eax 0087554A 0000 add [eax], al 0087554C 27 daa 0087554D 0000 add [eax], al 0087554F 00558B add [ebp-$75], dl 00875552 EC in al, dx 00875553 51 push ecx 00875554 B90F000000 mov ecx, $0000000F 00875559 6A00 push $00 0087555B 6A00 push $00 0087555D 49 dec ecx 0087555E 75F9 jnz 00875559 00875560 51 push ecx 00875561 874DFC xchg [ebp-$04], ecx 00875564 53 push ebx 00875565 56 push esi 00875566 8BF0 mov esi, eax 00875568 33C0 xor eax, eax 0087556A 55 push ebp * Possible String Reference to: 'éóñ¸ÿë¹^[‹å]Ã' | 0087556B 68FC588700 push $008758FC ***** TRY | 00875570 64FF30 push dword ptr fs:[eax] 00875573 648920 mov fs:[eax], esp 00875576 33C0 xor eax, eax 00875578 55 push ebp 00875579 68A8588700 push $008758A8 ***** TRY | 0087557E 64FF30 push dword ptr fs:[eax] 00875581 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV._PROC_00875975(Sender : TObject); begin (* 00875975 50 push eax 00875976 6461 popa 00875978 7465 jz 008759DF 0087597A 205946 and [ecx+$46], bl 0087597D 5F pop edi 0087597E 4D dec ebp 0087597F 6F outsd 00875980 6E outsb 00875981 65795F jns 008759E3 00875984 43 inc ebx 00875985 52 push edx 00875986 2000 and [eax], al 00875988 FFFF DB $FF, $FF // 0087598A FFFF DB $FF, $FF // 0087598C 0E push cs 0087598D 0000 add [eax], al 0087598F 0020 add [eax], ah 00875991 53 push ebx 00875992 657420 jz 008759B5 00875995 4F dec edi 00875996 7264 jb 008759FC 00875998 65724E jb 008759E9 0087599B 4F dec edi 0087599C 3D270000FF cmp eax, $FF000027 008759A1 FFFF DB $FF, $FF // 008759A3 FF07 inc dword ptr [edi] 008759A5 0000 add [eax], al 008759A7 004F72 add [edi+$72], cl 008759AA 6465724E jb 008759FC 008759AE 4F dec edi 008759AF 00FF add bh, bh 008759B1 FFFF DB $FF, $FF // 008759B3 FF01 inc dword ptr [ecx] 008759B5 0000 add [eax], al 008759B7 0027 add [edi], ah 008759B9 0000 add [eax], al 008759BB 00FF add bh, bh 008759BD FFFF DB $FF, $FF // 008759BF FF0E dec dword ptr [esi] 008759C1 0000 add [eax], al 008759C3 0020 add [eax], ah 008759C5 2C50 sub al, $50 008759C7 5F pop edi 008759C8 43 inc ebx 008759C9 6F outsd 008759CA 64654E dec esi 008759CD 61 popa 008759CE 6D insd 008759CF 653D270000FF cmp eax, $FF000027 008759D5 FFFF DB $FF, $FF // 008759D7 FF0A dec dword ptr [edx] 008759D9 0000 add [eax], al 008759DB 0020 add [eax], ah 008759DD 2C50 sub al, $50 008759DF 5F pop edi 008759E0 53 push ebx 008759E1 7065 jo 00875A48 008759E3 633D270000FF arpl [$FF000027], di 008759E9 FFFF DB $FF, $FF // 008759EB FF09 dec dword ptr [ecx] 008759ED 0000 add [eax], al 008759EF 002C4564697465 add [$65746964+eax*2], ch 008759F6 723D jb 00875A35 008759F8 27 daa 008759F9 0000 add [eax], al 008759FB 00FF add bh, bh 008759FD FFFF DB $FF, $FF // 008759FF FF1400 call dword ptr [eax+eax] 00875A02 0000 add [eax], al 00875A04 2C45 sub al, $45 00875A06 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00875A0F 657464 jz 00875A76 00875A12 61 popa 00875A13 7465 jz 00875A7A 00875A15 2829 sub [ecx], ch 00875A17 2000 and [eax], al 00875A19 0000 add [eax], al 00875A1B 00FF add bh, bh 00875A1D FFFF DB $FF, $FF // 00875A1F FF0D00000020 dec dword ptr [$20000000] 00875A25 7768 jnbe 00875A8F 00875A27 657265 jb 00875A8F 00875A2A 205946 and [ecx+$46], bl 00875A2D 49 dec ecx 00875A2E 643D27000000 cmp eax, $00000027 00875A34 FFFF DB $FF, $FF // 00875A36 FFFF DB $FF, $FF // 00875A38 0400 add al, +$00 00875A3A 0000 add [eax], al 00875A3C 59 pop ecx 00875A3D 46 inc esi 00875A3E 49 dec ecx 00875A3F 640000 add fs:[eax], al 00875A42 0000 add [eax], al 00875A44 55 push ebp 00875A45 8BEC mov ebp, esp 00875A47 51 push ecx 00875A48 B906000000 mov ecx, $00000006 00875A4D 6A00 push $00 00875A4F 6A00 push $00 00875A51 49 dec ecx 00875A52 75F9 jnz 00875A4D 00875A54 51 push ecx 00875A55 874DFC xchg [ebp-$04], ecx 00875A58 53 push ebx 00875A59 56 push esi 00875A5A 8BF0 mov esi, eax 00875A5C 33C0 xor eax, eax 00875A5E 55 push ebp 00875A5F 689B5C8700 push $00875C9B ***** TRY | 00875A64 64FF30 push dword ptr fs:[eax] 00875A67 648920 mov fs:[eax], esp 00875A6A 33C0 xor eax, eax 00875A6C 55 push ebp 00875A6D 68715C8700 push $00875C71 ***** TRY | 00875A72 64FF30 push dword ptr fs:[eax] 00875A75 648920 mov fs:[eax], esp *) end; procedure TfrmCaiWuHuiLV._PROC_00875CE9(Sender : TObject); begin (* 00875CE9 50 push eax 00875CEA 6461 popa 00875CEC 7465 jz 00875D53 00875CEE 205946 and [ecx+$46], bl 00875CF1 5F pop edi 00875CF2 4D dec ebp 00875CF3 6F outsd 00875CF4 6E outsb 00875CF5 65795F jns 00875D57 00875CF8 43 inc ebx 00875CF9 52 push edx 00875CFA 2000 and [eax], al 00875CFC FFFF DB $FF, $FF // 00875CFE FFFF DB $FF, $FF // 00875D00 1000 adc [eax], al 00875D02 0000 add [eax], al 00875D04 205365 and [ebx+$65], dl 00875D07 7420 jz 00875D29 00875D09 43 inc ebx 00875D0A 6F outsd 00875D0B 6D insd 00875D0C 54 push esp 00875D0D 61 popa 00875D0E 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D 00875D16 0000 add [eax], al 00875D18 FFFF DB $FF, $FF // 00875D1A FFFF DB $FF, $FF // 00875D1C 0100 add [eax], eax 00875D1E 0000 add [eax], al 00875D20 27 daa 00875D21 0000 add [eax], al 00875D23 00FF add bh, bh 00875D25 FFFF DB $FF, $FF // 00875D27 FF09 dec dword ptr [ecx] 00875D29 0000 add [eax], al 00875D2B 002C4564697465 add [$65746964+eax*2], ch 00875D32 723D jb 00875D71 00875D34 27 daa 00875D35 0000 add [eax], al 00875D37 00FF add bh, bh 00875D39 FFFF DB $FF, $FF // 00875D3B FF1400 call dword ptr [eax+eax] 00875D3E 0000 add [eax], al 00875D40 2C45 sub al, $45 00875D42 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00875D4B 657464 jz 00875DB2 00875D4E 61 popa 00875D4F 7465 jz 00875DB6 00875D51 2829 sub [ecx], ch 00875D53 2000 and [eax], al 00875D55 0000 add [eax], al 00875D57 00FF add bh, bh 00875D59 FFFF DB $FF, $FF // 00875D5B FF0D00000020 dec dword ptr [$20000000] 00875D61 7768 jnbe 00875DCB 00875D63 657265 jb 00875DCB 00875D66 205946 and [ecx+$46], bl 00875D69 49 dec ecx 00875D6A 643D27000000 cmp eax, $00000027 00875D70 FFFF DB $FF, $FF // 00875D72 FFFF DB $FF, $FF // 00875D74 0400 add al, +$00 00875D76 0000 add [eax], al 00875D78 59 pop ecx 00875D79 46 inc esi 00875D7A 49 dec ecx 00875D7B 640000 add fs:[eax], al 00875D7E 0000 add [eax], al 00875D80 55 push ebp 00875D81 8BEC mov ebp, esp 00875D83 51 push ecx 00875D84 B907000000 mov ecx, $00000007 00875D89 6A00 push $00 00875D8B 6A00 push $00 00875D8D 49 dec ecx 00875D8E 75F9 jnz 00875D89 00875D90 51 push ecx 00875D91 874DFC xchg [ebp-$04], ecx 00875D94 53 push ebx 00875D95 56 push esi 00875D96 8BF0 mov esi, eax 00875D98 33C0 xor eax, eax 00875D9A 55 push ebp 00875D9B 6833608700 push $00876033 ***** TRY | 00875DA0 64FF30 push dword ptr fs:[eax] 00875DA3 648920 mov fs:[eax], esp * Reference to control Order_Sub : N.A. | 00875DA6 8B8648030000 mov eax, [esi+$0348] * Possible String Reference to: 'YFType' | 00875DAC BA48608700 mov edx, $00876048 * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00875DB1 E8FE0DC5FF call 004C6BB4 00875DB6 8D55F8 lea edx, [ebp-$08] 00875DB9 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00875DBB FF5160 call dword ptr [ecx+$60] 00875DBE 8B45F8 mov eax, [ebp-$08] 00875DC1 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00875DC4 E8234BB9FF call 0040A8EC 00875DC9 8B45FC mov eax, [ebp-$04] * Possible String Reference to: '×Ô¶¯Éú³É' | 00875DCC BA58608700 mov edx, $00876058 * Reference to: System.@LStrCmp; | 00875DD1 E86AF9B8FF call 00405740 00875DD6 751D jnz 00875DF5 00875DD8 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00875DDA B964608700 mov ecx, $00876064 * Possible String Reference to: '×Ô¶¯Éú³ÉµÄÊý¾Ý²»ÄÜÐÞ¸Ä!' | 00875DDF BA6C608700 mov edx, $0087606C *) end; procedure TfrmCaiWuHuiLV._PROC_008760BD(Sender : TObject); begin (* 008760BD 50 push eax 008760BE 6461 popa 008760C0 7465 jz 00876127 008760C2 205946 and [ecx+$46], bl 008760C5 5F pop edi 008760C6 4D dec ebp 008760C7 6F outsd 008760C8 6E outsb 008760C9 65795F jns 0087612B 008760CC 43 inc ebx 008760CD 52 push edx 008760CE 2000 and [eax], al 008760D0 FFFF DB $FF, $FF // 008760D2 FFFF DB $FF, $FF // 008760D4 0E push cs 008760D5 0000 add [eax], al 008760D7 0020 add [eax], ah 008760D9 53 push ebx 008760DA 657420 jz 008760FD 008760DD 50 push eax 008760DE 5F pop edi 008760DF 43 inc ebx 008760E0 6F outsd 008760E1 6C insb 008760E2 6F outsd 008760E3 723D jb 00876122 008760E5 27 daa 008760E6 0000 add [eax], al 008760E8 FFFF DB $FF, $FF // 008760EA FFFF DB $FF, $FF // 008760EC 0100 add [eax], eax 008760EE 0000 add [eax], al 008760F0 27 daa 008760F1 0000 add [eax], al 008760F3 00FF add bh, bh 008760F5 FFFF DB $FF, $FF // 008760F7 FF09 dec dword ptr [ecx] 008760F9 0000 add [eax], al 008760FB 002C4564697465 add [$65746964+eax*2], ch 00876102 723D jb 00876141 00876104 27 daa 00876105 0000 add [eax], al 00876107 00FF add bh, bh 00876109 FFFF DB $FF, $FF // 0087610B FF1400 call dword ptr [eax+eax] 0087610E 0000 add [eax], al 00876110 2C45 sub al, $45 00876112 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0087611B 657464 jz 00876182 0087611E 61 popa 0087611F 7465 jz 00876186 00876121 2829 sub [ecx], ch 00876123 2000 and [eax], al 00876125 0000 add [eax], al 00876127 00FF add bh, bh 00876129 FFFF DB $FF, $FF // 0087612B FF0D00000020 dec dword ptr [$20000000] 00876131 7768 jnbe 0087619B 00876133 657265 jb 0087619B 00876136 205946 and [ecx+$46], bl 00876139 49 dec ecx 0087613A 643D27000000 cmp eax, $00000027 00876140 FFFF DB $FF, $FF // 00876142 FFFF DB $FF, $FF // 00876144 0400 add al, +$00 00876146 0000 add [eax], al 00876148 59 pop ecx 00876149 46 inc esi 0087614A 49 dec ecx 0087614B 640000 add fs:[eax], al 0087614E 0000 add [eax], al 00876150 55 push ebp 00876151 8BEC mov ebp, esp 00876153 6A00 push $00 00876155 56 push esi 00876156 57 push edi 00876157 8BF8 mov edi, eax 00876159 33C0 xor eax, eax 0087615B 55 push ebp * Possible String Reference to: 'éé¸ÿëð_^Y]Ã' | 0087615C 68E2618700 push $008761E2 ***** TRY | 00876161 64FF30 push dword ptr fs:[eax] 00876164 648920 mov fs:[eax], esp 00876167 8BB748030000 mov esi, [edi+$0348] 0087616D 8BC6 mov eax, esi | 0087616F E81C24C5FF call 004C8590 00876174 8D55FC lea edx, [ebp-$04] *) end; procedure TfrmCaiWuHuiLV._PROC_0087638F(Sender : TObject); begin (* 0087638F 00CC add ah, cl 00876391 E1CA loope -$36 00876393 BE00000000 mov esi, $00000000 00876398 C8B7 enter , $B7 0087639A B6A8 mov dh, $A8 0087639C D2AAC9BEB3FD shr byte ptr [edx+$FDB3BEC9], cl 008763A2 C2F000 ret $00F0 *) end; procedure TfrmCaiWuHuiLV._PROC_0087659D(Sender : TObject); begin (* 0087659D 50 push eax 0087659E 6461 popa 008765A0 7465 jz 00876607 008765A2 205946 and [ecx+$46], bl 008765A5 5F pop edi 008765A6 4D dec ebp 008765A7 6F outsd 008765A8 6E outsb 008765A9 65795F jns 0087660B 008765AC 43 inc ebx 008765AD 52 push edx 008765AE 2000 and [eax], al 008765B0 FFFF DB $FF, $FF // 008765B2 FFFF DB $FF, $FF // 008765B4 0D00000020 or eax, $20000000 008765B9 53 push ebx 008765BA 657420 jz 008765DD 008765BD 4B dec ebx 008765BE 50 push eax 008765BF 54 push esp 008765C0 7970 jns 00876632 008765C2 653D27000000 cmp eax, $00000027 008765C8 FFFF DB $FF, $FF // 008765CA FFFF DB $FF, $FF // 008765CC 0100 add [eax], eax 008765CE 0000 add [eax], al 008765D0 27 daa 008765D1 0000 add [eax], al 008765D3 00FF add bh, bh 008765D5 FFFF DB $FF, $FF // 008765D7 FF0D00000020 dec dword ptr [$20000000] 008765DD 7768 jnbe 00876647 008765DF 657265 jb 00876647 008765E2 205946 and [ecx+$46], bl 008765E5 49 dec ecx 008765E6 643D27000000 cmp eax, $00000027 008765EC FFFF DB $FF, $FF // 008765EE FFFF DB $FF, $FF // 008765F0 0400 add al, +$00 008765F2 0000 add [eax], al 008765F4 59 pop ecx 008765F5 46 inc esi 008765F6 49 dec ecx 008765F7 640000 add fs:[eax], al 008765FA 0000 add [eax], al | 008765FC E88FB5FFFF call 00871B90 00876601 C3 ret 00876602 8BC0 mov eax, eax 00876604 55 push ebp 00876605 8BEC mov ebp, esp 00876607 33C9 xor ecx, ecx 00876609 51 push ecx 0087660A 51 push ecx 0087660B 51 push ecx 0087660C 51 push ecx 0087660D 53 push ebx 0087660E 56 push esi 0087660F 8BD8 mov ebx, eax 00876611 33C0 xor eax, eax 00876613 55 push ebp * Possible String Reference to: 'é]ä¸ÿëð^[‹å]Ã' | 00876614 6892668700 push $00876692 ***** TRY | 00876619 64FF30 push dword ptr fs:[eax] 0087661C 648920 mov fs:[eax], esp * Reference to control Order_Sub : N.A. | 0087661F 8B8348030000 mov eax, [ebx+$0348] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00876625 E89618C5FF call 004C7EC0 0087662A 84C0 test al, al 0087662C 754E jnz 0087667C 0087662E A0A0668700 mov al, byte ptr [$008766A0] 00876633 50 push eax 00876634 8D45F0 lea eax, [ebp-$10] 00876637 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00876639 E82627BAFF call 00418D64 0087663E 8D4DF0 lea ecx, [ebp-$10] * Possible String Reference to: 'Ssel' | 00876641 BAAC668700 mov edx, $008766AC * Reference to control Order_Sub : N.A. | 00876646 8B8348030000 mov eax, [ebx+$0348] 0087664C 8B30 mov esi, [eax] * Possible reference to virtual method TN.A..OFFS_0244 | 0087664E FF9644020000 call dword ptr [esi+$0244] 00876654 84C0 test al, al 00876656 751A jnz 00876672 00876658 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 0087665A B9B4668700 mov ecx, $008766B4 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý' | 0087665F BABC668700 mov edx, $008766BC *) end; procedure TfrmCaiWuHuiLV._PROC_00876C45(Sender : TObject); begin (* 00876C45 8BEC mov ebp, esp 00876C47 33C0 xor eax, eax 00876C49 55 push ebp * Possible String Reference to: 'é†Þ¸ÿëø]ËÀƒ-¼Z‰' | 00876C4A 68696C8700 push $00876C69 ***** TRY | 00876C4F 64FF30 push dword ptr fs:[eax] 00876C52 648920 mov fs:[eax], esp 00876C55 FF05BC5A8900 inc dword ptr [$00895ABC] 00876C5B 33C0 xor eax, eax 00876C5D 5A pop edx 00876C5E 59 pop ecx 00876C5F 59 pop ecx 00876C60 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-¼Z‰' | 00876C63 68706C8700 push $00876C70 00876C68 C3 ret * Reference to: System.@HandleFinally; | 00876C69 E986DEB8FF jmp 00404AF4 00876C6E EBF8 jmp 00876C68 ****** END | 00876C70 5D pop ebp 00876C71 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876C74(Sender : TObject); begin (* 00876C74 832DBC5A890001 sub dword ptr [$00895ABC], +$01 00876C7B C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876C7C(Sender : TObject); begin (* 00876C7C 55 push ebp 00876C7D 8BEC mov ebp, esp 00876C7F 33C0 xor eax, eax 00876C81 55 push ebp * Possible String Reference to: 'éNÞ¸ÿëø]ËÀƒ-ÀZ‰' | 00876C82 68A16C8700 push $00876CA1 ***** TRY | 00876C87 64FF30 push dword ptr fs:[eax] 00876C8A 648920 mov fs:[eax], esp 00876C8D FF05C05A8900 inc dword ptr [$00895AC0] 00876C93 33C0 xor eax, eax 00876C95 5A pop edx 00876C96 59 pop ecx 00876C97 59 pop ecx 00876C98 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ÀZ‰' | 00876C9B 68A86C8700 push $00876CA8 00876CA0 C3 ret * Reference to: System.@HandleFinally; | 00876CA1 E94EDEB8FF jmp 00404AF4 00876CA6 EBF8 jmp 00876CA0 ****** END | 00876CA8 5D pop ebp 00876CA9 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876CAC(Sender : TObject); begin (* 00876CAC 832DC05A890001 sub dword ptr [$00895AC0], +$01 00876CB3 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876CB4(Sender : TObject); begin (* 00876CB4 55 push ebp 00876CB5 8BEC mov ebp, esp 00876CB7 33C0 xor eax, eax 00876CB9 55 push ebp 00876CBA 68D96C8700 push $00876CD9 ***** TRY | 00876CBF 64FF30 push dword ptr fs:[eax] 00876CC2 648920 mov fs:[eax], esp 00876CC5 FF05C45A8900 inc dword ptr [$00895AC4] 00876CCB 33C0 xor eax, eax 00876CCD 5A pop edx 00876CCE 59 pop ecx 00876CCF 59 pop ecx 00876CD0 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ÄZ‰' | 00876CD3 68E06C8700 push $00876CE0 00876CD8 C3 ret * Reference to: System.@HandleFinally; | 00876CD9 E916DEB8FF jmp 00404AF4 00876CDE EBF8 jmp 00876CD8 ****** END | 00876CE0 5D pop ebp 00876CE1 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876CE4(Sender : TObject); begin (* 00876CE4 832DC45A890001 sub dword ptr [$00895AC4], +$01 00876CEB C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876CEC(Sender : TObject); begin (* 00876CEC 55 push ebp 00876CED 8BEC mov ebp, esp 00876CEF 33C0 xor eax, eax 00876CF1 55 push ebp * Possible String Reference to: 'éÞݸÿëø]ËÀƒ-ÈZ‰' | 00876CF2 68116D8700 push $00876D11 ***** TRY | 00876CF7 64FF30 push dword ptr fs:[eax] 00876CFA 648920 mov fs:[eax], esp 00876CFD FF05C85A8900 inc dword ptr [$00895AC8] 00876D03 33C0 xor eax, eax 00876D05 5A pop edx 00876D06 59 pop ecx 00876D07 59 pop ecx 00876D08 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ÈZ‰' | 00876D0B 68186D8700 push $00876D18 00876D10 C3 ret * Reference to: System.@HandleFinally; | 00876D11 E9DEDDB8FF jmp 00404AF4 00876D16 EBF8 jmp 00876D10 ****** END | 00876D18 5D pop ebp 00876D19 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876D1C(Sender : TObject); begin (* 00876D1C 832DC85A890001 sub dword ptr [$00895AC8], +$01 00876D23 C3 ret *) end; procedure TfrmCaiWuHuiLV._PROC_00876D24(Sender : TObject); begin (* 00876D24 706D jo 00876D93 00876D26 8700 xchg [eax], eax 00876D28 0000 add [eax], al 00876D2A 0000 add [eax], al 00876D2C 0000 add [eax], al 00876D2E 0000 add [eax], al 00876D30 646E outsb 00876D32 8700 xchg [eax], eax 00876D34 1C77 sbb al, $77 00876D36 8700 xchg [eax], eax 00876D38 9E sahf 00876D39 6E outsb 00876D3A 8700 xchg [eax], eax 00876D3C 267287 jb 00876CC6 00876D3F 0000 add [eax], al 00876D41 0000 add [eax], al 00876D43 00B576870004 add [ebp+$4008776], dh 00876D49 0400 add al, +$00 00876D4B 0088F1490028 add [eax+$280049F1], cl 00876D51 D4 aam 00876D52 42 inc edx 00876D53 005C1F4A add [edi+ebx+$4A], bl 00876D57 0010 add [eax], dl 00876D59 214A00 and [edx+$00], ecx 00876D5C BC4540008C mov esp, $8C004045 00876D61 45 inc ebp 00876D62 4A dec edx 00876D63 00E4 add ah, ah 00876D65 42 inc edx 00876D66 40 inc eax 00876D67 0000 add [eax], al 00876D69 43 inc ebx 00876D6A 40 inc eax 00876D6B 007821 add [eax+$21], bh 00876D6E 4A dec edx 00876D6F 001CFB add [ebx+edi*8], bl 00876D72 48 dec eax 00876D73 00F8 add al, bh 00876D75 264A dec edx 00876D77 00B83C420038 add [eax+$3800423C], bh 00876D7D 234A00 and ecx, [edx+$00] 00876D80 7423 jz 00876DA5 00876D82 4A dec edx 00876D83 0080244A00D8 add [eax+$D8004A24], al 00876D89 83480050 or dword ptr [eax+$00], +$50 00876D8D D4 aam 00876D8E 42 inc edx 00876D8F 0008 add [eax], cl 00876D91 2D4A007CD0 sub eax, $D07C004A 00876D96 42 inc edx 00876D97 00F4 add ah, dh 00876D99 6B4A00D0 imul ecx, [edx+$00], $D0 00876D9D 1D4A0030F6 sbb eax, $F630004A 00876DA2 48 dec eax 00876DA3 004CFB48 add [ebx+edi*8+$48], cl 00876DA7 0098FA48000C add [eax+$C0048FA], bl 00876DAD 7948 jns 00876DF7 00876DAF 00ACF04800E829 add [eax+esi*8+$29E80048], ch 00876DB6 4A dec edx 00876DB7 00E4 add ah, ah 00876DB9 ED in eax, dx 00876DBA 48 dec eax 00876DBB 00547848 add [eax+edi*2+$48], dl 00876DBF 005878 add [eax+$78], bl 00876DC2 48 dec eax 00876DC3 00DC add ah, bl 00876DC5 2A4A00 sub cl, byte ptr [edx+$00] 00876DC8 3CA9 cmp al, $A9 00876DCA 48 dec eax 00876DCB 00C0 add al, al 00876DCD 834800D0 or dword ptr [eax+$00], -$30 00876DD1 7948 jns 00876E1B 00876DD3 004C8548 add [ebp+eax*4+$48], cl 00876DD7 00D0 add al, dl 00876DD9 2C4A sub al, $4A 00876DDB 009C2B4A008486 add [ebx+ebp+$8684004A], bl 00876DE2 48 dec eax 00876DE3 00482D add [eax+$2D], cl 00876DE6 4A dec edx 00876DE7 00C0 add al, al 00876DE9 A9480038EE test eax, $EE380048 00876DEE 48 dec eax 00876DEF 00F4 add ah, dh 00876DF1 EE out dx, al 00876DF2 48 dec eax 00876DF3 00F0 add al, dh 00876DF5 E94800D8EE jmp EF5F6E42 00876DFA 48 dec eax 00876DFB 00D8 add al, bl 00876DFD 1B4A00 sbb ecx, [edx+$00] 00876E00 EC in al, dx 00876E01 334A00 xor ecx, [edx+$00] 00876E04 20C4 and ah, al 00876E06 48 dec eax 00876E07 00B0404A0010 add [eax+$10004A40], dh 00876E0D 44 inc esp 00876E0E 4A dec edx 00876E0F 00CC add ah, cl 00876E11 42 inc edx 00876E12 4A dec edx 00876E13 00B8C44800BC add [eax+$BC0048C4], bh 00876E19 C44800 les ecx, [eax+$00] 00876E1C 48 dec eax 00876E1D 45 inc ebp 00876E1E 4A dec edx 00876E1F 001CC3 add [ebx+eax*8], bl 00876E22 48 dec eax 00876E23 0018 add [eax], bl 00876E25 F0 lock 00876E26 48 dec eax 00876E27 00444C4A add [esp+ecx*2+$4A], al 00876E2B 000C02 add [edx+eax], cl 00876E2E 49 dec ecx 00876E2F 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 00876E36 4A dec edx 00876E37 008C154A003C18 add [ebp+edx+$183C004A], cl 00876E3E 4A dec edx 00876E3F 0038 add [eax], bh 00876E41 52 push edx 00876E42 4A dec edx 00876E43 005C224A add [edx+$4A], bl 00876E47 00D8 add al, bl 00876E49 224A00 and cl, byte ptr [edx+$00] 00876E4C 7C68 jl 00876EB6 00876E4E 4A dec edx 00876E4F 00941F4A003C60 add [edi+ebx+$603C004A], dl 00876E56 4A dec edx 00876E57 001447 add [edi+eax*2], dl 00876E5A 4A dec edx 00876E5B 0034654A00CC2C add [$2CCC004A], dh 00876E62 4A dec edx 00876E63 000E add [esi], cl 00876E65 0000 add [eax], al 00876E67 0000 add [eax], al 00876E69 0006 add [esi], al 00876E6B 0000 add [eax], al 00876E6D 0020 add [eax], ah 00876E6F 114000 adc [eax+$00], eax 00876E72 EC in al, dx 00876E73 0300 add eax, [eax] 00876E75 0020 add [eax], ah 00876E77 114000 adc [eax+$00], eax 00876E7A F0 lock 00876E7B 0300 add eax, [eax] 00876E7D 0020 add [eax], ah 00876E7F 114000 adc [eax+$00], eax 00876E82 F4 hlt 00876E83 0300 add eax, [eax] 00876E85 0020 add [eax], ah 00876E87 114000 adc [eax+$00], eax 00876E8A F8 clc 00876E8B 0300 add eax, [eax] 00876E8D 0020 add [eax], ah 00876E8F 114000 adc [eax+$00], eax 00876E92 FC cld 00876E93 0300 add eax, [eax] 00876E95 0020 add [eax], ah 00876E97 114000 adc [eax+$00], eax 00876E9A 000400 add [eax+eax], al 00876E9D 003C00 add [eax+eax], bh 00876EA0 C57687 lds esi, [esi-$79] 00876EA3 00F8 add al, bh 00876EA5 0200 add al, byte ptr [eax] 00876EA7 0000 add [eax], al 00876EA9 0008 add [eax], cl 00876EAB 54 push esp 00876EAC 6F outsd 00876EAD 6F outsd 00876EAE 6C insb 00876EAF 42 inc edx 00876EB0 61 popa 00876EB1 7231 jb 00876EE4 00876EB3 FC cld 00876EB4 0200 add al, byte ptr [eax] 00876EB6 0001 add [ecx], al 00876EB8 0009 add [ecx], cl 00876EBA 54 push esp 00876EBB 42 inc edx 00876EBC 52 push edx 00876EBD 61 popa 00876EBE 667265 jb 00876F26 00876EC1 7368 jnb 00876F2B 00876EC3 0003 add [ebx], al 00876EC5 0000 add [eax], al 00876EC7 0100 add [eax], eax 00876EC9 0554424465 add eax, +$65444254 00876ECE 6C insb 00876ECF 0403 add al, +$03 00876ED1 0000 add [eax], al 00876ED3 0100 add [eax], eax 00876ED5 07 pop es 00876ED6 54 push esp 00876ED7 42 inc edx 00876ED8 43 inc ebx 00876ED9 6C insb 00876EDA 6F outsd 00876EDB 7365 jnb 00876F42 00876EDD 0803 or [ebx], al 00876EDF 0000 add [eax], al 00876EE1 0200 add al, byte ptr [eax] 00876EE3 0C41 or al, $41 00876EE5 44 inc esp 00876EE6 4F dec edi 00876EE7 51 push ecx 00876EE8 7565 jnz 00876F4F 00876EEA 7279 jb 00876F65 00876EEC 54 push esp 00876EED 656D insd 00876EEF 700C jo 00876EFD 00876EF1 0300 add eax, [eax] 00876EF3 0002 add [edx], al 00876EF5 000B add [ebx], cl 00876EF7 41 inc ecx 00876EF8 44 inc esp 00876EF9 4F dec edi 00876EFA 51 push ecx 00876EFB 7565 jnz 00876F62 00876EFD 7279 jb 00876F78 00876EFF 43 inc ebx 00876F00 6D insd 00876F01 641003 adc fs:[ebx], al 00876F04 0000 add [eax], al 00876F06 0300 add eax, [eax] 00876F08 06 push es 00876F09 50 push eax 00876F0A 61 popa 00876F0B 6E outsb 00876F0C 656C insb 00876F0E 311403 xor [ebx+eax], edx 00876F11 0000 add [eax], al 00876F13 0100 add [eax], eax 00876F15 0B546F6F or edx, [edi+ebp*2+$6F] 00876F19 6C insb 00876F1A 42 inc edx 00876F1B 7574 jnz 00876F91 00876F1D 746F jz 00876F8E 00876F1F 6E outsb 00876F20 3218 xor bl, byte ptr [eax] 00876F22 0300 add eax, [eax] 00876F24 000400 add [eax+eax], al 00876F27 06 push es 00876F28 4C dec esp 00876F29 61 popa 00876F2A 62656C bound esp, qword ptr [ebp+$6C] 00876F2D 311C03 xor [ebx+eax], ebx 00876F30 0000 add [eax], al 00876F32 0500065946 add eax, +$46590600 00876F37 4E dec esi 00876F38 61 popa 00876F39 6D insd 00876F3A 652003 and gs:[ebx], al 00876F3D 0000 add [eax], al 00876F3F 0200 add al, byte ptr [eax] 00876F41 0C41 or al, $41 00876F43 44 inc esp 00876F44 4F dec edi 00876F45 51 push ecx 00876F46 7565 jnz 00876FAD 00876F48 7279 jb 00876FC3 00876F4A 4D dec ebp 00876F4B 61 popa 00876F4C 696E2403000001 imul ebp, [esi+$24], $01000003 00876F53 000B add [ebx], cl 00876F55 54 push esp 00876F56 6F outsd 00876F57 6F outsd 00876F58 6C insb 00876F59 42 inc edx 00876F5A 7574 jnz 00876FD0 00876F5C 746F jz 00876FCD 00876F5E 6E outsb 00876F5F 3128 xor [eax], ebp 00876F61 0300 add eax, [eax] 00876F63 0006 add [esi], al 00876F65 0003 add [ebx], al 00876F67 52 push edx 00876F68 4D dec ebp 00876F69 312C03 xor [ebx+eax], ebp 00876F6C 0000 add [eax], al 00876F6E 07 pop es 00876F6F 0009 add [ecx], cl 00876F71 52 push edx 00876F72 4D dec ebp 00876F73 44 inc esp 00876F74 42 inc edx 00876F75 5F pop edi 00876F76 4D dec ebp 00876F77 61 popa 00876F78 696E3003000008 imul ebp, [esi+$30], $08000003 00876F7F 0007 add [edi], al 00876F81 637847 arpl [eax+$47], di 00876F84 7269 jb 00876FEF 00876F86 64323403 xor dh, byte ptr fs:[ebx+eax] 00876F8A 0000 add [eax], al 00876F8C 0900 or [eax], eax 00876F8E 03547632 add edx, [esi+esi*2+$32] 00876F92 3803 cmp [ebx], al 00876F94 0000 add [eax], al 00876F96 0A00 or al, byte ptr [eax] 00876F98 0F637847 packusdw MM7, [eax+$47] 00876F9C 7269 jb 00877007 00876F9E 6444 inc esp 00876FA0 42 inc edx 00876FA1 43 inc ebx 00876FA2 6F outsd 00876FA3 6C insb 00876FA4 756D jnz 00877013 00876FA6 6E outsb 00876FA7 313C03 xor [ebx+eax], edi 00876FAA 0000 add [eax], al 00876FAC 0A00 or al, byte ptr [eax] 00876FAE 0F637847 packusdw MM7, [eax+$47] 00876FB2 7269 jb 0087701D 00876FB4 6444 inc esp 00876FB6 42 inc edx 00876FB7 43 inc ebx 00876FB8 6F outsd 00876FB9 6C insb 00876FBA 756D jnz 00877029 00876FBC 6E outsb 00876FBD 334003 xor eax, [eax+$03] 00876FC0 0000 add [eax], al 00876FC2 0B00 or eax, [eax] 00876FC4 0C63 or al, $63 00876FC6 7847 js 0087700F 00876FC8 7269 jb 00877033 00876FCA 644C dec esp 00876FCC 657665 jbe 00877034 00876FCF 6C insb 00876FD0 31440300 xor [ebx+eax+$00], eax 00876FD4 000400 add [eax+eax], al 00876FD7 06 push es 00876FD8 4C dec esp 00876FD9 61 popa 00876FDA 62656C bound esp, qword ptr [ebp+$6C] 00876FDD 324803 xor cl, byte ptr [eax+$03] 00876FE0 0000 add [eax], al 00876FE2 0400 add al, +$00 00876FE4 06 push es 00876FE5 4C dec esp 00876FE6 61 popa 00876FE7 62656C bound esp, qword ptr [ebp+$6C] 00876FEA 364C dec esp 00876FEC 0300 add eax, [eax] 00876FEE 000C00 add [eax+eax], cl 00876FF1 07 pop es 00876FF2 626567 bound esp, qword ptr [ebp+$67] 00876FF5 6461 popa 00876FF7 7465 jz 0087705E 00876FF9 50 push eax 00876FFA 0300 add eax, [eax] 00876FFC 000C00 add [eax+eax], cl 00876FFF 07 pop es 00877000 45 inc ebp 00877001 6E outsb 00877002 646461 popa 00877005 7465 jz 0087706C 00877007 54 push esp 00877008 0300 add eax, [eax] 0087700A 000D00106378 add [$78631000], cl 00877010 47 inc edi 00877011 7269 jb 0087707C 00877013 6450 push eax 00877015 6F outsd 00877016 7075 jo 0087708D 00877018 704D jo 00877067 0087701A 656E outsb 0087701C 7532 jnz 00877050 0087701E 58 pop eax 0087701F 0300 add eax, [eax] 00877021 000E add [esi], cl 00877023 000544535F48 add [$485F5344], al 00877029 5A pop edx 0087702A 5C pop esp 0087702B 0300 add eax, [eax] 0087702D 000F add [edi], cl 0087702F 0006 add [esi], al 00877031 43 inc ebx 00877032 44 inc esp 00877033 53 push ebx 00877034 5F pop edi 00877035 48 dec eax 00877036 5A pop edx 00877037 60 pusha 00877038 0300 add eax, [eax] 0087703A 0001 add [ecx], al 0087703C 000B add [ebx], cl 0087703E 54 push esp 0087703F 6F outsd 00877040 6F outsd 00877041 6C insb 00877042 42 inc edx 00877043 7574 jnz 008770B9 00877045 746F jz 008770B6 00877047 6E outsb 00877048 33640300 xor esp, [ebx+eax+$00] 0087704C 000A add [edx], cl 0087704E 0003 add [ebx], al 00877050 56 push esi 00877051 42 inc edx 00877052 5A pop edx 00877053 680300000A push $0A000003 00877058 0006 add [esi], al 0087705A 56 push esi 0087705B 4D dec ebp 0087705C 6F outsd 0087705D 6E outsb 0087705E 65796C jns 008770CD 00877061 0300 add eax, [eax] 00877063 000A add [edx], cl 00877065 0009 add [ecx], cl 00877067 7632 jbe 0087709B 00877069 43 inc ebx 0087706A 6F outsd 0087706B 6C insb 0087706C 756D jnz 008770DB 0087706E 6E outsb 0087706F 367003 jo 00877075 00877072 0000 add [eax], al 00877074 0A00 or al, byte ptr [eax] 00877076 08564F or [esi+$4F], dl 00877079 7264 jb 008770DF 0087707B 65724E jb 008770CC 0087707E 6F outsd 0087707F 7403 jz 00877084 00877081 0000 add [eax], al 00877083 0A00 or al, byte ptr [eax] 00877085 097632 or [esi+$32], esi 00877088 43 inc ebx 00877089 6F outsd 0087708A 6C insb 0087708B 756D jnz 008770FA 0087708D 6E outsb 0087708E 327803 xor bh, byte ptr [eax+$03] 00877091 0000 add [eax], al 00877093 0400 add al, +$00 00877095 06 push es 00877096 4C dec esp 00877097 61 popa 00877098 62656C bound esp, qword ptr [ebp+$6C] 0087709B 37 aaa 0087709C 7C03 jl 008770A1 0087709E 0000 add [eax], al 008770A0 0500054564 add eax, +$64450500 008770A5 6974318003000010 imul esi, [ecx+esi-$80], $10000003 008770AD 0007 add [edi], al 008770AF 42 inc edx 008770B0 7574 jnz 00877126 008770B2 746F jz 00877123 008770B4 6E outsb 008770B5 31840300001100 xor [ebx+eax+$110000], eax 008770BC 094368 or [ebx+$68], eax 008770BF 65636B42 arpl gs:[ebx+$42], bp 008770C3 6F outsd 008770C4 7831 js 008770F7 008770C6 8803 mov [ebx], al 008770C8 0000 add [eax], al 008770CA 0500074F72 add eax, +$724F0700 008770CF 6465724E jb 00877121 008770D3 6F outsd 008770D4 8C03 mov word ptr [ebx], es 008770D6 0000 add [eax], al 008770D8 0400 add al, +$00 008770DA 06 push es 008770DB 4C dec esp 008770DC 61 popa 008770DD 62656C bound esp, qword ptr [ebp+$6C] 008770E0 389003000001 cmp [eax+$1000003], dl 008770E6 0005545A4453 add [$53445A54], al 008770EC 43 inc ebx 008770ED 94 xchg eax, esp 008770EE 0300 add eax, [eax] 008770F0 000A add [edx], cl 008770F2 0007 add [edi], al 008770F4 7632 jbe 00877128 008770F6 43 inc ebx 008770F7 6F outsd 008770F8 6E outsb 008770F9 4E dec esi 008770FA 6F outsd 008770FB 98 cwde 008770FC 0300 add eax, [eax] 008770FE 000400 add [eax+eax], al 00877101 07 pop es 00877102 4C dec esp 00877103 61 popa 00877104 62656C bound esp, qword ptr [ebp+$6C] 00877107 3131 xor [ecx], esi 00877109 9C pushf 0087710A 0300 add eax, [eax] 0087710C 000400 add [eax+eax], al 0087710F 07 pop es 00877110 4C dec esp 00877111 61 popa 00877112 62656C bound esp, qword ptr [ebp+$6C] 00877115 3133 xor [ebx], esi 00877117 A003000004 mov al, byte ptr [$04000003] 0087711C 0006 add [esi], al 0087711E 4C dec esp 0087711F 61 popa 00877120 62656C bound esp, qword ptr [ebp+$6C] 00877123 34A4 xor al, $A4 00877125 0300 add eax, [eax] 00877127 00050005436F add [$6F430500], al 0087712D 6E outsb 0087712E 4E dec esi 0087712F 6F outsd 00877130 A803 test al, $03 00877132 0000 add [eax], al *) end; end.