unit U_YFFP_HX; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmYFFP_HX=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBDel: TToolButton; TBClose: TToolButton; ADOQueryTemp: TADOQuery; ADOQueryCmd: TADOQuery; Panel1: TPanel; ToolButton2: TToolButton; Label1: TLabel; YFName: TEdit; ADOQueryMain: TADOQuery; ToolButton1: TToolButton; RM1: TRMGridReport; RMDB_Main: TRMDBDataSet; Label3: TLabel; FactoryName: TEdit; cxGrid2: TcxGrid; Tv2: TcxGridDBTableView; cxGridDBColumn1: TcxGridDBColumn; cxGridDBColumn5: TcxGridDBColumn; cxGridDBColumn6: TcxGridDBColumn; cxGridLevel1: TcxGridLevel; Label2: TLabel; begdate: TDateTimePicker; Enddate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; ToolButton3: TToolButton; v2Column1: TcxGridDBColumn; VHL: TcxGridDBColumn; VBZ: TcxGridDBColumn; v2Column6: TcxGridDBColumn; v2KP: TcxGridDBColumn; v2PayMent: TcxGridDBColumn; v2Note: TcxGridDBColumn; Label4: TLabel; OrderNo: TEdit; Label5: TLabel; ComTaiTou: TEdit; v2Column3: TcxGridDBColumn; v2Column4: TcxGridDBColumn; v2ComTaitou: TcxGridDBColumn; v2KPNO: TcxGridDBColumn; v2KPDMNo: TcxGridDBColumn; Label7: TLabel; KPNO: TEdit; Label8: TLabel; KPDMNo: TEdit; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure TBDelClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure FactoryNameChange(Sender : TObject); procedure Button2Click(Sender : TObject); procedure cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); procedure ToolButton3Click(Sender : TObject); procedure cxGridDBColumn3PropertiesButtonClick(Sender : TObject); procedure cxGridDBColumn6PropertiesButtonClick(Sender : TObject); procedure v2Column3PropertiesButtonClick(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure v2Column7PropertiesButtonClick(Sender : TObject); procedure v2Column2PropertiesEditValueChanged(Sender : TObject); procedure v2PSPropertiesEditValueChanged(Sender : TObject); procedure v2BatchNoPropertiesEditValueChanged(Sender : TObject); procedure v2PayMentPropertiesButtonClick(Sender : TObject); procedure OrderNoChange(Sender : TObject); procedure OrderNoKeyPress(Sender : TObject); procedure v2Column2PropertiesButtonClick(Sender : TObject); procedure v2ComTaitouPropertiesButtonClick(Sender : TObject); procedure VBZPropertiesButtonClick(Sender : TObject); procedure v2Column4PropertiesButtonClick(Sender : TObject); procedure v2Column3PropertiesEditValueChanged(Sender : TObject); procedure v2Column4PropertiesEditValueChanged(Sender : TObject); procedure v2KPNOPropertiesEditValueChanged(Sender : TObject); procedure v2KPDMNoPropertiesEditValueChanged(Sender : TObject); procedure KPNOKeyPress(Sender : TObject); procedure _PROC_007E9C31(Sender : TObject); procedure _PROC_007E9F79(Sender : TObject); procedure _PROC_007EA801(Sender : TObject); procedure _PROC_007EABBD(Sender : TObject); procedure _PROC_007EB2E5(Sender : TObject); procedure _PROC_007EB611(Sender : TObject); procedure _PROC_007EBE09(Sender : TObject); procedure _PROC_007EC126(Sender : TObject); procedure _PROC_007EC15C(Sender : TObject); procedure _PROC_007EC169(Sender : TObject); procedure _PROC_007EC4B1(Sender : TObject); procedure _PROC_007EC95D(Sender : TObject); procedure _PROC_007ECF7D(Sender : TObject); procedure _PROC_007ED2BD(Sender : TObject); procedure _PROC_007ED53D(Sender : TObject); procedure _PROC_007ED875(Sender : TObject); procedure _PROC_007EE0D9(Sender : TObject); procedure _PROC_007EE44D(Sender : TObject); procedure _PROC_007EE785(Sender : TObject); procedure _PROC_007EEAC9(Sender : TObject); procedure _PROC_007EECED(Sender : TObject); procedure _PROC_007EEED9(Sender : TObject); procedure _PROC_007EF0C1(Sender : TObject); procedure _PROC_007EF2A5(Sender : TObject); procedure _PROC_007EF585(Sender : TObject); procedure _PROC_007EF5B4(Sender : TObject); procedure _PROC_007EF5BC(Sender : TObject); procedure _PROC_007EF622(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmYFFP_HX: TfrmYFFP_HX; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmYFFP_HX.FormDestroy(Sender : TObject); begin (* 007E98F0 33C0 xor eax, eax * Reference to GlobalVar_00893CD0 | 007E98F2 A3D03C8900 mov dword ptr [$00893CD0], eax 007E98F7 C3 ret *) end; procedure TfrmYFFP_HX.FormClose(Sender : TObject); begin (* 007E98F8 C60102 mov byte ptr [ecx], $02 007E98FB C3 ret *) end; procedure TfrmYFFP_HX.TBCloseClick(Sender : TObject); begin (* 007E98FC 53 push ebx 007E98FD 8BD8 mov ebx, eax * Possible String Reference to: '财务管理' | 007E98FF B928997E00 mov ecx, $007E9928 * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007E9904 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 007E990A B83C997E00 mov eax, $007E993C | 007E990F E88CE2FCFF call 007B7BA0 * Reference to field TfrmYFFP_HX.ModalResult : TModalResult | 007E9914 C7834C02000001000000 mov dword ptr [ebx+$024C], $00000001 007E991E 5B pop ebx 007E991F C3 ret *) end; procedure TfrmYFFP_HX.TBDelClick(Sender : TObject); begin (* 007E9948 55 push ebp 007E9949 8BEC mov ebp, esp 007E994B B906000000 mov ecx, $00000006 007E9950 6A00 push $00 007E9952 6A00 push $00 007E9954 49 dec ecx 007E9955 75F9 jnz 007E9950 007E9957 51 push ecx 007E9958 53 push ebx 007E9959 56 push esi 007E995A 8BD8 mov ebx, eax 007E995C 33C0 xor eax, eax 007E995E 55 push ebp * Possible String Reference to: '闆腚^[嬪]' | 007E995F 68549B7E00 push $007E9B54 ***** TRY | 007E9964 64FF30 push dword ptr fs:[eax] 007E9967 648920 mov fs:[eax], esp * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007E996A 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007E9970 E84BE5CDFF call 004C7EC0 007E9975 84C0 test al, al 007E9977 0F85BC010000 jnz 007E9B39 * Reference to control TfrmYFFP_HX.ADOQueryTemp : TADOQuery | 007E997D 8BB308030000 mov esi, [ebx+$0308] 007E9983 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 007E9985 E84ABFCDFF call 004C58D4 007E998A 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007E998C E81B46CFFF call 004DDFAC 007E9991 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007E9993 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 007E9996 686C9B7E00 push $007E9B6C * Possible String Reference to: 'YFID' | 007E999B BAB49B7E00 mov edx, $007E9BB4 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007E99A0 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007E99A6 E809D2CDFF call 004C6BB4 007E99AB 8D55F0 lea edx, [ebp-$10] 007E99AE 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007E99B0 FF5160 call dword ptr [ecx+$60] 007E99B3 8B45F0 mov eax, [ebp-$10] 007E99B6 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007E99B9 E82E0FC2FF call 0040A8EC 007E99BE FF75F4 push dword ptr [ebp-$0C] 007E99C1 68C49B7E00 push $007E9BC4 007E99C6 8D45F8 lea eax, [ebp-$08] 007E99C9 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007E99CE E8E1BCC1FF call 004056B4 007E99D3 8B45F8 mov eax, [ebp-$08] 007E99D6 50 push eax 007E99D7 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007E99D9 E8CE45CFFF call 004DDFAC 007E99DE 5A pop edx 007E99DF 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007E99E1 FF5138 call dword ptr [ecx+$38] 007E99E4 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 007E99E6 E8DDBECDFF call 004C58C8 * Possible String Reference to: 'BBMoney' | 007E99EB BAD09B7E00 mov edx, $007E9BD0 * Reference to control TfrmYFFP_HX.ADOQueryTemp : TADOQuery | 007E99F0 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007E99F6 E8B9D1CDFF call 004C6BB4 007E99FB 8D55FC lea edx, [ebp-$04] 007E99FE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007E9A00 FF5160 call dword ptr [ecx+$60] 007E9A03 6A24 push $24 * Possible String Reference to: '提示' | 007E9A05 B9D89B7E00 mov ecx, $007E9BD8 * Possible String Reference to: '确定要删除数据吗？' | 007E9A0A BAE09B7E00 mov edx, $007E9BE0 *) end; procedure TfrmYFFP_HX.FormShow(Sender : TObject); begin (* 007E9C84 55 push ebp 007E9C85 8BEC mov ebp, esp 007E9C87 53 push ebx 007E9C88 8BD8 mov ebx, eax 007E9C8A 33C0 xor eax, eax 007E9C8C 55 push ebp * Possible String Reference to: '殪滕[]' | 007E9C8D 68039D7E00 push $007E9D03 ***** TRY | 007E9C92 64FF30 push dword ptr fs:[eax] 007E9C95 648920 mov fs:[eax], esp * Possible String Reference to: '财务管理' | 007E9C98 B9189D7E00 mov ecx, $007E9D18 * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007E9C9D 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 007E9CA3 B82C9D7E00 mov eax, $007E9D2C | 007E9CA8 E8F7DCFCFF call 007B79A4 * Reference to control TfrmYFFP_HX.ADOQueryTemp : TADOQuery | 007E9CAD 8B8308030000 mov eax, [ebx+$0308] | 007E9CB3 E8D0ACFCFF call 007B4988 007E9CB8 83C4F8 add esp, -$08 007E9CBB DD1C24 fstp qword ptr [esp] 007E9CBE 9B wait * Reference to control TfrmYFFP_HX.Enddate : TDateTimePicker | 007E9CBF 8B8358030000 mov eax, [ebx+$0358] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007E9CC5 E86285C8FF call 0047222C * Reference to control TfrmYFFP_HX.Enddate : TDateTimePicker | 007E9CCA 8B8358030000 mov eax, [ebx+$0358] 007E9CD0 DD8010020000 fld qword ptr [eax+$0210] 007E9CD6 D825389D7E00 fsub dword ptr [$007E9D38] 007E9CDC 83C4F8 add esp, -$08 007E9CDF DD1C24 fstp qword ptr [esp] 007E9CE2 9B wait * Reference to control TfrmYFFP_HX.begdate : TDateTimePicker | 007E9CE3 8B8354030000 mov eax, [ebx+$0354] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007E9CE9 E83E85C8FF call 0047222C 007E9CEE 8BC3 mov eax, ebx | 007E9CF0 E8A7F9FFFF call 007E969C 007E9CF5 33C0 xor eax, eax 007E9CF7 5A pop edx 007E9CF8 59 pop ecx 007E9CF9 59 pop ecx 007E9CFA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[]' | 007E9CFD 680A9D7E00 push $007E9D0A 007E9D02 C3 ret * Reference to: System.@HandleFinally; | 007E9D03 E9ECADC1FF jmp 00404AF4 007E9D08 EBF8 jmp 007E9D02 ****** END | 007E9D0A 5B pop ebx 007E9D0B 5D pop ebp 007E9D0C C3 ret *) end; procedure TfrmYFFP_HX.TBRafreshClick(Sender : TObject); begin (* 007E9D3C 53 push ebx 007E9D3D 8BD8 mov ebx, eax * Reference to control TfrmYFFP_HX.ToolBar1 : TToolBar | 007E9D3F 8B83F8020000 mov eax, [ebx+$02F8] 007E9D45 8B10 mov edx, [eax] * Reference to method TToolBar.SetFocus() | 007E9D47 FF92C4000000 call dword ptr [edx+$00C4] 007E9D4D 8BC3 mov eax, ebx | 007E9D4F E848F9FFFF call 007E969C 007E9D54 5B pop ebx 007E9D55 C3 ret *) end; procedure TfrmYFFP_HX.ToolButton2Click(Sender : TObject); begin (* 007E9D58 55 push ebp 007E9D59 8BEC mov ebp, esp 007E9D5B 6A00 push $00 007E9D5D 53 push ebx 007E9D5E 8BD8 mov ebx, eax 007E9D60 33C0 xor eax, eax 007E9D62 55 push ebp 007E9D63 68DC9D7E00 push $007E9DDC ***** TRY | 007E9D68 64FF30 push dword ptr fs:[eax] 007E9D6B 648920 mov fs:[eax], esp * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007E9D6E 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 007E9D74 E89BBCCDFF call 004C5A14 007E9D79 84C0 test al, al 007E9D7B 7449 jz 007E9DC6 007E9D7D 8D45FC lea eax, [ebp-$04] 007E9D80 50 push eax 007E9D81 B902000000 mov ecx, $00000002 007E9D86 BA01000000 mov edx, $00000001 * Reference to control TfrmYFFP_HX.Panel1 : TPanel | 007E9D8B 8B8310030000 mov eax, [ebx+$0310] | 007E9D91 E81AC3FCFF call 007B60B0 007E9D96 8B55FC mov edx, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007E9D99 8B8320030000 mov eax, [ebx+$0320] | 007E9D9F E824CFFCFF call 007B6CC8 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007E9DA4 8B9364030000 mov edx, [ebx+$0364] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007E9DAA 8B8320030000 mov eax, [ebx+$0320] | 007E9DB0 E8DBD0FCFF call 007B6E90 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007E9DB5 8B9364030000 mov edx, [ebx+$0364] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007E9DBB 8B8320030000 mov eax, [ebx+$0320] | 007E9DC1 E852D2FCFF call 007B7018 007E9DC6 33C0 xor eax, eax 007E9DC8 5A pop edx 007E9DC9 59 pop ecx 007E9DCA 59 pop ecx 007E9DCB 648910 mov fs:[eax], edx ****** FINALLY | 007E9DCE 68E39D7E00 push $007E9DE3 007E9DD3 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007E9DD6 E849B5C1FF call 00405324 007E9DDB C3 ret * Reference to: System.@HandleFinally; | 007E9DDC E913ADC1FF jmp 00404AF4 007E9DE1 EBF0 jmp 007E9DD3 ****** END | 007E9DE3 5B pop ebx 007E9DE4 59 pop ecx 007E9DE5 5D pop ebp 007E9DE6 C3 ret *) end; procedure TfrmYFFP_HX.FactoryNameChange(Sender : TObject); begin (* 007E9DE8 56 push esi * Reference to control TfrmYFFP_HX.ToolButton2 : TToolButton | 007E9DE9 8B8014030000 mov eax, [eax+$0314] 007E9DEF 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007E9DF3 E85CA7C1FF call 00404554 007E9DF8 5E pop esi 007E9DF9 C3 ret *) end; procedure TfrmYFFP_HX.Button2Click(Sender : TObject); begin (* 007E9DFC 55 push ebp 007E9DFD 8BEC mov ebp, esp 007E9DFF 33C9 xor ecx, ecx 007E9E01 51 push ecx 007E9E02 51 push ecx 007E9E03 51 push ecx 007E9E04 51 push ecx 007E9E05 51 push ecx 007E9E06 53 push ebx 007E9E07 56 push esi 007E9E08 8BD8 mov ebx, eax 007E9E0A 33C0 xor eax, eax 007E9E0C 55 push ebp * Possible String Reference to: '殒腚^[嬪]' | 007E9E0D 68099F7E00 push $007E9F09 ***** TRY | 007E9E12 64FF30 push dword ptr fs:[eax] 007E9E15 648920 mov fs:[eax], esp * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007E9E18 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007E9E1E E89DE0CDFF call 004C7EC0 007E9E23 84C0 test al, al 007E9E25 0F85C3000000 jnz 007E9EEE 007E9E2B 6A24 push $24 * Possible String Reference to: '提示' | 007E9E2D B9189F7E00 mov ecx, $007E9F18 * Possible String Reference to: '确定要删除数据吗？' | 007E9E32 BA209F7E00 mov edx, $007E9F20 *) end; procedure TfrmYFFP_HX.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 007EA998 55 push ebp 007EA999 8BEC mov ebp, esp 007EA99B B908000000 mov ecx, $00000008 007EA9A0 6A00 push $00 007EA9A2 6A00 push $00 007EA9A4 49 dec ecx 007EA9A5 75F9 jnz 007EA9A0 007EA9A7 51 push ecx 007EA9A8 53 push ebx 007EA9A9 56 push esi 007EA9AA 8BDA mov ebx, edx 007EA9AC 8BF0 mov esi, eax 007EA9AE 33C0 xor eax, eax 007EA9B0 55 push ebp * Possible String Reference to: '镮熈胫^[嬪]' | 007EA9B1 68A6AB7E00 push $007EABA6 ***** TRY | 007EA9B6 64FF30 push dword ptr fs:[eax] 007EA9B9 648920 mov fs:[eax], esp 007EA9BC 8D55FC lea edx, [ebp-$04] 007EA9BF 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; | 007EA9C1 E8F64CDAFF call 0058F6BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007EA9C6 8B863C030000 mov eax, [esi+$033C] * 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; | 007EA9CC E87B19E7FF 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; | 007EA9D1 E88E71E6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007EA9D6 8B4050 mov eax, [eax+$50] 007EA9D9 8D55F4 lea edx, [ebp-$0C] 007EA9DC 8B08 mov ecx, [eax] 007EA9DE FF5110 call dword ptr [ecx+$10] 007EA9E1 8B45F4 mov eax, [ebp-$0C] 007EA9E4 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EA9E7 E800FFC1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EA9EC 8B9E64030000 mov ebx, [esi+$0364] 007EA9F2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EA9F4 E847DACDFF call 004C8440 007EA9F9 8D55E0 lea edx, [ebp-$20] 007EA9FC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EA9FF E8E8FEC1FF call 0040A8EC 007EAA04 8B55E0 mov edx, [ebp-$20] 007EAA07 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EAA0A E8B9E3C2FF call 00418DC8 007EAA0F 8D45E4 lea eax, [ebp-$1C] 007EAA12 50 push eax 007EAA13 8B55F8 mov edx, [ebp-$08] 007EAA16 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EAA18 E897C1CDFF call 004C6BB4 007EAA1D 5A pop edx 007EAA1E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EAA20 FF91B4000000 call dword ptr [ecx+$00B4] 007EAA26 8BC3 mov eax, ebx 007EAA28 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EAA2A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EAA30 8B9E0C030000 mov ebx, [esi+$030C] 007EAA36 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EAA38 E897AECDFF call 004C58D4 007EAA3D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EAA3F E86835CFFF call 004DDFAC 007EAA44 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EAA46 FF5244 call dword ptr [edx+$44] 007EAA49 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EAA4B E85C35CFFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 007EAA50 BABCAB7E00 mov edx, $007EABBC 007EAA55 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EAA57 FF5138 call dword ptr [ecx+$38] 007EAA5A 8D55DC lea edx, [ebp-$24] 007EAA5D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EAA60 E887FEC1FF call 0040A8EC 007EAA65 837DDC00 cmp dword ptr [ebp-$24], +$00 007EAA69 7440 jz 007EAAAB * Possible String Reference to: ' Set ' | 007EAA6B 68D8AB7E00 push $007EABD8 007EAA70 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007EAA73 68E8AB7E00 push $007EABE8 007EAA78 8D55D4 lea edx, [ebp-$2C] 007EAA7B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EAA7E E869FEC1FF call 0040A8EC 007EAA83 FF75D4 push dword ptr [ebp-$2C] 007EAA86 68F4AB7E00 push $007EABF4 007EAA8B 8D45D8 lea eax, [ebp-$28] 007EAA8E BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007EAA93 E81CACC1FF call 004056B4 007EAA98 8B45D8 mov eax, [ebp-$28] 007EAA9B 50 push eax 007EAA9C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EAA9E E80935CFFF call 004DDFAC 007EAAA3 5A pop edx 007EAAA4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EAAA6 FF5138 call dword ptr [ecx+$38] 007EAAA9 EB2B jmp 007EAAD6 007EAAAB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EAAAD E8FA34CFFF call 004DDFAC 007EAAB2 50 push eax * Possible String Reference to: ' Set ' | 007EAAB3 68D8AB7E00 push $007EABD8 007EAAB8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 007EAABB 6800AC7E00 push $007EAC00 007EAAC0 8D45D0 lea eax, [ebp-$30] 007EAAC3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EAAC8 E8E7ABC1FF call 004056B4 007EAACD 8B55D0 mov edx, [ebp-$30] 007EAAD0 58 pop eax 007EAAD1 8B08 mov ecx, [eax] 007EAAD3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007EAAD6 6810AC7E00 push $007EAC10 007EAADB 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP_HX.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 007EAC64 55 push ebp 007EAC65 8BEC mov ebp, esp 007EAC67 B91A000000 mov ecx, $0000001A 007EAC6C 6A00 push $00 007EAC6E 6A00 push $00 007EAC70 49 dec ecx 007EAC71 75F9 jnz 007EAC6C 007EAC73 51 push ecx 007EAC74 53 push ebx 007EAC75 56 push esi 007EAC76 8BF2 mov esi, edx 007EAC78 8BD8 mov ebx, eax 007EAC7A 33C0 xor eax, eax 007EAC7C 55 push ebp * Possible String Reference to: '殚樍毽^[嬪]' | 007EAC7D 6806B27E00 push $007EB206 ***** TRY | 007EAC82 64FF30 push dword ptr fs:[eax] 007EAC85 648920 mov fs:[eax], esp 007EAC88 8D55FC lea edx, [ebp-$04] 007EAC8B 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; | 007EAC8D E82A4ADAFF call 0058F6BC 007EAC92 8D55E0 lea edx, [ebp-$20] 007EAC95 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EAC98 E84FFCC1FF call 0040A8EC 007EAC9D 837DE000 cmp dword ptr [ebp-$20], +$00 007EACA1 750D jnz 007EACB0 007EACA3 8D45FC lea eax, [ebp-$04] 007EACA6 BA1CB27E00 mov edx, $007EB21C * Reference to: System.@LStrLAsg(void;void;void;void); | 007EACAB E80CA7C1FF call 004053BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007EACB0 8B833C030000 mov eax, [ebx+$033C] * 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; | 007EACB6 E89116E7FF 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; | 007EACBB E8A46EE6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007EACC0 8B4050 mov eax, [eax+$50] 007EACC3 8D55DC lea edx, [ebp-$24] 007EACC6 8B08 mov ecx, [eax] 007EACC8 FF5110 call dword ptr [ecx+$10] 007EACCB 8B45DC mov eax, [ebp-$24] 007EACCE 8D55E4 lea edx, [ebp-$1C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EACD1 E816FCC1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EACD6 8BB364030000 mov esi, [ebx+$0364] 007EACDC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007EACDE E85DD7CDFF call 004C8440 007EACE3 8D55C8 lea edx, [ebp-$38] 007EACE6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EACE9 E8FEFBC1FF call 0040A8EC 007EACEE 8B55C8 mov edx, [ebp-$38] 007EACF1 8D45CC lea eax, [ebp-$34] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EACF4 E8CFE0C2FF call 00418DC8 007EACF9 8D45CC lea eax, [ebp-$34] 007EACFC 50 push eax 007EACFD 8B55E4 mov edx, [ebp-$1C] 007EAD00 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EAD02 E8ADBECDFF call 004C6BB4 007EAD07 5A pop edx 007EAD08 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EAD0A FF91B4000000 call dword ptr [ecx+$00B4] 007EAD10 8D55C4 lea edx, [ebp-$3C] *) end; procedure TfrmYFFP_HX.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 007EB3EC 55 push ebp 007EB3ED 8BEC mov ebp, esp 007EB3EF B908000000 mov ecx, $00000008 007EB3F4 6A00 push $00 007EB3F6 6A00 push $00 007EB3F8 49 dec ecx 007EB3F9 75F9 jnz 007EB3F4 007EB3FB 51 push ecx 007EB3FC 53 push ebx 007EB3FD 56 push esi 007EB3FE 8BDA mov ebx, edx 007EB400 8BF0 mov esi, eax 007EB402 33C0 xor eax, eax 007EB404 55 push ebp * Possible String Reference to: '轷斄胫^[嬪]' | 007EB405 68FAB57E00 push $007EB5FA ***** TRY | 007EB40A 64FF30 push dword ptr fs:[eax] 007EB40D 648920 mov fs:[eax], esp 007EB410 8D55FC lea edx, [ebp-$04] 007EB413 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; | 007EB415 E8A242DAFF call 0058F6BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007EB41A 8B863C030000 mov eax, [esi+$033C] * 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; | 007EB420 E8270FE7FF 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; | 007EB425 E83A67E6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007EB42A 8B4050 mov eax, [eax+$50] 007EB42D 8D55F4 lea edx, [ebp-$0C] 007EB430 8B08 mov ecx, [eax] 007EB432 FF5110 call dword ptr [ecx+$10] 007EB435 8B45F4 mov eax, [ebp-$0C] 007EB438 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB43B E8ACF4C1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EB440 8B9E64030000 mov ebx, [esi+$0364] 007EB446 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EB448 E8F3CFCDFF call 004C8440 007EB44D 8D55E0 lea edx, [ebp-$20] 007EB450 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB453 E894F4C1FF call 0040A8EC 007EB458 8B55E0 mov edx, [ebp-$20] 007EB45B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EB45E E865D9C2FF call 00418DC8 007EB463 8D45E4 lea eax, [ebp-$1C] 007EB466 50 push eax 007EB467 8B55F8 mov edx, [ebp-$08] 007EB46A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EB46C E843B7CDFF call 004C6BB4 007EB471 5A pop edx 007EB472 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EB474 FF91B4000000 call dword ptr [ecx+$00B4] 007EB47A 8BC3 mov eax, ebx 007EB47C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EB47E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EB484 8B9E0C030000 mov ebx, [esi+$030C] 007EB48A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EB48C E843A4CDFF call 004C58D4 007EB491 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EB493 E8142BCFFF call 004DDFAC 007EB498 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EB49A FF5244 call dword ptr [edx+$44] 007EB49D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EB49F E8082BCFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EB4A4 BA10B67E00 mov edx, $007EB610 007EB4A9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EB4AB FF5138 call dword ptr [ecx+$38] 007EB4AE 8D55DC lea edx, [ebp-$24] 007EB4B1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB4B4 E833F4C1FF call 0040A8EC 007EB4B9 837DDC00 cmp dword ptr [ebp-$24], +$00 007EB4BD 7440 jz 007EB4FF * Possible String Reference to: ' Set ' | 007EB4BF 682CB67E00 push $007EB62C 007EB4C4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007EB4C7 683CB67E00 push $007EB63C 007EB4CC 8D55D4 lea edx, [ebp-$2C] 007EB4CF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB4D2 E815F4C1FF call 0040A8EC 007EB4D7 FF75D4 push dword ptr [ebp-$2C] 007EB4DA 6848B67E00 push $007EB648 007EB4DF 8D45D8 lea eax, [ebp-$28] 007EB4E2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007EB4E7 E8C8A1C1FF call 004056B4 007EB4EC 8B45D8 mov eax, [ebp-$28] 007EB4EF 50 push eax 007EB4F0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EB4F2 E8B52ACFFF call 004DDFAC 007EB4F7 5A pop edx 007EB4F8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EB4FA FF5138 call dword ptr [ecx+$38] 007EB4FD EB2B jmp 007EB52A 007EB4FF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EB501 E8A62ACFFF call 004DDFAC 007EB506 50 push eax * Possible String Reference to: ' Set ' | 007EB507 682CB67E00 push $007EB62C 007EB50C FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 007EB50F 6854B67E00 push $007EB654 007EB514 8D45D0 lea eax, [ebp-$30] 007EB517 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EB51C E893A1C1FF call 004056B4 007EB521 8B55D0 mov edx, [ebp-$30] 007EB524 58 pop eax 007EB525 8B08 mov ecx, [eax] 007EB527 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007EB52A 6864B67E00 push $007EB664 007EB52F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP_HX.ToolButton3Click(Sender : TObject); begin (* 007EB6B8 55 push ebp 007EB6B9 8BEC mov ebp, esp 007EB6BB B911000000 mov ecx, $00000011 007EB6C0 6A00 push $00 007EB6C2 6A00 push $00 007EB6C4 49 dec ecx 007EB6C5 75F9 jnz 007EB6C0 007EB6C7 51 push ecx 007EB6C8 53 push ebx 007EB6C9 8945FC mov [ebp-$04], eax 007EB6CC 33C0 xor eax, eax 007EB6CE 55 push ebp * Possible String Reference to: '閝懥雿[嬪]' | 007EB6CF 687EB97E00 push $007EB97E ***** TRY | 007EB6D4 64FF30 push dword ptr fs:[eax] 007EB6D7 648920 mov fs:[eax], esp 007EB6DA 33C0 xor eax, eax 007EB6DC 55 push ebp 007EB6DD 68E3B87E00 push $007EB8E3 ***** TRY | 007EB6E2 64FF30 push dword ptr fs:[eax] 007EB6E5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 007EBA30 55 push ebp 007EBA31 8BEC mov ebp, esp 007EBA33 51 push ecx 007EBA34 B90B000000 mov ecx, $0000000B 007EBA39 6A00 push $00 007EBA3B 6A00 push $00 007EBA3D 49 dec ecx 007EBA3E 75F9 jnz 007EBA39 007EBA40 51 push ecx 007EBA41 874DFC xchg [ebp-$04], ecx 007EBA44 53 push ebx 007EBA45 56 push esi 007EBA46 8BF0 mov esi, eax 007EBA48 33C0 xor eax, eax 007EBA4A 55 push ebp 007EBA4B 687BBD7E00 push $007EBD7B ***** TRY | 007EBA50 64FF30 push dword ptr fs:[eax] 007EBA53 648920 mov fs:[eax], esp 007EBA56 33C0 xor eax, eax 007EBA58 55 push ebp 007EBA59 6834BD7E00 push $007EBD34 ***** TRY | 007EBA5E 64FF30 push dword ptr fs:[eax] 007EBA61 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 007EBEB0 55 push ebp 007EBEB1 8BEC mov ebp, esp 007EBEB3 51 push ecx 007EBEB4 B906000000 mov ecx, $00000006 007EBEB9 6A00 push $00 007EBEBB 6A00 push $00 007EBEBD 49 dec ecx 007EBEBE 75F9 jnz 007EBEB9 007EBEC0 51 push ecx 007EBEC1 874DFC xchg [ebp-$04], ecx 007EBEC4 53 push ebx 007EBEC5 56 push esi 007EBEC6 8BF0 mov esi, eax 007EBEC8 33C0 xor eax, eax 007EBECA 55 push ebp * Possible String Reference to: '殒壛脬^[嬪]' | 007EBECB 6809C17E00 push $007EC109 ***** TRY | 007EBED0 64FF30 push dword ptr fs:[eax] 007EBED3 648920 mov fs:[eax], esp 007EBED6 33C0 xor eax, eax 007EBED8 55 push ebp 007EBED9 68DFC07E00 push $007EC0DF ***** TRY | 007EBEDE 64FF30 push dword ptr fs:[eax] 007EBEE1 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 007EC20C 55 push ebp 007EC20D 8BEC mov ebp, esp 007EC20F 51 push ecx 007EC210 B906000000 mov ecx, $00000006 007EC215 6A00 push $00 007EC217 6A00 push $00 007EC219 49 dec ecx 007EC21A 75F9 jnz 007EC215 007EC21C 51 push ecx 007EC21D 874DFC xchg [ebp-$04], ecx 007EC220 53 push ebx 007EC221 56 push esi 007EC222 8BF0 mov esi, eax 007EC224 33C0 xor eax, eax 007EC226 55 push ebp * Possible String Reference to: '閵喠脬^[嬪]' | 007EC227 6865C47E00 push $007EC465 ***** TRY | 007EC22C 64FF30 push dword ptr fs:[eax] 007EC22F 648920 mov fs:[eax], esp 007EC232 33C0 xor eax, eax 007EC234 55 push ebp 007EC235 683BC47E00 push $007EC43B ***** TRY | 007EC23A 64FF30 push dword ptr fs:[eax] 007EC23D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.ToolButton1Click(Sender : TObject); begin (* 007EC558 53 push ebx 007EC559 8BD8 mov ebx, eax * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EC55B 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007EC561 E85AB9CDFF call 004C7EC0 007EC566 84C0 test al, al 007EC568 7516 jnz 007EC580 * Possible String Reference to: '应付款列表' | 007EC56A B98CC57E00 mov ecx, $007EC58C * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EC56F 8B9320030000 mov edx, [ebx+$0320] * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007EC575 8B833C030000 mov eax, [ebx+$033C] | 007EC57B E8B0BCFCFF call 007B8230 007EC580 5B pop ebx 007EC581 C3 ret *) end; procedure TfrmYFFP_HX.v2Column7PropertiesButtonClick(Sender : TObject); begin (* 007EC598 55 push ebp 007EC599 8BEC mov ebp, esp 007EC59B 51 push ecx 007EC59C B90E000000 mov ecx, $0000000E 007EC5A1 6A00 push $00 007EC5A3 6A00 push $00 007EC5A5 49 dec ecx 007EC5A6 75F9 jnz 007EC5A1 007EC5A8 874DFC xchg [ebp-$04], ecx 007EC5AB 53 push ebx 007EC5AC 56 push esi 007EC5AD 8BF0 mov esi, eax 007EC5AF 33C0 xor eax, eax 007EC5B1 55 push ebp 007EC5B2 68ECC87E00 push $007EC8EC ***** TRY | 007EC5B7 64FF30 push dword ptr fs:[eax] 007EC5BA 648920 mov fs:[eax], esp 007EC5BD 33C0 xor eax, eax 007EC5BF 55 push ebp 007EC5C0 6898C87E00 push $007EC898 ***** TRY | 007EC5C5 64FF30 push dword ptr fs:[eax] 007EC5C8 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.v2Column2PropertiesEditValueChanged(Sender : TObject); begin (* 007ECA08 55 push ebp 007ECA09 8BEC mov ebp, esp 007ECA0B B915000000 mov ecx, $00000015 007ECA10 6A00 push $00 007ECA12 6A00 push $00 007ECA14 49 dec ecx 007ECA15 75F9 jnz 007ECA10 007ECA17 53 push ebx 007ECA18 56 push esi 007ECA19 57 push edi 007ECA1A 8BDA mov ebx, edx 007ECA1C 8BF0 mov esi, eax 007ECA1E 33C0 xor eax, eax 007ECA20 55 push ebp 007ECA21 68C2CE7E00 push $007ECEC2 ***** TRY | 007ECA26 64FF30 push dword ptr fs:[eax] 007ECA29 648920 mov fs:[eax], esp 007ECA2C 8D55FC lea edx, [ebp-$04] 007ECA2F 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; | 007ECA31 E8862CDAFF call 0058F6BC 007ECA36 8D55DC lea edx, [ebp-$24] 007ECA39 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA3C E8ABDEC1FF call 0040A8EC 007ECA41 837DDC00 cmp dword ptr [ebp-$24], +$00 007ECA45 750D jnz 007ECA54 007ECA47 8D45FC lea eax, [ebp-$04] 007ECA4A BAD8CE7E00 mov edx, $007ECED8 * Reference to: System.@LStrLAsg(void;void;void;void); | 007ECA4F E86889C1FF call 004053BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007ECA54 8B863C030000 mov eax, [esi+$033C] * 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; | 007ECA5A E8EDF8E6FF 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; | 007ECA5F E80051E6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007ECA64 8B4050 mov eax, [eax+$50] 007ECA67 8D55D8 lea edx, [ebp-$28] 007ECA6A 8B08 mov ecx, [eax] 007ECA6C FF5110 call dword ptr [ecx+$10] 007ECA6F 8B45D8 mov eax, [ebp-$28] 007ECA72 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA75 E872DEC1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECA7A 8B9E64030000 mov ebx, [esi+$0364] 007ECA80 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ECA82 E8B9B9CDFF call 004C8440 007ECA87 8D55C4 lea edx, [ebp-$3C] 007ECA8A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA8D E85ADEC1FF call 0040A8EC 007ECA92 8B55C4 mov edx, [ebp-$3C] 007ECA95 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ECA98 E82BC3C2FF call 00418DC8 007ECA9D 8D45C8 lea eax, [ebp-$38] 007ECAA0 50 push eax 007ECAA1 8B55F0 mov edx, [ebp-$10] 007ECAA4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECAA6 E809A1CDFF call 004C6BB4 007ECAAB 5A pop edx 007ECAAC 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007ECAAE FF91B4000000 call dword ptr [ecx+$00B4] 007ECAB4 8BC3 mov eax, ebx 007ECAB6 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007ECAB8 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryTemp : TADOQuery | 007ECABE 8B9E08030000 mov ebx, [esi+$0308] 007ECAC4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECAC6 E8098ECDFF call 004C58D4 007ECACB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECACD E8DA14CFFF call 004DDFAC 007ECAD2 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007ECAD4 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 007ECAD7 68E4CE7E00 push $007ECEE4 * Possible String Reference to: 'YFID' | 007ECADC BA2CCF7E00 mov edx, $007ECF2C * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECAE1 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECAE7 E8C8A0CDFF call 004C6BB4 007ECAEC 8D55BC lea edx, [ebp-$44] 007ECAEF 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECAF1 FF5160 call dword ptr [ecx+$60] 007ECAF4 FF75BC push dword ptr [ebp-$44] 007ECAF7 683CCF7E00 push $007ECF3C 007ECAFC 8D45C0 lea eax, [ebp-$40] 007ECAFF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007ECB04 E8AB8BC1FF call 004056B4 007ECB09 8B45C0 mov eax, [ebp-$40] 007ECB0C 50 push eax 007ECB0D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECB0F E89814CFFF call 004DDFAC 007ECB14 5A pop edx 007ECB15 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ECB17 FF5138 call dword ptr [ecx+$38] 007ECB1A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007ECB1C E8A78DCDFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 007ECB21 BA48CF7E00 mov edx, $007ECF48 * Reference to control TfrmYFFP_HX.ADOQueryTemp : TADOQuery | 007ECB26 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB2C E883A0CDFF call 004C6BB4 007ECB31 8D55F4 lea edx, [ebp-$0C] 007ECB34 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 007ECB36 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 007ECB39 BA48CF7E00 mov edx, $007ECF48 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECB3E 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB44 E86BA0CDFF call 004C6BB4 007ECB49 8D55F8 lea edx, [ebp-$08] 007ECB4C 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECB4E FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 007ECB51 BA58CF7E00 mov edx, $007ECF58 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECB56 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB5C E853A0CDFF call 004C6BB4 007ECB61 8D55B4 lea edx, [ebp-$4C] 007ECB64 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECB66 FF5160 call dword ptr [ecx+$60] 007ECB69 8B45B4 mov eax, [ebp-$4C] 007ECB6C 8D55B8 lea edx, [ebp-$48] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECB6F E878DDC1FF call 0040A8EC 007ECB74 837DB800 cmp dword ptr [ebp-$48], +$00 007ECB78 0F8434010000 jz 007ECCB2 * Possible String Reference to: 'Qty' | 007ECB7E BA58CF7E00 mov edx, $007ECF58 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECB83 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB89 E826A0CDFF call 004C6BB4 007ECB8E 8D55EC lea edx, [ebp-$14] 007ECB91 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECB93 FF5160 call dword ptr [ecx+$60] 007ECB96 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECB99 E88E0BC2FF call 0040D72C 007ECB9E D81D5CCF7E00 fcomp dword ptr [$007ECF5C] 007ECBA4 DFE0 fstsw ax 007ECBA6 9E sahf 007ECBA7 0F84C0020000 jz 007ECE6D 007ECBAD 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECBB0 E8770BC2FF call 0040D72C 007ECBB5 D80D60CF7E00 fmul dword ptr [$007ECF60] 007ECBBB DB7DA8 fstp tbyte ptr [ebp-$58] 007ECBBE 9B wait 007ECBBF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECBC2 E8650BC2FF call 0040D72C 007ECBC7 DB6DA8 fld tbyte ptr [ebp-$58] 007ECBCA DEF1 fdivrp st(1), st(0) 007ECBCC DD5DE0 fstp qword ptr [ebp-$20] 007ECBCF 9B wait * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECBD0 8BBE64030000 mov edi, [esi+$0364] 007ECBD6 8BC7 mov eax, edi * Reference to: DB.TDataSet.Edit(TDataSet); | 007ECBD8 E863B8CDFF call 004C8440 * Possible String Reference to: 'Price' | 007ECBDD BA6CCF7E00 mov edx, $007ECF6C 007ECBE2 8BC7 mov eax, edi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECBE4 E8CB9FCDFF call 004C6BB4 007ECBE9 50 push eax 007ECBEA DD45E0 fld qword ptr [ebp-$20] 007ECBED 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 007ECBF0 E897C1C2FF call 00418D8C 007ECBF5 8D5598 lea edx, [ebp-$68] 007ECBF8 58 pop eax 007ECBF9 8B08 mov ecx, [eax] 007ECBFB FF91B4000000 call dword ptr [ecx+$00B4] 007ECC01 8BC7 mov eax, edi 007ECC03 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007ECC05 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007ECC0B 8B9E0C030000 mov ebx, [esi+$030C] 007ECC11 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECC13 E8BC8CCDFF call 004C58D4 007ECC18 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECC1A E88D13CFFF call 004DDFAC 007ECC1F 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007ECC21 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'Price' | 007ECC24 BA6CCF7E00 mov edx, $007ECF6C * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECC29 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECC2F E8809FCDFF call 004C6BB4 007ECC34 8D5590 lea edx, [ebp-$70] 007ECC37 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECC39 FF5160 call dword ptr [ecx+$60] 007ECC3C 8B4D90 mov ecx, [ebp-$70] 007ECC3F 8D4594 lea eax, [ebp-$6C] * Possible String Reference to: 'UPdate YF_Money_CR Set Price=' | 007ECC42 BA7CCF7E00 mov edx, $007ECF7C * Reference to: System.@LStrCat3; | 007ECC47 E8F489C1FF call 00405640 007ECC4C 8B4594 mov eax, [ebp-$6C] 007ECC4F 50 push eax 007ECC50 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECC52 E85513CFFF call 004DDFAC 007ECC57 5A pop edx 007ECC58 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ECC5A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFID='' | 007ECC5D 68A4CF7E00 push $007ECFA4 * Possible String Reference to: 'YFID' | 007ECC62 BA2CCF7E00 mov edx, $007ECF2C * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ECC67 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECC6D E8429FCDFF call 004C6BB4 007ECC72 8D5584 lea edx, [ebp-$7C] 007ECC75 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007ECC77 FF5160 call dword ptr [ecx+$60] 007ECC7A 8B4584 mov eax, [ebp-$7C] 007ECC7D 8D5588 lea edx, [ebp-$78] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECC80 E867DCC1FF call 0040A8EC 007ECC85 FF7588 push dword ptr [ebp-$78] 007ECC88 683CCF7E00 push $007ECF3C 007ECC8D 8D458C lea eax, [ebp-$74] 007ECC90 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007ECC95 E81A8AC1FF call 004056B4 007ECC9A 8B458C mov eax, [ebp-$74] 007ECC9D 50 push eax 007ECC9E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECCA0 E80713CFFF call 004DDFAC 007ECCA5 5A pop edx 007ECCA6 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ECCA8 FF5138 call dword ptr [ecx+$38] 007ECCAB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007ECCAD E82212CFFF call 004DDED4 * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007ECCB2 8B9E0C030000 mov ebx, [esi+$030C] 007ECCB8 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECCBA E8158CCDFF call 004C58D4 007ECCBF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECCC1 E8E612CFFF call 004DDFAC 007ECCC6 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007ECCC8 FF5244 call dword ptr [edx+$44] 007ECCCB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECCCD E8DA12CFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ECCD2 BABCCF7E00 mov edx, $007ECFBC 007ECCD7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ECCD9 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ECCDC 68D8CF7E00 push $007ECFD8 007ECCE1 FF75F0 push dword ptr [ebp-$10] 007ECCE4 68E8CF7E00 push $007ECFE8 007ECCE9 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 007ECCEF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECCF2 E8F5DBC1FF call 0040A8EC 007ECCF7 FFB57CFFFFFF push dword ptr [ebp+$FFFFFF7C] 007ECCFD 8D4580 lea eax, [ebp-$80] 007ECD00 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007ECD05 E8AA89C1FF call 004056B4 007ECD0A 8B4580 mov eax, [ebp-$80] 007ECD0D 50 push eax 007ECD0E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ECD10 E89712CFFF call 004DDFAC 007ECD15 5A pop edx 007ECD16 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ECD18 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ECD1B 68F4CF7E00 push $007ECFF4 007ECD20 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmYFFP_HX.v2PSPropertiesEditValueChanged(Sender : TObject); begin (* 007ED0B0 55 push ebp 007ED0B1 8BEC mov ebp, esp 007ED0B3 B908000000 mov ecx, $00000008 007ED0B8 6A00 push $00 007ED0BA 6A00 push $00 007ED0BC 49 dec ecx 007ED0BD 75F9 jnz 007ED0B8 007ED0BF 53 push ebx 007ED0C0 56 push esi 007ED0C1 8BDA mov ebx, edx 007ED0C3 8BF0 mov esi, eax 007ED0C5 33C0 xor eax, eax 007ED0C7 55 push ebp * Possible String Reference to: '閃x胫^[嬪]' | 007ED0C8 6898D27E00 push $007ED298 ***** TRY | 007ED0CD 64FF30 push dword ptr fs:[eax] 007ED0D0 648920 mov fs:[eax], esp 007ED0D3 8D55FC lea edx, [ebp-$04] 007ED0D6 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; | 007ED0D8 E8DF25DAFF call 0058F6BC 007ED0DD 8D55F4 lea edx, [ebp-$0C] 007ED0E0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED0E3 E804D8C1FF call 0040A8EC 007ED0E8 837DF400 cmp dword ptr [ebp-$0C], +$00 007ED0EC 750D jnz 007ED0FB 007ED0EE 8D45FC lea eax, [ebp-$04] 007ED0F1 BAB0D27E00 mov edx, $007ED2B0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007ED0F6 E8C182C1FF call 004053BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007ED0FB 8B863C030000 mov eax, [esi+$033C] * 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; | 007ED101 E846F2E6FF 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; | 007ED106 E8594AE6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007ED10B 8B4050 mov eax, [eax+$50] 007ED10E 8D55F0 lea edx, [ebp-$10] 007ED111 8B08 mov ecx, [eax] 007ED113 FF5110 call dword ptr [ecx+$10] 007ED116 8B45F0 mov eax, [ebp-$10] 007ED119 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED11C E8CBD7C1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ED121 8B9E64030000 mov ebx, [esi+$0364] 007ED127 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ED129 E812B3CDFF call 004C8440 007ED12E 8D55DC lea edx, [ebp-$24] 007ED131 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED134 E8B3D7C1FF call 0040A8EC 007ED139 8B55DC mov edx, [ebp-$24] 007ED13C 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ED13F E884BCC2FF call 00418DC8 007ED144 8D45E0 lea eax, [ebp-$20] 007ED147 50 push eax 007ED148 8B55F8 mov edx, [ebp-$08] 007ED14B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ED14D E8629ACDFF call 004C6BB4 007ED152 5A pop edx 007ED153 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007ED155 FF91B4000000 call dword ptr [ecx+$00B4] 007ED15B 8BC3 mov eax, ebx 007ED15D 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007ED15F FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007ED165 8B9E0C030000 mov ebx, [esi+$030C] 007ED16B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ED16D E86287CDFF call 004C58D4 007ED172 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED174 E8330ECFFF call 004DDFAC 007ED179 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007ED17B FF5244 call dword ptr [edx+$44] 007ED17E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED180 E8270ECFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ED185 BABCD27E00 mov edx, $007ED2BC 007ED18A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ED18C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ED18F 68D8D27E00 push $007ED2D8 007ED194 FF75F8 push dword ptr [ebp-$08] 007ED197 68E8D27E00 push $007ED2E8 007ED19C 8D55D4 lea edx, [ebp-$2C] 007ED19F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED1A2 E845D7C1FF call 0040A8EC 007ED1A7 FF75D4 push dword ptr [ebp-$2C] 007ED1AA 8D45D8 lea eax, [ebp-$28] 007ED1AD BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007ED1B2 E8FD84C1FF call 004056B4 007ED1B7 8B45D8 mov eax, [ebp-$28] 007ED1BA 50 push eax 007ED1BB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED1BD E8EA0DCFFF call 004DDFAC 007ED1C2 5A pop edx 007ED1C3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ED1C5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ED1C8 68F4D27E00 push $007ED2F4 007ED1CD 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYFFP_HX.v2BatchNoPropertiesEditValueChanged(Sender : TObject); begin (* 007ED354 55 push ebp 007ED355 8BEC mov ebp, esp 007ED357 B907000000 mov ecx, $00000007 007ED35C 6A00 push $00 007ED35E 6A00 push $00 007ED360 49 dec ecx 007ED361 75F9 jnz 007ED35C 007ED363 51 push ecx 007ED364 53 push ebx 007ED365 56 push esi 007ED366 8BDA mov ebx, edx 007ED368 8BF0 mov esi, eax 007ED36A 33C0 xor eax, eax 007ED36C 55 push ebp * Possible String Reference to: '樗u胫^[嬪]' | 007ED36D 6824D57E00 push $007ED524 ***** TRY | 007ED372 64FF30 push dword ptr fs:[eax] 007ED375 648920 mov fs:[eax], esp 007ED378 8D55FC lea edx, [ebp-$04] 007ED37B 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; | 007ED37D E83A23DAFF call 0058F6BC * Reference to control TfrmYFFP_HX.Tv2 : TcxGridDBTableView | 007ED382 8B863C030000 mov eax, [esi+$033C] * 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; | 007ED388 E8BFEFE6FF 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; | 007ED38D E8D247E6FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 007ED392 8B4050 mov eax, [eax+$50] 007ED395 8D55F4 lea edx, [ebp-$0C] 007ED398 8B08 mov ecx, [eax] 007ED39A FF5110 call dword ptr [ecx+$10] 007ED39D 8B45F4 mov eax, [ebp-$0C] 007ED3A0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED3A3 E844D5C1FF call 0040A8EC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007ED3A8 8B9E64030000 mov ebx, [esi+$0364] 007ED3AE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ED3B0 E88BB0CDFF call 004C8440 007ED3B5 8D55E0 lea edx, [ebp-$20] 007ED3B8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED3BB E82CD5C1FF call 0040A8EC 007ED3C0 8B55E0 mov edx, [ebp-$20] 007ED3C3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ED3C6 E8FDB9C2FF call 00418DC8 007ED3CB 8D45E4 lea eax, [ebp-$1C] 007ED3CE 50 push eax 007ED3CF 8B55F8 mov edx, [ebp-$08] 007ED3D2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ED3D4 E8DB97CDFF call 004C6BB4 007ED3D9 5A pop edx 007ED3DA 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007ED3DC FF91B4000000 call dword ptr [ecx+$00B4] 007ED3E2 8BC3 mov eax, ebx 007ED3E4 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007ED3E6 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007ED3EC 8B9E0C030000 mov ebx, [esi+$030C] 007ED3F2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ED3F4 E8DB84CDFF call 004C58D4 007ED3F9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED3FB E8AC0BCFFF call 004DDFAC 007ED400 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007ED402 FF5244 call dword ptr [edx+$44] 007ED405 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED407 E8A00BCFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ED40C BA3CD57E00 mov edx, $007ED53C 007ED411 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ED413 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ED416 6858D57E00 push $007ED558 007ED41B FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007ED41E 6868D57E00 push $007ED568 007ED423 8D55D8 lea edx, [ebp-$28] 007ED426 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED429 E8BED4C1FF call 0040A8EC 007ED42E FF75D8 push dword ptr [ebp-$28] 007ED431 6874D57E00 push $007ED574 007ED436 8D45DC lea eax, [ebp-$24] 007ED439 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007ED43E E87182C1FF call 004056B4 007ED443 8B45DC mov eax, [ebp-$24] 007ED446 50 push eax 007ED447 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007ED449 E85E0BCFFF call 004DDFAC 007ED44E 5A pop edx 007ED44F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007ED451 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ED454 6880D57E00 push $007ED580 007ED459 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYFFP_HX.v2PayMentPropertiesButtonClick(Sender : TObject); begin (* 007ED5D4 55 push ebp 007ED5D5 8BEC mov ebp, esp 007ED5D7 51 push ecx 007ED5D8 B906000000 mov ecx, $00000006 007ED5DD 6A00 push $00 007ED5DF 6A00 push $00 007ED5E1 49 dec ecx 007ED5E2 75F9 jnz 007ED5DD 007ED5E4 51 push ecx 007ED5E5 874DFC xchg [ebp-$04], ecx 007ED5E8 53 push ebx 007ED5E9 56 push esi 007ED5EA 8BF0 mov esi, eax 007ED5EC 33C0 xor eax, eax 007ED5EE 55 push ebp 007ED5EF 682BD87E00 push $007ED82B ***** TRY | 007ED5F4 64FF30 push dword ptr fs:[eax] 007ED5F7 648920 mov fs:[eax], esp 007ED5FA 33C0 xor eax, eax 007ED5FC 55 push ebp 007ED5FD 6801D87E00 push $007ED801 ***** TRY | 007ED602 64FF30 push dword ptr fs:[eax] 007ED605 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.OrderNoChange(Sender : TObject); begin (* 007ED908 55 push ebp 007ED909 8BEC mov ebp, esp 007ED90B 6A00 push $00 007ED90D 6A00 push $00 007ED90F 53 push ebx 007ED910 56 push esi 007ED911 8BD8 mov ebx, eax 007ED913 33C0 xor eax, eax 007ED915 55 push ebp * Possible String Reference to: '閧q腓^[YY]脥@' | 007ED916 6874D97E00 push $007ED974 ***** TRY | 007ED91B 64FF30 push dword ptr fs:[eax] 007ED91E 648920 mov fs:[eax], esp 007ED921 8D55F8 lea edx, [ebp-$08] * Reference to control TfrmYFFP_HX.OrderNo : TEdit | 007ED924 8B838C030000 mov eax, [ebx+$038C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007ED92A E8C1ACC9FF call 004885F0 007ED92F 8B45F8 mov eax, [ebp-$08] 007ED932 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED935 E8B2CFC1FF call 0040A8EC 007ED93A 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 007ED93D E8B27CC1FF call 004055F4 007ED942 83F803 cmp eax, +$03 007ED945 7C0F jl 007ED956 * Reference to control TfrmYFFP_HX.ToolButton2 : TToolButton | 007ED947 8B8314030000 mov eax, [ebx+$0314] 007ED94D 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007ED951 E8FE6BC1FF call 00404554 007ED956 33C0 xor eax, eax 007ED958 5A pop edx 007ED959 59 pop ecx 007ED95A 59 pop ecx 007ED95B 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[YY]脥@' | 007ED95E 687BD97E00 push $007ED97B 007ED963 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 007ED966 E8B979C1FF call 00405324 007ED96B 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007ED96E E8B179C1FF call 00405324 007ED973 C3 ret * Reference to: System.@HandleFinally; | 007ED974 E97B71C1FF jmp 00404AF4 007ED979 EBE8 jmp 007ED963 ****** END | 007ED97B 5E pop esi 007ED97C 5B pop ebx 007ED97D 59 pop ecx 007ED97E 59 pop ecx 007ED97F 5D pop ebp 007ED980 C3 ret *) end; procedure TfrmYFFP_HX.OrderNoKeyPress(Sender : TObject); begin (* 007ED984 55 push ebp 007ED985 8BEC mov ebp, esp 007ED987 51 push ecx 007ED988 B904000000 mov ecx, $00000004 007ED98D 6A00 push $00 007ED98F 6A00 push $00 007ED991 49 dec ecx 007ED992 75F9 jnz 007ED98D 007ED994 51 push ecx 007ED995 874DFC xchg [ebp-$04], ecx 007ED998 53 push ebx 007ED999 8945FC mov [ebp-$04], eax 007ED99C 33C0 xor eax, eax 007ED99E 55 push ebp * Possible String Reference to: '閑o胨[嬪]' | 007ED99F 688ADB7E00 push $007EDB8A ***** TRY | 007ED9A4 64FF30 push dword ptr fs:[eax] 007ED9A7 648920 mov fs:[eax], esp 007ED9AA 80390D cmp byte ptr [ecx], $0D 007ED9AD 0F859C010000 jnz 007EDB4F 007ED9B3 8D55F4 lea edx, [ebp-$0C] 007ED9B6 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.OrderNo : TEdit | 007ED9B9 8B808C030000 mov eax, [eax+$038C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007ED9BF E82CACC9FF call 004885F0 007ED9C4 8B45F4 mov eax, [ebp-$0C] 007ED9C7 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED9CA E81DCFC1FF call 0040A8EC 007ED9CF 8B45F8 mov eax, [ebp-$08] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 007ED9D2 E81D7CC1FF call 004055F4 007ED9D7 83F804 cmp eax, +$04 007ED9DA 0F8C6F010000 jl 007EDB4F 007ED9E0 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.begdate : TDateTimePicker | 007ED9E3 8B8054030000 mov eax, [eax+$0354] 007ED9E9 8B10 mov edx, [eax] * Reference to method TDateTimePicker.SetFocus() | 007ED9EB FF92C4000000 call dword ptr [edx+$00C4] 007ED9F1 33C0 xor eax, eax 007ED9F3 55 push ebp 007ED9F4 6848DB7E00 push $007EDB48 ***** TRY | 007ED9F9 64FF30 push dword ptr fs:[eax] 007ED9FC 648920 mov fs:[eax], esp 007ED9FF 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EDA02 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007EDA08 E8479BCDFF call 004C7554 007EDA0D 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EDA10 8B9820030000 mov ebx, [eax+$0320] 007EDA16 33D2 xor edx, edx 007EDA18 8BC3 mov eax, ebx 007EDA1A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 007EDA1C FF9190010000 call dword ptr [ecx+$0190] 007EDA22 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EDA24 E8AB7ECDFF call 004C58D4 007EDA29 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA2B E87C05CFFF call 004DDFAC 007EDA30 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EDA32 FF5244 call dword ptr [edx+$44] 007EDA35 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA37 E87005CFFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 007EDA3C BAA0DB7E00 mov edx, $007EDBA0 007EDA41 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA43 FF5138 call dword ptr [ecx+$38] 007EDA46 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA48 E85F05CFFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 007EDA4D BAC0DB7E00 mov edx, $007EDBC0 007EDA52 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA54 FF5138 call dword ptr [ecx+$38] 007EDA57 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA59 E84E05CFFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 007EDA5E BAE0DB7E00 mov edx, $007EDBE0 007EDA63 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA65 FF5138 call dword ptr [ecx+$38] 007EDA68 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA6A E83D05CFFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId' | 007EDA6F BA14DC7E00 mov edx, $007EDC14 007EDA74 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA76 FF5138 call dword ptr [ecx+$38] 007EDA79 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA7B E82C05CFFF call 004DDFAC * Possible String Reference to: 'where C.orderNo like :OrderNo' | 007EDA80 BA4CDC7E00 mov edx, $007EDC4C 007EDA85 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA87 FF5138 call dword ptr [ecx+$38] 007EDA8A 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EDA8C E81B05CFFF call 004DDFAC * Possible String Reference to: 'and A.CRType='应付款发票登记'' | 007EDA91 BA74DC7E00 mov edx, $007EDC74 007EDA96 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EDA98 FF5138 call dword ptr [ecx+$38] 007EDA9B 689CDC7E00 push $007EDC9C 007EDAA0 8D55D8 lea edx, [ebp-$28] 007EDAA3 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.OrderNo : TEdit | 007EDAA6 8B808C030000 mov eax, [eax+$038C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007EDAAC E83FABC9FF call 004885F0 007EDAB1 8B45D8 mov eax, [ebp-$28] 007EDAB4 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EDAB7 E830CEC1FF call 0040A8EC 007EDABC FF75DC push dword ptr [ebp-$24] 007EDABF 689CDC7E00 push $007EDC9C 007EDAC4 8D45E0 lea eax, [ebp-$20] 007EDAC7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EDACC E8E37BC1FF call 004056B4 007EDAD1 8B55E0 mov edx, [ebp-$20] 007EDAD4 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EDAD7 E8ECB2C2FF call 00418DC8 007EDADC 8D45E4 lea eax, [ebp-$1C] 007EDADF 50 push eax 007EDAE0 8BC3 mov eax, ebx * Reference to: ADODB.TCustomADODataSet.GetParameters(TCustomADODataSet):TParameters; | 007EDAE2 E809E8CEFF call 004DC2F0 007EDAE7 BAA4DC7E00 mov edx, $007EDCA4 * Reference to: ADODB.TParameters.ParamByName(TParameters;WideString):TParameter; | 007EDAEC E80F69CEFF call 004D4400 007EDAF1 5A pop edx * Reference to: ADODB.TParameter.SetValue(TParameter;Variant;Variant); | 007EDAF2 E8CD7BCEFF call 004D56C4 007EDAF7 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EDAF9 E8CA7DCDFF call 004C58C8 007EDAFE 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EDB01 8B9064030000 mov edx, [eax+$0364] 007EDB07 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EDB0A 8B8020030000 mov eax, [eax+$0320] | 007EDB10 E87B93FCFF call 007B6E90 007EDB15 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EDB18 8B9064030000 mov edx, [eax+$0364] 007EDB1E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EDB21 8B8020030000 mov eax, [eax+$0320] | 007EDB27 E8EC94FCFF call 007B7018 007EDB2C 33C0 xor eax, eax 007EDB2E 5A pop edx 007EDB2F 59 pop ecx 007EDB30 59 pop ecx 007EDB31 648910 mov fs:[eax], edx ****** FINALLY | 007EDB34 684FDB7E00 push $007EDB4F 007EDB39 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EDB3C 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 007EDB42 E82D9ACDFF call 004C7574 007EDB47 C3 ret * Reference to: System.@HandleFinally; | 007EDB48 E9A76FC1FF jmp 00404AF4 007EDB4D EBEA jmp 007EDB39 ****** END | 007EDB4F 33C0 xor eax, eax 007EDB51 5A pop edx 007EDB52 59 pop ecx 007EDB53 59 pop ecx 007EDB54 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[嬪]' | 007EDB57 6891DB7E00 push $007EDB91 007EDB5C 8D45D8 lea eax, [ebp-$28] * Reference to: System.@LStrClr(void;void); | 007EDB5F E8C077C1FF call 00405324 007EDB64 8D45DC lea eax, [ebp-$24] 007EDB67 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EDB6C E8D777C1FF call 00405348 007EDB71 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EDB74 E8FB6AC2FF call 00414674 007EDB79 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 007EDB7C E8A377C1FF call 00405324 007EDB81 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 007EDB84 E89B77C1FF call 00405324 007EDB89 C3 ret * Reference to: System.@HandleFinally; | 007EDB8A E9656FC1FF jmp 00404AF4 007EDB8F EBCB jmp 007EDB5C ****** END | 007EDB91 5B pop ebx 007EDB92 8BE5 mov esp, ebp 007EDB94 5D pop ebp 007EDB95 C3 ret *) end; procedure TfrmYFFP_HX.v2Column2PropertiesButtonClick(Sender : TObject); begin (* 007EDCB4 55 push ebp 007EDCB5 8BEC mov ebp, esp 007EDCB7 51 push ecx 007EDCB8 B90F000000 mov ecx, $0000000F 007EDCBD 6A00 push $00 007EDCBF 6A00 push $00 007EDCC1 49 dec ecx 007EDCC2 75F9 jnz 007EDCBD 007EDCC4 51 push ecx 007EDCC5 874DFC xchg [ebp-$04], ecx 007EDCC8 53 push ebx 007EDCC9 56 push esi 007EDCCA 8BF0 mov esi, eax 007EDCCC 33C0 xor eax, eax 007EDCCE 55 push ebp * Possible String Reference to: '閺j牍^[嬪]' | 007EDCCF 6860E07E00 push $007EE060 ***** TRY | 007EDCD4 64FF30 push dword ptr fs:[eax] 007EDCD7 648920 mov fs:[eax], esp 007EDCDA 33C0 xor eax, eax 007EDCDC 55 push ebp 007EDCDD 680CE07E00 push $007EE00C ***** TRY | 007EDCE2 64FF30 push dword ptr fs:[eax] 007EDCE5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.v2ComTaitouPropertiesButtonClick(Sender : TObject); begin (* 007EE1A8 55 push ebp 007EE1A9 8BEC mov ebp, esp 007EE1AB 51 push ecx 007EE1AC B906000000 mov ecx, $00000006 007EE1B1 6A00 push $00 007EE1B3 6A00 push $00 007EE1B5 49 dec ecx 007EE1B6 75F9 jnz 007EE1B1 007EE1B8 51 push ecx 007EE1B9 874DFC xchg [ebp-$04], ecx 007EE1BC 53 push ebx 007EE1BD 56 push esi 007EE1BE 8BF0 mov esi, eax 007EE1C0 33C0 xor eax, eax 007EE1C2 55 push ebp 007EE1C3 68FFE37E00 push $007EE3FF ***** TRY | 007EE1C8 64FF30 push dword ptr fs:[eax] 007EE1CB 648920 mov fs:[eax], esp 007EE1CE 33C0 xor eax, eax 007EE1D0 55 push ebp 007EE1D1 68D5E37E00 push $007EE3D5 ***** TRY | 007EE1D6 64FF30 push dword ptr fs:[eax] 007EE1D9 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.VBZPropertiesButtonClick(Sender : TObject); begin (* 007EE4E4 55 push ebp 007EE4E5 8BEC mov ebp, esp 007EE4E7 51 push ecx 007EE4E8 B906000000 mov ecx, $00000006 007EE4ED 6A00 push $00 007EE4EF 6A00 push $00 007EE4F1 49 dec ecx 007EE4F2 75F9 jnz 007EE4ED 007EE4F4 51 push ecx 007EE4F5 874DFC xchg [ebp-$04], ecx 007EE4F8 53 push ebx 007EE4F9 56 push esi 007EE4FA 8BF0 mov esi, eax 007EE4FC 33C0 xor eax, eax 007EE4FE 55 push ebp * Possible String Reference to: '椴c脬^[嬪]' | 007EE4FF 683DE77E00 push $007EE73D ***** TRY | 007EE504 64FF30 push dword ptr fs:[eax] 007EE507 648920 mov fs:[eax], esp 007EE50A 33C0 xor eax, eax 007EE50C 55 push ebp 007EE50D 6813E77E00 push $007EE713 ***** TRY | 007EE512 64FF30 push dword ptr fs:[eax] 007EE515 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.v2Column4PropertiesButtonClick(Sender : TObject); begin (* 007EE828 55 push ebp 007EE829 8BEC mov ebp, esp 007EE82B 51 push ecx 007EE82C B906000000 mov ecx, $00000006 007EE831 6A00 push $00 007EE833 6A00 push $00 007EE835 49 dec ecx 007EE836 75F9 jnz 007EE831 007EE838 51 push ecx 007EE839 874DFC xchg [ebp-$04], ecx 007EE83C 53 push ebx 007EE83D 56 push esi 007EE83E 8BF0 mov esi, eax 007EE840 33C0 xor eax, eax 007EE842 55 push ebp * Possible String Reference to: '閚`脬^[嬪]' | 007EE843 6881EA7E00 push $007EEA81 ***** TRY | 007EE848 64FF30 push dword ptr fs:[eax] 007EE84B 648920 mov fs:[eax], esp 007EE84E 33C0 xor eax, eax 007EE850 55 push ebp 007EE851 6857EA7E00 push $007EEA57 ***** TRY | 007EE856 64FF30 push dword ptr fs:[eax] 007EE859 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX.v2Column3PropertiesEditValueChanged(Sender : TObject); begin (* 007EEB6C 55 push ebp 007EEB6D 8BEC mov ebp, esp 007EEB6F B905000000 mov ecx, $00000005 007EEB74 6A00 push $00 007EEB76 6A00 push $00 007EEB78 49 dec ecx 007EEB79 75F9 jnz 007EEB74 007EEB7B 51 push ecx 007EEB7C 53 push ebx 007EEB7D 56 push esi 007EEB7E 8BDA mov ebx, edx 007EEB80 8BF0 mov esi, eax 007EEB82 33C0 xor eax, eax 007EEB84 55 push ebp * Possible String Reference to: '/^脎^[嬪]' | 007EEB85 68C0EC7E00 push $007EECC0 ***** TRY | 007EEB8A 64FF30 push dword ptr fs:[eax] 007EEB8D 648920 mov fs:[eax], esp 007EEB90 8D55FC lea edx, [ebp-$04] 007EEB93 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; | 007EEB95 E8220BDAFF call 0058F6BC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EEB9A 8B9E64030000 mov ebx, [esi+$0364] 007EEBA0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EEBA2 E89998CDFF call 004C8440 007EEBA7 8D55E8 lea edx, [ebp-$18] 007EEBAA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEBAD E83ABDC1FF call 0040A8EC 007EEBB2 8B55E8 mov edx, [ebp-$18] 007EEBB5 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEBB8 E80BA2C2FF call 00418DC8 007EEBBD 8D45EC lea eax, [ebp-$14] 007EEBC0 50 push eax * Possible String Reference to: 'P_CodeName' | 007EEBC1 BAD8EC7E00 mov edx, $007EECD8 007EEBC6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEBC8 E8E77FCDFF call 004C6BB4 007EEBCD 5A pop edx 007EEBCE 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EEBD0 FF91B4000000 call dword ptr [ecx+$00B4] 007EEBD6 8BC3 mov eax, ebx 007EEBD8 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EEBDA FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EEBE0 8B9E0C030000 mov ebx, [esi+$030C] 007EEBE6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEBE8 E8E76CCDFF call 004C58D4 007EEBED 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEBEF E8B8F3CEFF call 004DDFAC 007EEBF4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EEBF6 FF5244 call dword ptr [edx+$44] 007EEBF9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEBFB E8ACF3CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEC00 BAECEC7E00 mov edx, $007EECEC 007EEC05 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEC07 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_CodeName='' | 007EEC0A 6808ED7E00 push $007EED08 007EEC0F 8D55E0 lea edx, [ebp-$20] 007EEC12 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEC15 E8D2BCC1FF call 0040A8EC 007EEC1A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEC1D 6824ED7E00 push $007EED24 007EEC22 8D45E4 lea eax, [ebp-$1C] 007EEC25 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEC2A E8856AC1FF call 004056B4 007EEC2F 8B45E4 mov eax, [ebp-$1C] 007EEC32 50 push eax 007EEC33 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEC35 E872F3CEFF call 004DDFAC 007EEC3A 5A pop edx 007EEC3B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEC3D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EEC40 6830ED7E00 push $007EED30 * Possible String Reference to: 'YFId' | 007EEC45 BA48ED7E00 mov edx, $007EED48 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EEC4A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEC50 E85F7FCDFF call 004C6BB4 007EEC55 8D55D4 lea edx, [ebp-$2C] 007EEC58 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007EEC5A FF5160 call dword ptr [ecx+$60] 007EEC5D 8B45D4 mov eax, [ebp-$2C] 007EEC60 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEC63 E884BCC1FF call 0040A8EC 007EEC68 FF75D8 push dword ptr [ebp-$28] 007EEC6B 6858ED7E00 push $007EED58 007EEC70 8D45DC lea eax, [ebp-$24] 007EEC73 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEC78 E8376AC1FF call 004056B4 007EEC7D 8B45DC mov eax, [ebp-$24] 007EEC80 50 push eax 007EEC81 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEC83 E824F3CEFF call 004DDFAC 007EEC88 5A pop edx 007EEC89 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEC8B FF5138 call dword ptr [ecx+$38] 007EEC8E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EEC90 E83FF2CEFF call 004DDED4 007EEC95 33C0 xor eax, eax 007EEC97 5A pop edx 007EEC98 59 pop ecx 007EEC99 59 pop ecx 007EEC9A 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EEC9D 68C7EC7E00 push $007EECC7 007EECA2 8D45D4 lea eax, [ebp-$2C] 007EECA5 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EECAA E89966C1FF call 00405348 007EECAF 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EECB2 E8BD59C2FF call 00414674 007EECB7 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EECBA E86566C1FF call 00405324 007EECBF C3 ret * Reference to: System.@HandleFinally; | 007EECC0 E92F5EC1FF jmp 00404AF4 007EECC5 EBDB jmp 007EECA2 ****** END | 007EECC7 5E pop esi 007EECC8 5B pop ebx 007EECC9 8BE5 mov esp, ebp 007EECCB 5D pop ebp 007EECCC C3 ret *) end; procedure TfrmYFFP_HX.v2Column4PropertiesEditValueChanged(Sender : TObject); begin (* 007EED5C 55 push ebp 007EED5D 8BEC mov ebp, esp 007EED5F B905000000 mov ecx, $00000005 007EED64 6A00 push $00 007EED66 6A00 push $00 007EED68 49 dec ecx 007EED69 75F9 jnz 007EED64 007EED6B 51 push ecx 007EED6C 53 push ebx 007EED6D 56 push esi 007EED6E 8BDA mov ebx, edx 007EED70 8BF0 mov esi, eax 007EED72 33C0 xor eax, eax 007EED74 55 push ebp * Possible String Reference to: '?\脎^[嬪]' | 007EED75 68B0EE7E00 push $007EEEB0 ***** TRY | 007EED7A 64FF30 push dword ptr fs:[eax] 007EED7D 648920 mov fs:[eax], esp 007EED80 8D55FC lea edx, [ebp-$04] 007EED83 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; | 007EED85 E83209DAFF call 0058F6BC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EED8A 8B9E64030000 mov ebx, [esi+$0364] 007EED90 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EED92 E8A996CDFF call 004C8440 007EED97 8D55E8 lea edx, [ebp-$18] 007EED9A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EED9D E84ABBC1FF call 0040A8EC 007EEDA2 8B55E8 mov edx, [ebp-$18] 007EEDA5 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEDA8 E81BA0C2FF call 00418DC8 007EEDAD 8D45EC lea eax, [ebp-$14] 007EEDB0 50 push eax * Possible String Reference to: 'P_Spec' | 007EEDB1 BAC8EE7E00 mov edx, $007EEEC8 007EEDB6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEDB8 E8F77DCDFF call 004C6BB4 007EEDBD 5A pop edx 007EEDBE 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EEDC0 FF91B4000000 call dword ptr [ecx+$00B4] 007EEDC6 8BC3 mov eax, ebx 007EEDC8 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EEDCA FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EEDD0 8B9E0C030000 mov ebx, [esi+$030C] 007EEDD6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEDD8 E8F76ACDFF call 004C58D4 007EEDDD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEDDF E8C8F1CEFF call 004DDFAC 007EEDE4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EEDE6 FF5244 call dword ptr [edx+$44] 007EEDE9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEDEB E8BCF1CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEDF0 BAD8EE7E00 mov edx, $007EEED8 007EEDF5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEDF7 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_Spec='' | 007EEDFA 68F4EE7E00 push $007EEEF4 007EEDFF 8D55E0 lea edx, [ebp-$20] 007EEE02 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEE05 E8E2BAC1FF call 0040A8EC 007EEE0A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEE0D 680CEF7E00 push $007EEF0C 007EEE12 8D45E4 lea eax, [ebp-$1C] 007EEE15 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEE1A E89568C1FF call 004056B4 007EEE1F 8B45E4 mov eax, [ebp-$1C] 007EEE22 50 push eax 007EEE23 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEE25 E882F1CEFF call 004DDFAC 007EEE2A 5A pop edx 007EEE2B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEE2D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EEE30 6818EF7E00 push $007EEF18 * Possible String Reference to: 'YFId' | 007EEE35 BA30EF7E00 mov edx, $007EEF30 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EEE3A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEE40 E86F7DCDFF call 004C6BB4 007EEE45 8D55D4 lea edx, [ebp-$2C] 007EEE48 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007EEE4A FF5160 call dword ptr [ecx+$60] 007EEE4D 8B45D4 mov eax, [ebp-$2C] 007EEE50 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEE53 E894BAC1FF call 0040A8EC 007EEE58 FF75D8 push dword ptr [ebp-$28] 007EEE5B 6840EF7E00 push $007EEF40 007EEE60 8D45DC lea eax, [ebp-$24] 007EEE63 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEE68 E84768C1FF call 004056B4 007EEE6D 8B45DC mov eax, [ebp-$24] 007EEE70 50 push eax 007EEE71 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEE73 E834F1CEFF call 004DDFAC 007EEE78 5A pop edx 007EEE79 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEE7B FF5138 call dword ptr [ecx+$38] 007EEE7E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EEE80 E84FF0CEFF call 004DDED4 007EEE85 33C0 xor eax, eax 007EEE87 5A pop edx 007EEE88 59 pop ecx 007EEE89 59 pop ecx 007EEE8A 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EEE8D 68B7EE7E00 push $007EEEB7 007EEE92 8D45D4 lea eax, [ebp-$2C] 007EEE95 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EEE9A E8A964C1FF call 00405348 007EEE9F 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EEEA2 E8CD57C2FF call 00414674 007EEEA7 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EEEAA E87564C1FF call 00405324 007EEEAF C3 ret * Reference to: System.@HandleFinally; | 007EEEB0 E93F5CC1FF jmp 00404AF4 007EEEB5 EBDB jmp 007EEE92 ****** END | 007EEEB7 5E pop esi 007EEEB8 5B pop ebx 007EEEB9 8BE5 mov esp, ebp 007EEEBB 5D pop ebp 007EEEBC C3 ret *) end; procedure TfrmYFFP_HX.v2KPNOPropertiesEditValueChanged(Sender : TObject); begin (* 007EEF44 55 push ebp 007EEF45 8BEC mov ebp, esp 007EEF47 B905000000 mov ecx, $00000005 007EEF4C 6A00 push $00 007EEF4E 6A00 push $00 007EEF50 49 dec ecx 007EEF51 75F9 jnz 007EEF4C 007EEF53 51 push ecx 007EEF54 53 push ebx 007EEF55 56 push esi 007EEF56 8BDA mov ebx, edx 007EEF58 8BF0 mov esi, eax 007EEF5A 33C0 xor eax, eax 007EEF5C 55 push ebp * Possible String Reference to: '閃Z脎^[嬪]' | 007EEF5D 6898F07E00 push $007EF098 ***** TRY | 007EEF62 64FF30 push dword ptr fs:[eax] 007EEF65 648920 mov fs:[eax], esp 007EEF68 8D55FC lea edx, [ebp-$04] 007EEF6B 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; | 007EEF6D E84A07DAFF call 0058F6BC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EEF72 8B9E64030000 mov ebx, [esi+$0364] 007EEF78 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EEF7A E8C194CDFF call 004C8440 007EEF7F 8D55E8 lea edx, [ebp-$18] 007EEF82 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEF85 E862B9C1FF call 0040A8EC 007EEF8A 8B55E8 mov edx, [ebp-$18] 007EEF8D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEF90 E8339EC2FF call 00418DC8 007EEF95 8D45EC lea eax, [ebp-$14] 007EEF98 50 push eax * Possible String Reference to: 'KPNO' | 007EEF99 BAB0F07E00 mov edx, $007EF0B0 007EEF9E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEFA0 E80F7CCDFF call 004C6BB4 007EEFA5 5A pop edx 007EEFA6 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EEFA8 FF91B4000000 call dword ptr [ecx+$00B4] 007EEFAE 8BC3 mov eax, ebx 007EEFB0 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EEFB2 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EEFB8 8B9E0C030000 mov ebx, [esi+$030C] 007EEFBE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEFC0 E80F69CDFF call 004C58D4 007EEFC5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEFC7 E8E0EFCEFF call 004DDFAC 007EEFCC 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EEFCE FF5244 call dword ptr [edx+$44] 007EEFD1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EEFD3 E8D4EFCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEFD8 BAC0F07E00 mov edx, $007EF0C0 007EEFDD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EEFDF FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPNO='' | 007EEFE2 68DCF07E00 push $007EF0DC 007EEFE7 8D55E0 lea edx, [ebp-$20] 007EEFEA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEFED E8FAB8C1FF call 0040A8EC 007EEFF2 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEFF5 68F0F07E00 push $007EF0F0 007EEFFA 8D45E4 lea eax, [ebp-$1C] 007EEFFD BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF002 E8AD66C1FF call 004056B4 007EF007 8B45E4 mov eax, [ebp-$1C] 007EF00A 50 push eax 007EF00B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF00D E89AEFCEFF call 004DDFAC 007EF012 5A pop edx 007EF013 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF015 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EF018 68FCF07E00 push $007EF0FC * Possible String Reference to: 'YFId' | 007EF01D BA14F17E00 mov edx, $007EF114 * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EF022 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF028 E8877BCDFF call 004C6BB4 007EF02D 8D55D4 lea edx, [ebp-$2C] 007EF030 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007EF032 FF5160 call dword ptr [ecx+$60] 007EF035 8B45D4 mov eax, [ebp-$2C] 007EF038 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF03B E8ACB8C1FF call 0040A8EC 007EF040 FF75D8 push dword ptr [ebp-$28] 007EF043 6824F17E00 push $007EF124 007EF048 8D45DC lea eax, [ebp-$24] 007EF04B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF050 E85F66C1FF call 004056B4 007EF055 8B45DC mov eax, [ebp-$24] 007EF058 50 push eax 007EF059 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF05B E84CEFCEFF call 004DDFAC 007EF060 5A pop edx 007EF061 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF063 FF5138 call dword ptr [ecx+$38] 007EF066 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EF068 E867EECEFF call 004DDED4 007EF06D 33C0 xor eax, eax 007EF06F 5A pop edx 007EF070 59 pop ecx 007EF071 59 pop ecx 007EF072 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EF075 689FF07E00 push $007EF09F 007EF07A 8D45D4 lea eax, [ebp-$2C] 007EF07D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF082 E8C162C1FF call 00405348 007EF087 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EF08A E8E555C2FF call 00414674 007EF08F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EF092 E88D62C1FF call 00405324 007EF097 C3 ret * Reference to: System.@HandleFinally; | 007EF098 E9575AC1FF jmp 00404AF4 007EF09D EBDB jmp 007EF07A ****** END | 007EF09F 5E pop esi 007EF0A0 5B pop ebx 007EF0A1 8BE5 mov esp, ebp 007EF0A3 5D pop ebp 007EF0A4 C3 ret *) end; procedure TfrmYFFP_HX.v2KPDMNoPropertiesEditValueChanged(Sender : TObject); begin (* 007EF128 55 push ebp 007EF129 8BEC mov ebp, esp 007EF12B B905000000 mov ecx, $00000005 007EF130 6A00 push $00 007EF132 6A00 push $00 007EF134 49 dec ecx 007EF135 75F9 jnz 007EF130 007EF137 51 push ecx 007EF138 53 push ebx 007EF139 56 push esi 007EF13A 8BDA mov ebx, edx 007EF13C 8BF0 mov esi, eax 007EF13E 33C0 xor eax, eax 007EF140 55 push ebp * Possible String Reference to: '閟X脎^[嬪]' | 007EF141 687CF27E00 push $007EF27C ***** TRY | 007EF146 64FF30 push dword ptr fs:[eax] 007EF149 648920 mov fs:[eax], esp 007EF14C 8D55FC lea edx, [ebp-$04] 007EF14F 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; | 007EF151 E86605DAFF call 0058F6BC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EF156 8B9E64030000 mov ebx, [esi+$0364] 007EF15C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EF15E E8DD92CDFF call 004C8440 007EF163 8D55E8 lea edx, [ebp-$18] 007EF166 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF169 E87EB7C1FF call 0040A8EC 007EF16E 8B55E8 mov edx, [ebp-$18] 007EF171 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EF174 E84F9CC2FF call 00418DC8 007EF179 8D45EC lea eax, [ebp-$14] 007EF17C 50 push eax * Possible String Reference to: 'KPDMNo' | 007EF17D BA94F27E00 mov edx, $007EF294 007EF182 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF184 E82B7ACDFF call 004C6BB4 007EF189 5A pop edx 007EF18A 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 007EF18C FF91B4000000 call dword ptr [ecx+$00B4] 007EF192 8BC3 mov eax, ebx 007EF194 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 007EF196 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007EF19C 8B9E0C030000 mov ebx, [esi+$030C] 007EF1A2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EF1A4 E82B67CDFF call 004C58D4 007EF1A9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF1AB E8FCEDCEFF call 004DDFAC 007EF1B0 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EF1B2 FF5244 call dword ptr [edx+$44] 007EF1B5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF1B7 E8F0EDCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EF1BC BAA4F27E00 mov edx, $007EF2A4 007EF1C1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF1C3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPDMNo='' | 007EF1C6 68C0F27E00 push $007EF2C0 007EF1CB 8D55E0 lea edx, [ebp-$20] 007EF1CE 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF1D1 E816B7C1FF call 0040A8EC 007EF1D6 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EF1D9 68D8F27E00 push $007EF2D8 007EF1DE 8D45E4 lea eax, [ebp-$1C] 007EF1E1 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF1E6 E8C964C1FF call 004056B4 007EF1EB 8B45E4 mov eax, [ebp-$1C] 007EF1EE 50 push eax 007EF1EF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF1F1 E8B6EDCEFF call 004DDFAC 007EF1F6 5A pop edx 007EF1F7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF1F9 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EF1FC 68E4F27E00 push $007EF2E4 * Possible String Reference to: 'YFId' | 007EF201 BAFCF27E00 mov edx, $007EF2FC * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EF206 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF20C E8A379CDFF call 004C6BB4 007EF211 8D55D4 lea edx, [ebp-$2C] 007EF214 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 007EF216 FF5160 call dword ptr [ecx+$60] 007EF219 8B45D4 mov eax, [ebp-$2C] 007EF21C 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF21F E8C8B6C1FF call 0040A8EC 007EF224 FF75D8 push dword ptr [ebp-$28] 007EF227 680CF37E00 push $007EF30C 007EF22C 8D45DC lea eax, [ebp-$24] 007EF22F BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF234 E87B64C1FF call 004056B4 007EF239 8B45DC mov eax, [ebp-$24] 007EF23C 50 push eax 007EF23D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF23F E868EDCEFF call 004DDFAC 007EF244 5A pop edx 007EF245 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF247 FF5138 call dword ptr [ecx+$38] 007EF24A 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EF24C E883ECCEFF call 004DDED4 007EF251 33C0 xor eax, eax 007EF253 5A pop edx 007EF254 59 pop ecx 007EF255 59 pop ecx 007EF256 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EF259 6883F27E00 push $007EF283 007EF25E 8D45D4 lea eax, [ebp-$2C] 007EF261 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF266 E8DD60C1FF call 00405348 007EF26B 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EF26E E80154C2FF call 00414674 007EF273 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EF276 E8A960C1FF call 00405324 007EF27B C3 ret * Reference to: System.@HandleFinally; | 007EF27C E97358C1FF jmp 00404AF4 007EF281 EBDB jmp 007EF25E ****** END | 007EF283 5E pop esi 007EF284 5B pop ebx 007EF285 8BE5 mov esp, ebp 007EF287 5D pop ebp 007EF288 C3 ret *) end; procedure TfrmYFFP_HX.KPNOKeyPress(Sender : TObject); begin (* 007EF310 55 push ebp 007EF311 8BEC mov ebp, esp 007EF313 6A00 push $00 007EF315 6A00 push $00 007EF317 6A00 push $00 007EF319 6A00 push $00 007EF31B 53 push ebx 007EF31C 8945FC mov [ebp-$04], eax 007EF31F 33C0 xor eax, eax 007EF321 55 push ebp 007EF322 687CF47E00 push $007EF47C ***** TRY | 007EF327 64FF30 push dword ptr fs:[eax] 007EF32A 648920 mov fs:[eax], esp 007EF32D 33C0 xor eax, eax 007EF32F 55 push ebp 007EF330 6852F47E00 push $007EF452 ***** TRY | 007EF335 64FF30 push dword ptr fs:[eax] 007EF338 648920 mov fs:[eax], esp 007EF33B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EF33E 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007EF344 E80B82CDFF call 004C7554 007EF349 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EF34C 8B9820030000 mov ebx, [eax+$0320] 007EF352 33D2 xor edx, edx 007EF354 8BC3 mov eax, ebx 007EF356 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 007EF358 FF9190010000 call dword ptr [ecx+$0190] 007EF35E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EF360 E86F65CDFF call 004C58D4 007EF365 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF367 E840ECCEFF call 004DDFAC 007EF36C 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007EF36E FF5244 call dword ptr [edx+$44] 007EF371 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF373 E834ECCEFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 007EF378 BA90F47E00 mov edx, $007EF490 007EF37D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF37F FF5138 call dword ptr [ecx+$38] 007EF382 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF384 E823ECCEFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 007EF389 BAB0F47E00 mov edx, $007EF4B0 007EF38E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF390 FF5138 call dword ptr [ecx+$38] 007EF393 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF395 E812ECCEFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 007EF39A BAD0F47E00 mov edx, $007EF4D0 007EF39F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF3A1 FF5138 call dword ptr [ecx+$38] 007EF3A4 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF3A6 E801ECCEFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId ' | 007EF3AB BA04F57E00 mov edx, $007EF504 007EF3B0 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF3B2 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where A.KPNO='%' | 007EF3B5 683CF57E00 push $007EF53C 007EF3BA 8D55F0 lea edx, [ebp-$10] 007EF3BD 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.KPNO : TEdit | 007EF3C0 8B80B0030000 mov eax, [eax+$03B0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007EF3C6 E82592C9FF call 004885F0 007EF3CB 8B45F0 mov eax, [ebp-$10] 007EF3CE 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF3D1 E816B5C1FF call 0040A8EC 007EF3D6 FF75F4 push dword ptr [ebp-$0C] 007EF3D9 6854F57E00 push $007EF554 * Possible String Reference to: '' and A.CRType='应付款发票登记' ' | 007EF3DE 6860F57E00 push $007EF560 007EF3E3 8D45F8 lea eax, [ebp-$08] 007EF3E6 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007EF3EB E8C462C1FF call 004056B4 007EF3F0 8B45F8 mov eax, [ebp-$08] 007EF3F3 50 push eax 007EF3F4 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007EF3F6 E8B1EBCEFF call 004DDFAC 007EF3FB 5A pop edx 007EF3FC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007EF3FE FF5138 call dword ptr [ecx+$38] 007EF401 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EF403 E8C064CDFF call 004C58C8 007EF408 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EF40B 8B9064030000 mov edx, [eax+$0364] 007EF411 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EF414 8B8020030000 mov eax, [eax+$0320] | 007EF41A E8717AFCFF call 007B6E90 007EF41F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.CDS_HZ : TClientDataSet | 007EF422 8B9064030000 mov edx, [eax+$0364] 007EF428 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EF42B 8B8020030000 mov eax, [eax+$0320] | 007EF431 E8E27BFCFF call 007B7018 007EF436 33C0 xor eax, eax 007EF438 5A pop edx 007EF439 59 pop ecx 007EF43A 59 pop ecx 007EF43B 648910 mov fs:[eax], edx ****** FINALLY | 007EF43E 6859F47E00 push $007EF459 007EF443 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryMain : TADOQuery | 007EF446 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 007EF44C E82381CDFF call 004C7574 007EF451 C3 ret * Reference to: System.@HandleFinally; | 007EF452 E99D56C1FF jmp 00404AF4 007EF457 EBEA jmp 007EF443 ****** END | 007EF459 33C0 xor eax, eax 007EF45B 5A pop edx 007EF45C 59 pop ecx 007EF45D 59 pop ecx 007EF45E 648910 mov fs:[eax], edx ****** FINALLY | 007EF461 6883F47E00 push $007EF483 007EF466 8D45F0 lea eax, [ebp-$10] * Reference to: System.@LStrClr(void;void); | 007EF469 E8B65EC1FF call 00405324 007EF46E 8D45F4 lea eax, [ebp-$0C] 007EF471 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF476 E8CD5EC1FF call 00405348 007EF47B C3 ret * Reference to: System.@HandleFinally; | 007EF47C E97356C1FF jmp 00404AF4 007EF481 EBE3 jmp 007EF466 ****** END | 007EF483 5B pop ebx 007EF484 8BE5 mov esp, ebp 007EF486 5D pop ebp 007EF487 C3 ret *) end; procedure TfrmYFFP_HX._PROC_007E9C31(Sender : TObject); begin (* 007E9C31 7064 jo 007E9C97 007E9C33 61 popa 007E9C34 7465 jz 007E9C9B 007E9C36 205946 and [ecx+$46], bl 007E9C39 5F pop edi 007E9C3A 4D dec ebp 007E9C3B 6F outsd 007E9C3C 6E outsb 007E9C3D 65795F jns 007E9C9F 007E9C40 4B dec ebx 007E9C41 43 inc ebx 007E9C42 205365 and [ebx+$65], dl 007E9C45 7420 jz 007E9C67 007E9C47 4B dec ebx 007E9C48 43 inc ebx 007E9C49 42 inc edx 007E9C4A 42 inc edx 007E9C4B 4D dec ebp 007E9C4C 6F outsd 007E9C4D 6E outsb 007E9C4E 65793D jns 007E9C8E 007E9C51 4B dec ebx 007E9C52 43 inc ebx 007E9C53 42 inc edx 007E9C54 42 inc edx 007E9C55 4D dec ebp 007E9C56 6F outsd 007E9C57 6E outsb 007E9C58 65792D jns 007E9C88 007E9C5B 00FF add bh, bh 007E9C5D FFFF DB $FF, $FF // 007E9C5F FF0D00000020 dec dword ptr [$20000000] 007E9C65 7768 jnbe 007E9CCF 007E9C67 657265 jb 007E9CCF 007E9C6A 204352 and [ebx+$52], al 007E9C6D 49 dec ecx 007E9C6E 44 inc esp 007E9C6F 3D27000000 cmp eax, $00000027 007E9C74 FFFF DB $FF, $FF // 007E9C76 FFFF DB $FF, $FF // 007E9C78 0400 add al, +$00 007E9C7A 0000 add [eax], al 007E9C7C 43 inc ebx 007E9C7D 52 push edx 007E9C7E 49 dec ecx 007E9C7F 44 inc esp 007E9C80 0000 add [eax], al 007E9C82 0000 add [eax], al 007E9C84 55 push ebp 007E9C85 8BEC mov ebp, esp 007E9C87 53 push ebx 007E9C88 8BD8 mov ebx, eax 007E9C8A 33C0 xor eax, eax 007E9C8C 55 push ebp * Possible String Reference to: '殪滕[]' | 007E9C8D 68039D7E00 push $007E9D03 ***** TRY | 007E9C92 64FF30 push dword ptr fs:[eax] 007E9C95 648920 mov fs:[eax], esp * Possible String Reference to: '财务管理' | 007E9C98 B9189D7E00 mov ecx, $007E9D18 * Reference to control ADOTemp : N.A. | 007E9C9D 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 007E9CA3 B82C9D7E00 mov eax, $007E9D2C | 007E9CA8 E8F7DCFCFF call 007B79A4 * Reference to control Label3 : TLabel | 007E9CAD 8B8308030000 mov eax, [ebx+$0308] | 007E9CB3 E8D0ACFCFF call 007B4988 007E9CB8 83C4F8 add esp, -$08 007E9CBB DD1C24 fstp qword ptr [esp] 007E9CBE 9B wait * Reference to control ConPerson1 : N.A. | 007E9CBF 8B8358030000 mov eax, [ebx+$0358] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007E9CC5 E86285C8FF call 0047222C * Reference to control ConPerson1 : N.A. | 007E9CCA 8B8358030000 mov eax, [ebx+$0358] 007E9CD0 DD8010020000 fld qword ptr [eax+$0210] 007E9CD6 D825389D7E00 fsub dword ptr [$007E9D38] 007E9CDC 83C4F8 add esp, -$08 007E9CDF DD1C24 fstp qword ptr [esp] 007E9CE2 9B wait * Reference to control Label9 : N.A. | 007E9CE3 8B8354030000 mov eax, [ebx+$0354] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007E9CE9 E83E85C8FF call 0047222C 007E9CEE 8BC3 mov eax, ebx | 007E9CF0 E8A7F9FFFF call 007E969C 007E9CF5 33C0 xor eax, eax 007E9CF7 5A pop edx 007E9CF8 59 pop ecx 007E9CF9 59 pop ecx 007E9CFA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[]' | 007E9CFD 680A9D7E00 push $007E9D0A 007E9D02 C3 ret *) end; procedure TfrmYFFP_HX._PROC_007E9F79(Sender : TObject); begin (* 007E9F79 8BEC mov ebp, esp 007E9F7B B92B000000 mov ecx, $0000002B 007E9F80 6A00 push $00 007E9F82 6A00 push $00 007E9F84 49 dec ecx 007E9F85 75F9 jnz 007E9F80 007E9F87 51 push ecx 007E9F88 53 push ebx 007E9F89 56 push esi 007E9F8A 57 push edi 007E9F8B 8945FC mov [ebp-$04], eax 007E9F8E 33C0 xor eax, eax 007E9F90 55 push ebp 007E9F91 6845A77E00 push $007EA745 ***** TRY | 007E9F96 64FF30 push dword ptr fs:[eax] 007E9F99 648920 mov fs:[eax], esp 007E9F9C 33C0 xor eax, eax 007E9F9E 55 push ebp 007E9F9F 68EFA57E00 push $007EA5EF ***** TRY | 007E9FA4 64FF30 push dword ptr fs:[eax] 007E9FA7 648920 mov fs:[eax], esp 007E9FAA 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007E9FAD 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 007E9FB3 E8741ECFFF call 004DBE2C * Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer; | 007E9FB8 E8D782CEFF call 004D2294 * Possible String Reference to: 'YF_Money_CR' | 007E9FBD 6860A77E00 push $007EA760 007E9FC2 6A04 push $04 007E9FC4 6A01 push $01 007E9FC6 8D55F8 lea edx, [ebp-$08] 007E9FC9 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007E9FCC 8B800C030000 mov eax, [eax+$030C] * Possible String Reference to: 'YF' | 007E9FD2 B974A77E00 mov ecx, $007EA774 * Reference to : TfrmSelExportField._PROC_007B7708() | 007E9FD7 E82CD7FCFF call 007B7708 007E9FDC 84C0 test al, al 007E9FDE 753A jnz 007EA01A 007E9FE0 33DB xor ebx, ebx 007E9FE2 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP_HX.ADOQueryCmd : TADOQuery | 007E9FE5 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 007E9FEB E83C1ECFFF call 004DBE2C * Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection); | 007E9FF0 E8EB82CEFF call 004D22E0 007E9FF5 6A00 push $00 * Possible String Reference to: '提示' | 007E9FF7 B978A77E00 mov ecx, $007EA778 * Possible String Reference to: '取最大号失败！' | 007E9FFC BA80A77E00 mov edx, $007EA780 *) end; procedure TfrmYFFP_HX._PROC_007EA801(Sender : TObject); begin (* 007EA801 7064 jo 007EA867 007EA803 61 popa 007EA804 7465 jz 007EA86B 007EA806 205946 and [ecx+$46], bl 007EA809 5F pop edi 007EA80A 4D dec ebp 007EA80B 6F outsd 007EA80C 6E outsb 007EA80D 65795F jns 007EA86F 007EA810 43 inc ebx 007EA811 52 push edx 007EA812 49 dec ecx 007EA813 44 inc esp 007EA814 207365 and [ebx+$65], dh 007EA817 7420 jz 007EA839 007EA819 43 inc ebx 007EA81A 52 push edx 007EA81B 49 dec ecx 007EA81C 44 inc esp 007EA81D 3D43524944 cmp eax, $44495243 007EA822 2B31 sub esi, dword ptr [ecx] 007EA824 0000 add [eax], al 007EA826 0000 add [eax], al 007EA828 FFFF DB $FF, $FF // 007EA82A FFFF DB $FF, $FF // 007EA82C 1C00 sbb al, $00 007EA82E 0000 add [eax], al 007EA830 7365 jnb 007EA897 007EA832 6C insb 007EA833 656374202A arpl gs:[eax+$2A], si 007EA838 206672 and [esi+$72], ah 007EA83B 6F outsd 007EA83C 6D insd 007EA83D 205946 and [ecx+$46], bl 007EA840 5F pop edi 007EA841 4D dec ebp 007EA842 6F outsd 007EA843 6E outsb 007EA844 65795F jns 007EA8A6 007EA847 43 inc ebx 007EA848 52 push edx 007EA849 49 dec ecx 007EA84A 44 inc esp 007EA84B 2000 and [eax], al 007EA84D 0000 add [eax], al 007EA84F 00FF add bh, bh 007EA851 FFFF DB $FF, $FF // 007EA853 FF2400 jmp dword ptr [eax+eax] 007EA856 0000 add [eax], al 007EA858 7365 jnb 007EA8BF 007EA85A 6C insb 007EA85B 656374202A arpl gs:[eax+$2A], si 007EA860 206672 and [esi+$72], ah 007EA863 6F outsd 007EA864 6D insd 007EA865 205946 and [ecx+$46], bl 007EA868 5F pop edi 007EA869 4D dec ebp 007EA86A 6F outsd 007EA86B 6E outsb 007EA86C 65795F jns 007EA8CE 007EA86F 4B dec ebx 007EA870 43 inc ebx 007EA871 207768 and [edi+$68], dh 007EA874 657265 jb 007EA8DC 007EA877 2031 and [ecx], dh 007EA879 3C3E cmp al, $3E 007EA87B 3100 xor [eax], eax 007EA87D 0000 add [eax], al 007EA87F 00FF add bh, bh 007EA881 FFFF DB $FF, $FF // 007EA883 FF09 dec dword ptr [ecx] 007EA885 0000 add [eax], al 007EA887 004661 add [esi+$61], al 007EA88A 63746F72 arpl [edi+ebp*2+$72], si 007EA88E 794E jns 007EA8DE 007EA890 6F outsd 007EA891 0000 add [eax], al 007EA893 00FF add bh, bh 007EA895 FFFF DB $FF, $FF // 007EA897 FF07 inc dword ptr [edi] 007EA899 0000 add [eax], al 007EA89B 005A64 add [edx+$64], bl 007EA89E 7953 jns 007EA8F3 007EA8A0 7472 jz 007EA914 007EA8A2 3100 xor [eax], eax 007EA8A4 FFFF DB $FF, $FF // 007EA8A6 FFFF DB $FF, $FF // 007EA8A8 06 push es 007EA8A9 0000 add [eax], al 007EA8AB 00D3 add bl, dl 007EA8AD A6 cmpsb 007EA8AE B8B6B8B600 mov eax, $00B6B8B6 007EA8B3 00FF add bh, bh 007EA8B5 FFFF DB $FF, $FF // 007EA8B7 FF2400 jmp dword ptr [eax+eax] 007EA8BA 0000 add [eax], al 007EA8BC 7365 jnb 007EA923 007EA8BE 6C insb 007EA8BF 656374202A arpl gs:[eax+$2A], si 007EA8C4 206672 and [esi+$72], ah 007EA8C7 6F outsd 007EA8C8 6D insd 007EA8C9 205946 and [ecx+$46], bl 007EA8CC 5F pop edi 007EA8CD 4D dec ebp 007EA8CE 6F outsd 007EA8CF 6E outsb 007EA8D0 65795F jns 007EA932 007EA8D3 43 inc ebx 007EA8D4 52 push edx 007EA8D5 207768 and [edi+$68], dh 007EA8D8 657265 jb 007EA940 007EA8DB 2031 and [ecx], dh 007EA8DD 3C3E cmp al, $3E 007EA8DF 3100 xor [eax], eax 007EA8E1 0000 add [eax], al 007EA8E3 00FF add bh, bh 007EA8E5 FFFF DB $FF, $FF // 007EA8E7 FF0400 inc dword ptr [eax+eax] 007EA8EA 0000 add [eax], al 007EA8EC 59 pop ecx 007EA8ED 46 inc esi 007EA8EE 49 dec ecx 007EA8EF 44 inc esp 007EA8F0 0000 add [eax], al 007EA8F2 0000 add [eax], al 007EA8F4 FFFF DB $FF, $FF // 007EA8F6 FFFF DB $FF, $FF // 007EA8F8 06 push es 007EA8F9 0000 add [eax], al 007EA8FB 004669 add [esi+$69], al 007EA8FE 6C insb 007EA8FF 6C insb 007EA900 657200 jb 007EA903 007EA903 00FF add bh, bh 007EA905 FFFF DB $FF, $FF // 007EA907 FF06 inc dword ptr [esi] 007EA909 0000 add [eax], al 007EA90B 004352 add [ebx+$52], al 007EA90E 54 push esp 007EA90F 7970 jns 007EA981 007EA911 650000 add gs:[eax], al 007EA914 FFFF DB $FF, $FF // 007EA916 FFFF DB $FF, $FF // 007EA918 0E push cs 007EA919 0000 add [eax], al 007EA91B 00D3 add bl, dl 007EA91D A6 cmpsb 007EA91E B8B6BFEEB7 mov eax, $B7EEBFB6 007EA923 A2C6B1B5C7 mov byte ptr [$C7B5B1C6], al 007EA928 BCC70000FF mov esp, $FF0000C7 007EA92D FFFF DB $FF, $FF // 007EA92F FF06 inc dword ptr [esi] 007EA931 0000 add [eax], al 007EA933 004352 add [ebx+$52], al 007EA936 46 inc esi 007EA937 6C insb 007EA938 61 popa 007EA939 670000 add [bx+si], al 007EA93C FFFF DB $FF, $FF // 007EA93E FFFF DB $FF, $FF // 007EA940 07 pop es 007EA941 0000 add [eax], al 007EA943 005174 add [ecx+$74], dl 007EA946 7946 jns 007EA98E 007EA948 6C insb 007EA949 61 popa 007EA94A 6700FF add bh, bh 007EA94D FFFF DB $FF, $FF // 007EA94F FF06 inc dword ptr [esi] 007EA951 0000 add [eax], al 007EA953 004352 add [ebx+$52], al 007EA956 54 push esp 007EA957 696D650000FFFF imul ebp, [ebp+$65], $FFFF0000 007EA95E FFFF DB $FF, $FF // 007EA960 06 push es 007EA961 0000 add [eax], al 007EA963 004650 add [esi+$50], al 007EA966 59 pop ecx 007EA967 46 inc esi 007EA968 49 dec ecx 007EA969 44 inc esp 007EA96A 0000 add [eax], al 007EA96C FFFF DB $FF, $FF // 007EA96E FFFF DB $FF, $FF // 007EA970 07 pop es 007EA971 0000 add [eax], al 007EA973 004B50 add [ebx+$50], cl 007EA976 4D dec ebp 007EA977 6F outsd 007EA978 6E outsb 007EA979 657900 jns 007EA97C 007EA97C FFFF DB $FF, $FF // 007EA97E FFFF DB $FF, $FF // 007EA980 0400 add al, +$00 007EA982 0000 add [eax], al 007EA984 59 pop ecx 007EA985 46 inc esi 007EA986 49 dec ecx 007EA987 640000 add fs:[eax], al 007EA98A 0000 add [eax], al 007EA98C D4 aam 007EA98D F6D0 not al 007EA98F D0CA ror dl, 1 007EA991 A7 cmpsd 007EA992 B0DC mov al, $DC 007EA994 2100 and [eax], eax 007EA996 0000 add [eax], al *) end; procedure TfrmYFFP_HX._PROC_007EABBD(Sender : TObject); begin (* 007EABBD 50 push eax 007EABBE 6461 popa 007EABC0 7465 jz 007EAC27 007EABC2 205943 and [ecx+$43], bl 007EABC5 4C dec esp 007EABC6 5F pop edi 007EABC7 53 push ebx 007EABC8 47 inc edi 007EABC9 5F pop edi 007EABCA 48 dec eax 007EABCB 5A pop edx 007EABCC 2000 and [eax], al 007EABCE 0000 add [eax], al 007EABD0 FFFF DB $FF, $FF // 007EABD2 FFFF DB $FF, $FF // 007EABD4 0500000020 add eax, +$20000000 007EABD9 53 push ebx 007EABDA 657420 jz 007EABFD 007EABDD 0000 add [eax], al 007EABDF 00FF add bh, bh 007EABE1 FFFF DB $FF, $FF // 007EABE3 FF02 inc dword ptr [edx] 007EABE5 0000 add [eax], al 007EABE7 003D270000FF add [$FF000027], bh 007EABED FFFF DB $FF, $FF // 007EABEF FF01 inc dword ptr [ecx] 007EABF1 0000 add [eax], al 007EABF3 0027 add [edi], ah 007EABF5 0000 add [eax], al 007EABF7 00FF add bh, bh 007EABF9 FFFF DB $FF, $FF // 007EABFB FF050000003D inc dword ptr [$3D000000] 007EAC01 4E dec esi 007EAC02 55 push ebp 007EAC03 4C dec esp 007EAC04 4C dec esp 007EAC05 0000 add [eax], al 007EAC07 00FF add bh, bh 007EAC09 FFFF DB $FF, $FF // 007EAC0B FF09 dec dword ptr [ecx] 007EAC0D 0000 add [eax], al 007EAC0F 002C4564697465 add [$65746964+eax*2], ch 007EAC16 723D jb 007EAC55 007EAC18 27 daa 007EAC19 0000 add [eax], al 007EAC1B 00FF add bh, bh 007EAC1D FFFF DB $FF, $FF // 007EAC1F FF1400 call dword ptr [eax+eax] 007EAC22 0000 add [eax], al 007EAC24 2C45 sub al, $45 007EAC26 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EAC2F 657464 jz 007EAC96 007EAC32 61 popa 007EAC33 7465 jz 007EAC9A 007EAC35 2829 sub [ecx], ch 007EAC37 2000 and [eax], al 007EAC39 0000 add [eax], al 007EAC3B 00FF add bh, bh 007EAC3D FFFF DB $FF, $FF // 007EAC3F FF0E dec dword ptr [esi] 007EAC41 0000 add [eax], al 007EAC43 0020 add [eax], ah 007EAC45 7768 jnbe 007EACAF 007EAC47 657265 jb 007EACAF 007EAC4A 205375 and [ebx+$75], dl 007EAC4D 624964 bound ecx, qword ptr [ecx+$64] 007EAC50 3D270000FF cmp eax, $FF000027 007EAC55 FFFF DB $FF, $FF // 007EAC57 FF0500000053 inc dword ptr [$53000000] 007EAC5D 7562 jnz 007EACC1 007EAC5F 49 dec ecx 007EAC60 640000 add fs:[eax], al 007EAC63 00558B add [ebp-$75], dl 007EAC66 EC in al, dx 007EAC67 B91A000000 mov ecx, $0000001A 007EAC6C 6A00 push $00 007EAC6E 6A00 push $00 007EAC70 49 dec ecx 007EAC71 75F9 jnz 007EAC6C 007EAC73 51 push ecx 007EAC74 53 push ebx 007EAC75 56 push esi 007EAC76 8BF2 mov esi, edx 007EAC78 8BD8 mov ebx, eax 007EAC7A 33C0 xor eax, eax 007EAC7C 55 push ebp * Possible String Reference to: '殚樍毽^[嬪]' | 007EAC7D 6806B27E00 push $007EB206 ***** TRY | 007EAC82 64FF30 push dword ptr fs:[eax] 007EAC85 648920 mov fs:[eax], esp 007EAC88 8D55FC lea edx, [ebp-$04] 007EAC8B 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; | 007EAC8D E82A4ADAFF call 0058F6BC 007EAC92 8D55E0 lea edx, [ebp-$20] 007EAC95 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EAC98 E84FFCC1FF call 0040A8EC 007EAC9D 837DE000 cmp dword ptr [ebp-$20], +$00 007EACA1 750D jnz 007EACB0 007EACA3 8D45FC lea eax, [ebp-$04] 007EACA6 BA1CB27E00 mov edx, $007EB21C * Reference to: System.@LStrLAsg(void;void;void;void); | 007EACAB E80CA7C1FF call 004053BC * Reference to control ADOTemp : N.A. | 007EACB0 8B833C030000 mov eax, [ebx+$033C] * 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; | 007EACB6 E89116E7FF 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; | 007EACBB E8A46EE6FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007EACC0 8B4050 mov eax, [eax+$50] 007EACC3 8D55DC lea edx, [ebp-$24] 007EACC6 8B08 mov ecx, [eax] 007EACC8 FF5110 call dword ptr [ecx+$10] 007EACCB 8B45DC mov eax, [ebp-$24] 007EACCE 8D55E4 lea edx, [ebp-$1C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EACD1 E816FCC1FF call 0040A8EC * Reference to control Label11 : N.A. | 007EACD6 8BB364030000 mov esi, [ebx+$0364] 007EACDC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 007EACDE E85DD7CDFF call 004C8440 007EACE3 8D55C8 lea edx, [ebp-$38] 007EACE6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EACE9 E8FEFBC1FF call 0040A8EC 007EACEE 8B55C8 mov edx, [ebp-$38] 007EACF1 8D45CC lea eax, [ebp-$34] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EACF4 E8CFE0C2FF call 00418DC8 007EACF9 8D45CC lea eax, [ebp-$34] 007EACFC 50 push eax 007EACFD 8B55E4 mov edx, [ebp-$1C] 007EAD00 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EAD02 E8ADBECDFF call 004C6BB4 007EAD07 5A pop edx 007EAD08 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EAD0A FF91B4000000 call dword ptr [ecx+$00B4] 007EAD10 8D55C4 lea edx, [ebp-$3C] *) end; procedure TfrmYFFP_HX._PROC_007EB2E5(Sender : TObject); begin (* 007EB2E5 50 push eax 007EB2E6 6461 popa 007EB2E8 7465 jz 007EB34F 007EB2EA 205946 and [ecx+$46], bl 007EB2ED 5F pop edi 007EB2EE 4D dec ebp 007EB2EF 6F outsd 007EB2F0 6E outsb 007EB2F1 65795F jns 007EB353 007EB2F4 43 inc ebx 007EB2F5 52 push edx 007EB2F6 2000 and [eax], al 007EB2F8 FFFF DB $FF, $FF // 007EB2FA FFFF DB $FF, $FF // 007EB2FC 0500000020 add eax, +$20000000 007EB301 53 push ebx 007EB302 657420 jz 007EB325 007EB305 0000 add [eax], al 007EB307 00FF add bh, bh 007EB309 FFFF DB $FF, $FF // 007EB30B FF01 inc dword ptr [ecx] 007EB30D 0000 add [eax], al 007EB30F 003D000000FF add [$FF000000], bh 007EB315 FFFF DB $FF, $FF // 007EB317 FF09 dec dword ptr [ecx] 007EB319 0000 add [eax], al 007EB31B 002C4B add [ebx+ecx*2], ch 007EB31E 50 push eax 007EB31F 4D dec ebp 007EB320 6F outsd 007EB321 6E outsb 007EB322 65793D jns 007EB362 007EB325 0000 add [eax], al 007EB327 00FF add bh, bh 007EB329 FFFF DB $FF, $FF // 007EB32B FF09 dec dword ptr [ecx] 007EB32D 0000 add [eax], al 007EB32F 002C4564697465 add [$65746964+eax*2], ch 007EB336 723D jb 007EB375 007EB338 27 daa 007EB339 0000 add [eax], al 007EB33B 00FF add bh, bh 007EB33D FFFF DB $FF, $FF // 007EB33F FF1400 call dword ptr [eax+eax] 007EB342 0000 add [eax], al 007EB344 2C45 sub al, $45 007EB346 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EB34F 657464 jz 007EB3B6 007EB352 61 popa 007EB353 7465 jz 007EB3BA 007EB355 2829 sub [ecx], ch 007EB357 2000 and [eax], al 007EB359 0000 add [eax], al 007EB35B 00FF add bh, bh 007EB35D FFFF DB $FF, $FF // 007EB35F FF0D00000020 dec dword ptr [$20000000] 007EB365 7768 jnbe 007EB3CF 007EB367 657265 jb 007EB3CF 007EB36A 205946 and [ecx+$46], bl 007EB36D 49 dec ecx 007EB36E 643D27000000 cmp eax, $00000027 007EB374 FFFF DB $FF, $FF // 007EB376 FFFF DB $FF, $FF // 007EB378 0400 add al, +$00 007EB37A 0000 add [eax], al 007EB37C 59 pop ecx 007EB37D 46 inc esi 007EB37E 49 dec ecx 007EB37F 640000 add fs:[eax], al 007EB382 0000 add [eax], al 007EB384 FFFF DB $FF, $FF // 007EB386 FFFF DB $FF, $FF // 007EB388 2B00 sub eax, dword ptr [eax] 007EB38A 0000 add [eax], al 007EB38C 55 push ebp 007EB38D 7064 jo 007EB3F3 007EB38F 61 popa 007EB390 7465 jz 007EB3F7 007EB392 205946 and [ecx+$46], bl 007EB395 5F pop edi 007EB396 4D dec ebp 007EB397 6F outsd 007EB398 6E outsb 007EB399 65795F jns 007EB3FB 007EB39C 4B dec ebx 007EB39D 43 inc ebx 007EB39E 205365 and [ebx+$65], dl 007EB3A1 7420 jz 007EB3C3 007EB3A3 4B dec ebx 007EB3A4 43 inc ebx 007EB3A5 4B dec ebx 007EB3A6 50 push eax 007EB3A7 4D dec ebp 007EB3A8 6F outsd 007EB3A9 6E outsb 007EB3AA 65793D jns 007EB3EA 007EB3AD 4B dec ebx 007EB3AE 43 inc ebx 007EB3AF 4B dec ebx 007EB3B0 50 push eax 007EB3B1 4D dec ebp 007EB3B2 6F outsd 007EB3B3 6E outsb 007EB3B4 65792D jns 007EB3E4 007EB3B7 00FF add bh, bh 007EB3B9 FFFF DB $FF, $FF // 007EB3BB FF01 inc dword ptr [ecx] 007EB3BD 0000 add [eax], al 007EB3BF 002B add [ebx], ch 007EB3C1 0000 add [eax], al 007EB3C3 00FF add bh, bh 007EB3C5 FFFF DB $FF, $FF // 007EB3C7 FF0D00000020 dec dword ptr [$20000000] 007EB3CD 7768 jnbe 007EB437 007EB3CF 657265 jb 007EB437 007EB3D2 204352 and [ebx+$52], al 007EB3D5 49 dec ecx 007EB3D6 44 inc esp 007EB3D7 3D27000000 cmp eax, $00000027 007EB3DC FFFF DB $FF, $FF // 007EB3DE FFFF DB $FF, $FF // 007EB3E0 0400 add al, +$00 007EB3E2 0000 add [eax], al 007EB3E4 43 inc ebx 007EB3E5 52 push edx 007EB3E6 49 dec ecx 007EB3E7 44 inc esp 007EB3E8 0000 add [eax], al 007EB3EA 0000 add [eax], al 007EB3EC 55 push ebp 007EB3ED 8BEC mov ebp, esp 007EB3EF B908000000 mov ecx, $00000008 007EB3F4 6A00 push $00 007EB3F6 6A00 push $00 007EB3F8 49 dec ecx 007EB3F9 75F9 jnz 007EB3F4 007EB3FB 51 push ecx 007EB3FC 53 push ebx 007EB3FD 56 push esi 007EB3FE 8BDA mov ebx, edx 007EB400 8BF0 mov esi, eax 007EB402 33C0 xor eax, eax 007EB404 55 push ebp * Possible String Reference to: '轷斄胫^[嬪]' | 007EB405 68FAB57E00 push $007EB5FA ***** TRY | 007EB40A 64FF30 push dword ptr fs:[eax] 007EB40D 648920 mov fs:[eax], esp 007EB410 8D55FC lea edx, [ebp-$04] 007EB413 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; | 007EB415 E8A242DAFF call 0058F6BC * Reference to control ADOTemp : N.A. | 007EB41A 8B863C030000 mov eax, [esi+$033C] * 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; | 007EB420 E8270FE7FF 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; | 007EB425 E83A67E6FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007EB42A 8B4050 mov eax, [eax+$50] 007EB42D 8D55F4 lea edx, [ebp-$0C] 007EB430 8B08 mov ecx, [eax] 007EB432 FF5110 call dword ptr [ecx+$10] 007EB435 8B45F4 mov eax, [ebp-$0C] 007EB438 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB43B E8ACF4C1FF call 0040A8EC * Reference to control Label11 : N.A. | 007EB440 8B9E64030000 mov ebx, [esi+$0364] 007EB446 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EB448 E8F3CFCDFF call 004C8440 007EB44D 8D55E0 lea edx, [ebp-$20] 007EB450 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB453 E894F4C1FF call 0040A8EC 007EB458 8B55E0 mov edx, [ebp-$20] 007EB45B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EB45E E865D9C2FF call 00418DC8 007EB463 8D45E4 lea eax, [ebp-$1C] 007EB466 50 push eax 007EB467 8B55F8 mov edx, [ebp-$08] 007EB46A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EB46C E843B7CDFF call 004C6BB4 007EB471 5A pop edx 007EB472 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EB474 FF91B4000000 call dword ptr [ecx+$00B4] 007EB47A 8BC3 mov eax, ebx 007EB47C 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007EB47E FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007EB484 8B9E0C030000 mov ebx, [esi+$030C] 007EB48A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EB48C E843A4CDFF call 004C58D4 007EB491 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EB493 E8142BCFFF call 004DDFAC 007EB498 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007EB49A FF5244 call dword ptr [edx+$44] 007EB49D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EB49F E8082BCFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EB4A4 BA10B67E00 mov edx, $007EB610 007EB4A9 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EB4AB FF5138 call dword ptr [ecx+$38] 007EB4AE 8D55DC lea edx, [ebp-$24] 007EB4B1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB4B4 E833F4C1FF call 0040A8EC 007EB4B9 837DDC00 cmp dword ptr [ebp-$24], +$00 007EB4BD 7440 jz 007EB4FF * Possible String Reference to: ' Set ' | 007EB4BF 682CB67E00 push $007EB62C 007EB4C4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007EB4C7 683CB67E00 push $007EB63C 007EB4CC 8D55D4 lea edx, [ebp-$2C] 007EB4CF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EB4D2 E815F4C1FF call 0040A8EC 007EB4D7 FF75D4 push dword ptr [ebp-$2C] 007EB4DA 6848B67E00 push $007EB648 007EB4DF 8D45D8 lea eax, [ebp-$28] 007EB4E2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007EB4E7 E8C8A1C1FF call 004056B4 007EB4EC 8B45D8 mov eax, [ebp-$28] 007EB4EF 50 push eax 007EB4F0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EB4F2 E8B52ACFFF call 004DDFAC 007EB4F7 5A pop edx 007EB4F8 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EB4FA FF5138 call dword ptr [ecx+$38] 007EB4FD EB2B jmp 007EB52A 007EB4FF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EB501 E8A62ACFFF call 004DDFAC 007EB506 50 push eax * Possible String Reference to: ' Set ' | 007EB507 682CB67E00 push $007EB62C 007EB50C FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 007EB50F 6854B67E00 push $007EB654 007EB514 8D45D0 lea eax, [ebp-$30] 007EB517 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EB51C E893A1C1FF call 004056B4 007EB521 8B55D0 mov edx, [ebp-$30] 007EB524 58 pop eax 007EB525 8B08 mov ecx, [eax] 007EB527 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007EB52A 6864B67E00 push $007EB664 007EB52F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP_HX._PROC_007EB611(Sender : TObject); begin (* 007EB611 50 push eax 007EB612 6461 popa 007EB614 7465 jz 007EB67B 007EB616 205946 and [ecx+$46], bl 007EB619 5F pop edi 007EB61A 4D dec ebp 007EB61B 6F outsd 007EB61C 6E outsb 007EB61D 65795F jns 007EB67F 007EB620 43 inc ebx 007EB621 52 push edx 007EB622 2000 and [eax], al 007EB624 FFFF DB $FF, $FF // 007EB626 FFFF DB $FF, $FF // 007EB628 0500000020 add eax, +$20000000 007EB62D 53 push ebx 007EB62E 657420 jz 007EB651 007EB631 0000 add [eax], al 007EB633 00FF add bh, bh 007EB635 FFFF DB $FF, $FF // 007EB637 FF02 inc dword ptr [edx] 007EB639 0000 add [eax], al 007EB63B 003D270000FF add [$FF000027], bh 007EB641 FFFF DB $FF, $FF // 007EB643 FF01 inc dword ptr [ecx] 007EB645 0000 add [eax], al 007EB647 0027 add [edi], ah 007EB649 0000 add [eax], al 007EB64B 00FF add bh, bh 007EB64D FFFF DB $FF, $FF // 007EB64F FF050000003D inc dword ptr [$3D000000] 007EB655 4E dec esi 007EB656 55 push ebp 007EB657 4C dec esp 007EB658 4C dec esp 007EB659 0000 add [eax], al 007EB65B 00FF add bh, bh 007EB65D FFFF DB $FF, $FF // 007EB65F FF09 dec dword ptr [ecx] 007EB661 0000 add [eax], al 007EB663 002C4564697465 add [$65746964+eax*2], ch 007EB66A 723D jb 007EB6A9 007EB66C 27 daa 007EB66D 0000 add [eax], al 007EB66F 00FF add bh, bh 007EB671 FFFF DB $FF, $FF // 007EB673 FF1400 call dword ptr [eax+eax] 007EB676 0000 add [eax], al 007EB678 2C45 sub al, $45 007EB67A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EB683 657464 jz 007EB6EA 007EB686 61 popa 007EB687 7465 jz 007EB6EE 007EB689 2829 sub [ecx], ch 007EB68B 2000 and [eax], al 007EB68D 0000 add [eax], al 007EB68F 00FF add bh, bh 007EB691 FFFF DB $FF, $FF // 007EB693 FF0D00000020 dec dword ptr [$20000000] 007EB699 7768 jnbe 007EB703 007EB69B 657265 jb 007EB703 007EB69E 205946 and [ecx+$46], bl 007EB6A1 49 dec ecx 007EB6A2 643D27000000 cmp eax, $00000027 007EB6A8 FFFF DB $FF, $FF // 007EB6AA FFFF DB $FF, $FF // 007EB6AC 0400 add al, +$00 007EB6AE 0000 add [eax], al 007EB6B0 59 pop ecx 007EB6B1 46 inc esi 007EB6B2 49 dec ecx 007EB6B3 640000 add fs:[eax], al 007EB6B6 0000 add [eax], al 007EB6B8 55 push ebp 007EB6B9 8BEC mov ebp, esp 007EB6BB B911000000 mov ecx, $00000011 007EB6C0 6A00 push $00 007EB6C2 6A00 push $00 007EB6C4 49 dec ecx 007EB6C5 75F9 jnz 007EB6C0 007EB6C7 51 push ecx 007EB6C8 53 push ebx 007EB6C9 8945FC mov [ebp-$04], eax 007EB6CC 33C0 xor eax, eax 007EB6CE 55 push ebp * Possible String Reference to: '閝懥雿[嬪]' | 007EB6CF 687EB97E00 push $007EB97E ***** TRY | 007EB6D4 64FF30 push dword ptr fs:[eax] 007EB6D7 648920 mov fs:[eax], esp 007EB6DA 33C0 xor eax, eax 007EB6DC 55 push ebp 007EB6DD 68E3B87E00 push $007EB8E3 ***** TRY | 007EB6E2 64FF30 push dword ptr fs:[eax] 007EB6E5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EBE09(Sender : TObject); begin (* 007EBE09 50 push eax 007EBE0A 6461 popa 007EBE0C 7465 jz 007EBE73 007EBE0E 205946 and [ecx+$46], bl 007EBE11 5F pop edi 007EBE12 4D dec ebp 007EBE13 6F outsd 007EBE14 6E outsb 007EBE15 65795F jns 007EBE77 007EBE18 43 inc ebx 007EBE19 52 push edx 007EBE1A 2000 and [eax], al 007EBE1C FFFF DB $FF, $FF // 007EBE1E FFFF DB $FF, $FF // 007EBE20 0D00000020 or eax, $20000000 007EBE25 53 push ebx 007EBE26 657420 jz 007EBE49 007EBE29 59 pop ecx 007EBE2A 46 inc esi 007EBE2B 43 inc ebx 007EBE2C 6F outsd 007EBE2D 64653D27000000 cmp eax, $00000027 007EBE34 FFFF DB $FF, $FF // 007EBE36 FFFF DB $FF, $FF // 007EBE38 0100 add [eax], eax 007EBE3A 0000 add [eax], al 007EBE3C 27 daa 007EBE3D 0000 add [eax], al 007EBE3F 00FF add bh, bh 007EBE41 FFFF DB $FF, $FF // 007EBE43 FF0A dec dword ptr [edx] 007EBE45 0000 add [eax], al 007EBE47 0020 add [eax], ah 007EBE49 2C59 sub al, $59 007EBE4B 46 inc esi 007EBE4C 4E dec esi 007EBE4D 61 popa 007EBE4E 6D insd 007EBE4F 653D270000FF cmp eax, $FF000027 007EBE55 FFFF DB $FF, $FF // 007EBE57 FF09 dec dword ptr [ecx] 007EBE59 0000 add [eax], al 007EBE5B 002C4564697465 add [$65746964+eax*2], ch 007EBE62 723D jb 007EBEA1 007EBE64 27 daa 007EBE65 0000 add [eax], al 007EBE67 00FF add bh, bh 007EBE69 FFFF DB $FF, $FF // 007EBE6B FF1400 call dword ptr [eax+eax] 007EBE6E 0000 add [eax], al 007EBE70 2C45 sub al, $45 007EBE72 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EBE7B 657464 jz 007EBEE2 007EBE7E 61 popa 007EBE7F 7465 jz 007EBEE6 007EBE81 2829 sub [ecx], ch 007EBE83 2000 and [eax], al 007EBE85 0000 add [eax], al 007EBE87 00FF add bh, bh 007EBE89 FFFF DB $FF, $FF // 007EBE8B FF0D00000020 dec dword ptr [$20000000] 007EBE91 7768 jnbe 007EBEFB 007EBE93 657265 jb 007EBEFB 007EBE96 205946 and [ecx+$46], bl 007EBE99 49 dec ecx 007EBE9A 643D27000000 cmp eax, $00000027 007EBEA0 FFFF DB $FF, $FF // 007EBEA2 FFFF DB $FF, $FF // 007EBEA4 0400 add al, +$00 007EBEA6 0000 add [eax], al 007EBEA8 59 pop ecx 007EBEA9 46 inc esi 007EBEAA 49 dec ecx 007EBEAB 640000 add fs:[eax], al 007EBEAE 0000 add [eax], al 007EBEB0 55 push ebp 007EBEB1 8BEC mov ebp, esp 007EBEB3 51 push ecx 007EBEB4 B906000000 mov ecx, $00000006 007EBEB9 6A00 push $00 007EBEBB 6A00 push $00 007EBEBD 49 dec ecx 007EBEBE 75F9 jnz 007EBEB9 007EBEC0 51 push ecx 007EBEC1 874DFC xchg [ebp-$04], ecx 007EBEC4 53 push ebx 007EBEC5 56 push esi 007EBEC6 8BF0 mov esi, eax 007EBEC8 33C0 xor eax, eax 007EBECA 55 push ebp * Possible String Reference to: '殒壛脬^[嬪]' | 007EBECB 6809C17E00 push $007EC109 ***** TRY | 007EBED0 64FF30 push dword ptr fs:[eax] 007EBED3 648920 mov fs:[eax], esp 007EBED6 33C0 xor eax, eax 007EBED8 55 push ebp 007EBED9 68DFC07E00 push $007EC0DF ***** TRY | 007EBEDE 64FF30 push dword ptr fs:[eax] 007EBEE1 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EC126(Sender : TObject); begin (* 007EC126 6E outsb 007EC127 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 007EC12F FF08 dec dword ptr [eax] 007EC131 0000 add [eax], al *) end; procedure TfrmYFFP_HX._PROC_007EC15C(Sender : TObject); begin (* 007EC15C 6E outsb 007EC15D 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 007EC165 0000 add [eax], al *) end; procedure TfrmYFFP_HX._PROC_007EC169(Sender : TObject); begin (* 007EC169 50 push eax 007EC16A 6461 popa 007EC16C 7465 jz 007EC1D3 007EC16E 205946 and [ecx+$46], bl 007EC171 5F pop edi 007EC172 4D dec ebp 007EC173 6F outsd 007EC174 6E outsb 007EC175 65795F jns 007EC1D7 007EC178 43 inc ebx 007EC179 52 push edx 007EC17A 2000 and [eax], al 007EC17C FFFF DB $FF, $FF // 007EC17E FFFF DB $FF, $FF // 007EC180 0E push cs 007EC181 0000 add [eax], al 007EC183 0020 add [eax], ah 007EC185 53 push ebx 007EC186 657420 jz 007EC1A9 007EC189 51 push ecx 007EC18A 7479 jz 007EC205 007EC18C 55 push ebp 007EC18D 6E outsb 007EC18E 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 007EC196 FFFF DB $FF, $FF // 007EC198 07 pop es 007EC199 0000 add [eax], al 007EC19B 005A64 add [edx+$64], bl 007EC19E 794E jns 007EC1EE 007EC1A0 61 popa 007EC1A1 6D insd 007EC1A2 6500FF add bh, bh 007EC1A5 FFFF DB $FF, $FF // 007EC1A7 FF01 inc dword ptr [ecx] 007EC1A9 0000 add [eax], al 007EC1AB 0027 add [edi], ah 007EC1AD 0000 add [eax], al 007EC1AF 00FF add bh, bh 007EC1B1 FFFF DB $FF, $FF // 007EC1B3 FF09 dec dword ptr [ecx] 007EC1B5 0000 add [eax], al 007EC1B7 002C4564697465 add [$65746964+eax*2], ch 007EC1BE 723D jb 007EC1FD 007EC1C0 27 daa 007EC1C1 0000 add [eax], al 007EC1C3 00FF add bh, bh 007EC1C5 FFFF DB $FF, $FF // 007EC1C7 FF1400 call dword ptr [eax+eax] 007EC1CA 0000 add [eax], al 007EC1CC 2C45 sub al, $45 007EC1CE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EC1D7 657464 jz 007EC23E 007EC1DA 61 popa 007EC1DB 7465 jz 007EC242 007EC1DD 2829 sub [ecx], ch 007EC1DF 2000 and [eax], al 007EC1E1 0000 add [eax], al 007EC1E3 00FF add bh, bh 007EC1E5 FFFF DB $FF, $FF // 007EC1E7 FF0D00000020 dec dword ptr [$20000000] 007EC1ED 7768 jnbe 007EC257 007EC1EF 657265 jb 007EC257 007EC1F2 205946 and [ecx+$46], bl 007EC1F5 49 dec ecx 007EC1F6 643D27000000 cmp eax, $00000027 007EC1FC FFFF DB $FF, $FF // 007EC1FE FFFF DB $FF, $FF // 007EC200 0400 add al, +$00 007EC202 0000 add [eax], al 007EC204 59 pop ecx 007EC205 46 inc esi 007EC206 49 dec ecx 007EC207 640000 add fs:[eax], al 007EC20A 0000 add [eax], al 007EC20C 55 push ebp 007EC20D 8BEC mov ebp, esp 007EC20F 51 push ecx 007EC210 B906000000 mov ecx, $00000006 007EC215 6A00 push $00 007EC217 6A00 push $00 007EC219 49 dec ecx 007EC21A 75F9 jnz 007EC215 007EC21C 51 push ecx 007EC21D 874DFC xchg [ebp-$04], ecx 007EC220 53 push ebx 007EC221 56 push esi 007EC222 8BF0 mov esi, eax 007EC224 33C0 xor eax, eax 007EC226 55 push ebp * Possible String Reference to: '閵喠脬^[嬪]' | 007EC227 6865C47E00 push $007EC465 ***** TRY | 007EC22C 64FF30 push dword ptr fs:[eax] 007EC22F 648920 mov fs:[eax], esp 007EC232 33C0 xor eax, eax 007EC234 55 push ebp 007EC235 683BC47E00 push $007EC43B ***** TRY | 007EC23A 64FF30 push dword ptr fs:[eax] 007EC23D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EC4B1(Sender : TObject); begin (* 007EC4B1 50 push eax 007EC4B2 6461 popa 007EC4B4 7465 jz 007EC51B 007EC4B6 205946 and [ecx+$46], bl 007EC4B9 5F pop edi 007EC4BA 4D dec ebp 007EC4BB 6F outsd 007EC4BC 6E outsb 007EC4BD 65795F jns 007EC51F 007EC4C0 43 inc ebx 007EC4C1 52 push edx 007EC4C2 2000 and [eax], al 007EC4C4 FFFF DB $FF, $FF // 007EC4C6 FFFF DB $FF, $FF // 007EC4C8 1100 adc [eax], eax 007EC4CA 0000 add [eax], al 007EC4CC 205365 and [ebx+$65], dl 007EC4CF 7420 jz 007EC4F1 007EC4D1 50 push eax 007EC4D2 5F pop edi 007EC4D3 43 inc ebx 007EC4D4 6F outsd 007EC4D5 64654E dec esi 007EC4D8 61 popa 007EC4D9 6D insd 007EC4DA 653D27000000 cmp eax, $00000027 007EC4E0 FFFF DB $FF, $FF // 007EC4E2 FFFF DB $FF, $FF // 007EC4E4 07 pop es 007EC4E5 0000 add [eax], al 007EC4E7 005A64 add [edx+$64], bl 007EC4EA 794E jns 007EC53A 007EC4EC 61 popa 007EC4ED 6D insd 007EC4EE 6500FF add bh, bh 007EC4F1 FFFF DB $FF, $FF // 007EC4F3 FF01 inc dword ptr [ecx] 007EC4F5 0000 add [eax], al 007EC4F7 0027 add [edi], ah 007EC4F9 0000 add [eax], al 007EC4FB 00FF add bh, bh 007EC4FD FFFF DB $FF, $FF // 007EC4FF FF09 dec dword ptr [ecx] 007EC501 0000 add [eax], al 007EC503 002C4564697465 add [$65746964+eax*2], ch 007EC50A 723D jb 007EC549 007EC50C 27 daa 007EC50D 0000 add [eax], al 007EC50F 00FF add bh, bh 007EC511 FFFF DB $FF, $FF // 007EC513 FF1400 call dword ptr [eax+eax] 007EC516 0000 add [eax], al 007EC518 2C45 sub al, $45 007EC51A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EC523 657464 jz 007EC58A 007EC526 61 popa 007EC527 7465 jz 007EC58E 007EC529 2829 sub [ecx], ch 007EC52B 2000 and [eax], al 007EC52D 0000 add [eax], al 007EC52F 00FF add bh, bh 007EC531 FFFF DB $FF, $FF // 007EC533 FF0D00000020 dec dword ptr [$20000000] 007EC539 7768 jnbe 007EC5A3 007EC53B 657265 jb 007EC5A3 007EC53E 205946 and [ecx+$46], bl 007EC541 49 dec ecx 007EC542 643D27000000 cmp eax, $00000027 007EC548 FFFF DB $FF, $FF // 007EC54A FFFF DB $FF, $FF // 007EC54C 0400 add al, +$00 007EC54E 0000 add [eax], al 007EC550 59 pop ecx 007EC551 46 inc esi 007EC552 49 dec ecx 007EC553 640000 add fs:[eax], al 007EC556 0000 add [eax], al 007EC558 53 push ebx 007EC559 8BD8 mov ebx, eax * Reference to control ToolButton1 : TToolButton | 007EC55B 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007EC561 E85AB9CDFF call 004C7EC0 007EC566 84C0 test al, al 007EC568 7516 jnz 007EC580 * Possible String Reference to: '应付款列表' | 007EC56A B98CC57E00 mov ecx, $007EC58C * Reference to control ToolButton1 : TToolButton | 007EC56F 8B9320030000 mov edx, [ebx+$0320] * Reference to control ADOTemp : N.A. | 007EC575 8B833C030000 mov eax, [ebx+$033C] | 007EC57B E8B0BCFCFF call 007B8230 007EC580 5B pop ebx 007EC581 C3 ret 007EC582 0000 add [eax], al 007EC584 FFFF DB $FF, $FF // 007EC586 FFFF DB $FF, $FF // 007EC588 0A00 or al, byte ptr [eax] 007EC58A 0000 add [eax], al 007EC58C D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl 007EC592 C1D0B1 rcl eax, $B1 007EC595 ED in eax, dx 007EC596 0000 add [eax], al 007EC598 55 push ebp 007EC599 8BEC mov ebp, esp 007EC59B 51 push ecx 007EC59C B90E000000 mov ecx, $0000000E 007EC5A1 6A00 push $00 007EC5A3 6A00 push $00 007EC5A5 49 dec ecx 007EC5A6 75F9 jnz 007EC5A1 007EC5A8 874DFC xchg [ebp-$04], ecx 007EC5AB 53 push ebx 007EC5AC 56 push esi 007EC5AD 8BF0 mov esi, eax 007EC5AF 33C0 xor eax, eax 007EC5B1 55 push ebp 007EC5B2 68ECC87E00 push $007EC8EC ***** TRY | 007EC5B7 64FF30 push dword ptr fs:[eax] 007EC5BA 648920 mov fs:[eax], esp 007EC5BD 33C0 xor eax, eax 007EC5BF 55 push ebp 007EC5C0 6898C87E00 push $007EC898 ***** TRY | 007EC5C5 64FF30 push dword ptr fs:[eax] 007EC5C8 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EC95D(Sender : TObject); begin (* 007EC95D 50 push eax 007EC95E 6461 popa 007EC960 7465 jz 007EC9C7 007EC962 205946 and [ecx+$46], bl 007EC965 5F pop edi 007EC966 4D dec ebp 007EC967 6F outsd 007EC968 6E outsb 007EC969 65795F jns 007EC9CB 007EC96C 43 inc ebx 007EC96D 52 push edx 007EC96E 2000 and [eax], al 007EC970 FFFF DB $FF, $FF // 007EC972 FFFF DB $FF, $FF // 007EC974 0D00000020 or eax, $20000000 007EC979 53 push ebx 007EC97A 657420 jz 007EC99D 007EC97D 4D dec ebp 007EC97E 61 popa 007EC97F 696E49643D2700 imul ebp, [esi+$49], $00273D64 007EC986 0000 add [eax], al 007EC988 FFFF DB $FF, $FF // 007EC98A FFFF DB $FF, $FF // 007EC98C 0100 add [eax], eax 007EC98E 0000 add [eax], al 007EC990 27 daa 007EC991 0000 add [eax], al 007EC993 00FF add bh, bh 007EC995 FFFF DB $FF, $FF // 007EC997 FF0C00 dec dword ptr [eax+eax] 007EC99A 0000 add [eax], al 007EC99C 2C43 sub al, $43 007EC99E 6F outsd 007EC99F 6D insd 007EC9A0 54 push esp 007EC9A1 61 popa 007EC9A2 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D 007EC9AA 0000 add [eax], al 007EC9AC FFFF DB $FF, $FF // 007EC9AE FFFF DB $FF, $FF // 007EC9B0 0900 or [eax], eax 007EC9B2 0000 add [eax], al 007EC9B4 2C45 sub al, $45 007EC9B6 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D 007EC9BF 00FF add bh, bh 007EC9C1 FFFF DB $FF, $FF // 007EC9C3 FF1400 call dword ptr [eax+eax] 007EC9C6 0000 add [eax], al 007EC9C8 2C45 sub al, $45 007EC9CA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EC9D3 657464 jz 007ECA3A 007EC9D6 61 popa 007EC9D7 7465 jz 007ECA3E 007EC9D9 2829 sub [ecx], ch 007EC9DB 2000 and [eax], al 007EC9DD 0000 add [eax], al 007EC9DF 00FF add bh, bh 007EC9E1 FFFF DB $FF, $FF // 007EC9E3 FF0D00000020 dec dword ptr [$20000000] 007EC9E9 7768 jnbe 007ECA53 007EC9EB 657265 jb 007ECA53 007EC9EE 205946 and [ecx+$46], bl 007EC9F1 49 dec ecx 007EC9F2 643D27000000 cmp eax, $00000027 007EC9F8 FFFF DB $FF, $FF // 007EC9FA FFFF DB $FF, $FF // 007EC9FC 0400 add al, +$00 007EC9FE 0000 add [eax], al 007ECA00 59 pop ecx 007ECA01 46 inc esi 007ECA02 49 dec ecx 007ECA03 640000 add fs:[eax], al 007ECA06 0000 add [eax], al 007ECA08 55 push ebp 007ECA09 8BEC mov ebp, esp 007ECA0B B915000000 mov ecx, $00000015 007ECA10 6A00 push $00 007ECA12 6A00 push $00 007ECA14 49 dec ecx 007ECA15 75F9 jnz 007ECA10 007ECA17 53 push ebx 007ECA18 56 push esi 007ECA19 57 push edi 007ECA1A 8BDA mov ebx, edx 007ECA1C 8BF0 mov esi, eax 007ECA1E 33C0 xor eax, eax 007ECA20 55 push ebp 007ECA21 68C2CE7E00 push $007ECEC2 ***** TRY | 007ECA26 64FF30 push dword ptr fs:[eax] 007ECA29 648920 mov fs:[eax], esp 007ECA2C 8D55FC lea edx, [ebp-$04] 007ECA2F 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; | 007ECA31 E8862CDAFF call 0058F6BC 007ECA36 8D55DC lea edx, [ebp-$24] 007ECA39 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA3C E8ABDEC1FF call 0040A8EC 007ECA41 837DDC00 cmp dword ptr [ebp-$24], +$00 007ECA45 750D jnz 007ECA54 007ECA47 8D45FC lea eax, [ebp-$04] 007ECA4A BAD8CE7E00 mov edx, $007ECED8 * Reference to: System.@LStrLAsg(void;void;void;void); | 007ECA4F E86889C1FF call 004053BC * Reference to control ADOTemp : N.A. | 007ECA54 8B863C030000 mov eax, [esi+$033C] * 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; | 007ECA5A E8EDF8E6FF 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; | 007ECA5F E80051E6FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007ECA64 8B4050 mov eax, [eax+$50] 007ECA67 8D55D8 lea edx, [ebp-$28] 007ECA6A 8B08 mov ecx, [eax] 007ECA6C FF5110 call dword ptr [ecx+$10] 007ECA6F 8B45D8 mov eax, [ebp-$28] 007ECA72 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA75 E872DEC1FF call 0040A8EC * Reference to control Label11 : N.A. | 007ECA7A 8B9E64030000 mov ebx, [esi+$0364] 007ECA80 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ECA82 E8B9B9CDFF call 004C8440 007ECA87 8D55C4 lea edx, [ebp-$3C] 007ECA8A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECA8D E85ADEC1FF call 0040A8EC 007ECA92 8B55C4 mov edx, [ebp-$3C] 007ECA95 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ECA98 E82BC3C2FF call 00418DC8 007ECA9D 8D45C8 lea eax, [ebp-$38] 007ECAA0 50 push eax 007ECAA1 8B55F0 mov edx, [ebp-$10] 007ECAA4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECAA6 E809A1CDFF call 004C6BB4 007ECAAB 5A pop edx 007ECAAC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007ECAAE FF91B4000000 call dword ptr [ecx+$00B4] 007ECAB4 8BC3 mov eax, ebx 007ECAB6 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007ECAB8 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 007ECABE 8B9E08030000 mov ebx, [esi+$0308] 007ECAC4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECAC6 E8098ECDFF call 004C58D4 007ECACB 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007ECACD E8DA14CFFF call 004DDFAC 007ECAD2 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007ECAD4 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 007ECAD7 68E4CE7E00 push $007ECEE4 * Possible String Reference to: 'YFID' | 007ECADC BA2CCF7E00 mov edx, $007ECF2C * Reference to control Label11 : N.A. | 007ECAE1 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECAE7 E8C8A0CDFF call 004C6BB4 007ECAEC 8D55BC lea edx, [ebp-$44] 007ECAEF 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECAF1 FF5160 call dword ptr [ecx+$60] 007ECAF4 FF75BC push dword ptr [ebp-$44] 007ECAF7 683CCF7E00 push $007ECF3C 007ECAFC 8D45C0 lea eax, [ebp-$40] 007ECAFF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007ECB04 E8AB8BC1FF call 004056B4 007ECB09 8B45C0 mov eax, [ebp-$40] 007ECB0C 50 push eax 007ECB0D 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007ECB0F E89814CFFF call 004DDFAC 007ECB14 5A pop edx 007ECB15 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007ECB17 FF5138 call dword ptr [ecx+$38] 007ECB1A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007ECB1C E8A78DCDFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 007ECB21 BA48CF7E00 mov edx, $007ECF48 * Reference to control Label3 : TLabel | 007ECB26 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB2C E883A0CDFF call 004C6BB4 007ECB31 8D55F4 lea edx, [ebp-$0C] 007ECB34 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007ECB36 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 007ECB39 BA48CF7E00 mov edx, $007ECF48 * Reference to control Label11 : N.A. | 007ECB3E 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB44 E86BA0CDFF call 004C6BB4 007ECB49 8D55F8 lea edx, [ebp-$08] 007ECB4C 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECB4E FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 007ECB51 BA58CF7E00 mov edx, $007ECF58 * Reference to control Label11 : N.A. | 007ECB56 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB5C E853A0CDFF call 004C6BB4 007ECB61 8D55B4 lea edx, [ebp-$4C] 007ECB64 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECB66 FF5160 call dword ptr [ecx+$60] 007ECB69 8B45B4 mov eax, [ebp-$4C] 007ECB6C 8D55B8 lea edx, [ebp-$48] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECB6F E878DDC1FF call 0040A8EC 007ECB74 837DB800 cmp dword ptr [ebp-$48], +$00 007ECB78 0F8434010000 jz 007ECCB2 * Possible String Reference to: 'Qty' | 007ECB7E BA58CF7E00 mov edx, $007ECF58 * Reference to control Label11 : N.A. | 007ECB83 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECB89 E826A0CDFF call 004C6BB4 007ECB8E 8D55EC lea edx, [ebp-$14] 007ECB91 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECB93 FF5160 call dword ptr [ecx+$60] 007ECB96 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECB99 E88E0BC2FF call 0040D72C 007ECB9E D81D5CCF7E00 fcomp dword ptr [$007ECF5C] 007ECBA4 DFE0 fstsw ax 007ECBA6 9E sahf 007ECBA7 0F84C0020000 jz 007ECE6D 007ECBAD 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECBB0 E8770BC2FF call 0040D72C 007ECBB5 D80D60CF7E00 fmul dword ptr [$007ECF60] 007ECBBB DB7DA8 fstp tbyte ptr [ebp-$58] 007ECBBE 9B wait 007ECBBF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 007ECBC2 E8650BC2FF call 0040D72C 007ECBC7 DB6DA8 fld tbyte ptr [ebp-$58] 007ECBCA DEF1 fdivrp st(1), st(0) 007ECBCC DD5DE0 fstp qword ptr [ebp-$20] 007ECBCF 9B wait * Reference to control Label11 : N.A. | 007ECBD0 8BBE64030000 mov edi, [esi+$0364] 007ECBD6 8BC7 mov eax, edi * Reference to: DB.TDataSet.Edit(TDataSet); | 007ECBD8 E863B8CDFF call 004C8440 * Possible String Reference to: 'Price' | 007ECBDD BA6CCF7E00 mov edx, $007ECF6C 007ECBE2 8BC7 mov eax, edi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECBE4 E8CB9FCDFF call 004C6BB4 007ECBE9 50 push eax 007ECBEA DD45E0 fld qword ptr [ebp-$20] 007ECBED 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 007ECBF0 E897C1C2FF call 00418D8C 007ECBF5 8D5598 lea edx, [ebp-$68] 007ECBF8 58 pop eax 007ECBF9 8B08 mov ecx, [eax] 007ECBFB FF91B4000000 call dword ptr [ecx+$00B4] 007ECC01 8BC7 mov eax, edi 007ECC03 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007ECC05 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007ECC0B 8B9E0C030000 mov ebx, [esi+$030C] 007ECC11 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECC13 E8BC8CCDFF call 004C58D4 007ECC18 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECC1A E88D13CFFF call 004DDFAC 007ECC1F 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007ECC21 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'Price' | 007ECC24 BA6CCF7E00 mov edx, $007ECF6C * Reference to control Label11 : N.A. | 007ECC29 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECC2F E8809FCDFF call 004C6BB4 007ECC34 8D5590 lea edx, [ebp-$70] 007ECC37 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECC39 FF5160 call dword ptr [ecx+$60] 007ECC3C 8B4D90 mov ecx, [ebp-$70] 007ECC3F 8D4594 lea eax, [ebp-$6C] * Possible String Reference to: 'UPdate YF_Money_CR Set Price=' | 007ECC42 BA7CCF7E00 mov edx, $007ECF7C * Reference to: System.@LStrCat3; | 007ECC47 E8F489C1FF call 00405640 007ECC4C 8B4594 mov eax, [ebp-$6C] 007ECC4F 50 push eax 007ECC50 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECC52 E85513CFFF call 004DDFAC 007ECC57 5A pop edx 007ECC58 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ECC5A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFID='' | 007ECC5D 68A4CF7E00 push $007ECFA4 * Possible String Reference to: 'YFID' | 007ECC62 BA2CCF7E00 mov edx, $007ECF2C * Reference to control Label11 : N.A. | 007ECC67 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ECC6D E8429FCDFF call 004C6BB4 007ECC72 8D5584 lea edx, [ebp-$7C] 007ECC75 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007ECC77 FF5160 call dword ptr [ecx+$60] 007ECC7A 8B4584 mov eax, [ebp-$7C] 007ECC7D 8D5588 lea edx, [ebp-$78] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECC80 E867DCC1FF call 0040A8EC 007ECC85 FF7588 push dword ptr [ebp-$78] 007ECC88 683CCF7E00 push $007ECF3C 007ECC8D 8D458C lea eax, [ebp-$74] 007ECC90 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007ECC95 E81A8AC1FF call 004056B4 007ECC9A 8B458C mov eax, [ebp-$74] 007ECC9D 50 push eax 007ECC9E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECCA0 E80713CFFF call 004DDFAC 007ECCA5 5A pop edx 007ECCA6 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ECCA8 FF5138 call dword ptr [ecx+$38] 007ECCAB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007ECCAD E82212CFFF call 004DDED4 * Reference to control OrdDate : N.A. | 007ECCB2 8B9E0C030000 mov ebx, [esi+$030C] 007ECCB8 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ECCBA E8158CCDFF call 004C58D4 007ECCBF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECCC1 E8E612CFFF call 004DDFAC 007ECCC6 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007ECCC8 FF5244 call dword ptr [edx+$44] 007ECCCB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECCCD E8DA12CFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ECCD2 BABCCF7E00 mov edx, $007ECFBC 007ECCD7 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ECCD9 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ECCDC 68D8CF7E00 push $007ECFD8 007ECCE1 FF75F0 push dword ptr [ebp-$10] 007ECCE4 68E8CF7E00 push $007ECFE8 007ECCE9 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 007ECCEF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ECCF2 E8F5DBC1FF call 0040A8EC 007ECCF7 FFB57CFFFFFF push dword ptr [ebp+$FFFFFF7C] 007ECCFD 8D4580 lea eax, [ebp-$80] 007ECD00 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007ECD05 E8AA89C1FF call 004056B4 007ECD0A 8B4580 mov eax, [ebp-$80] 007ECD0D 50 push eax 007ECD0E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ECD10 E89712CFFF call 004DDFAC 007ECD15 5A pop edx 007ECD16 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ECD18 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ECD1B 68F4CF7E00 push $007ECFF4 007ECD20 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmYFFP_HX._PROC_007ECF7D(Sender : TObject); begin (* 007ECF7D 50 push eax 007ECF7E 6461 popa 007ECF80 7465 jz 007ECFE7 007ECF82 205946 and [ecx+$46], bl 007ECF85 5F pop edi 007ECF86 4D dec ebp 007ECF87 6F outsd 007ECF88 6E outsb 007ECF89 65795F jns 007ECFEB 007ECF8C 43 inc ebx 007ECF8D 52 push edx 007ECF8E 205365 and [ebx+$65], dl 007ECF91 7420 jz 007ECFB3 007ECF93 50 push eax 007ECF94 7269 jb 007ECFFF 007ECF96 63653D arpl [ebp+$3D], sp 007ECF99 0000 add [eax], al 007ECF9B 00FF add bh, bh 007ECF9D FFFF DB $FF, $FF // 007ECF9F FF0D00000020 dec dword ptr [$20000000] 007ECFA5 7768 jnbe 007ED00F 007ECFA7 657265 jb 007ED00F 007ECFAA 205946 and [ecx+$46], bl 007ECFAD 49 dec ecx 007ECFAE 44 inc esp 007ECFAF 3D27000000 cmp eax, $00000027 007ECFB4 FFFF DB $FF, $FF // 007ECFB6 FFFF DB $FF, $FF // 007ECFB8 1300 adc eax, [eax] 007ECFBA 0000 add [eax], al 007ECFBC 55 push ebp 007ECFBD 50 push eax 007ECFBE 6461 popa 007ECFC0 7465 jz 007ED027 007ECFC2 205946 and [ecx+$46], bl 007ECFC5 5F pop edi 007ECFC6 4D dec ebp 007ECFC7 6F outsd 007ECFC8 6E outsb 007ECFC9 65795F jns 007ED02B 007ECFCC 43 inc ebx 007ECFCD 52 push edx 007ECFCE 2000 and [eax], al 007ECFD0 FFFF DB $FF, $FF // 007ECFD2 FFFF DB $FF, $FF // 007ECFD4 0500000020 add eax, +$20000000 007ECFD9 53 push ebx 007ECFDA 657420 jz 007ECFFD 007ECFDD 0000 add [eax], al 007ECFDF 00FF add bh, bh 007ECFE1 FFFF DB $FF, $FF // 007ECFE3 FF01 inc dword ptr [ecx] 007ECFE5 0000 add [eax], al 007ECFE7 003D000000FF add [$FF000000], bh 007ECFED FFFF DB $FF, $FF // 007ECFEF FF09 dec dword ptr [ecx] 007ECFF1 0000 add [eax], al 007ECFF3 002C4564697465 add [$65746964+eax*2], ch 007ECFFA 723D jb 007ED039 007ECFFC 27 daa 007ECFFD 0000 add [eax], al 007ECFFF 00FF add bh, bh 007ED001 FFFF DB $FF, $FF // 007ED003 FF1400 call dword ptr [eax+eax] 007ED006 0000 add [eax], al 007ED008 2C45 sub al, $45 007ED00A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007ED013 657464 jz 007ED07A 007ED016 61 popa 007ED017 7465 jz 007ED07E 007ED019 2829 sub [ecx], ch 007ED01B 2000 and [eax], al 007ED01D 0000 add [eax], al 007ED01F 00FF add bh, bh 007ED021 FFFF DB $FF, $FF // 007ED023 FF0D00000020 dec dword ptr [$20000000] 007ED029 7768 jnbe 007ED093 007ED02B 657265 jb 007ED093 007ED02E 205946 and [ecx+$46], bl 007ED031 49 dec ecx 007ED032 643D27000000 cmp eax, $00000027 007ED038 FFFF DB $FF, $FF // 007ED03A FFFF DB $FF, $FF // 007ED03C 0400 add al, +$00 007ED03E 0000 add [eax], al 007ED040 59 pop ecx 007ED041 46 inc esi 007ED042 49 dec ecx 007ED043 640000 add fs:[eax], al 007ED046 0000 add [eax], al 007ED048 FFFF DB $FF, $FF // 007ED04A FFFF DB $FF, $FF // 007ED04C 2B00 sub eax, dword ptr [eax] 007ED04E 0000 add [eax], al 007ED050 55 push ebp 007ED051 7064 jo 007ED0B7 007ED053 61 popa 007ED054 7465 jz 007ED0BB 007ED056 205946 and [ecx+$46], bl 007ED059 5F pop edi 007ED05A 4D dec ebp 007ED05B 6F outsd 007ED05C 6E outsb 007ED05D 65795F jns 007ED0BF 007ED060 4B dec ebx 007ED061 43 inc ebx 007ED062 205365 and [ebx+$65], dl 007ED065 7420 jz 007ED087 007ED067 4B dec ebx 007ED068 43 inc ebx 007ED069 4B dec ebx 007ED06A 50 push eax 007ED06B 4D dec ebp 007ED06C 6F outsd 007ED06D 6E outsb 007ED06E 65793D jns 007ED0AE 007ED071 4B dec ebx 007ED072 43 inc ebx 007ED073 4B dec ebx 007ED074 50 push eax 007ED075 4D dec ebp 007ED076 6F outsd 007ED077 6E outsb 007ED078 65792D jns 007ED0A8 007ED07B 00FF add bh, bh 007ED07D FFFF DB $FF, $FF // 007ED07F FF01 inc dword ptr [ecx] 007ED081 0000 add [eax], al 007ED083 002B add [ebx], ch 007ED085 0000 add [eax], al 007ED087 00FF add bh, bh 007ED089 FFFF DB $FF, $FF // 007ED08B FF0D00000020 dec dword ptr [$20000000] 007ED091 7768 jnbe 007ED0FB 007ED093 657265 jb 007ED0FB 007ED096 204352 and [ebx+$52], al 007ED099 49 dec ecx 007ED09A 44 inc esp 007ED09B 3D27000000 cmp eax, $00000027 007ED0A0 FFFF DB $FF, $FF // 007ED0A2 FFFF DB $FF, $FF // 007ED0A4 0400 add al, +$00 007ED0A6 0000 add [eax], al 007ED0A8 43 inc ebx 007ED0A9 52 push edx 007ED0AA 49 dec ecx 007ED0AB 44 inc esp 007ED0AC 0000 add [eax], al 007ED0AE 0000 add [eax], al 007ED0B0 55 push ebp 007ED0B1 8BEC mov ebp, esp 007ED0B3 B908000000 mov ecx, $00000008 007ED0B8 6A00 push $00 007ED0BA 6A00 push $00 007ED0BC 49 dec ecx 007ED0BD 75F9 jnz 007ED0B8 007ED0BF 53 push ebx 007ED0C0 56 push esi 007ED0C1 8BDA mov ebx, edx 007ED0C3 8BF0 mov esi, eax 007ED0C5 33C0 xor eax, eax 007ED0C7 55 push ebp * Possible String Reference to: '閃x胫^[嬪]' | 007ED0C8 6898D27E00 push $007ED298 ***** TRY | 007ED0CD 64FF30 push dword ptr fs:[eax] 007ED0D0 648920 mov fs:[eax], esp 007ED0D3 8D55FC lea edx, [ebp-$04] 007ED0D6 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; | 007ED0D8 E8DF25DAFF call 0058F6BC 007ED0DD 8D55F4 lea edx, [ebp-$0C] 007ED0E0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED0E3 E804D8C1FF call 0040A8EC 007ED0E8 837DF400 cmp dword ptr [ebp-$0C], +$00 007ED0EC 750D jnz 007ED0FB 007ED0EE 8D45FC lea eax, [ebp-$04] 007ED0F1 BAB0D27E00 mov edx, $007ED2B0 * Reference to: System.@LStrLAsg(void;void;void;void); | 007ED0F6 E8C182C1FF call 004053BC * Reference to control ADOTemp : N.A. | 007ED0FB 8B863C030000 mov eax, [esi+$033C] * 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; | 007ED101 E846F2E6FF 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; | 007ED106 E8594AE6FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007ED10B 8B4050 mov eax, [eax+$50] 007ED10E 8D55F0 lea edx, [ebp-$10] 007ED111 8B08 mov ecx, [eax] 007ED113 FF5110 call dword ptr [ecx+$10] 007ED116 8B45F0 mov eax, [ebp-$10] 007ED119 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED11C E8CBD7C1FF call 0040A8EC * Reference to control Label11 : N.A. | 007ED121 8B9E64030000 mov ebx, [esi+$0364] 007ED127 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ED129 E812B3CDFF call 004C8440 007ED12E 8D55DC lea edx, [ebp-$24] 007ED131 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED134 E8B3D7C1FF call 0040A8EC 007ED139 8B55DC mov edx, [ebp-$24] 007ED13C 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ED13F E884BCC2FF call 00418DC8 007ED144 8D45E0 lea eax, [ebp-$20] 007ED147 50 push eax 007ED148 8B55F8 mov edx, [ebp-$08] 007ED14B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ED14D E8629ACDFF call 004C6BB4 007ED152 5A pop edx 007ED153 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007ED155 FF91B4000000 call dword ptr [ecx+$00B4] 007ED15B 8BC3 mov eax, ebx 007ED15D 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007ED15F FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007ED165 8B9E0C030000 mov ebx, [esi+$030C] 007ED16B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ED16D E86287CDFF call 004C58D4 007ED172 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED174 E8330ECFFF call 004DDFAC 007ED179 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007ED17B FF5244 call dword ptr [edx+$44] 007ED17E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED180 E8270ECFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ED185 BABCD27E00 mov edx, $007ED2BC 007ED18A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ED18C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ED18F 68D8D27E00 push $007ED2D8 007ED194 FF75F8 push dword ptr [ebp-$08] 007ED197 68E8D27E00 push $007ED2E8 007ED19C 8D55D4 lea edx, [ebp-$2C] 007ED19F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED1A2 E845D7C1FF call 0040A8EC 007ED1A7 FF75D4 push dword ptr [ebp-$2C] 007ED1AA 8D45D8 lea eax, [ebp-$28] 007ED1AD BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007ED1B2 E8FD84C1FF call 004056B4 007ED1B7 8B45D8 mov eax, [ebp-$28] 007ED1BA 50 push eax 007ED1BB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED1BD E8EA0DCFFF call 004DDFAC 007ED1C2 5A pop edx 007ED1C3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ED1C5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ED1C8 68F4D27E00 push $007ED2F4 007ED1CD 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYFFP_HX._PROC_007ED2BD(Sender : TObject); begin (* 007ED2BD 50 push eax 007ED2BE 6461 popa 007ED2C0 7465 jz 007ED327 007ED2C2 205946 and [ecx+$46], bl 007ED2C5 5F pop edi 007ED2C6 4D dec ebp 007ED2C7 6F outsd 007ED2C8 6E outsb 007ED2C9 65795F jns 007ED32B 007ED2CC 43 inc ebx 007ED2CD 52 push edx 007ED2CE 2000 and [eax], al 007ED2D0 FFFF DB $FF, $FF // 007ED2D2 FFFF DB $FF, $FF // 007ED2D4 0500000020 add eax, +$20000000 007ED2D9 53 push ebx 007ED2DA 657420 jz 007ED2FD 007ED2DD 0000 add [eax], al 007ED2DF 00FF add bh, bh 007ED2E1 FFFF DB $FF, $FF // 007ED2E3 FF01 inc dword ptr [ecx] 007ED2E5 0000 add [eax], al 007ED2E7 003D000000FF add [$FF000000], bh 007ED2ED FFFF DB $FF, $FF // 007ED2EF FF09 dec dword ptr [ecx] 007ED2F1 0000 add [eax], al 007ED2F3 002C4564697465 add [$65746964+eax*2], ch 007ED2FA 723D jb 007ED339 007ED2FC 27 daa 007ED2FD 0000 add [eax], al 007ED2FF 00FF add bh, bh 007ED301 FFFF DB $FF, $FF // 007ED303 FF01 inc dword ptr [ecx] 007ED305 0000 add [eax], al 007ED307 0027 add [edi], ah 007ED309 0000 add [eax], al 007ED30B 00FF add bh, bh 007ED30D FFFF DB $FF, $FF // 007ED30F FF1400 call dword ptr [eax+eax] 007ED312 0000 add [eax], al 007ED314 2C45 sub al, $45 007ED316 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007ED31F 657464 jz 007ED386 007ED322 61 popa 007ED323 7465 jz 007ED38A 007ED325 2829 sub [ecx], ch 007ED327 2000 and [eax], al 007ED329 0000 add [eax], al 007ED32B 00FF add bh, bh 007ED32D FFFF DB $FF, $FF // 007ED32F FF0D00000020 dec dword ptr [$20000000] 007ED335 7768 jnbe 007ED39F 007ED337 657265 jb 007ED39F 007ED33A 205946 and [ecx+$46], bl 007ED33D 49 dec ecx 007ED33E 643D27000000 cmp eax, $00000027 007ED344 FFFF DB $FF, $FF // 007ED346 FFFF DB $FF, $FF // 007ED348 0400 add al, +$00 007ED34A 0000 add [eax], al 007ED34C 59 pop ecx 007ED34D 46 inc esi 007ED34E 49 dec ecx 007ED34F 640000 add fs:[eax], al 007ED352 0000 add [eax], al 007ED354 55 push ebp 007ED355 8BEC mov ebp, esp 007ED357 B907000000 mov ecx, $00000007 007ED35C 6A00 push $00 007ED35E 6A00 push $00 007ED360 49 dec ecx 007ED361 75F9 jnz 007ED35C 007ED363 51 push ecx 007ED364 53 push ebx 007ED365 56 push esi 007ED366 8BDA mov ebx, edx 007ED368 8BF0 mov esi, eax 007ED36A 33C0 xor eax, eax 007ED36C 55 push ebp * Possible String Reference to: '樗u胫^[嬪]' | 007ED36D 6824D57E00 push $007ED524 ***** TRY | 007ED372 64FF30 push dword ptr fs:[eax] 007ED375 648920 mov fs:[eax], esp 007ED378 8D55FC lea edx, [ebp-$04] 007ED37B 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; | 007ED37D E83A23DAFF call 0058F6BC * Reference to control ADOTemp : N.A. | 007ED382 8B863C030000 mov eax, [esi+$033C] * 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; | 007ED388 E8BFEFE6FF 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; | 007ED38D E8D247E6FF call 00651B64 * Reference to field N.A..OFFS_0050 | 007ED392 8B4050 mov eax, [eax+$50] 007ED395 8D55F4 lea edx, [ebp-$0C] 007ED398 8B08 mov ecx, [eax] 007ED39A FF5110 call dword ptr [ecx+$10] 007ED39D 8B45F4 mov eax, [ebp-$0C] 007ED3A0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED3A3 E844D5C1FF call 0040A8EC * Reference to control Label11 : N.A. | 007ED3A8 8B9E64030000 mov ebx, [esi+$0364] 007ED3AE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007ED3B0 E88BB0CDFF call 004C8440 007ED3B5 8D55E0 lea edx, [ebp-$20] 007ED3B8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED3BB E82CD5C1FF call 0040A8EC 007ED3C0 8B55E0 mov edx, [ebp-$20] 007ED3C3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007ED3C6 E8FDB9C2FF call 00418DC8 007ED3CB 8D45E4 lea eax, [ebp-$1C] 007ED3CE 50 push eax 007ED3CF 8B55F8 mov edx, [ebp-$08] 007ED3D2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007ED3D4 E8DB97CDFF call 004C6BB4 007ED3D9 5A pop edx 007ED3DA 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007ED3DC FF91B4000000 call dword ptr [ecx+$00B4] 007ED3E2 8BC3 mov eax, ebx 007ED3E4 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007ED3E6 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007ED3EC 8B9E0C030000 mov ebx, [esi+$030C] 007ED3F2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007ED3F4 E8DB84CDFF call 004C58D4 007ED3F9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED3FB E8AC0BCFFF call 004DDFAC 007ED400 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007ED402 FF5244 call dword ptr [edx+$44] 007ED405 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED407 E8A00BCFFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007ED40C BA3CD57E00 mov edx, $007ED53C 007ED411 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ED413 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 007ED416 6858D57E00 push $007ED558 007ED41B FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 007ED41E 6868D57E00 push $007ED568 007ED423 8D55D8 lea edx, [ebp-$28] 007ED426 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED429 E8BED4C1FF call 0040A8EC 007ED42E FF75D8 push dword ptr [ebp-$28] 007ED431 6874D57E00 push $007ED574 007ED436 8D45DC lea eax, [ebp-$24] 007ED439 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 007ED43E E87182C1FF call 004056B4 007ED443 8B45DC mov eax, [ebp-$24] 007ED446 50 push eax 007ED447 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007ED449 E85E0BCFFF call 004DDFAC 007ED44E 5A pop edx 007ED44F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007ED451 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 007ED454 6880D57E00 push $007ED580 007ED459 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYFFP_HX._PROC_007ED53D(Sender : TObject); begin (* 007ED53D 50 push eax 007ED53E 6461 popa 007ED540 7465 jz 007ED5A7 007ED542 205946 and [ecx+$46], bl 007ED545 5F pop edi 007ED546 4D dec ebp 007ED547 6F outsd 007ED548 6E outsb 007ED549 65795F jns 007ED5AB 007ED54C 43 inc ebx 007ED54D 52 push edx 007ED54E 2000 and [eax], al 007ED550 FFFF DB $FF, $FF // 007ED552 FFFF DB $FF, $FF // 007ED554 0500000020 add eax, +$20000000 007ED559 53 push ebx 007ED55A 657420 jz 007ED57D 007ED55D 0000 add [eax], al 007ED55F 00FF add bh, bh 007ED561 FFFF DB $FF, $FF // 007ED563 FF02 inc dword ptr [edx] 007ED565 0000 add [eax], al 007ED567 003D270000FF add [$FF000027], bh 007ED56D FFFF DB $FF, $FF // 007ED56F FF01 inc dword ptr [ecx] 007ED571 0000 add [eax], al 007ED573 0027 add [edi], ah 007ED575 0000 add [eax], al 007ED577 00FF add bh, bh 007ED579 FFFF DB $FF, $FF // 007ED57B FF09 dec dword ptr [ecx] 007ED57D 0000 add [eax], al 007ED57F 002C4564697465 add [$65746964+eax*2], ch 007ED586 723D jb 007ED5C5 007ED588 27 daa 007ED589 0000 add [eax], al 007ED58B 00FF add bh, bh 007ED58D FFFF DB $FF, $FF // 007ED58F FF1400 call dword ptr [eax+eax] 007ED592 0000 add [eax], al 007ED594 2C45 sub al, $45 007ED596 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007ED59F 657464 jz 007ED606 007ED5A2 61 popa 007ED5A3 7465 jz 007ED60A 007ED5A5 2829 sub [ecx], ch 007ED5A7 2000 and [eax], al 007ED5A9 0000 add [eax], al 007ED5AB 00FF add bh, bh 007ED5AD FFFF DB $FF, $FF // 007ED5AF FF0D00000020 dec dword ptr [$20000000] 007ED5B5 7768 jnbe 007ED61F 007ED5B7 657265 jb 007ED61F 007ED5BA 205946 and [ecx+$46], bl 007ED5BD 49 dec ecx 007ED5BE 643D27000000 cmp eax, $00000027 007ED5C4 FFFF DB $FF, $FF // 007ED5C6 FFFF DB $FF, $FF // 007ED5C8 0400 add al, +$00 007ED5CA 0000 add [eax], al 007ED5CC 59 pop ecx 007ED5CD 46 inc esi 007ED5CE 49 dec ecx 007ED5CF 640000 add fs:[eax], al 007ED5D2 0000 add [eax], al 007ED5D4 55 push ebp 007ED5D5 8BEC mov ebp, esp 007ED5D7 51 push ecx 007ED5D8 B906000000 mov ecx, $00000006 007ED5DD 6A00 push $00 007ED5DF 6A00 push $00 007ED5E1 49 dec ecx 007ED5E2 75F9 jnz 007ED5DD 007ED5E4 51 push ecx 007ED5E5 874DFC xchg [ebp-$04], ecx 007ED5E8 53 push ebx 007ED5E9 56 push esi 007ED5EA 8BF0 mov esi, eax 007ED5EC 33C0 xor eax, eax 007ED5EE 55 push ebp 007ED5EF 682BD87E00 push $007ED82B ***** TRY | 007ED5F4 64FF30 push dword ptr fs:[eax] 007ED5F7 648920 mov fs:[eax], esp 007ED5FA 33C0 xor eax, eax 007ED5FC 55 push ebp 007ED5FD 6801D87E00 push $007ED801 ***** TRY | 007ED602 64FF30 push dword ptr fs:[eax] 007ED605 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007ED875(Sender : TObject); begin (* 007ED875 50 push eax 007ED876 6461 popa 007ED878 7465 jz 007ED8DF 007ED87A 205946 and [ecx+$46], bl 007ED87D 5F pop edi 007ED87E 4D dec ebp 007ED87F 6F outsd 007ED880 6E outsb 007ED881 65795F jns 007ED8E3 007ED884 43 inc ebx 007ED885 52 push edx 007ED886 2000 and [eax], al 007ED888 FFFF DB $FF, $FF // 007ED88A FFFF DB $FF, $FF // 007ED88C 0E push cs 007ED88D 0000 add [eax], al 007ED88F 0020 add [eax], ah 007ED891 53 push ebx 007ED892 657420 jz 007ED8B5 007ED895 50 push eax 007ED896 61 popa 007ED897 794D jns 007ED8E6 007ED899 656E outsb 007ED89B 743D jz 007ED8DA 007ED89D 27 daa 007ED89E 0000 add [eax], al 007ED8A0 FFFF DB $FF, $FF // 007ED8A2 FFFF DB $FF, $FF // 007ED8A4 0100 add [eax], eax 007ED8A6 0000 add [eax], al 007ED8A8 27 daa 007ED8A9 0000 add [eax], al 007ED8AB 00FF add bh, bh 007ED8AD FFFF DB $FF, $FF // 007ED8AF FF09 dec dword ptr [ecx] 007ED8B1 0000 add [eax], al 007ED8B3 002C4564697465 add [$65746964+eax*2], ch 007ED8BA 723D jb 007ED8F9 007ED8BC 27 daa 007ED8BD 0000 add [eax], al 007ED8BF 00FF add bh, bh 007ED8C1 FFFF DB $FF, $FF // 007ED8C3 FF1400 call dword ptr [eax+eax] 007ED8C6 0000 add [eax], al 007ED8C8 2C45 sub al, $45 007ED8CA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007ED8D3 657464 jz 007ED93A 007ED8D6 61 popa 007ED8D7 7465 jz 007ED93E 007ED8D9 2829 sub [ecx], ch 007ED8DB 2000 and [eax], al 007ED8DD 0000 add [eax], al 007ED8DF 00FF add bh, bh 007ED8E1 FFFF DB $FF, $FF // 007ED8E3 FF0D00000020 dec dword ptr [$20000000] 007ED8E9 7768 jnbe 007ED953 007ED8EB 657265 jb 007ED953 007ED8EE 205946 and [ecx+$46], bl 007ED8F1 49 dec ecx 007ED8F2 643D27000000 cmp eax, $00000027 007ED8F8 FFFF DB $FF, $FF // 007ED8FA FFFF DB $FF, $FF // 007ED8FC 0400 add al, +$00 007ED8FE 0000 add [eax], al 007ED900 59 pop ecx 007ED901 46 inc esi 007ED902 49 dec ecx 007ED903 640000 add fs:[eax], al 007ED906 0000 add [eax], al 007ED908 55 push ebp 007ED909 8BEC mov ebp, esp 007ED90B 6A00 push $00 007ED90D 6A00 push $00 007ED90F 53 push ebx 007ED910 56 push esi 007ED911 8BD8 mov ebx, eax 007ED913 33C0 xor eax, eax 007ED915 55 push ebp * Possible String Reference to: '閧q腓^[YY]脥@' | 007ED916 6874D97E00 push $007ED974 ***** TRY | 007ED91B 64FF30 push dword ptr fs:[eax] 007ED91E 648920 mov fs:[eax], esp 007ED921 8D55F8 lea edx, [ebp-$08] * Reference to control PriceNote : N.A. | 007ED924 8B838C030000 mov eax, [ebx+$038C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007ED92A E8C1ACC9FF call 004885F0 007ED92F 8B45F8 mov eax, [ebp-$08] 007ED932 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007ED935 E8B2CFC1FF call 0040A8EC 007ED93A 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 007ED93D E8B27CC1FF call 004055F4 007ED942 83F803 cmp eax, +$03 007ED945 7C0F jl 007ED956 * Reference to control DlyDate : N.A. | 007ED947 8B8314030000 mov eax, [ebx+$0314] 007ED94D 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007ED951 E8FE6BC1FF call 00404554 007ED956 33C0 xor eax, eax 007ED958 5A pop edx 007ED959 59 pop ecx 007ED95A 59 pop ecx 007ED95B 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[YY]脥@' | 007ED95E 687BD97E00 push $007ED97B 007ED963 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 007ED966 E8B979C1FF call 00405324 007ED96B 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007ED96E E8B179C1FF call 00405324 007ED973 C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EE0D9(Sender : TObject); begin (* 007EE0D9 50 push eax 007EE0DA 6461 popa 007EE0DC 7465 jz 007EE143 007EE0DE 205946 and [ecx+$46], bl 007EE0E1 5F pop edi 007EE0E2 4D dec ebp 007EE0E3 6F outsd 007EE0E4 6E outsb 007EE0E5 65795F jns 007EE147 007EE0E8 43 inc ebx 007EE0E9 52 push edx 007EE0EA 2000 and [eax], al 007EE0EC FFFF DB $FF, $FF // 007EE0EE FFFF DB $FF, $FF // 007EE0F0 0E push cs 007EE0F1 0000 add [eax], al 007EE0F3 0020 add [eax], ah 007EE0F5 53 push ebx 007EE0F6 657420 jz 007EE119 007EE0F9 4F dec edi 007EE0FA 7264 jb 007EE160 007EE0FC 65724E jb 007EE14D 007EE0FF 4F dec edi 007EE100 3D270000FF cmp eax, $FF000027 007EE105 FFFF DB $FF, $FF // 007EE107 FF07 inc dword ptr [edi] 007EE109 0000 add [eax], al 007EE10B 004F72 add [edi+$72], cl 007EE10E 6465724E jb 007EE160 007EE112 4F dec edi 007EE113 00FF add bh, bh 007EE115 FFFF DB $FF, $FF // 007EE117 FF01 inc dword ptr [ecx] 007EE119 0000 add [eax], al 007EE11B 0027 add [edi], ah 007EE11D 0000 add [eax], al 007EE11F 00FF add bh, bh 007EE121 FFFF DB $FF, $FF // 007EE123 FF0E dec dword ptr [esi] 007EE125 0000 add [eax], al 007EE127 0020 add [eax], ah 007EE129 2C50 sub al, $50 007EE12B 5F pop edi 007EE12C 43 inc ebx 007EE12D 6F outsd 007EE12E 64654E dec esi 007EE131 61 popa 007EE132 6D insd 007EE133 653D270000FF cmp eax, $FF000027 007EE139 FFFF DB $FF, $FF // 007EE13B FF0A dec dword ptr [edx] 007EE13D 0000 add [eax], al 007EE13F 0020 add [eax], ah 007EE141 2C50 sub al, $50 007EE143 5F pop edi 007EE144 53 push ebx 007EE145 7065 jo 007EE1AC 007EE147 633D270000FF arpl [$FF000027], di 007EE14D FFFF DB $FF, $FF // 007EE14F FF09 dec dword ptr [ecx] 007EE151 0000 add [eax], al 007EE153 002C4564697465 add [$65746964+eax*2], ch 007EE15A 723D jb 007EE199 007EE15C 27 daa 007EE15D 0000 add [eax], al 007EE15F 00FF add bh, bh 007EE161 FFFF DB $FF, $FF // 007EE163 FF1400 call dword ptr [eax+eax] 007EE166 0000 add [eax], al 007EE168 2C45 sub al, $45 007EE16A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EE173 657464 jz 007EE1DA 007EE176 61 popa 007EE177 7465 jz 007EE1DE 007EE179 2829 sub [ecx], ch 007EE17B 2000 and [eax], al 007EE17D 0000 add [eax], al 007EE17F 00FF add bh, bh 007EE181 FFFF DB $FF, $FF // 007EE183 FF0D00000020 dec dword ptr [$20000000] 007EE189 7768 jnbe 007EE1F3 007EE18B 657265 jb 007EE1F3 007EE18E 205946 and [ecx+$46], bl 007EE191 49 dec ecx 007EE192 643D27000000 cmp eax, $00000027 007EE198 FFFF DB $FF, $FF // 007EE19A FFFF DB $FF, $FF // 007EE19C 0400 add al, +$00 007EE19E 0000 add [eax], al 007EE1A0 59 pop ecx 007EE1A1 46 inc esi 007EE1A2 49 dec ecx 007EE1A3 640000 add fs:[eax], al 007EE1A6 0000 add [eax], al 007EE1A8 55 push ebp 007EE1A9 8BEC mov ebp, esp 007EE1AB 51 push ecx 007EE1AC B906000000 mov ecx, $00000006 007EE1B1 6A00 push $00 007EE1B3 6A00 push $00 007EE1B5 49 dec ecx 007EE1B6 75F9 jnz 007EE1B1 007EE1B8 51 push ecx 007EE1B9 874DFC xchg [ebp-$04], ecx 007EE1BC 53 push ebx 007EE1BD 56 push esi 007EE1BE 8BF0 mov esi, eax 007EE1C0 33C0 xor eax, eax 007EE1C2 55 push ebp 007EE1C3 68FFE37E00 push $007EE3FF ***** TRY | 007EE1C8 64FF30 push dword ptr fs:[eax] 007EE1CB 648920 mov fs:[eax], esp 007EE1CE 33C0 xor eax, eax 007EE1D0 55 push ebp 007EE1D1 68D5E37E00 push $007EE3D5 ***** TRY | 007EE1D6 64FF30 push dword ptr fs:[eax] 007EE1D9 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EE44D(Sender : TObject); begin (* 007EE44D 50 push eax 007EE44E 6461 popa 007EE450 7465 jz 007EE4B7 007EE452 205946 and [ecx+$46], bl 007EE455 5F pop edi 007EE456 4D dec ebp 007EE457 6F outsd 007EE458 6E outsb 007EE459 65795F jns 007EE4BB 007EE45C 43 inc ebx 007EE45D 52 push edx 007EE45E 2000 and [eax], al 007EE460 FFFF DB $FF, $FF // 007EE462 FFFF DB $FF, $FF // 007EE464 1000 adc [eax], al 007EE466 0000 add [eax], al 007EE468 205365 and [ebx+$65], dl 007EE46B 7420 jz 007EE48D 007EE46D 43 inc ebx 007EE46E 6F outsd 007EE46F 6D insd 007EE470 54 push esp 007EE471 61 popa 007EE472 69746F753D270000 imul esi, [edi+ebp*2+$75], $0000273D 007EE47A 0000 add [eax], al 007EE47C FFFF DB $FF, $FF // 007EE47E FFFF DB $FF, $FF // 007EE480 0100 add [eax], eax 007EE482 0000 add [eax], al 007EE484 27 daa 007EE485 0000 add [eax], al 007EE487 00FF add bh, bh 007EE489 FFFF DB $FF, $FF // 007EE48B FF09 dec dword ptr [ecx] 007EE48D 0000 add [eax], al 007EE48F 002C4564697465 add [$65746964+eax*2], ch 007EE496 723D jb 007EE4D5 007EE498 27 daa 007EE499 0000 add [eax], al 007EE49B 00FF add bh, bh 007EE49D FFFF DB $FF, $FF // 007EE49F FF1400 call dword ptr [eax+eax] 007EE4A2 0000 add [eax], al 007EE4A4 2C45 sub al, $45 007EE4A6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EE4AF 657464 jz 007EE516 007EE4B2 61 popa 007EE4B3 7465 jz 007EE51A 007EE4B5 2829 sub [ecx], ch 007EE4B7 2000 and [eax], al 007EE4B9 0000 add [eax], al 007EE4BB 00FF add bh, bh 007EE4BD FFFF DB $FF, $FF // 007EE4BF FF0D00000020 dec dword ptr [$20000000] 007EE4C5 7768 jnbe 007EE52F 007EE4C7 657265 jb 007EE52F 007EE4CA 205946 and [ecx+$46], bl 007EE4CD 49 dec ecx 007EE4CE 643D27000000 cmp eax, $00000027 007EE4D4 FFFF DB $FF, $FF // 007EE4D6 FFFF DB $FF, $FF // 007EE4D8 0400 add al, +$00 007EE4DA 0000 add [eax], al 007EE4DC 59 pop ecx 007EE4DD 46 inc esi 007EE4DE 49 dec ecx 007EE4DF 640000 add fs:[eax], al 007EE4E2 0000 add [eax], al 007EE4E4 55 push ebp 007EE4E5 8BEC mov ebp, esp 007EE4E7 51 push ecx 007EE4E8 B906000000 mov ecx, $00000006 007EE4ED 6A00 push $00 007EE4EF 6A00 push $00 007EE4F1 49 dec ecx 007EE4F2 75F9 jnz 007EE4ED 007EE4F4 51 push ecx 007EE4F5 874DFC xchg [ebp-$04], ecx 007EE4F8 53 push ebx 007EE4F9 56 push esi 007EE4FA 8BF0 mov esi, eax 007EE4FC 33C0 xor eax, eax 007EE4FE 55 push ebp * Possible String Reference to: '椴c脬^[嬪]' | 007EE4FF 683DE77E00 push $007EE73D ***** TRY | 007EE504 64FF30 push dword ptr fs:[eax] 007EE507 648920 mov fs:[eax], esp 007EE50A 33C0 xor eax, eax 007EE50C 55 push ebp 007EE50D 6813E77E00 push $007EE713 ***** TRY | 007EE512 64FF30 push dword ptr fs:[eax] 007EE515 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EE785(Sender : TObject); begin (* 007EE785 50 push eax 007EE786 6461 popa 007EE788 7465 jz 007EE7EF 007EE78A 205946 and [ecx+$46], bl 007EE78D 5F pop edi 007EE78E 4D dec ebp 007EE78F 6F outsd 007EE790 6E outsb 007EE791 65795F jns 007EE7F3 007EE794 43 inc ebx 007EE795 52 push edx 007EE796 2000 and [eax], al 007EE798 FFFF DB $FF, $FF // 007EE79A FFFF DB $FF, $FF // 007EE79C 0D00000020 or eax, $20000000 007EE7A1 53 push ebx 007EE7A2 657420 jz 007EE7C5 007EE7A5 42 inc edx 007EE7A6 5A pop edx 007EE7A7 54 push esp 007EE7A8 7970 jns 007EE81A 007EE7AA 653D27000000 cmp eax, $00000027 007EE7B0 FFFF DB $FF, $FF // 007EE7B2 FFFF DB $FF, $FF // 007EE7B4 07 pop es 007EE7B5 0000 add [eax], al 007EE7B7 005A64 add [edx+$64], bl 007EE7BA 794E jns 007EE80A 007EE7BC 61 popa 007EE7BD 6D insd 007EE7BE 6500FF add bh, bh 007EE7C1 FFFF DB $FF, $FF // 007EE7C3 FF01 inc dword ptr [ecx] 007EE7C5 0000 add [eax], al 007EE7C7 0027 add [edi], ah 007EE7C9 0000 add [eax], al 007EE7CB 00FF add bh, bh 007EE7CD FFFF DB $FF, $FF // 007EE7CF FF09 dec dword ptr [ecx] 007EE7D1 0000 add [eax], al 007EE7D3 002C4564697465 add [$65746964+eax*2], ch 007EE7DA 723D jb 007EE819 007EE7DC 27 daa 007EE7DD 0000 add [eax], al 007EE7DF 00FF add bh, bh 007EE7E1 FFFF DB $FF, $FF // 007EE7E3 FF1400 call dword ptr [eax+eax] 007EE7E6 0000 add [eax], al 007EE7E8 2C45 sub al, $45 007EE7EA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EE7F3 657464 jz 007EE85A 007EE7F6 61 popa 007EE7F7 7465 jz 007EE85E 007EE7F9 2829 sub [ecx], ch 007EE7FB 2000 and [eax], al 007EE7FD 0000 add [eax], al 007EE7FF 00FF add bh, bh 007EE801 FFFF DB $FF, $FF // 007EE803 FF0D00000020 dec dword ptr [$20000000] 007EE809 7768 jnbe 007EE873 007EE80B 657265 jb 007EE873 007EE80E 205946 and [ecx+$46], bl 007EE811 49 dec ecx 007EE812 643D27000000 cmp eax, $00000027 007EE818 FFFF DB $FF, $FF // 007EE81A FFFF DB $FF, $FF // 007EE81C 0400 add al, +$00 007EE81E 0000 add [eax], al 007EE820 59 pop ecx 007EE821 46 inc esi 007EE822 49 dec ecx 007EE823 640000 add fs:[eax], al 007EE826 0000 add [eax], al 007EE828 55 push ebp 007EE829 8BEC mov ebp, esp 007EE82B 51 push ecx 007EE82C B906000000 mov ecx, $00000006 007EE831 6A00 push $00 007EE833 6A00 push $00 007EE835 49 dec ecx 007EE836 75F9 jnz 007EE831 007EE838 51 push ecx 007EE839 874DFC xchg [ebp-$04], ecx 007EE83C 53 push ebx 007EE83D 56 push esi 007EE83E 8BF0 mov esi, eax 007EE840 33C0 xor eax, eax 007EE842 55 push ebp * Possible String Reference to: '閚`脬^[嬪]' | 007EE843 6881EA7E00 push $007EEA81 ***** TRY | 007EE848 64FF30 push dword ptr fs:[eax] 007EE84B 648920 mov fs:[eax], esp 007EE84E 33C0 xor eax, eax 007EE850 55 push ebp 007EE851 6857EA7E00 push $007EEA57 ***** TRY | 007EE856 64FF30 push dword ptr fs:[eax] 007EE859 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP_HX._PROC_007EEAC9(Sender : TObject); begin (* 007EEAC9 50 push eax 007EEACA 6461 popa 007EEACC 7465 jz 007EEB33 007EEACE 205946 and [ecx+$46], bl 007EEAD1 5F pop edi 007EEAD2 4D dec ebp 007EEAD3 6F outsd 007EEAD4 6E outsb 007EEAD5 65795F jns 007EEB37 007EEAD8 43 inc ebx 007EEAD9 52 push edx 007EEADA 2000 and [eax], al 007EEADC FFFF DB $FF, $FF // 007EEADE FFFF DB $FF, $FF // 007EEAE0 0D00000020 or eax, $20000000 007EEAE5 53 push ebx 007EEAE6 657420 jz 007EEB09 007EEAE9 50 push eax 007EEAEA 5F pop edi 007EEAEB 53 push ebx 007EEAEC 7065 jo 007EEB53 007EEAEE 633D27000000 arpl [$00000027], di 007EEAF4 FFFF DB $FF, $FF // 007EEAF6 FFFF DB $FF, $FF // 007EEAF8 07 pop es 007EEAF9 0000 add [eax], al 007EEAFB 005A64 add [edx+$64], bl 007EEAFE 794E jns 007EEB4E 007EEB00 61 popa 007EEB01 6D insd 007EEB02 6500FF add bh, bh 007EEB05 FFFF DB $FF, $FF // 007EEB07 FF01 inc dword ptr [ecx] 007EEB09 0000 add [eax], al 007EEB0B 0027 add [edi], ah 007EEB0D 0000 add [eax], al 007EEB0F 00FF add bh, bh 007EEB11 FFFF DB $FF, $FF // 007EEB13 FF09 dec dword ptr [ecx] 007EEB15 0000 add [eax], al 007EEB17 002C4564697465 add [$65746964+eax*2], ch 007EEB1E 723D jb 007EEB5D 007EEB20 27 daa 007EEB21 0000 add [eax], al 007EEB23 00FF add bh, bh 007EEB25 FFFF DB $FF, $FF // 007EEB27 FF1400 call dword ptr [eax+eax] 007EEB2A 0000 add [eax], al 007EEB2C 2C45 sub al, $45 007EEB2E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 007EEB37 657464 jz 007EEB9E 007EEB3A 61 popa 007EEB3B 7465 jz 007EEBA2 007EEB3D 2829 sub [ecx], ch 007EEB3F 2000 and [eax], al 007EEB41 0000 add [eax], al 007EEB43 00FF add bh, bh 007EEB45 FFFF DB $FF, $FF // 007EEB47 FF0D00000020 dec dword ptr [$20000000] 007EEB4D 7768 jnbe 007EEBB7 007EEB4F 657265 jb 007EEBB7 007EEB52 205946 and [ecx+$46], bl 007EEB55 49 dec ecx 007EEB56 643D27000000 cmp eax, $00000027 007EEB5C FFFF DB $FF, $FF // 007EEB5E FFFF DB $FF, $FF // 007EEB60 0400 add al, +$00 007EEB62 0000 add [eax], al 007EEB64 59 pop ecx 007EEB65 46 inc esi 007EEB66 49 dec ecx 007EEB67 640000 add fs:[eax], al 007EEB6A 0000 add [eax], al 007EEB6C 55 push ebp 007EEB6D 8BEC mov ebp, esp 007EEB6F B905000000 mov ecx, $00000005 007EEB74 6A00 push $00 007EEB76 6A00 push $00 007EEB78 49 dec ecx 007EEB79 75F9 jnz 007EEB74 007EEB7B 51 push ecx 007EEB7C 53 push ebx 007EEB7D 56 push esi 007EEB7E 8BDA mov ebx, edx 007EEB80 8BF0 mov esi, eax 007EEB82 33C0 xor eax, eax 007EEB84 55 push ebp * Possible String Reference to: '/^脎^[嬪]' | 007EEB85 68C0EC7E00 push $007EECC0 ***** TRY | 007EEB8A 64FF30 push dword ptr fs:[eax] 007EEB8D 648920 mov fs:[eax], esp 007EEB90 8D55FC lea edx, [ebp-$04] 007EEB93 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; | 007EEB95 E8220BDAFF call 0058F6BC * Reference to control Label11 : N.A. | 007EEB9A 8B9E64030000 mov ebx, [esi+$0364] 007EEBA0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EEBA2 E89998CDFF call 004C8440 007EEBA7 8D55E8 lea edx, [ebp-$18] 007EEBAA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEBAD E83ABDC1FF call 0040A8EC 007EEBB2 8B55E8 mov edx, [ebp-$18] 007EEBB5 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEBB8 E80BA2C2FF call 00418DC8 007EEBBD 8D45EC lea eax, [ebp-$14] 007EEBC0 50 push eax * Possible String Reference to: 'P_CodeName' | 007EEBC1 BAD8EC7E00 mov edx, $007EECD8 007EEBC6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEBC8 E8E77FCDFF call 004C6BB4 007EEBCD 5A pop edx 007EEBCE 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EEBD0 FF91B4000000 call dword ptr [ecx+$00B4] 007EEBD6 8BC3 mov eax, ebx 007EEBD8 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007EEBDA FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007EEBE0 8B9E0C030000 mov ebx, [esi+$030C] 007EEBE6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEBE8 E8E76CCDFF call 004C58D4 007EEBED 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEBEF E8B8F3CEFF call 004DDFAC 007EEBF4 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007EEBF6 FF5244 call dword ptr [edx+$44] 007EEBF9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEBFB E8ACF3CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEC00 BAECEC7E00 mov edx, $007EECEC 007EEC05 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEC07 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_CodeName='' | 007EEC0A 6808ED7E00 push $007EED08 007EEC0F 8D55E0 lea edx, [ebp-$20] 007EEC12 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEC15 E8D2BCC1FF call 0040A8EC 007EEC1A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEC1D 6824ED7E00 push $007EED24 007EEC22 8D45E4 lea eax, [ebp-$1C] 007EEC25 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEC2A E8856AC1FF call 004056B4 007EEC2F 8B45E4 mov eax, [ebp-$1C] 007EEC32 50 push eax 007EEC33 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEC35 E872F3CEFF call 004DDFAC 007EEC3A 5A pop edx 007EEC3B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEC3D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EEC40 6830ED7E00 push $007EED30 * Possible String Reference to: 'YFId' | 007EEC45 BA48ED7E00 mov edx, $007EED48 * Reference to control Label11 : N.A. | 007EEC4A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEC50 E85F7FCDFF call 004C6BB4 007EEC55 8D55D4 lea edx, [ebp-$2C] 007EEC58 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EEC5A FF5160 call dword ptr [ecx+$60] 007EEC5D 8B45D4 mov eax, [ebp-$2C] 007EEC60 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEC63 E884BCC1FF call 0040A8EC 007EEC68 FF75D8 push dword ptr [ebp-$28] 007EEC6B 6858ED7E00 push $007EED58 007EEC70 8D45DC lea eax, [ebp-$24] 007EEC73 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEC78 E8376AC1FF call 004056B4 007EEC7D 8B45DC mov eax, [ebp-$24] 007EEC80 50 push eax 007EEC81 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEC83 E824F3CEFF call 004DDFAC 007EEC88 5A pop edx 007EEC89 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEC8B FF5138 call dword ptr [ecx+$38] 007EEC8E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EEC90 E83FF2CEFF call 004DDED4 007EEC95 33C0 xor eax, eax 007EEC97 5A pop edx 007EEC98 59 pop ecx 007EEC99 59 pop ecx 007EEC9A 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EEC9D 68C7EC7E00 push $007EECC7 007EECA2 8D45D4 lea eax, [ebp-$2C] 007EECA5 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EECAA E89966C1FF call 00405348 007EECAF 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EECB2 E8BD59C2FF call 00414674 007EECB7 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EECBA E86566C1FF call 00405324 007EECBF C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EECED(Sender : TObject); begin (* 007EECED 50 push eax 007EECEE 6461 popa 007EECF0 7465 jz 007EED57 007EECF2 205946 and [ecx+$46], bl 007EECF5 5F pop edi 007EECF6 4D dec ebp 007EECF7 6F outsd 007EECF8 6E outsb 007EECF9 65795F jns 007EED5B 007EECFC 43 inc ebx 007EECFD 52 push edx 007EECFE 2000 and [eax], al 007EED00 FFFF DB $FF, $FF // 007EED02 FFFF DB $FF, $FF // 007EED04 1100 adc [eax], eax 007EED06 0000 add [eax], al 007EED08 205365 and [ebx+$65], dl 007EED0B 7420 jz 007EED2D 007EED0D 50 push eax 007EED0E 5F pop edi 007EED0F 43 inc ebx 007EED10 6F outsd 007EED11 64654E dec esi 007EED14 61 popa 007EED15 6D insd 007EED16 653D27000000 cmp eax, $00000027 007EED1C FFFF DB $FF, $FF // 007EED1E FFFF DB $FF, $FF // 007EED20 0200 add al, byte ptr [eax] 007EED22 0000 add [eax], al 007EED24 27 daa 007EED25 2000 and [eax], al 007EED27 00FF add bh, bh 007EED29 FFFF DB $FF, $FF // 007EED2B FF0D00000020 dec dword ptr [$20000000] 007EED31 7768 jnbe 007EED9B 007EED33 657265 jb 007EED9B 007EED36 205946 and [ecx+$46], bl 007EED39 49 dec ecx 007EED3A 643D27000000 cmp eax, $00000027 007EED40 FFFF DB $FF, $FF // 007EED42 FFFF DB $FF, $FF // 007EED44 0400 add al, +$00 007EED46 0000 add [eax], al 007EED48 59 pop ecx 007EED49 46 inc esi 007EED4A 49 dec ecx 007EED4B 640000 add fs:[eax], al 007EED4E 0000 add [eax], al 007EED50 FFFF DB $FF, $FF // 007EED52 FFFF DB $FF, $FF // 007EED54 0100 add [eax], eax 007EED56 0000 add [eax], al 007EED58 27 daa 007EED59 0000 add [eax], al 007EED5B 00558B add [ebp-$75], dl 007EED5E EC in al, dx 007EED5F B905000000 mov ecx, $00000005 007EED64 6A00 push $00 007EED66 6A00 push $00 007EED68 49 dec ecx 007EED69 75F9 jnz 007EED64 007EED6B 51 push ecx 007EED6C 53 push ebx 007EED6D 56 push esi 007EED6E 8BDA mov ebx, edx 007EED70 8BF0 mov esi, eax 007EED72 33C0 xor eax, eax 007EED74 55 push ebp * Possible String Reference to: '?\脎^[嬪]' | 007EED75 68B0EE7E00 push $007EEEB0 ***** TRY | 007EED7A 64FF30 push dword ptr fs:[eax] 007EED7D 648920 mov fs:[eax], esp 007EED80 8D55FC lea edx, [ebp-$04] 007EED83 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; | 007EED85 E83209DAFF call 0058F6BC * Reference to control Label11 : N.A. | 007EED8A 8B9E64030000 mov ebx, [esi+$0364] 007EED90 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EED92 E8A996CDFF call 004C8440 007EED97 8D55E8 lea edx, [ebp-$18] 007EED9A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EED9D E84ABBC1FF call 0040A8EC 007EEDA2 8B55E8 mov edx, [ebp-$18] 007EEDA5 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEDA8 E81BA0C2FF call 00418DC8 007EEDAD 8D45EC lea eax, [ebp-$14] 007EEDB0 50 push eax * Possible String Reference to: 'P_Spec' | 007EEDB1 BAC8EE7E00 mov edx, $007EEEC8 007EEDB6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEDB8 E8F77DCDFF call 004C6BB4 007EEDBD 5A pop edx 007EEDBE 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EEDC0 FF91B4000000 call dword ptr [ecx+$00B4] 007EEDC6 8BC3 mov eax, ebx 007EEDC8 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007EEDCA FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007EEDD0 8B9E0C030000 mov ebx, [esi+$030C] 007EEDD6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEDD8 E8F76ACDFF call 004C58D4 007EEDDD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEDDF E8C8F1CEFF call 004DDFAC 007EEDE4 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007EEDE6 FF5244 call dword ptr [edx+$44] 007EEDE9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEDEB E8BCF1CEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEDF0 BAD8EE7E00 mov edx, $007EEED8 007EEDF5 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEDF7 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_Spec='' | 007EEDFA 68F4EE7E00 push $007EEEF4 007EEDFF 8D55E0 lea edx, [ebp-$20] 007EEE02 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEE05 E8E2BAC1FF call 0040A8EC 007EEE0A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEE0D 680CEF7E00 push $007EEF0C 007EEE12 8D45E4 lea eax, [ebp-$1C] 007EEE15 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEE1A E89568C1FF call 004056B4 007EEE1F 8B45E4 mov eax, [ebp-$1C] 007EEE22 50 push eax 007EEE23 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEE25 E882F1CEFF call 004DDFAC 007EEE2A 5A pop edx 007EEE2B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEE2D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EEE30 6818EF7E00 push $007EEF18 * Possible String Reference to: 'YFId' | 007EEE35 BA30EF7E00 mov edx, $007EEF30 * Reference to control Label11 : N.A. | 007EEE3A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEE40 E86F7DCDFF call 004C6BB4 007EEE45 8D55D4 lea edx, [ebp-$2C] 007EEE48 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EEE4A FF5160 call dword ptr [ecx+$60] 007EEE4D 8B45D4 mov eax, [ebp-$2C] 007EEE50 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEE53 E894BAC1FF call 0040A8EC 007EEE58 FF75D8 push dword ptr [ebp-$28] 007EEE5B 6840EF7E00 push $007EEF40 007EEE60 8D45DC lea eax, [ebp-$24] 007EEE63 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EEE68 E84768C1FF call 004056B4 007EEE6D 8B45DC mov eax, [ebp-$24] 007EEE70 50 push eax 007EEE71 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEE73 E834F1CEFF call 004DDFAC 007EEE78 5A pop edx 007EEE79 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEE7B FF5138 call dword ptr [ecx+$38] 007EEE7E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EEE80 E84FF0CEFF call 004DDED4 007EEE85 33C0 xor eax, eax 007EEE87 5A pop edx 007EEE88 59 pop ecx 007EEE89 59 pop ecx 007EEE8A 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EEE8D 68B7EE7E00 push $007EEEB7 007EEE92 8D45D4 lea eax, [ebp-$2C] 007EEE95 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EEE9A E8A964C1FF call 00405348 007EEE9F 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EEEA2 E8CD57C2FF call 00414674 007EEEA7 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EEEAA E87564C1FF call 00405324 007EEEAF C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EEED9(Sender : TObject); begin (* 007EEED9 50 push eax 007EEEDA 6461 popa 007EEEDC 7465 jz 007EEF43 007EEEDE 205946 and [ecx+$46], bl 007EEEE1 5F pop edi 007EEEE2 4D dec ebp 007EEEE3 6F outsd 007EEEE4 6E outsb 007EEEE5 65795F jns 007EEF47 007EEEE8 43 inc ebx 007EEEE9 52 push edx 007EEEEA 2000 and [eax], al 007EEEEC FFFF DB $FF, $FF // 007EEEEE FFFF DB $FF, $FF // 007EEEF0 0D00000020 or eax, $20000000 007EEEF5 53 push ebx 007EEEF6 657420 jz 007EEF19 007EEEF9 50 push eax 007EEEFA 5F pop edi 007EEEFB 53 push ebx 007EEEFC 7065 jo 007EEF63 007EEEFE 633D27000000 arpl [$00000027], di 007EEF04 FFFF DB $FF, $FF // 007EEF06 FFFF DB $FF, $FF // 007EEF08 0200 add al, byte ptr [eax] 007EEF0A 0000 add [eax], al 007EEF0C 27 daa 007EEF0D 2000 and [eax], al 007EEF0F 00FF add bh, bh 007EEF11 FFFF DB $FF, $FF // 007EEF13 FF0D00000020 dec dword ptr [$20000000] 007EEF19 7768 jnbe 007EEF83 007EEF1B 657265 jb 007EEF83 007EEF1E 205946 and [ecx+$46], bl 007EEF21 49 dec ecx 007EEF22 643D27000000 cmp eax, $00000027 007EEF28 FFFF DB $FF, $FF // 007EEF2A FFFF DB $FF, $FF // 007EEF2C 0400 add al, +$00 007EEF2E 0000 add [eax], al 007EEF30 59 pop ecx 007EEF31 46 inc esi 007EEF32 49 dec ecx 007EEF33 640000 add fs:[eax], al 007EEF36 0000 add [eax], al 007EEF38 FFFF DB $FF, $FF // 007EEF3A FFFF DB $FF, $FF // 007EEF3C 0100 add [eax], eax 007EEF3E 0000 add [eax], al 007EEF40 27 daa 007EEF41 0000 add [eax], al 007EEF43 00558B add [ebp-$75], dl 007EEF46 EC in al, dx 007EEF47 B905000000 mov ecx, $00000005 007EEF4C 6A00 push $00 007EEF4E 6A00 push $00 007EEF50 49 dec ecx 007EEF51 75F9 jnz 007EEF4C 007EEF53 51 push ecx 007EEF54 53 push ebx 007EEF55 56 push esi 007EEF56 8BDA mov ebx, edx 007EEF58 8BF0 mov esi, eax 007EEF5A 33C0 xor eax, eax 007EEF5C 55 push ebp * Possible String Reference to: '閃Z脎^[嬪]' | 007EEF5D 6898F07E00 push $007EF098 ***** TRY | 007EEF62 64FF30 push dword ptr fs:[eax] 007EEF65 648920 mov fs:[eax], esp 007EEF68 8D55FC lea edx, [ebp-$04] 007EEF6B 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; | 007EEF6D E84A07DAFF call 0058F6BC * Reference to control Label11 : N.A. | 007EEF72 8B9E64030000 mov ebx, [esi+$0364] 007EEF78 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EEF7A E8C194CDFF call 004C8440 007EEF7F 8D55E8 lea edx, [ebp-$18] 007EEF82 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEF85 E862B9C1FF call 0040A8EC 007EEF8A 8B55E8 mov edx, [ebp-$18] 007EEF8D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EEF90 E8339EC2FF call 00418DC8 007EEF95 8D45EC lea eax, [ebp-$14] 007EEF98 50 push eax * Possible String Reference to: 'KPNO' | 007EEF99 BAB0F07E00 mov edx, $007EF0B0 007EEF9E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EEFA0 E80F7CCDFF call 004C6BB4 007EEFA5 5A pop edx 007EEFA6 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EEFA8 FF91B4000000 call dword ptr [ecx+$00B4] 007EEFAE 8BC3 mov eax, ebx 007EEFB0 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007EEFB2 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007EEFB8 8B9E0C030000 mov ebx, [esi+$030C] 007EEFBE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EEFC0 E80F69CDFF call 004C58D4 007EEFC5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEFC7 E8E0EFCEFF call 004DDFAC 007EEFCC 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007EEFCE FF5244 call dword ptr [edx+$44] 007EEFD1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EEFD3 E8D4EFCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EEFD8 BAC0F07E00 mov edx, $007EF0C0 007EEFDD 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EEFDF FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPNO='' | 007EEFE2 68DCF07E00 push $007EF0DC 007EEFE7 8D55E0 lea edx, [ebp-$20] 007EEFEA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EEFED E8FAB8C1FF call 0040A8EC 007EEFF2 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EEFF5 68F0F07E00 push $007EF0F0 007EEFFA 8D45E4 lea eax, [ebp-$1C] 007EEFFD BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF002 E8AD66C1FF call 004056B4 007EF007 8B45E4 mov eax, [ebp-$1C] 007EF00A 50 push eax 007EF00B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF00D E89AEFCEFF call 004DDFAC 007EF012 5A pop edx 007EF013 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EF015 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EF018 68FCF07E00 push $007EF0FC * Possible String Reference to: 'YFId' | 007EF01D BA14F17E00 mov edx, $007EF114 * Reference to control Label11 : N.A. | 007EF022 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF028 E8877BCDFF call 004C6BB4 007EF02D 8D55D4 lea edx, [ebp-$2C] 007EF030 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EF032 FF5160 call dword ptr [ecx+$60] 007EF035 8B45D4 mov eax, [ebp-$2C] 007EF038 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF03B E8ACB8C1FF call 0040A8EC 007EF040 FF75D8 push dword ptr [ebp-$28] 007EF043 6824F17E00 push $007EF124 007EF048 8D45DC lea eax, [ebp-$24] 007EF04B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF050 E85F66C1FF call 004056B4 007EF055 8B45DC mov eax, [ebp-$24] 007EF058 50 push eax 007EF059 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF05B E84CEFCEFF call 004DDFAC 007EF060 5A pop edx 007EF061 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EF063 FF5138 call dword ptr [ecx+$38] 007EF066 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EF068 E867EECEFF call 004DDED4 007EF06D 33C0 xor eax, eax 007EF06F 5A pop edx 007EF070 59 pop ecx 007EF071 59 pop ecx 007EF072 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EF075 689FF07E00 push $007EF09F 007EF07A 8D45D4 lea eax, [ebp-$2C] 007EF07D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF082 E8C162C1FF call 00405348 007EF087 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EF08A E8E555C2FF call 00414674 007EF08F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EF092 E88D62C1FF call 00405324 007EF097 C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EF0C1(Sender : TObject); begin (* 007EF0C1 50 push eax 007EF0C2 6461 popa 007EF0C4 7465 jz 007EF12B 007EF0C6 205946 and [ecx+$46], bl 007EF0C9 5F pop edi 007EF0CA 4D dec ebp 007EF0CB 6F outsd 007EF0CC 6E outsb 007EF0CD 65795F jns 007EF12F 007EF0D0 43 inc ebx 007EF0D1 52 push edx 007EF0D2 2000 and [eax], al 007EF0D4 FFFF DB $FF, $FF // 007EF0D6 FFFF DB $FF, $FF // 007EF0D8 0B00 or eax, [eax] 007EF0DA 0000 add [eax], al 007EF0DC 205365 and [ebx+$65], dl 007EF0DF 7420 jz 007EF101 007EF0E1 4B dec ebx 007EF0E2 50 push eax 007EF0E3 4E dec esi 007EF0E4 4F dec edi 007EF0E5 3D2700FFFF cmp eax, $FFFF0027 007EF0EA FFFF DB $FF, $FF // 007EF0EC 0200 add al, byte ptr [eax] 007EF0EE 0000 add [eax], al 007EF0F0 27 daa 007EF0F1 2000 and [eax], al 007EF0F3 00FF add bh, bh 007EF0F5 FFFF DB $FF, $FF // 007EF0F7 FF0D00000020 dec dword ptr [$20000000] 007EF0FD 7768 jnbe 007EF167 007EF0FF 657265 jb 007EF167 007EF102 205946 and [ecx+$46], bl 007EF105 49 dec ecx 007EF106 643D27000000 cmp eax, $00000027 007EF10C FFFF DB $FF, $FF // 007EF10E FFFF DB $FF, $FF // 007EF110 0400 add al, +$00 007EF112 0000 add [eax], al 007EF114 59 pop ecx 007EF115 46 inc esi 007EF116 49 dec ecx 007EF117 640000 add fs:[eax], al 007EF11A 0000 add [eax], al 007EF11C FFFF DB $FF, $FF // 007EF11E FFFF DB $FF, $FF // 007EF120 0100 add [eax], eax 007EF122 0000 add [eax], al 007EF124 27 daa 007EF125 0000 add [eax], al 007EF127 00558B add [ebp-$75], dl 007EF12A EC in al, dx 007EF12B B905000000 mov ecx, $00000005 007EF130 6A00 push $00 007EF132 6A00 push $00 007EF134 49 dec ecx 007EF135 75F9 jnz 007EF130 007EF137 51 push ecx 007EF138 53 push ebx 007EF139 56 push esi 007EF13A 8BDA mov ebx, edx 007EF13C 8BF0 mov esi, eax 007EF13E 33C0 xor eax, eax 007EF140 55 push ebp * Possible String Reference to: '閟X脎^[嬪]' | 007EF141 687CF27E00 push $007EF27C ***** TRY | 007EF146 64FF30 push dword ptr fs:[eax] 007EF149 648920 mov fs:[eax], esp 007EF14C 8D55FC lea edx, [ebp-$04] 007EF14F 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; | 007EF151 E86605DAFF call 0058F6BC * Reference to control Label11 : N.A. | 007EF156 8B9E64030000 mov ebx, [esi+$0364] 007EF15C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 007EF15E E8DD92CDFF call 004C8440 007EF163 8D55E8 lea edx, [ebp-$18] 007EF166 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF169 E87EB7C1FF call 0040A8EC 007EF16E 8B55E8 mov edx, [ebp-$18] 007EF171 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EF174 E84F9CC2FF call 00418DC8 007EF179 8D45EC lea eax, [ebp-$14] 007EF17C 50 push eax * Possible String Reference to: 'KPDMNo' | 007EF17D BA94F27E00 mov edx, $007EF294 007EF182 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF184 E82B7ACDFF call 004C6BB4 007EF189 5A pop edx 007EF18A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 007EF18C FF91B4000000 call dword ptr [ecx+$00B4] 007EF192 8BC3 mov eax, ebx 007EF194 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 007EF196 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 007EF19C 8B9E0C030000 mov ebx, [esi+$030C] 007EF1A2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EF1A4 E82B67CDFF call 004C58D4 007EF1A9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF1AB E8FCEDCEFF call 004DDFAC 007EF1B0 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 007EF1B2 FF5244 call dword ptr [edx+$44] 007EF1B5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF1B7 E8F0EDCEFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 007EF1BC BAA4F27E00 mov edx, $007EF2A4 007EF1C1 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EF1C3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPDMNo='' | 007EF1C6 68C0F27E00 push $007EF2C0 007EF1CB 8D55E0 lea edx, [ebp-$20] 007EF1CE 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF1D1 E816B7C1FF call 0040A8EC 007EF1D6 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 007EF1D9 68D8F27E00 push $007EF2D8 007EF1DE 8D45E4 lea eax, [ebp-$1C] 007EF1E1 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF1E6 E8C964C1FF call 004056B4 007EF1EB 8B45E4 mov eax, [ebp-$1C] 007EF1EE 50 push eax 007EF1EF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF1F1 E8B6EDCEFF call 004DDFAC 007EF1F6 5A pop edx 007EF1F7 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EF1F9 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 007EF1FC 68E4F27E00 push $007EF2E4 * Possible String Reference to: 'YFId' | 007EF201 BAFCF27E00 mov edx, $007EF2FC * Reference to control Label11 : N.A. | 007EF206 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EF20C E8A379CDFF call 004C6BB4 007EF211 8D55D4 lea edx, [ebp-$2C] 007EF214 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EF216 FF5160 call dword ptr [ecx+$60] 007EF219 8B45D4 mov eax, [ebp-$2C] 007EF21C 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF21F E8C8B6C1FF call 0040A8EC 007EF224 FF75D8 push dword ptr [ebp-$28] 007EF227 680CF37E00 push $007EF30C 007EF22C 8D45DC lea eax, [ebp-$24] 007EF22F BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EF234 E87B64C1FF call 004056B4 007EF239 8B45DC mov eax, [ebp-$24] 007EF23C 50 push eax 007EF23D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 007EF23F E868EDCEFF call 004DDFAC 007EF244 5A pop edx 007EF245 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 007EF247 FF5138 call dword ptr [ecx+$38] 007EF24A 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 007EF24C E883ECCEFF call 004DDED4 007EF251 33C0 xor eax, eax 007EF253 5A pop edx 007EF254 59 pop ecx 007EF255 59 pop ecx 007EF256 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 007EF259 6883F27E00 push $007EF283 007EF25E 8D45D4 lea eax, [ebp-$2C] 007EF261 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF266 E8DD60C1FF call 00405348 007EF26B 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 007EF26E E80154C2FF call 00414674 007EF273 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007EF276 E8A960C1FF call 00405324 007EF27B C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EF2A5(Sender : TObject); begin (* 007EF2A5 50 push eax 007EF2A6 6461 popa 007EF2A8 7465 jz 007EF30F 007EF2AA 205946 and [ecx+$46], bl 007EF2AD 5F pop edi 007EF2AE 4D dec ebp 007EF2AF 6F outsd 007EF2B0 6E outsb 007EF2B1 65795F jns 007EF313 007EF2B4 43 inc ebx 007EF2B5 52 push edx 007EF2B6 2000 and [eax], al 007EF2B8 FFFF DB $FF, $FF // 007EF2BA FFFF DB $FF, $FF // 007EF2BC 0D00000020 or eax, $20000000 007EF2C1 53 push ebx 007EF2C2 657420 jz 007EF2E5 007EF2C5 4B dec ebx 007EF2C6 50 push eax 007EF2C7 44 inc esp 007EF2C8 4D dec ebp 007EF2C9 4E dec esi 007EF2CA 6F outsd 007EF2CB 3D27000000 cmp eax, $00000027 007EF2D0 FFFF DB $FF, $FF // 007EF2D2 FFFF DB $FF, $FF // 007EF2D4 0200 add al, byte ptr [eax] 007EF2D6 0000 add [eax], al 007EF2D8 27 daa 007EF2D9 2000 and [eax], al 007EF2DB 00FF add bh, bh 007EF2DD FFFF DB $FF, $FF // 007EF2DF FF0D00000020 dec dword ptr [$20000000] 007EF2E5 7768 jnbe 007EF34F 007EF2E7 657265 jb 007EF34F 007EF2EA 205946 and [ecx+$46], bl 007EF2ED 49 dec ecx 007EF2EE 643D27000000 cmp eax, $00000027 007EF2F4 FFFF DB $FF, $FF // 007EF2F6 FFFF DB $FF, $FF // 007EF2F8 0400 add al, +$00 007EF2FA 0000 add [eax], al 007EF2FC 59 pop ecx 007EF2FD 46 inc esi 007EF2FE 49 dec ecx 007EF2FF 640000 add fs:[eax], al 007EF302 0000 add [eax], al 007EF304 FFFF DB $FF, $FF // 007EF306 FFFF DB $FF, $FF // 007EF308 0100 add [eax], eax 007EF30A 0000 add [eax], al 007EF30C 27 daa 007EF30D 0000 add [eax], al 007EF30F 00558B add [ebp-$75], dl 007EF312 EC in al, dx 007EF313 6A00 push $00 007EF315 6A00 push $00 007EF317 6A00 push $00 007EF319 6A00 push $00 007EF31B 53 push ebx 007EF31C 8945FC mov [ebp-$04], eax 007EF31F 33C0 xor eax, eax 007EF321 55 push ebp 007EF322 687CF47E00 push $007EF47C ***** TRY | 007EF327 64FF30 push dword ptr fs:[eax] 007EF32A 648920 mov fs:[eax], esp 007EF32D 33C0 xor eax, eax 007EF32F 55 push ebp 007EF330 6852F47E00 push $007EF452 ***** TRY | 007EF335 64FF30 push dword ptr fs:[eax] 007EF338 648920 mov fs:[eax], esp 007EF33B 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 007EF33E 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007EF344 E80B82CDFF call 004C7554 007EF349 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 007EF34C 8B9820030000 mov ebx, [eax+$0320] 007EF352 33D2 xor edx, edx 007EF354 8BC3 mov eax, ebx 007EF356 8B08 mov ecx, [eax] * Possible reference to virtual method TToolButton.OFFS_0190 | 007EF358 FF9190010000 call dword ptr [ecx+$0190] 007EF35E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EF360 E86F65CDFF call 004C58D4 007EF365 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF367 E840ECCEFF call 004DDFAC 007EF36C 8B10 mov edx, [eax] * Reference to method TToolButton.GetClientRect() | 007EF36E FF5244 call dword ptr [edx+$44] 007EF371 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF373 E834ECCEFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 007EF378 BA90F47E00 mov edx, $007EF490 007EF37D 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EF37F FF5138 call dword ptr [ecx+$38] 007EF382 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF384 E823ECCEFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 007EF389 BAB0F47E00 mov edx, $007EF4B0 007EF38E 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EF390 FF5138 call dword ptr [ecx+$38] 007EF393 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF395 E812ECCEFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 007EF39A BAD0F47E00 mov edx, $007EF4D0 007EF39F 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EF3A1 FF5138 call dword ptr [ecx+$38] 007EF3A4 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF3A6 E801ECCEFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId ' | 007EF3AB BA04F57E00 mov edx, $007EF504 007EF3B0 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EF3B2 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where A.KPNO='%' | 007EF3B5 683CF57E00 push $007EF53C 007EF3BA 8D55F0 lea edx, [ebp-$10] 007EF3BD 8B45FC mov eax, [ebp-$04] * Reference to control BankNo : N.A. | 007EF3C0 8B80B0030000 mov eax, [eax+$03B0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007EF3C6 E82592C9FF call 004885F0 007EF3CB 8B45F0 mov eax, [ebp-$10] 007EF3CE 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EF3D1 E816B5C1FF call 0040A8EC 007EF3D6 FF75F4 push dword ptr [ebp-$0C] 007EF3D9 6854F57E00 push $007EF554 * Possible String Reference to: '' and A.CRType='应付款发票登记' ' | 007EF3DE 6860F57E00 push $007EF560 007EF3E3 8D45F8 lea eax, [ebp-$08] 007EF3E6 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007EF3EB E8C462C1FF call 004056B4 007EF3F0 8B45F8 mov eax, [ebp-$08] 007EF3F3 50 push eax 007EF3F4 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EF3F6 E8B1EBCEFF call 004DDFAC 007EF3FB 5A pop edx 007EF3FC 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EF3FE FF5138 call dword ptr [ecx+$38] 007EF401 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EF403 E8C064CDFF call 004C58C8 007EF408 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : N.A. | 007EF40B 8B9064030000 mov edx, [eax+$0364] 007EF411 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 007EF414 8B8020030000 mov eax, [eax+$0320] | 007EF41A E8717AFCFF call 007B6E90 007EF41F 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : N.A. | 007EF422 8B9064030000 mov edx, [eax+$0364] 007EF428 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 007EF42B 8B8020030000 mov eax, [eax+$0320] | 007EF431 E8E27BFCFF call 007B7018 007EF436 33C0 xor eax, eax 007EF438 5A pop edx 007EF439 59 pop ecx 007EF43A 59 pop ecx 007EF43B 648910 mov fs:[eax], edx ****** FINALLY | 007EF43E 6859F47E00 push $007EF459 007EF443 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 007EF446 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 007EF44C E82381CDFF call 004C7574 007EF451 C3 ret * Reference to: System.@HandleFinally; | 007EF452 E99D56C1FF jmp 00404AF4 007EF457 EBEA jmp 007EF443 ****** END | 007EF459 33C0 xor eax, eax 007EF45B 5A pop edx 007EF45C 59 pop ecx 007EF45D 59 pop ecx 007EF45E 648910 mov fs:[eax], edx ****** FINALLY | 007EF461 6883F47E00 push $007EF483 007EF466 8D45F0 lea eax, [ebp-$10] * Reference to: System.@LStrClr(void;void); | 007EF469 E8B65EC1FF call 00405324 007EF46E 8D45F4 lea eax, [ebp-$0C] 007EF471 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007EF476 E8CD5EC1FF call 00405348 007EF47B C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EF585(Sender : TObject); begin (* 007EF585 8BEC mov ebp, esp 007EF587 33C0 xor eax, eax 007EF589 55 push ebp * Possible String Reference to: '镕U滕]脣纼-<' | 007EF58A 68A9F57E00 push $007EF5A9 ***** TRY | 007EF58F 64FF30 push dword ptr fs:[eax] 007EF592 648920 mov fs:[eax], esp 007EF595 FF05D43C8900 inc dword ptr [$00893CD4] 007EF59B 33C0 xor eax, eax 007EF59D 5A pop edx 007EF59E 59 pop ecx 007EF59F 59 pop ecx 007EF5A0 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']脣纼-<' | 007EF5A3 68B0F57E00 push $007EF5B0 007EF5A8 C3 ret * Reference to: System.@HandleFinally; | 007EF5A9 E94655C1FF jmp 00404AF4 007EF5AE EBF8 jmp 007EF5A8 ****** END | 007EF5B0 5D pop ebp 007EF5B1 C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EF5B4(Sender : TObject); begin (* 007EF5B4 832DD43C890001 sub dword ptr [$00893CD4], +$01 007EF5BB C3 ret *) end; procedure TfrmYFFP_HX._PROC_007EF5BC(Sender : TObject); begin (* 007EF5BC 08F6 or dh, dh 007EF5BE 7E00 jle 007EF5C0 007EF5C0 0000 add [eax], al *) end; procedure TfrmYFFP_HX._PROC_007EF622(Sender : TObject); begin (* 007EF622 48 dec eax 007EF623 0050D4 add [eax-$2C], dl 007EF626 42 inc edx 007EF627 0008 add [eax], cl 007EF629 2D4A007CD0 sub eax, $D07C004A 007EF62E 42 inc edx 007EF62F 00F4 add ah, dh 007EF631 6B4A00D0 imul ecx, [edx+$00], $D0 007EF635 1D4A0030F6 sbb eax, $F630004A 007EF63A 48 dec eax 007EF63B 004CFB48 add [ebx+edi*8+$48], cl 007EF63F 0098FA48000C add [eax+$C0048FA], bl 007EF645 7948 jns 007EF68F 007EF647 00ACF04800E829 add [eax+esi*8+$29E80048], ch 007EF64E 4A dec edx 007EF64F 00E4 add ah, ah 007EF651 ED in eax, dx 007EF652 48 dec eax 007EF653 00547848 add [eax+edi*2+$48], dl 007EF657 005878 add [eax+$78], bl 007EF65A 48 dec eax 007EF65B 00DC add ah, bl 007EF65D 2A4A00 sub cl, byte ptr [edx+$00] 007EF660 3CA9 cmp al, $A9 007EF662 48 dec eax 007EF663 00C0 add al, al 007EF665 834800D0 or dword ptr [eax+$00], -$30 007EF669 7948 jns 007EF6B3 007EF66B 004C8548 add [ebp+eax*4+$48], cl 007EF66F 00D0 add al, dl 007EF671 2C4A sub al, $4A 007EF673 009C2B4A008486 add [ebx+ebp+$8684004A], bl 007EF67A 48 dec eax 007EF67B 00482D add [eax+$2D], cl 007EF67E 4A dec edx 007EF67F 00C0 add al, al 007EF681 A9480038EE test eax, $EE380048 007EF686 48 dec eax 007EF687 00F4 add ah, dh 007EF689 EE out dx, al 007EF68A 48 dec eax 007EF68B 00F0 add al, dh 007EF68D E94800D8EE jmp EF56F6DA 007EF692 48 dec eax 007EF693 00D8 add al, bl 007EF695 1B4A00 sbb ecx, [edx+$00] 007EF698 EC in al, dx 007EF699 334A00 xor ecx, [edx+$00] 007EF69C 20C4 and ah, al 007EF69E 48 dec eax 007EF69F 00B0404A0010 add [eax+$10004A40], dh 007EF6A5 44 inc esp 007EF6A6 4A dec edx 007EF6A7 00CC add ah, cl 007EF6A9 42 inc edx 007EF6AA 4A dec edx 007EF6AB 00B8C44800BC add [eax+$BC0048C4], bh 007EF6B1 C44800 les ecx, [eax+$00] 007EF6B4 48 dec eax 007EF6B5 45 inc ebp 007EF6B6 4A dec edx 007EF6B7 001CC3 add [ebx+eax*8], bl 007EF6BA 48 dec eax 007EF6BB 0018 add [eax], bl 007EF6BD F0 lock 007EF6BE 48 dec eax 007EF6BF 00444C4A add [esp+ecx*2+$4A], al 007EF6C3 000C02 add [edx+eax], cl 007EF6C6 49 dec ecx 007EF6C7 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 007EF6CE 4A dec edx 007EF6CF 008C154A003C18 add [ebp+edx+$183C004A], cl 007EF6D6 4A dec edx 007EF6D7 0038 add [eax], bh 007EF6D9 52 push edx 007EF6DA 4A dec edx 007EF6DB 005C224A add [edx+$4A], bl 007EF6DF 00D8 add al, bl 007EF6E1 224A00 and cl, byte ptr [edx+$00] 007EF6E4 7C68 jl 007EF74E 007EF6E6 4A dec edx 007EF6E7 00941F4A003C60 add [edi+ebx+$603C004A], dl 007EF6EE 4A dec edx 007EF6EF 001447 add [edi+eax*2], dl 007EF6F2 4A dec edx 007EF6F3 0034654A00CC2C add [$2CCC004A], dh 007EF6FA 4A dec edx 007EF6FB 000E add [esi], cl 007EF6FD 0000 add [eax], al 007EF6FF 0000 add [eax], al 007EF701 0003 add [ebx], al 007EF703 0000 add [eax], al 007EF705 0020 add [eax], ah 007EF707 114000 adc [eax+$00], eax 007EF70A E803000020 call 207EF712 007EF70F 114000 adc [eax+$00], eax 007EF712 EC in al, dx 007EF713 0300 add eax, [eax] 007EF715 0020 add [eax], ah 007EF717 114000 adc [eax+$00], eax 007EF71A F0 lock 007EF71B 0300 add eax, [eax] 007EF71D 003C00 add [eax+eax], bh 007EF720 25FC7E00F8 and eax, $F8007EFC 007EF725 0200 add al, byte ptr [eax] 007EF727 0000 add [eax], al 007EF729 0008 add [eax], cl 007EF72B 54 push esp 007EF72C 6F outsd 007EF72D 6F outsd 007EF72E 6C insb 007EF72F 42 inc edx 007EF730 61 popa 007EF731 7231 jb 007EF764 007EF733 FC cld 007EF734 0200 add al, byte ptr [eax] 007EF736 0001 add [ecx], al 007EF738 0009 add [ecx], cl 007EF73A 54 push esp 007EF73B 42 inc edx 007EF73C 52 push edx 007EF73D 61 popa 007EF73E 667265 jb 007EF7A6 007EF741 7368 jnb 007EF7AB 007EF743 0003 add [ebx], al 007EF745 0000 add [eax], al 007EF747 0100 add [eax], eax 007EF749 06 push es 007EF74A 54 push esp 007EF74B 42 inc edx 007EF74C 46 inc esi 007EF74D 696E6404030000 imul ebp, [esi+$64], $00000304 007EF754 0100 add [eax], eax 007EF756 08544245 or [edx+eax*2+$45], dl 007EF75A 7870 js 007EF7CC 007EF75C 6F outsd 007EF75D 7274 jb 007EF7D3 007EF75F 0803 or [ebx], al 007EF761 0000 add [eax], al 007EF763 0100 add [eax], eax 007EF765 07 pop es 007EF766 54 push esp 007EF767 42 inc edx 007EF768 43 inc ebx 007EF769 6C insb 007EF76A 6F outsd 007EF76B 7365 jnb 007EF7D2 007EF76D 0C03 or al, $03 007EF76F 0000 add [eax], al 007EF771 0200 add al, byte ptr [eax] 007EF773 06 push es 007EF774 50 push eax 007EF775 61 popa 007EF776 6E outsb 007EF777 656C insb 007EF779 3110 xor [eax], edx 007EF77B 0300 add eax, [eax] 007EF77D 0003 add [ebx], al 007EF77F 000B add [ebx], cl 007EF781 41 inc ecx 007EF782 44 inc esp 007EF783 4F dec edi 007EF784 51 push ecx 007EF785 7565 jnz 007EF7EC 007EF787 7279 jb 007EF802 007EF789 43 inc ebx 007EF78A 6D insd 007EF78B 641403 adc al, $03 007EF78E 0000 add [eax], al 007EF790 0300 add eax, [eax] 007EF792 0C41 or al, $41 007EF794 44 inc esp 007EF795 4F dec edi 007EF796 51 push ecx 007EF797 7565 jnz 007EF7FE 007EF799 7279 jb 007EF814 007EF79B 4D dec ebp 007EF79C 61 popa 007EF79D 696E1803000003 imul ebp, [esi+$18], $03000003 007EF7A4 000C41 add [ecx+eax*2], cl 007EF7A7 44 inc esp 007EF7A8 4F dec edi 007EF7A9 51 push ecx 007EF7AA 7565 jnz 007EF811 007EF7AC 7279 jb 007EF827 007EF7AE 54 push esp 007EF7AF 656D insd 007EF7B1 701C jo 007EF7CF 007EF7B3 0300 add eax, [eax] 007EF7B5 000400 add [eax+eax], al 007EF7B8 0B446174 or eax, [ecx+$74] 007EF7BC 61 popa 007EF7BD 53 push ebx 007EF7BE 6F outsd 007EF7BF 7572 jnz 007EF833 007EF7C1 636531 arpl [ebp+$31], sp 007EF7C4 2003 and [ebx], al 007EF7C6 0000 add [eax], al 007EF7C8 0500064C61 add eax, +$614C0600 007EF7CD 62656C bound esp, qword ptr [ebp+$6C] 007EF7D0 312403 xor [ebx+eax], esp 007EF7D3 0000 add [eax], al 007EF7D5 0500064C61 add eax, +$614C0600 007EF7DA 62656C bound esp, qword ptr [ebp+$6C] 007EF7DD 3228 xor ch, byte ptr [eax] 007EF7DF 0300 add eax, [eax] 007EF7E1 0006 add [esi], al 007EF7E3 0007 add [edi], al 007EF7E5 42 inc edx 007EF7E6 656744 inc esp 007EF7E9 61 popa 007EF7EA 7465 jz 007EF851 007EF7EC 2C03 sub al, $03 007EF7EE 0000 add [eax], al 007EF7F0 06 push es 007EF7F1 0007 add [edi], al 007EF7F3 45 inc ebp 007EF7F4 6E outsb 007EF7F5 6444 inc esp 007EF7F7 61 popa 007EF7F8 7465 jz 007EF85F 007EF7FA 3003 xor [ebx], al 007EF7FC 0000 add [eax], al 007EF7FE 07 pop es 007EF7FF 0008 add [eax], cl 007EF801 43 inc ebx 007EF802 44 inc esp 007EF803 53 push ebx 007EF804 5F pop edi 007EF805 4D dec ebp 007EF806 61 popa 007EF807 696E3403000008 imul ebp, [esi+$34], $08000003 007EF80E 000A add [edx], cl 007EF810 50 push eax 007EF811 6F outsd 007EF812 7075 jo 007EF889 007EF814 704D jo 007EF863 007EF816 656E outsb 007EF818 7531 jnz 007EF84B 007EF81A 3803 cmp [ebx], al 007EF81C 0000 add [eax], al 007EF81E 0900 or [eax], eax 007EF820 024E31 add cl, byte ptr [esi+$31] 007EF823 3C03 cmp al, $03 007EF825 0000 add [eax], al 007EF827 0900 or [eax], eax 007EF829 024E32 add cl, byte ptr [esi+$32] 007EF82C 40 inc eax 007EF82D 0300 add eax, [eax] 007EF82F 000500064C61 add [$614C0600], al 007EF835 62656C bound esp, qword ptr [ebp+$6C] 007EF838 33440300 xor eax, [ebx+eax+$00] 007EF83C 000500064C61 add [$614C0600], al 007EF842 62656C bound esp, qword ptr [ebp+$6C] 007EF845 3448 xor al, $48 007EF847 0300 add eax, [eax] 007EF849 000500064C61 add [$614C0600], al 007EF84F 62656C bound esp, qword ptr [ebp+$6C] 007EF852 354C030000 xor eax, $0000034C 007EF857 0500064C61 add eax, +$614C0600 007EF85C 62656C bound esp, qword ptr [ebp+$6C] 007EF85F 385003 cmp [eax+$03], dl 007EF862 0000 add [eax], al 007EF864 0500074C61 add eax, +$614C0700 007EF869 62656C bound esp, qword ptr [ebp+$6C] 007EF86C 3132 xor [edx], esi 007EF86E 54 push esp 007EF86F 0300 add eax, [eax] 007EF871 000A add [edx], cl 007EF873 0006 add [esi], al 007EF875 53 push ebx 007EF876 50 push eax 007EF877 4E dec esi 007EF878 61 popa 007EF879 6D insd 007EF87A 6558 pop eax 007EF87C 0300 add eax, [eax] 007EF87E 000A add [edx], cl 007EF880 000B add [ebx], cl 007EF882 46 inc esi 007EF883 61 popa 007EF884 63746F72 arpl [edi+ebp*2+$72], si 007EF888 794E jns 007EF8D8 007EF88A 61 popa 007EF88B 6D insd 007EF88C 655C pop esp 007EF88E 0300 add eax, [eax] 007EF890 000A add [edx], cl 007EF892 000453 add [ebx+edx*2], al 007EF895 50 push eax 007EF896 49 dec ecx 007EF897 44 inc esp 007EF898 60 pusha 007EF899 0300 add eax, [eax] 007EF89B 000A add [edx], cl 007EF89D 0006 add [esi], al 007EF89F 53 push ebx 007EF8A0 50 push eax 007EF8A1 53 push ebx 007EF8A2 7065 jo 007EF909 007EF8A4 63640300 arpl [ebx+eax+$00], sp 007EF8A8 000B add [ebx], cl 007EF8AA 0006 add [esi], al 007EF8AC 43 inc ebx 007EF8AD 52 push edx 007EF8AE 54 push esp 007EF8AF 7970 jns 007EF921 007EF8B1 656803000005 push $05000003 007EF8B7 0006 add [esi], al 007EF8B9 4C dec esp 007EF8BA 61 popa 007EF8BB 62656C bound esp, qword ptr [ebp+$6C] 007EF8BE 366C insb 007EF8C0 0300 add eax, [eax] 007EF8C2 000A add [edx], cl 007EF8C4 000453 add [ebx+edx*2], al 007EF8C7 50 push eax 007EF8C8 43 inc ebx 007EF8C9 46 inc esi 007EF8CA 7003 jo 007EF8CF 007EF8CC 0000 add [eax], al 007EF8CE 0500064C61 add eax, +$614C0600 007EF8D3 62656C bound esp, qword ptr [ebp+$6C] 007EF8D6 37 aaa 007EF8D7 7403 jz 007EF8DC 007EF8D9 0000 add [eax], al 007EF8DB 0A00 or al, byte ptr [eax] 007EF8DD 07 pop es 007EF8DE 4F dec edi 007EF8DF 7264 jb 007EF945 007EF8E1 65724E jb 007EF932 007EF8E4 6F outsd 007EF8E5 7803 js 007EF8EA 007EF8E7 0000 add [eax], al 007EF8E9 0C00 or al, $00 007EF8EB 07 pop es 007EF8EC 637847 arpl [eax+$47], di 007EF8EF 7269 jb 007EF95A 007EF8F1 64327C0300 xor bh, byte ptr fs:[ebx+eax+$00] 007EF8F6 000D00035476 add [$76540300], cl 007EF8FC 31800300000E xor [eax+$E000003], eax 007EF902 0009 add [ecx], cl 007EF904 7631 jbe 007EF937 007EF906 43 inc ebx 007EF907 6F outsd 007EF908 6C insb 007EF909 756D jnz 007EF978 007EF90B 6E outsb 007EF90C 32840300000E00 xor al, byte ptr [ebx+eax+$E0000] 007EF913 097631 or [esi+$31], esi 007EF916 43 inc ebx 007EF917 6F outsd 007EF918 6C insb 007EF919 756D jnz 007EF988 007EF91B 6E outsb 007EF91C 3488 xor al, $88 007EF91E 0300 add eax, [eax] 007EF920 000E add [esi], cl 007EF922 000A add [edx], cl 007EF924 7631 jbe 007EF957 007EF926 43 inc ebx 007EF927 6F outsd 007EF928 6C insb 007EF929 756D jnz 007EF998 007EF92B 6E outsb 007EF92C 3133 xor [ebx], esi 007EF92E 8C03 mov word ptr [ebx], es 007EF930 0000 add [eax], al 007EF932 0E push cs 007EF933 000D76314661 add [$61463176], cl 007EF939 63746F72 arpl [edi+ebp*2+$72], si 007EF93D 794E jns 007EF98D 007EF93F 61 popa 007EF940 6D insd 007EF941 6590 nop 007EF943 0300 add eax, [eax] 007EF945 000E add [esi], cl 007EF947 0009 add [ecx], cl 007EF949 7632 jbe 007EF97D 007EF94B 43 inc ebx 007EF94C 6F outsd 007EF94D 6C insb 007EF94E 756D jnz 007EF9BD 007EF950 6E outsb 007EF951 31940300000E00 xor [ebx+eax+$E0000], edx 007EF958 097631 or [esi+$31], esi 007EF95B 43 inc ebx 007EF95C 6F outsd 007EF95D 6C insb 007EF95E 756D jnz 007EF9CD 007EF960 6E outsb 007EF961 38980300000E cmp [eax+$E000003], bl 007EF967 0009 add [ecx], cl 007EF969 7631 jbe 007EF99C 007EF96B 43 inc ebx 007EF96C 6F outsd 007EF96D 6C insb 007EF96E 756D jnz 007EF9DD 007EF970 6E outsb 007EF971 319C0300000E00 xor [ebx+eax+$E0000], ebx 007EF978 0A7631 or dh, byte ptr [esi+$31] 007EF97B 43 inc ebx 007EF97C 6F outsd 007EF97D 6C insb 007EF97E 756D jnz 007EF9ED 007EF980 6E outsb 007EF981 3130 xor [eax], esi 007EF983 A00300000E mov al, byte ptr [$0E000003] 007EF988 0009 add [ecx], cl 007EF98A 7631 jbe 007EF9BD 007EF98C 43 inc ebx 007EF98D 6F outsd 007EF98E 6C insb 007EF98F 756D jnz 007EF9FE 007EF991 6E outsb 007EF992 39A40300000E00 cmp [ebx+eax+$E0000], esp 007EF999 097632 or [esi+$32], esi 007EF99C 43 inc ebx 007EF99D 6F outsd 007EF99E 6C insb 007EF99F 756D jnz 007EFA0E 007EF9A1 6E outsb 007EF9A2 36A803 test al, $03 007EF9A5 0000 add [eax], al 007EF9A7 0E push cs 007EF9A8 0009 add [ecx], cl 007EF9AA 7631 jbe 007EF9DD 007EF9AC 43 inc ebx 007EF9AD 6F outsd 007EF9AE 6C insb 007EF9AF 756D jnz 007EFA1E 007EF9B1 6E outsb 007EF9B2 33AC0300000E00 xor ebp, [ebx+eax+$E0000] 007EF9B9 0A7631 or dh, byte ptr [esi+$31] 007EF9BC 43 inc ebx 007EF9BD 6F outsd 007EF9BE 6C insb 007EF9BF 756D jnz 007EFA2E 007EF9C1 6E outsb 007EF9C2 3132 xor [edx], esi 007EF9C4 B003 mov al, $03 007EF9C6 0000 add [eax], al 007EF9C8 0F000D63784772 str word ptr [$72477863] 007EF9CF 6964324C6576656C imul esp, [edx+esi+$4C], $6C657665 007EF9D7 31B40300000500 xor [ebx+eax+$50000], esi 007EF9DE 06 push es 007EF9DF 4C dec esp 007EF9E0 61 popa 007EF9E1 62656C bound esp, qword ptr [ebp+$6C] 007EF9E4 39B80300000B cmp [eax+$B000003], edi 007EF9EA 0006 add [esi], al 007EF9EC 53 push ebx 007EF9ED 53 push ebx 007EF9EE 54 push esp 007EF9EF 7970 jns 007EFA61 007EF9F1 65BC0300000E mov esp, $0E000003 007EF9F7 000A add [edx], cl 007EF9F9 7631 jbe 007EFA2C 007EF9FB 43 inc ebx 007EF9FC 6F outsd 007EF9FD 6C insb 007EF9FE 756D jnz 007EFA6D 007EFA00 6E outsb 007EFA01 3137 xor [edi], esi 007EFA03 C00300 rol byte ptr [ebx], $00 007EFA06 0001 add [ecx], al 007EFA08 000B add [ebx], cl 007EFA0A 54 push esp 007EFA0B 6F outsd 007EFA0C 6F outsd 007EFA0D 6C insb 007EFA0E 42 inc edx 007EFA0F 7574 jnz 007EFA85 007EFA11 746F jz 007EFA82 007EFA13 6E outsb 007EFA14 31C4 xor esp, eax 007EFA16 0300 add eax, [eax] 007EFA18 0010 add [eax], dl 007EFA1A 000D63785461 add [$61547863], cl 007EFA20 62436F bound eax, qword ptr [ebx+$6F] 007EFA23 6E outsb 007EFA24 7472 jz 007EFA98 007EFA26 6F outsd 007EFA27 6C insb 007EFA28 31C8 xor eax, ecx 007EFA2A 0300 add eax, [eax] 007EFA2C 0011 add [ecx], dl 007EFA2E 0010 add [eax], dl 007EFA30 637847 arpl [eax+$47], di 007EFA33 7269 jb 007EFA9E 007EFA35 6450 push eax 007EFA37 6F outsd 007EFA38 7075 jo 007EFAAF 007EFA3A 704D jo 007EFA89 007EFA3C 656E outsb 007EFA3E 7531 jnz 007EFA71 007EFA40 CC int 3 007EFA41 0300 add eax, [eax] 007EFA43 000500074C61 add [$614C0700], al 007EFA49 62656C bound esp, qword ptr [ebp+$6C] 007EFA4C 3131 xor [ecx], esi 007EFA4E D003 rol byte ptr [ebx], 1 007EFA50 0000 add [eax], al 007EFA52 0A00 or al, byte ptr [eax] 007EFA54 05436F6E4E add eax, +$4E6E6F43 007EFA59 4F dec edi 007EFA5A D4 aam 007EFA5B 0300 add eax, [eax] 007EFA5D 000E add [esi], cl 007EFA5F 0007 add [edi], al 007EFA61 7631 jbe 007EFA94 007EFA63 43 inc ebx 007EFA64 6F outsd 007EFA65 6E outsb 007EFA66 4E dec esi 007EFA67 4F dec edi 007EFA68 D803 fadd dword ptr [ebx] 007EFA6A 0000 add [eax], al 007EFA6C 0E push cs 007EFA6D 000B add [ebx], cl 007EFA6F 7631 jbe 007EFAA2 007EFA71 43 inc ebx 007EFA72 6F outsd 007EFA73 6D insd 007EFA74 54 push esp 007EFA75 61 popa 007EFA76 69546F75DC030000 imul edx, [edi+ebp*2+$75], $000003DC 007EFA7E 0E push cs 007EFA7F 0009 add [ecx], cl 007EFA81 7631 jbe 007EFAB4 007EFA83 48 dec eax 007EFA84 59 pop ecx 007EFA85 50 push eax 007EFA86 7269 jb 007EFAF1 007EFA88 6365E0 arpl [ebp-$20], sp 007EFA8B 0300 add eax, [eax] 007EFA8D 000E add [esi], cl 007EFA8F 0008 add [eax], cl 007EFA91 7631 jbe 007EFAC4 007EFA93 42 inc edx 007EFA94 5A pop edx 007EFA95 54 push esp 007EFA96 7970 jns 007EFB08 007EFA98 65E403 in al, $03 007EFA9B 0000 add [eax], al 007EFA9D 0E push cs 007EFA9E 0007 add [edi], al 007EFAA0 7631 jbe 007EFAD3 007EFAA2 59 pop ecx 007EFAA3 4A dec edx 007EFAA4 42 inc edx 007EFAA5 4C dec esp 007EFAA6 691300120094 imul edx, [ebx], $94001200 007EFAAC 137F00 adc edi, [edi+$00] 007EFAAF 0B466F or eax, [esi+$6F] 007EFAB2 726D jb 007EFB21 007EFAB4 44 inc esp 007EFAB5 657374 jnb 007EFB2C 007EFAB8 726F jb 007EFB29 007EFABA 7910 jns 007EFACC 007EFABC 009C137F000946 add [ebx+edx+$4609007F], bl 007EFAC3 6F outsd 007EFAC4 726D jb 007EFB33 007EFAC6 43 inc ebx 007EFAC7 6C insb 007EFAC8 6F outsd 007EFAC9 7365 jnb 007EFB30 007EFACB 1100 adc [eax], eax 007EFACD A0137F000A mov al, byte ptr [$0A007F13] 007EFAD2 46 inc esi 007EFAD3 6F outsd 007EFAD4 726D jb 007EFB43 007EFAD6 43 inc ebx 007EFAD7 7265 jb 007EFB3E 007EFAD9 61 popa 007EFADA 7465 jz 007EFB41 007EFADC 1500341B7F adc eax, $7F1B3400 007EFAE1 000E add [esi], cl 007EFAE3 54 push esp 007EFAE4 42 inc edx 007EFAE5 52 push edx 007EFAE6 61 popa 007EFAE7 667265 jb 007EFB4F 007EFAEA 7368 jnb 007EFB54 007EFAEC 43 inc ebx 007EFAED 6C insb 007EFAEE 69636B1300501B imul esp, [ebx+$6B], $1B500013 007EFAF5 7F00 jnle 007EFAF7 007EFAF7 0C43 or al, $43 007EFAF9 6F outsd 007EFAFA 6E outsb 007EFAFB 4E dec esi 007EFAFC 6F outsd 007EFAFD 4D dec ebp 007EFAFE 43 inc ebx 007EFAFF 68616E6765 push $65676E61 007EFB04 1300 adc eax, [eax] 007EFB06 C01B7F rcr byte ptr [ebx], $7F 007EFB09 000C54 add [esp+edx*2], cl 007EFB0C 42 inc edx 007EFB0D 43 inc ebx 007EFB0E 6C insb 007EFB0F 6F outsd 007EFB10 7365 jnb 007EFB77 007EFB12 43 inc ebx 007EFB13 6C insb 007EFB14 69636B0F00301C imul esp, [ebx+$6B], $1C30000F 007EFB1B 7F00 jnle 007EFB1D 007EFB1D 08466F or [esi+$6F], al 007EFB20 726D jb 007EFB8F 007EFB22 53 push ebx 007EFB23 686F771400 push $0014776F 007EFB28 A01C7F000D mov al, byte ptr [$0D007F1C] 007EFB2D 54 push esp 007EFB2E 42 inc edx 007EFB2F 45 inc ebp 007EFB30 7870 js 007EFBA2 007EFB32 6F outsd 007EFB33 7274 jb 007EFBA9 007EFB35 43 inc ebx 007EFB36 6C insb 007EFB37 69636B1200DC1C imul esp, [ebx+$6B], $1CDC0012 007EFB3E 7F00 jnle 007EFB40 007EFB40 0B544246 or edx, [edx+eax*2+$46] 007EFB44 696E64436C6963 imul ebp, [esi+$64], $63696C43 007EFB4B 6B0E00 imul ecx, [esi], $00 007EFB4E 5C pop esp 007EFB4F 1D7F00074E sbb eax, $4E07007F 007EFB54 31436C xor [ebx+$6C], eax 007EFB57 69636B0E006C1D imul esp, [ebx+$6B], $1D6C000E 007EFB5E 7F00 jnle 007EFB60 007EFB60 07 pop es 007EFB61 4E dec esi 007EFB62 32436C xor al, byte ptr [ebx+$6C] 007EFB65 69636B13007C1D imul esp, [ebx+$6B], $1D7C0013 007EFB6C 7F00 jnle 007EFB6E 007EFB6E 0C53 or al, $53 007EFB70 50 push eax 007EFB71 49 dec ecx 007EFB72 44 inc esp 007EFB73 4B dec ebx 007EFB74 657950 jns 007EFBC7 007EFB77 7265 jb 007EFBDE 007EFB79 7373 jnb 007EFBEE 007EFB7B 1100 adc [eax], eax 007EFB7D 801D7F000A5350 sbb byte ptr [$530A007F], $50 007EFB84 49 dec ecx 007EFB85 44 inc esp 007EFB86 43 inc ebx 007EFB87 68616E6765 push $65676E61 007EFB8C 1300 adc eax, [eax] 007EFB8E 2C1E sub al, $1E 007EFB90 7F00 jnle 007EFB92 007EFB92 0C53 or al, $53 007EFB94 50 push eax 007EFB95 53 push ebx 007EFB96 7065 jo 007EFBFD 007EFB98 634368 arpl [ebx+$68], ax 007EFB9B 61 popa 007EFB9C 6E outsb 007EFB9D 67651800 sbb gs:[bx+si], al 007EFBA1 40 inc eax 007EFBA2 1E push ds 007EFBA3 7F00 jnle 007EFBA5 007EFBA5 114661 adc [esi+$61], eax 007EFBA8 63746F72 arpl [edi+ebp*2+$72], si 007EFBAC 794E jns 007EFBFC 007EFBAE 61 popa 007EFBAF 6D insd 007EFBB0 6543 inc ebx 007EFBB2 68616E6765 push $65676E61 007EFBB7 17 pop ss 007EFBB8 00541E7F add [esi+ebx+$7F], dl 007EFBBC 0010 add [eax], dl 007EFBBE 54 push esp 007EFBBF 6F outsd 007EFBC0 6F outsd 007EFBC1 6C insb 007EFBC2 42 inc edx 007EFBC3 7574 jnz 007EFC39 007EFBC5 746F jz 007EFC36 007EFBC7 6E outsb 007EFBC8 31436C xor [ebx+$6C], eax 007EFBCB 69636B1A006420 imul esp, [ebx+$6B], $2064001A 007EFBD2 7F00 jnle 007EFBD4 007EFBD4 136378 adc esp, [ebx+$78] 007EFBD7 54 push esp 007EFBD8 61 popa 007EFBD9 62436F bound eax, qword ptr [ebx+$6F] 007EFBDC 6E outsb 007EFBDD 7472 jz 007EFC51 007EFBDF 6F outsd 007EFBE0 6C insb 007EFBE1 314368 xor [ebx+$68], eax 007EFBE4 61 popa 007EFBE5 6E outsb 007EFBE6 676516 push ss 007EFBE9 006C207F add [eax+$7F], ch 007EFBED 000F add [edi], cl 007EFBEF 4F dec edi 007EFBF0 7264 jb 007EFC56 007EFBF2 65724E jb 007EFC43 007EFBF5 6F outsd 007EFBF6 4B dec ebx 007EFBF7 657950 jns 007EFC4A 007EFBFA 7265 jb 007EFC61 007EFBFC 7373 jnb 007EFC71 007EFBFE 1400 adc al, $00 007EFC00 2425 and al, $25 007EFC02 7F00 jnle 007EFC04 007EFC04 0D436F6E4E or eax, $4E6E6F43 007EFC09 4F dec edi 007EFC0A 4B dec ebx 007EFC0B 657950 jns 007EFC5E 007EFC0E 7265 jb 007EFC75 007EFC10 7373 jnb 007EFC85 007EFC12 12546672 adc dl, byte ptr [esi+$72] 007EFC16 6D insd 007EFC17 53 push ebx 007EFC18 58 pop eax 007EFC19 43 inc ebx 007EFC1A 4B dec ebx 007EFC1B 4E dec esi 007EFC1C 65774C jnbe 007EFC6B 007EFC1F 6973745F534B12 imul esi, [ebx+$74], $124B535F 007EFC26 0028 add [eax], ch 007EFC28 94 xchg eax, esp 007EFC29 45 inc ebp 007EFC2A 00648A45 add [edx+ecx*4+$45], ah 007EFC2E 0020 add [eax], ah 007EFC30 42 inc edx 007EFC31 44 inc esp 007EFC32 00B8124D0008 add [eax+$8004D12], bh 007EFC38 7F4B jnle 007EFC85 007EFC3A 001C5F add [edi+ebx*2], bl 007EFC3D 47 inc edi 007EFC3E 00E0 add al, ah 007EFC40 A5 movsd 007EFC41 45 inc ebp 007EFC42 0088996A0088 add [eax+$88006A99], cl 007EFC48 7E49 jle 007EFC93 007EFC4A 008C764900B867 add [esi+esi*2+$67B80049], cl 007EFC51 47 inc edi 007EFC52 00F4 add ah, dh 007EFC54 81470000166300 add dword ptr [edi+$00], $00631600 007EFC5B F4 hlt 007EFC5C B466 mov ah, $66 007EFC5E 0034B1 add [ecx+esi*4], dh 007EFC61 6600A40E6400645D add [esi+ecx+$5D640064], ah 007EFC69 57 push edi 007EFC6A 005876 add [eax+$76], bl 007EFC6D 7C00 jl 007EFC6F 007EFC6F 90 nop 007EFC70 74FC jz 007EFC6E 007EFC72 7E00 jle 007EFC74 007EFC74 07 pop es 007EFC75 12546672 adc dl, byte ptr [esi+$72] 007EFC79 6D insd 007EFC7A 53 push ebx 007EFC7B 58 pop eax 007EFC7C 43 inc ebx 007EFC7D 4B dec ebx 007EFC7E 4E dec esi 007EFC7F 65774C jnbe 007EFCCE 007EFC82 6973745F534B08 imul esi, [ebx+$74], $084B535F 007EFC89 F67E00 idiv byte ptr [esi+$00] 007EFC8C D0F2 DB $D0, $F2 // dl, 1 007EFC8E 49 dec ecx 007EFC8F 005E00 add [esi+$00], bl 007EFC92 10555F adc [ebp+$5F], dl 007EFC95 53 push ebx 007EFC96 58 pop eax 007EFC97 43 inc ebx 007EFC98 4B dec ebx 007EFC99 4E dec esi 007EFC9A 65774C jnbe 007EFCE9 007EFC9D 6973745F534B00 imul esi, [ebx+$74], $004B535F 007EFCA4 008D4000558B add [ebp+$8B550040], cl 007EFCAA EC in al, dx 007EFCAB B966000000 mov ecx, $00000066 007EFCB0 6A00 push $00 007EFCB2 6A00 push $00 007EFCB4 49 dec ecx 007EFCB5 75F9 jnz 007EFCB0 007EFCB7 53 push ebx 007EFCB8 56 push esi 007EFCB9 57 push edi 007EFCBA 8BF0 mov esi, eax 007EFCBC 33C0 xor eax, eax 007EFCBE 55 push ebp * Possible String Reference to: '殍=樗奅_^[嬪]' | 007EFCBF 68070D7F00 push $007F0D07 ***** TRY | 007EFCC4 64FF30 push dword ptr fs:[eax] 007EFCC7 648920 mov fs:[eax], esp 007EFCCA C645FF00 mov byte ptr [ebp-$01], $00 * Reference to control Label7 : TLabel | 007EFCCE 8B9E18030000 mov ebx, [esi+$0318] 007EFCD4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EFCD6 E8F95BCDFF call 004C58D4 007EFCDB 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFCDD E8CAE2CEFF call 004DDFAC 007EFCE2 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007EFCE4 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'factoryName' | 007EFCE7 BA240D7F00 mov edx, $007F0D24 * Reference to control cxGrid1Level1 : N.A. | 007EFCEC 8B8630030000 mov eax, [esi+$0330] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFCF2 E8BD6ECDFF call 004C6BB4 007EFCF7 8D55E4 lea edx, [ebp-$1C] 007EFCFA 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EFCFC FF5160 call dword ptr [ecx+$60] 007EFCFF 8B45E4 mov eax, [ebp-$1C] 007EFD02 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EFD05 E8E2ABC1FF call 0040A8EC 007EFD0A 8B45E8 mov eax, [ebp-$18] 007EFD0D 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.QuotedStr(AnsiString):AnsiString; | 007EFD10 E8DFACC1FF call 0040A9F4 007EFD15 8B4DEC mov ecx, [ebp-$14] 007EFD18 8D45F0 lea eax, [ebp-$10] * Possible String Reference to: 'select * from YF_Money_KC where Fac | toryName=' | 007EFD1B BA380D7F00 mov edx, $007F0D38 * Reference to: System.@LStrCat3; | 007EFD20 E81B59C1FF call 00405640 007EFD25 8B45F0 mov eax, [ebp-$10] 007EFD28 50 push eax 007EFD29 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFD2B E87CE2CEFF call 004DDFAC 007EFD30 5A pop edx 007EFD31 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFD33 FF5138 call dword ptr [ecx+$38] 007EFD36 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EFD38 E88B5BCDFF call 004C58C8 * Reference to control Label7 : TLabel | 007EFD3D 8B8618030000 mov eax, [esi+$0318] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007EFD43 E87881CDFF call 004C7EC0 007EFD48 84C0 test al, al 007EFD4A 751D jnz 007EFD69 * Possible String Reference to: 'CRID' | 007EFD4C BA700D7F00 mov edx, $007F0D70 * Reference to control Label7 : TLabel | 007EFD51 8B8618030000 mov eax, [esi+$0318] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFD57 E8586ECDFF call 004C6BB4 007EFD5C 8D55F8 lea edx, [ebp-$08] 007EFD5F 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007EFD61 FF5160 call dword ptr [ecx+$60] 007EFD64 E93C010000 jmp 007EFEA5 * Reference to control Label4 : TLabel | 007EFD69 8B9E10030000 mov ebx, [esi+$0310] 007EFD6F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EFD71 E85E5BCDFF call 004C58D4 007EFD76 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFD78 E82FE2CEFF call 004DDFAC 007EFD7D 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007EFD7F FF5244 call dword ptr [edx+$44] 007EFD82 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFD84 E823E2CEFF call 004DDFAC * Possible String Reference to: 'Update YF_Money_CRID set CRID=CRID+ | 1' | 007EFD89 BA800D7F00 mov edx, $007F0D80 007EFD8E 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFD90 FF5138 call dword ptr [ecx+$38] 007EFD93 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFD95 E812E2CEFF call 004DDFAC * Possible String Reference to: 'select * from YF_Money_CRID ' | 007EFD9A BAB00D7F00 mov edx, $007F0DB0 007EFD9F 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFDA1 FF5138 call dword ptr [ecx+$38] 007EFDA4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EFDA6 E81D5BCDFF call 004C58C8 * Possible String Reference to: 'CRID' | 007EFDAB BA700D7F00 mov edx, $007F0D70 * Reference to control Label4 : TLabel | 007EFDB0 8B8610030000 mov eax, [esi+$0310] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFDB6 E8F96DCDFF call 004C6BB4 007EFDBB 8D55F8 lea edx, [ebp-$08] 007EFDBE 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 007EFDC0 FF5160 call dword ptr [ecx+$60] * Reference to control Label4 : TLabel | 007EFDC3 8B9E10030000 mov ebx, [esi+$0310] 007EFDC9 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EFDCB E8045BCDFF call 004C58D4 007EFDD0 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFDD2 E8D5E1CEFF call 004DDFAC 007EFDD7 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007EFDD9 FF5244 call dword ptr [edx+$44] 007EFDDC 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFDDE E8C9E1CEFF call 004DDFAC * Possible String Reference to: 'select * from YF_Money_KC where 1=2' | 007EFDE3 BAD80D7F00 mov edx, $007F0DD8 007EFDE8 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFDEA FF5138 call dword ptr [ecx+$38] 007EFDED 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EFDEF E8D45ACDFF call 004C58C8 * Reference to control Label4 : TLabel | 007EFDF4 8B9E10030000 mov ebx, [esi+$0310] 007EFDFA 8BC3 mov eax, ebx | 007EFDFC E88F87CDFF call 004C8590 * Possible String Reference to: 'CRID' | 007EFE01 BA700D7F00 mov edx, $007F0D70 007EFE06 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFE08 E8A76DCDFF call 004C6BB4 007EFE0D 50 push eax 007EFE0E 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToInt(AnsiString):Integer; | 007EFE11 E832B2C1FF call 0040B048 007EFE16 8BD0 mov edx, eax 007EFE18 8D45D4 lea eax, [ebp-$2C] 007EFE1B B1FC mov cl, $FC | 007EFE1D E8528DC2FF call 00418B74 007EFE22 8D55D4 lea edx, [ebp-$2C] 007EFE25 58 pop eax 007EFE26 8B08 mov ecx, [eax] 007EFE28 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'factoryName' | 007EFE2E BA240D7F00 mov edx, $007F0D24 * Reference to control cxGrid1Level1 : N.A. | 007EFE33 8B8630030000 mov eax, [esi+$0330] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFE39 E8766DCDFF call 004C6BB4 007EFE3E 8D55BC lea edx, [ebp-$44] 007EFE41 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EFE43 FF5160 call dword ptr [ecx+$60] 007EFE46 8B45BC mov eax, [ebp-$44] 007EFE49 8D55C0 lea edx, [ebp-$40] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EFE4C E89BAAC1FF call 0040A8EC 007EFE51 8B55C0 mov edx, [ebp-$40] 007EFE54 8D45C4 lea eax, [ebp-$3C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EFE57 E86C8FC2FF call 00418DC8 007EFE5C 8D45C4 lea eax, [ebp-$3C] 007EFE5F 50 push eax * Possible String Reference to: 'FactoryName' | 007EFE60 BA040E7F00 mov edx, $007F0E04 007EFE65 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFE67 E8486DCDFF call 004C6BB4 007EFE6C 5A pop edx 007EFE6D 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 007EFE6F FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'ZdyStr1' | 007EFE75 BA180E7F00 mov edx, $007F0E18 007EFE7A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFE7C E8336DCDFF call 004C6BB4 007EFE81 50 push eax 007EFE82 8D45AC lea eax, [ebp-$54] * Possible String Reference to: '应收收' | 007EFE85 BA280E7F00 mov edx, $007F0E28 * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 007EFE8A E8398FC2FF call 00418DC8 007EFE8F 8D55AC lea edx, [ebp-$54] 007EFE92 58 pop eax 007EFE93 8B08 mov ecx, [eax] 007EFE95 FF91B4000000 call dword ptr [ecx+$00B4] 007EFE9B 8BC3 mov eax, ebx 007EFE9D 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 007EFE9F FF924C020000 call dword ptr [edx+$024C] * Reference to control Label7 : TLabel | 007EFEA5 8B9E18030000 mov ebx, [esi+$0318] 007EFEAB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007EFEAD E8225ACDFF call 004C58D4 007EFEB2 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFEB4 E8F3E0CEFF call 004DDFAC 007EFEB9 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 007EFEBB FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'factoryName' | 007EFEBE BA240D7F00 mov edx, $007F0D24 * Reference to control cxGrid1Level1 : N.A. | 007EFEC3 8B8630030000 mov eax, [esi+$0330] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFEC9 E8E66CCDFF call 004C6BB4 007EFECE 8D559C lea edx, [ebp-$64] 007EFED1 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EFED3 FF5160 call dword ptr [ecx+$60] 007EFED6 8B459C mov eax, [ebp-$64] 007EFED9 8D55A0 lea edx, [ebp-$60] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EFEDC E80BAAC1FF call 0040A8EC 007EFEE1 8B45A0 mov eax, [ebp-$60] 007EFEE4 8D55A4 lea edx, [ebp-$5C] * Reference to: SysUtils.QuotedStr(AnsiString):AnsiString; | 007EFEE7 E808ABC1FF call 0040A9F4 007EFEEC 8B4DA4 mov ecx, [ebp-$5C] 007EFEEF 8D45A8 lea eax, [ebp-$58] * Possible String Reference to: 'select * from YF_Money_CR where Fac | toryName=' | 007EFEF2 BA380E7F00 mov edx, $007F0E38 * Reference to: System.@LStrCat3; | 007EFEF7 E84457C1FF call 00405640 007EFEFC 8B45A8 mov eax, [ebp-$58] 007EFEFF 50 push eax 007EFF00 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFF02 E8A5E0CEFF call 004DDFAC 007EFF07 5A pop edx 007EFF08 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFF0A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' and YFTypeId='' | 007EFF0D 68700E7F00 push $007F0E70 * Possible String Reference to: 'SPID' | 007EFF12 BA880E7F00 mov edx, $007F0E88 * Reference to control cxGrid1Level1 : N.A. | 007EFF17 8B8630030000 mov eax, [esi+$0330] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 007EFF1D E8926CCDFF call 004C6BB4 007EFF22 8D5590 lea edx, [ebp-$70] 007EFF25 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 007EFF27 FF5160 call dword ptr [ecx+$60] 007EFF2A 8B4590 mov eax, [ebp-$70] 007EFF2D 8D5594 lea edx, [ebp-$6C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007EFF30 E8B7A9C1FF call 0040A8EC 007EFF35 FF7594 push dword ptr [ebp-$6C] 007EFF38 68980E7F00 push $007F0E98 007EFF3D 8D4598 lea eax, [ebp-$68] 007EFF40 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 007EFF45 E86A57C1FF call 004056B4 007EFF4A 8B4598 mov eax, [ebp-$68] 007EFF4D 50 push eax 007EFF4E 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 007EFF50 E857E0CEFF call 004DDFAC 007EFF55 5A pop edx 007EFF56 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 007EFF58 FF5138 call dword ptr [ecx+$38] 007EFF5B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007EFF5D E86659CDFF call 004C58C8 * Reference to control Label7 : TLabel | 007EFF62 8B8618030000 mov eax, [esi+$0318] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007EFF68 E8537FCDFF call 004C7EC0 007EFF6D 84C0 test al, al 007EFF6F 743D jz 007EFFAE * Possible String Reference to: 'YF_Money_CR' | 007EFF71 68A40E7F00 push $007F0EA4 007EFF76 6A03 push $03 007EFF78 6A01 push $01 007EFF7A 8D55F4 lea edx, [ebp-$0C] * Possible String Reference to: 'YF' | 007EFF7D B9B80E7F00 mov ecx, $007F0EB8 * Reference to control Label4 : TLabel | 007EFF82 8B8610030000 mov eax, [esi+$0310] * Reference to : TfrmSelExportField._PROC_007B7708() | 007EFF88 E87B77FCFF call 007B7708 007EFF8D 84C0 test al, al 007EFF8F 7540 jnz 007EFFD1 007EFF91 6A00 push $00 * Possible String Reference to: '提示' | 007EFF93 B9BC0E7F00 mov ecx, $007F0EBC * Possible String Reference to: '取坯布应收最大号失败!' | 007EFF98 BAC40E7F00 mov edx, $007F0EC4 *) end; end.