unit U_YFFP; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmYFFP=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; v2Column6: TcxGridDBColumn; v2KP: TcxGridDBColumn; v2PayMent: TcxGridDBColumn; v2Note: TcxGridDBColumn; Label4: TLabel; OrderNo: TEdit; Label5: TLabel; v2P_CodeName: TcxGridDBColumn; v2P_Spec: TcxGridDBColumn; v2ComTaitou: TcxGridDBColumn; v2KPNO: TcxGridDBColumn; Label7: TLabel; KPNO: TEdit; Label8: TLabel; KPDMNo: TEdit; v2Ssel: TcxGridDBColumn; PopupMenu1: TPopupMenu; N1: TMenuItem; N2: TMenuItem; Label10: TLabel; Label12: TLabel; v2SPMonth: TcxGridDBColumn; Label6: TLabel; FKTaitou: TEdit; Label9: TLabel; SPMonth: TEdit; Label11: TLabel; ComTaitou: TEdit; v2YFName: TcxGridDBColumn; Label13: TLabel; P_CodeName: TEdit; v2KPStatus: TcxGridDBColumn; Label14: TLabel; KPStatus: TEdit; Label15: TLabel; Note: TEdit; v2FKTaitou: TcxGridDBColumn; v2ShuiMoney: TcxGridDBColumn; v2ShuiHouMoney: TcxGridDBColumn; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure TBDelClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure 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 N1Click(Sender : TObject); procedure N2Click(Sender : TObject); procedure v2SselPropertiesChange(Sender : TObject); procedure v2GYSNamePropertiesButtonClick(Sender : TObject); procedure v2YFNamePropertiesButtonClick(Sender : TObject); procedure v2KPStatusPropertiesButtonClick(Sender : TObject); procedure v2FKTaitouPropertiesButtonClick(Sender : TObject); procedure _PROC_00820F3D(Sender : TObject); procedure _PROC_00821285(Sender : TObject); procedure _PROC_00821B29(Sender : TObject); procedure _PROC_00821EF9(Sender : TObject); procedure _PROC_008227AD(Sender : TObject); procedure _PROC_00822AF1(Sender : TObject); procedure _PROC_008232E5(Sender : TObject); procedure _PROC_00823602(Sender : TObject); procedure _PROC_00823638(Sender : TObject); procedure _PROC_00823645(Sender : TObject); procedure _PROC_0082398D(Sender : TObject); procedure _PROC_00823E39(Sender : TObject); procedure _PROC_00824459(Sender : TObject); procedure _PROC_0082479D(Sender : TObject); procedure _PROC_00824A1D(Sender : TObject); procedure _PROC_00824D55(Sender : TObject); procedure _PROC_00825551(Sender : TObject); procedure _PROC_008258C5(Sender : TObject); procedure _PROC_00825BFD(Sender : TObject); procedure _PROC_00825F41(Sender : TObject); procedure _PROC_00826165(Sender : TObject); procedure _PROC_00826351(Sender : TObject); procedure _PROC_00826539(Sender : TObject); procedure _PROC_0082671D(Sender : TObject); procedure _PROC_00826D2D(Sender : TObject); procedure _PROC_008270A1(Sender : TObject); procedure _PROC_00827419(Sender : TObject); procedure _PROC_00827775(Sender : TObject); procedure _PROC_00827872(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmYFFP: TfrmYFFP; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmYFFP.FormDestroy(Sender : TObject); begin (* 00820C08 33C0 xor eax, eax * Reference to GlobalVar_008959BC | 00820C0A A3BC598900 mov dword ptr [$008959BC], eax 00820C0F C3 ret *) end; procedure TfrmYFFP.FormClose(Sender : TObject); begin (* 00820C10 C60102 mov byte ptr [ecx], $02 00820C13 C3 ret *) end; procedure TfrmYFFP.TBCloseClick(Sender : TObject); begin (* 00820C14 53 push ebx 00820C15 8BD8 mov ebx, eax * Possible String Reference to: '财务管理' | 00820C17 B9400C8200 mov ecx, $00820C40 * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00820C1C 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 00820C22 B8540C8200 mov eax, $00820C54 | 00820C27 E8746FF9FF call 007B7BA0 00820C2C 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 00820C2E E86553C8FF call 004A5F98 00820C33 5B pop ebx 00820C34 C3 ret *) end; procedure TfrmYFFP.TBDelClick(Sender : TObject); begin (* 00820C60 55 push ebp 00820C61 8BEC mov ebp, esp 00820C63 B906000000 mov ecx, $00000006 00820C68 6A00 push $00 00820C6A 6A00 push $00 00820C6C 49 dec ecx 00820C6D 75F9 jnz 00820C68 00820C6F 51 push ecx 00820C70 53 push ebx 00820C71 56 push esi 00820C72 8BD8 mov ebx, eax 00820C74 33C0 xor eax, eax 00820C76 55 push ebp * Possible String Reference to: '閮<腚^[嬪]' | 00820C77 686C0E8200 push $00820E6C ***** TRY | 00820C7C 64FF30 push dword ptr fs:[eax] 00820C7F 648920 mov fs:[eax], esp * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00820C82 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00820C88 E83372CAFF call 004C7EC0 00820C8D 84C0 test al, al 00820C8F 0F85BC010000 jnz 00820E51 * Reference to control TfrmYFFP.ADOQueryTemp : TADOQuery | 00820C95 8BB308030000 mov esi, [ebx+$0308] 00820C9B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00820C9D E8324CCAFF call 004C58D4 00820CA2 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00820CA4 E803D3CBFF call 004DDFAC 00820CA9 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00820CAB FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00820CAE 68840E8200 push $00820E84 * Possible String Reference to: 'YFID' | 00820CB3 BACC0E8200 mov edx, $00820ECC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00820CB8 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00820CBE E8F15ECAFF call 004C6BB4 00820CC3 8D55F0 lea edx, [ebp-$10] 00820CC6 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00820CC8 FF5160 call dword ptr [ecx+$60] 00820CCB 8B45F0 mov eax, [ebp-$10] 00820CCE 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00820CD1 E8169CBEFF call 0040A8EC 00820CD6 FF75F4 push dword ptr [ebp-$0C] 00820CD9 68DC0E8200 push $00820EDC 00820CDE 8D45F8 lea eax, [ebp-$08] 00820CE1 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00820CE6 E8C949BEFF call 004056B4 00820CEB 8B45F8 mov eax, [ebp-$08] 00820CEE 50 push eax 00820CEF 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00820CF1 E8B6D2CBFF call 004DDFAC 00820CF6 5A pop edx 00820CF7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00820CF9 FF5138 call dword ptr [ecx+$38] 00820CFC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00820CFE E8C54BCAFF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00820D03 BAE80E8200 mov edx, $00820EE8 * Reference to control TfrmYFFP.ADOQueryTemp : TADOQuery | 00820D08 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00820D0E E8A15ECAFF call 004C6BB4 00820D13 8D55FC lea edx, [ebp-$04] 00820D16 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 00820D18 FF5160 call dword ptr [ecx+$60] 00820D1B 6A24 push $24 * Possible String Reference to: '提示' | 00820D1D B9F00E8200 mov ecx, $00820EF0 * Possible String Reference to: '确定要删除数据吗？' | 00820D22 BAF80E8200 mov edx, $00820EF8 *) end; procedure TfrmYFFP.FormShow(Sender : TObject); begin (* 00820F90 55 push ebp 00820F91 8BEC mov ebp, esp 00820F93 53 push ebx 00820F94 8BD8 mov ebx, eax 00820F96 33C0 xor eax, eax 00820F98 55 push ebp * Possible String Reference to: '猷:滕[]' | 00820F99 680F108200 push $0082100F ***** TRY | 00820F9E 64FF30 push dword ptr fs:[eax] 00820FA1 648920 mov fs:[eax], esp * Possible String Reference to: '财务管理' | 00820FA4 B924108200 mov ecx, $00821024 * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00820FA9 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 00820FAF B838108200 mov eax, $00821038 | 00820FB4 E8EB69F9FF call 007B79A4 * Reference to control TfrmYFFP.ADOQueryTemp : TADOQuery | 00820FB9 8B8308030000 mov eax, [ebx+$0308] | 00820FBF E8C439F9FF call 007B4988 00820FC4 83C4F8 add esp, -$08 00820FC7 DD1C24 fstp qword ptr [esp] 00820FCA 9B wait * Reference to control TfrmYFFP.Enddate : TDateTimePicker | 00820FCB 8B8358030000 mov eax, [ebx+$0358] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00820FD1 E85612C5FF call 0047222C * Reference to control TfrmYFFP.Enddate : TDateTimePicker | 00820FD6 8B8358030000 mov eax, [ebx+$0358] 00820FDC DD8010020000 fld qword ptr [eax+$0210] 00820FE2 D82544108200 fsub dword ptr [$00821044] 00820FE8 83C4F8 add esp, -$08 00820FEB DD1C24 fstp qword ptr [esp] 00820FEE 9B wait * Reference to control TfrmYFFP.begdate : TDateTimePicker | 00820FEF 8B8354030000 mov eax, [ebx+$0354] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00820FF5 E83212C5FF call 0047222C 00820FFA 8BC3 mov eax, ebx | 00820FFC E8ABF8FFFF call 008208AC 00821001 33C0 xor eax, eax 00821003 5A pop edx 00821004 59 pop ecx 00821005 59 pop ecx 00821006 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[]' | 00821009 6816108200 push $00821016 0082100E C3 ret * Reference to: System.@HandleFinally; | 0082100F E9E03ABEFF jmp 00404AF4 00821014 EBF8 jmp 0082100E ****** END | 00821016 5B pop ebx 00821017 5D pop ebp 00821018 C3 ret *) end; procedure TfrmYFFP.TBRafreshClick(Sender : TObject); begin (* 00821048 53 push ebx 00821049 8BD8 mov ebx, eax * Reference to control TfrmYFFP.ToolBar1 : TToolBar | 0082104B 8B83F8020000 mov eax, [ebx+$02F8] 00821051 8B10 mov edx, [eax] * Reference to method TToolBar.SetFocus() | 00821053 FF92C4000000 call dword ptr [edx+$00C4] 00821059 8BC3 mov eax, ebx | 0082105B E84CF8FFFF call 008208AC 00821060 5B pop ebx 00821061 C3 ret *) end; procedure TfrmYFFP.ToolButton2Click(Sender : TObject); begin (* 00821064 55 push ebp 00821065 8BEC mov ebp, esp 00821067 6A00 push $00 00821069 53 push ebx 0082106A 8BD8 mov ebx, eax 0082106C 33C0 xor eax, eax 0082106E 55 push ebp 0082106F 68E8108200 push $008210E8 ***** TRY | 00821074 64FF30 push dword ptr fs:[eax] 00821077 648920 mov fs:[eax], esp * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 0082107A 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 00821080 E88F49CAFF call 004C5A14 00821085 84C0 test al, al 00821087 7449 jz 008210D2 00821089 8D45FC lea eax, [ebp-$04] 0082108C 50 push eax 0082108D B902000000 mov ecx, $00000002 00821092 BA01000000 mov edx, $00000001 * Reference to control TfrmYFFP.Panel1 : TPanel | 00821097 8B8310030000 mov eax, [ebx+$0310] | 0082109D E80E50F9FF call 007B60B0 008210A2 8B55FC mov edx, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008210A5 8B8320030000 mov eax, [ebx+$0320] | 008210AB E8185CF9FF call 007B6CC8 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008210B0 8B9364030000 mov edx, [ebx+$0364] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008210B6 8B8320030000 mov eax, [ebx+$0320] | 008210BC E8CF5DF9FF call 007B6E90 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008210C1 8B9364030000 mov edx, [ebx+$0364] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008210C7 8B8320030000 mov eax, [ebx+$0320] | 008210CD E8465FF9FF call 007B7018 008210D2 33C0 xor eax, eax 008210D4 5A pop edx 008210D5 59 pop ecx 008210D6 59 pop ecx 008210D7 648910 mov fs:[eax], edx ****** FINALLY | 008210DA 68EF108200 push $008210EF 008210DF 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 008210E2 E83D42BEFF call 00405324 008210E7 C3 ret * Reference to: System.@HandleFinally; | 008210E8 E9073ABEFF jmp 00404AF4 008210ED EBF0 jmp 008210DF ****** END | 008210EF 5B pop ebx 008210F0 59 pop ecx 008210F1 5D pop ebp 008210F2 C3 ret *) end; procedure TfrmYFFP.FactoryNameChange(Sender : TObject); begin (* 008210F4 56 push esi * Reference to control TfrmYFFP.ToolButton2 : TToolButton | 008210F5 8B8014030000 mov eax, [eax+$0314] 008210FB 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 008210FF E85034BEFF call 00404554 00821104 5E pop esi 00821105 C3 ret *) end; procedure TfrmYFFP.Button2Click(Sender : TObject); begin (* 00821108 55 push ebp 00821109 8BEC mov ebp, esp 0082110B 33C9 xor ecx, ecx 0082110D 51 push ecx 0082110E 51 push ecx 0082110F 51 push ecx 00821110 51 push ecx 00821111 51 push ecx 00821112 53 push ebx 00821113 56 push esi 00821114 8BD8 mov ebx, eax 00821116 33C0 xor eax, eax 00821118 55 push ebp * Possible String Reference to: '橼8腚^[嬪]' | 00821119 6815128200 push $00821215 ***** TRY | 0082111E 64FF30 push dword ptr fs:[eax] 00821121 648920 mov fs:[eax], esp * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00821124 8B8364030000 mov eax, [ebx+$0364] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 0082112A E8916DCAFF call 004C7EC0 0082112F 84C0 test al, al 00821131 0F85C3000000 jnz 008211FA 00821137 6A24 push $24 * Possible String Reference to: '提示' | 00821139 B924128200 mov ecx, $00821224 * Possible String Reference to: '确定要删除数据吗？' | 0082113E BA2C128200 mov edx, $0082122C *) end; procedure TfrmYFFP.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 00821CD4 55 push ebp 00821CD5 8BEC mov ebp, esp 00821CD7 B908000000 mov ecx, $00000008 00821CDC 6A00 push $00 00821CDE 6A00 push $00 00821CE0 49 dec ecx 00821CE1 75F9 jnz 00821CDC 00821CE3 51 push ecx 00821CE4 53 push ebx 00821CE5 56 push esi 00821CE6 8BDA mov ebx, edx 00821CE8 8BF0 mov esi, eax 00821CEA 33C0 xor eax, eax 00821CEC 55 push ebp * Possible String Reference to: ',胫^[嬪]' | 00821CED 68E21E8200 push $00821EE2 ***** TRY | 00821CF2 64FF30 push dword ptr fs:[eax] 00821CF5 648920 mov fs:[eax], esp 00821CF8 8D55FC lea edx, [ebp-$04] 00821CFB 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; | 00821CFD E8BAD9D6FF call 0058F6BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00821D02 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; | 00821D08 E83FA6E3FF 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; | 00821D0D E852FEE2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00821D12 8B4050 mov eax, [eax+$50] 00821D15 8D55F4 lea edx, [ebp-$0C] 00821D18 8B08 mov ecx, [eax] 00821D1A FF5110 call dword ptr [ecx+$10] 00821D1D 8B45F4 mov eax, [ebp-$0C] 00821D20 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D23 E8C48BBEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00821D28 8B9E64030000 mov ebx, [esi+$0364] 00821D2E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00821D30 E80B67CAFF call 004C8440 00821D35 8D55E0 lea edx, [ebp-$20] 00821D38 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D3B E8AC8BBEFF call 0040A8EC 00821D40 8B55E0 mov edx, [ebp-$20] 00821D43 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00821D46 E87D70BFFF call 00418DC8 00821D4B 8D45E4 lea eax, [ebp-$1C] 00821D4E 50 push eax 00821D4F 8B55F8 mov edx, [ebp-$08] 00821D52 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00821D54 E85B4ECAFF call 004C6BB4 00821D59 5A pop edx 00821D5A 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00821D5C FF91B4000000 call dword ptr [ecx+$00B4] 00821D62 8BC3 mov eax, ebx 00821D64 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00821D66 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00821D6C 8B9E0C030000 mov ebx, [esi+$030C] 00821D72 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00821D74 E85B3BCAFF call 004C58D4 00821D79 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00821D7B E82CC2CBFF call 004DDFAC 00821D80 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00821D82 FF5244 call dword ptr [edx+$44] 00821D85 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00821D87 E820C2CBFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 00821D8C BAF81E8200 mov edx, $00821EF8 00821D91 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00821D93 FF5138 call dword ptr [ecx+$38] 00821D96 8D55DC lea edx, [ebp-$24] 00821D99 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D9C E84B8BBEFF call 0040A8EC 00821DA1 837DDC00 cmp dword ptr [ebp-$24], +$00 00821DA5 7440 jz 00821DE7 * Possible String Reference to: ' Set ' | 00821DA7 68141F8200 push $00821F14 00821DAC FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00821DAF 68241F8200 push $00821F24 00821DB4 8D55D4 lea edx, [ebp-$2C] 00821DB7 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821DBA E82D8BBEFF call 0040A8EC 00821DBF FF75D4 push dword ptr [ebp-$2C] 00821DC2 68301F8200 push $00821F30 00821DC7 8D45D8 lea eax, [ebp-$28] 00821DCA BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00821DCF E8E038BEFF call 004056B4 00821DD4 8B45D8 mov eax, [ebp-$28] 00821DD7 50 push eax 00821DD8 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00821DDA E8CDC1CBFF call 004DDFAC 00821DDF 5A pop edx 00821DE0 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00821DE2 FF5138 call dword ptr [ecx+$38] 00821DE5 EB2B jmp 00821E12 00821DE7 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00821DE9 E8BEC1CBFF call 004DDFAC 00821DEE 50 push eax * Possible String Reference to: ' Set ' | 00821DEF 68141F8200 push $00821F14 00821DF4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 00821DF7 683C1F8200 push $00821F3C 00821DFC 8D45D0 lea eax, [ebp-$30] 00821DFF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00821E04 E8AB38BEFF call 004056B4 00821E09 8B55D0 mov edx, [ebp-$30] 00821E0C 58 pop eax 00821E0D 8B08 mov ecx, [eax] 00821E0F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00821E12 684C1F8200 push $00821F4C 00821E17 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 00821FA0 55 push ebp 00821FA1 8BEC mov ebp, esp 00821FA3 B920000000 mov ecx, $00000020 00821FA8 6A00 push $00 00821FAA 6A00 push $00 00821FAC 49 dec ecx 00821FAD 75F9 jnz 00821FA8 00821FAF 51 push ecx 00821FB0 53 push ebx 00821FB1 56 push esi 00821FB2 8BF2 mov esi, edx 00821FB4 8BD8 mov ebx, eax 00821FB6 33C0 xor eax, eax 00821FB8 55 push ebp * Possible String Reference to: '閞$霅^[嬪]' | 00821FB9 687D268200 push $0082267D ***** TRY | 00821FBE 64FF30 push dword ptr fs:[eax] 00821FC1 648920 mov fs:[eax], esp 00821FC4 8D55FC lea edx, [ebp-$04] 00821FC7 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; | 00821FC9 E8EED6D6FF call 0058F6BC 00821FCE 8D55DC lea edx, [ebp-$24] 00821FD1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821FD4 E81389BEFF call 0040A8EC 00821FD9 837DDC00 cmp dword ptr [ebp-$24], +$00 00821FDD 750D jnz 00821FEC 00821FDF 8D45FC lea eax, [ebp-$04] 00821FE2 BA94268200 mov edx, $00822694 * Reference to: System.@LStrLAsg(void;void;void;void); | 00821FE7 E8D033BEFF call 004053BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00821FEC 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; | 00821FF2 E855A3E3FF 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; | 00821FF7 E868FBE2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00821FFC 8B4050 mov eax, [eax+$50] 00821FFF 8D55D8 lea edx, [ebp-$28] 00822002 8B08 mov ecx, [eax] 00822004 FF5110 call dword ptr [ecx+$10] 00822007 8B45D8 mov eax, [ebp-$28] 0082200A 8D55E4 lea edx, [ebp-$1C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082200D E8DA88BEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00822012 8BB364030000 mov esi, [ebx+$0364] 00822018 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 0082201A E82164CAFF call 004C8440 0082201F 8D55C4 lea edx, [ebp-$3C] 00822022 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822025 E8C288BEFF call 0040A8EC 0082202A 8B55C4 mov edx, [ebp-$3C] 0082202D 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00822030 E8936DBFFF call 00418DC8 00822035 8D45C8 lea eax, [ebp-$38] 00822038 50 push eax 00822039 8B55E4 mov edx, [ebp-$1C] 0082203C 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082203E E8714BCAFF call 004C6BB4 00822043 5A pop edx 00822044 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00822046 FF91B4000000 call dword ptr [ecx+$00B4] 0082204C 8D55C0 lea edx, [ebp-$40] *) end; procedure TfrmYFFP.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 008228CC 55 push ebp 008228CD 8BEC mov ebp, esp 008228CF B908000000 mov ecx, $00000008 008228D4 6A00 push $00 008228D6 6A00 push $00 008228D8 49 dec ecx 008228D9 75F9 jnz 008228D4 008228DB 51 push ecx 008228DC 53 push ebx 008228DD 56 push esi 008228DE 8BDA mov ebx, edx 008228E0 8BF0 mov esi, eax 008228E2 33C0 xor eax, eax 008228E4 55 push ebp 008228E5 68DA2A8200 push $00822ADA ***** TRY | 008228EA 64FF30 push dword ptr fs:[eax] 008228ED 648920 mov fs:[eax], esp 008228F0 8D55FC lea edx, [ebp-$04] 008228F3 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; | 008228F5 E8C2CDD6FF call 0058F6BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 008228FA 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; | 00822900 E8479AE3FF 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; | 00822905 E85AF2E2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 0082290A 8B4050 mov eax, [eax+$50] 0082290D 8D55F4 lea edx, [ebp-$0C] 00822910 8B08 mov ecx, [eax] 00822912 FF5110 call dword ptr [ecx+$10] 00822915 8B45F4 mov eax, [ebp-$0C] 00822918 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082291B E8CC7FBEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00822920 8B9E64030000 mov ebx, [esi+$0364] 00822926 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00822928 E8135BCAFF call 004C8440 0082292D 8D55E0 lea edx, [ebp-$20] 00822930 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822933 E8B47FBEFF call 0040A8EC 00822938 8B55E0 mov edx, [ebp-$20] 0082293B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0082293E E88564BFFF call 00418DC8 00822943 8D45E4 lea eax, [ebp-$1C] 00822946 50 push eax 00822947 8B55F8 mov edx, [ebp-$08] 0082294A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082294C E86342CAFF call 004C6BB4 00822951 5A pop edx 00822952 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00822954 FF91B4000000 call dword ptr [ecx+$00B4] 0082295A 8BC3 mov eax, ebx 0082295C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0082295E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00822964 8B9E0C030000 mov ebx, [esi+$030C] 0082296A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082296C E8632FCAFF call 004C58D4 00822971 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00822973 E834B6CBFF call 004DDFAC 00822978 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0082297A FF5244 call dword ptr [edx+$44] 0082297D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082297F E828B6CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00822984 BAF02A8200 mov edx, $00822AF0 00822989 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082298B FF5138 call dword ptr [ecx+$38] 0082298E 8D55DC lea edx, [ebp-$24] 00822991 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822994 E8537FBEFF call 0040A8EC 00822999 837DDC00 cmp dword ptr [ebp-$24], +$00 0082299D 7440 jz 008229DF * Possible String Reference to: ' Set ' | 0082299F 680C2B8200 push $00822B0C 008229A4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008229A7 681C2B8200 push $00822B1C 008229AC 8D55D4 lea edx, [ebp-$2C] 008229AF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008229B2 E8357FBEFF call 0040A8EC 008229B7 FF75D4 push dword ptr [ebp-$2C] 008229BA 68282B8200 push $00822B28 008229BF 8D45D8 lea eax, [ebp-$28] 008229C2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008229C7 E8E82CBEFF call 004056B4 008229CC 8B45D8 mov eax, [ebp-$28] 008229CF 50 push eax 008229D0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008229D2 E8D5B5CBFF call 004DDFAC 008229D7 5A pop edx 008229D8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008229DA FF5138 call dword ptr [ecx+$38] 008229DD EB2B jmp 00822A0A 008229DF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008229E1 E8C6B5CBFF call 004DDFAC 008229E6 50 push eax * Possible String Reference to: ' Set ' | 008229E7 680C2B8200 push $00822B0C 008229EC FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 008229EF 68342B8200 push $00822B34 008229F4 8D45D0 lea eax, [ebp-$30] 008229F7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008229FC E8B32CBEFF call 004056B4 00822A01 8B55D0 mov edx, [ebp-$30] 00822A04 58 pop eax 00822A05 8B08 mov ecx, [eax] 00822A07 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00822A0A 68442B8200 push $00822B44 00822A0F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP.ToolButton3Click(Sender : TObject); begin (* 00822B98 55 push ebp 00822B99 8BEC mov ebp, esp 00822B9B B911000000 mov ecx, $00000011 00822BA0 6A00 push $00 00822BA2 6A00 push $00 00822BA4 49 dec ecx 00822BA5 75F9 jnz 00822BA0 00822BA7 51 push ecx 00822BA8 56 push esi 00822BA9 8945FC mov [ebp-$04], eax 00822BAC 33C0 xor eax, eax 00822BAE 55 push ebp 00822BAF 685C2E8200 push $00822E5C ***** TRY | 00822BB4 64FF30 push dword ptr fs:[eax] 00822BB7 648920 mov fs:[eax], esp 00822BBA 33C0 xor eax, eax 00822BBC 55 push ebp 00822BBD 68C12D8200 push $00822DC1 ***** TRY | 00822BC2 64FF30 push dword ptr fs:[eax] 00822BC5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 00822F0C 55 push ebp 00822F0D 8BEC mov ebp, esp 00822F0F 51 push ecx 00822F10 B90B000000 mov ecx, $0000000B 00822F15 6A00 push $00 00822F17 6A00 push $00 00822F19 49 dec ecx 00822F1A 75F9 jnz 00822F15 00822F1C 51 push ecx 00822F1D 874DFC xchg [ebp-$04], ecx 00822F20 53 push ebx 00822F21 56 push esi 00822F22 8BF0 mov esi, eax 00822F24 33C0 xor eax, eax 00822F26 55 push ebp 00822F27 6857328200 push $00823257 ***** TRY | 00822F2C 64FF30 push dword ptr fs:[eax] 00822F2F 648920 mov fs:[eax], esp 00822F32 33C0 xor eax, eax 00822F34 55 push ebp 00822F35 6810328200 push $00823210 ***** TRY | 00822F3A 64FF30 push dword ptr fs:[eax] 00822F3D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 0082338C 55 push ebp 0082338D 8BEC mov ebp, esp 0082338F 51 push ecx 00823390 B906000000 mov ecx, $00000006 00823395 6A00 push $00 00823397 6A00 push $00 00823399 49 dec ecx 0082339A 75F9 jnz 00823395 0082339C 51 push ecx 0082339D 874DFC xchg [ebp-$04], ecx 008233A0 53 push ebx 008233A1 56 push esi 008233A2 8BF0 mov esi, eax 008233A4 33C0 xor eax, eax 008233A6 55 push ebp 008233A7 68E5358200 push $008235E5 ***** TRY | 008233AC 64FF30 push dword ptr fs:[eax] 008233AF 648920 mov fs:[eax], esp 008233B2 33C0 xor eax, eax 008233B4 55 push ebp 008233B5 68BB358200 push $008235BB ***** TRY | 008233BA 64FF30 push dword ptr fs:[eax] 008233BD 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 008236E8 55 push ebp 008236E9 8BEC mov ebp, esp 008236EB 51 push ecx 008236EC B906000000 mov ecx, $00000006 008236F1 6A00 push $00 008236F3 6A00 push $00 008236F5 49 dec ecx 008236F6 75F9 jnz 008236F1 008236F8 51 push ecx 008236F9 874DFC xchg [ebp-$04], ecx 008236FC 53 push ebx 008236FD 56 push esi 008236FE 8BF0 mov esi, eax 00823700 33C0 xor eax, eax 00823702 55 push ebp 00823703 6841398200 push $00823941 ***** TRY | 00823708 64FF30 push dword ptr fs:[eax] 0082370B 648920 mov fs:[eax], esp 0082370E 33C0 xor eax, eax 00823710 55 push ebp 00823711 6817398200 push $00823917 ***** TRY | 00823716 64FF30 push dword ptr fs:[eax] 00823719 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.ToolButton1Click(Sender : TObject); begin (* 00823A34 53 push ebx 00823A35 8BD8 mov ebx, eax * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00823A37 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00823A3D E87E44CAFF call 004C7EC0 00823A42 84C0 test al, al 00823A44 7516 jnz 00823A5C * Possible String Reference to: '应付款列表' | 00823A46 B9683A8200 mov ecx, $00823A68 * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00823A4B 8B9320030000 mov edx, [ebx+$0320] * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00823A51 8B833C030000 mov eax, [ebx+$033C] | 00823A57 E8D447F9FF call 007B8230 00823A5C 5B pop ebx 00823A5D C3 ret *) end; procedure TfrmYFFP.v2Column7PropertiesButtonClick(Sender : TObject); begin (* 00823A74 55 push ebp 00823A75 8BEC mov ebp, esp 00823A77 51 push ecx 00823A78 B90E000000 mov ecx, $0000000E 00823A7D 6A00 push $00 00823A7F 6A00 push $00 00823A81 49 dec ecx 00823A82 75F9 jnz 00823A7D 00823A84 874DFC xchg [ebp-$04], ecx 00823A87 53 push ebx 00823A88 56 push esi 00823A89 8BF0 mov esi, eax 00823A8B 33C0 xor eax, eax 00823A8D 55 push ebp * Possible String Reference to: ''牍^[嬪]' | 00823A8E 68C83D8200 push $00823DC8 ***** TRY | 00823A93 64FF30 push dword ptr fs:[eax] 00823A96 648920 mov fs:[eax], esp 00823A99 33C0 xor eax, eax 00823A9B 55 push ebp 00823A9C 68743D8200 push $00823D74 ***** TRY | 00823AA1 64FF30 push dword ptr fs:[eax] 00823AA4 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2Column2PropertiesEditValueChanged(Sender : TObject); begin (* 00823EE4 55 push ebp 00823EE5 8BEC mov ebp, esp 00823EE7 B915000000 mov ecx, $00000015 00823EEC 6A00 push $00 00823EEE 6A00 push $00 00823EF0 49 dec ecx 00823EF1 75F9 jnz 00823EEC 00823EF3 53 push ebx 00823EF4 56 push esi 00823EF5 57 push edi 00823EF6 8BDA mov ebx, edx 00823EF8 8BF0 mov esi, eax 00823EFA 33C0 xor eax, eax 00823EFC 55 push ebp 00823EFD 689E438200 push $0082439E ***** TRY | 00823F02 64FF30 push dword ptr fs:[eax] 00823F05 648920 mov fs:[eax], esp 00823F08 8D55FC lea edx, [ebp-$04] 00823F0B 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; | 00823F0D E8AAB7D6FF call 0058F6BC 00823F12 8D55DC lea edx, [ebp-$24] 00823F15 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F18 E8CF69BEFF call 0040A8EC 00823F1D 837DDC00 cmp dword ptr [ebp-$24], +$00 00823F21 750D jnz 00823F30 00823F23 8D45FC lea eax, [ebp-$04] 00823F26 BAB4438200 mov edx, $008243B4 * Reference to: System.@LStrLAsg(void;void;void;void); | 00823F2B E88C14BEFF call 004053BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00823F30 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; | 00823F36 E81184E3FF 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; | 00823F3B E824DCE2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00823F40 8B4050 mov eax, [eax+$50] 00823F43 8D55D8 lea edx, [ebp-$28] 00823F46 8B08 mov ecx, [eax] 00823F48 FF5110 call dword ptr [ecx+$10] 00823F4B 8B45D8 mov eax, [ebp-$28] 00823F4E 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F51 E89669BEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00823F56 8B9E64030000 mov ebx, [esi+$0364] 00823F5C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00823F5E E8DD44CAFF call 004C8440 00823F63 8D55C4 lea edx, [ebp-$3C] 00823F66 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F69 E87E69BEFF call 0040A8EC 00823F6E 8B55C4 mov edx, [ebp-$3C] 00823F71 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00823F74 E84F4EBFFF call 00418DC8 00823F79 8D45C8 lea eax, [ebp-$38] 00823F7C 50 push eax 00823F7D 8B55F0 mov edx, [ebp-$10] 00823F80 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00823F82 E82D2CCAFF call 004C6BB4 00823F87 5A pop edx 00823F88 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00823F8A FF91B4000000 call dword ptr [ecx+$00B4] 00823F90 8BC3 mov eax, ebx 00823F92 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00823F94 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryTemp : TADOQuery | 00823F9A 8B9E08030000 mov ebx, [esi+$0308] 00823FA0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00823FA2 E82D19CAFF call 004C58D4 00823FA7 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00823FA9 E8FE9FCBFF call 004DDFAC 00823FAE 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00823FB0 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 00823FB3 68C0438200 push $008243C0 * Possible String Reference to: 'YFID' | 00823FB8 BA08448200 mov edx, $00824408 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00823FBD 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00823FC3 E8EC2BCAFF call 004C6BB4 00823FC8 8D55BC lea edx, [ebp-$44] 00823FCB 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00823FCD FF5160 call dword ptr [ecx+$60] 00823FD0 FF75BC push dword ptr [ebp-$44] 00823FD3 6818448200 push $00824418 00823FD8 8D45C0 lea eax, [ebp-$40] 00823FDB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00823FE0 E8CF16BEFF call 004056B4 00823FE5 8B45C0 mov eax, [ebp-$40] 00823FE8 50 push eax 00823FE9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00823FEB E8BC9FCBFF call 004DDFAC 00823FF0 5A pop edx 00823FF1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00823FF3 FF5138 call dword ptr [ecx+$38] 00823FF6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00823FF8 E8CB18CAFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 00823FFD BA24448200 mov edx, $00824424 * Reference to control TfrmYFFP.ADOQueryTemp : TADOQuery | 00824002 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824008 E8A72BCAFF call 004C6BB4 0082400D 8D55F4 lea edx, [ebp-$0C] 00824010 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 00824012 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 00824015 BA24448200 mov edx, $00824424 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 0082401A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824020 E88F2BCAFF call 004C6BB4 00824025 8D55F8 lea edx, [ebp-$08] 00824028 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0082402A FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 0082402D BA34448200 mov edx, $00824434 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824032 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824038 E8772BCAFF call 004C6BB4 0082403D 8D55B4 lea edx, [ebp-$4C] 00824040 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00824042 FF5160 call dword ptr [ecx+$60] 00824045 8B45B4 mov eax, [ebp-$4C] 00824048 8D55B8 lea edx, [ebp-$48] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082404B E89C68BEFF call 0040A8EC 00824050 837DB800 cmp dword ptr [ebp-$48], +$00 00824054 0F8434010000 jz 0082418E * Possible String Reference to: 'Qty' | 0082405A BA34448200 mov edx, $00824434 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 0082405F 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824065 E84A2BCAFF call 004C6BB4 0082406A 8D55EC lea edx, [ebp-$14] 0082406D 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0082406F FF5160 call dword ptr [ecx+$60] 00824072 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00824075 E8B296BEFF call 0040D72C 0082407A D81D38448200 fcomp dword ptr [$00824438] 00824080 DFE0 fstsw ax 00824082 9E sahf 00824083 0F84C0020000 jz 00824349 00824089 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0082408C E89B96BEFF call 0040D72C 00824091 D80D3C448200 fmul dword ptr [$0082443C] 00824097 DB7DA8 fstp tbyte ptr [ebp-$58] 0082409A 9B wait 0082409B 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0082409E E88996BEFF call 0040D72C 008240A3 DB6DA8 fld tbyte ptr [ebp-$58] 008240A6 DEF1 fdivrp st(1), st(0) 008240A8 DD5DE0 fstp qword ptr [ebp-$20] 008240AB 9B wait * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008240AC 8BBE64030000 mov edi, [esi+$0364] 008240B2 8BC7 mov eax, edi * Reference to: DB.TDataSet.Edit(TDataSet); | 008240B4 E88743CAFF call 004C8440 * Possible String Reference to: 'Price' | 008240B9 BA48448200 mov edx, $00824448 008240BE 8BC7 mov eax, edi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008240C0 E8EF2ACAFF call 004C6BB4 008240C5 50 push eax 008240C6 DD45E0 fld qword ptr [ebp-$20] 008240C9 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 008240CC E8BB4CBFFF call 00418D8C 008240D1 8D5598 lea edx, [ebp-$68] 008240D4 58 pop eax 008240D5 8B08 mov ecx, [eax] 008240D7 FF91B4000000 call dword ptr [ecx+$00B4] 008240DD 8BC7 mov eax, edi 008240DF 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008240E1 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 008240E7 8B9E0C030000 mov ebx, [esi+$030C] 008240ED 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008240EF E8E017CAFF call 004C58D4 008240F4 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008240F6 E8B19ECBFF call 004DDFAC 008240FB 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008240FD FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'Price' | 00824100 BA48448200 mov edx, $00824448 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824105 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082410B E8A42ACAFF call 004C6BB4 00824110 8D5590 lea edx, [ebp-$70] 00824113 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00824115 FF5160 call dword ptr [ecx+$60] 00824118 8B4D90 mov ecx, [ebp-$70] 0082411B 8D4594 lea eax, [ebp-$6C] * Possible String Reference to: 'UPdate YF_Money_CR Set Price=' | 0082411E BA58448200 mov edx, $00824458 * Reference to: System.@LStrCat3; | 00824123 E81815BEFF call 00405640 00824128 8B4594 mov eax, [ebp-$6C] 0082412B 50 push eax 0082412C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082412E E8799ECBFF call 004DDFAC 00824133 5A pop edx 00824134 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824136 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFID='' | 00824139 6880448200 push $00824480 * Possible String Reference to: 'YFID' | 0082413E BA08448200 mov edx, $00824408 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824143 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824149 E8662ACAFF call 004C6BB4 0082414E 8D5584 lea edx, [ebp-$7C] 00824151 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00824153 FF5160 call dword ptr [ecx+$60] 00824156 8B4584 mov eax, [ebp-$7C] 00824159 8D5588 lea edx, [ebp-$78] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082415C E88B67BEFF call 0040A8EC 00824161 FF7588 push dword ptr [ebp-$78] 00824164 6818448200 push $00824418 00824169 8D458C lea eax, [ebp-$74] 0082416C BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00824171 E83E15BEFF call 004056B4 00824176 8B458C mov eax, [ebp-$74] 00824179 50 push eax 0082417A 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082417C E82B9ECBFF call 004DDFAC 00824181 5A pop edx 00824182 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824184 FF5138 call dword ptr [ecx+$38] 00824187 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00824189 E8469DCBFF call 004DDED4 * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 0082418E 8B9E0C030000 mov ebx, [esi+$030C] 00824194 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00824196 E83917CAFF call 004C58D4 0082419B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082419D E80A9ECBFF call 004DDFAC 008241A2 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008241A4 FF5244 call dword ptr [edx+$44] 008241A7 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008241A9 E8FE9DCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008241AE BA98448200 mov edx, $00824498 008241B3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008241B5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008241B8 68B4448200 push $008244B4 008241BD FF75F0 push dword ptr [ebp-$10] 008241C0 68C4448200 push $008244C4 008241C5 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 008241CB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008241CE E81967BEFF call 0040A8EC 008241D3 FFB57CFFFFFF push dword ptr [ebp+$FFFFFF7C] 008241D9 8D4580 lea eax, [ebp-$80] 008241DC BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008241E1 E8CE14BEFF call 004056B4 008241E6 8B4580 mov eax, [ebp-$80] 008241E9 50 push eax 008241EA 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008241EC E8BB9DCBFF call 004DDFAC 008241F1 5A pop edx 008241F2 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008241F4 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008241F7 68D0448200 push $008244D0 008241FC 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmYFFP.v2PSPropertiesEditValueChanged(Sender : TObject); begin (* 00824590 55 push ebp 00824591 8BEC mov ebp, esp 00824593 B908000000 mov ecx, $00000008 00824598 6A00 push $00 0082459A 6A00 push $00 0082459C 49 dec ecx 0082459D 75F9 jnz 00824598 0082459F 53 push ebx 008245A0 56 push esi 008245A1 8BDA mov ebx, edx 008245A3 8BF0 mov esi, eax 008245A5 33C0 xor eax, eax 008245A7 55 push ebp 008245A8 6878478200 push $00824778 ***** TRY | 008245AD 64FF30 push dword ptr fs:[eax] 008245B0 648920 mov fs:[eax], esp 008245B3 8D55FC lea edx, [ebp-$04] 008245B6 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; | 008245B8 E8FFB0D6FF call 0058F6BC 008245BD 8D55F4 lea edx, [ebp-$0C] 008245C0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008245C3 E82463BEFF call 0040A8EC 008245C8 837DF400 cmp dword ptr [ebp-$0C], +$00 008245CC 750D jnz 008245DB 008245CE 8D45FC lea eax, [ebp-$04] 008245D1 BA90478200 mov edx, $00824790 * Reference to: System.@LStrLAsg(void;void;void;void); | 008245D6 E8E10DBEFF call 004053BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 008245DB 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; | 008245E1 E8667DE3FF 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; | 008245E6 E879D5E2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 008245EB 8B4050 mov eax, [eax+$50] 008245EE 8D55F0 lea edx, [ebp-$10] 008245F1 8B08 mov ecx, [eax] 008245F3 FF5110 call dword ptr [ecx+$10] 008245F6 8B45F0 mov eax, [ebp-$10] 008245F9 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008245FC E8EB62BEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824601 8B9E64030000 mov ebx, [esi+$0364] 00824607 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00824609 E8323ECAFF call 004C8440 0082460E 8D55DC lea edx, [ebp-$24] 00824611 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824614 E8D362BEFF call 0040A8EC 00824619 8B55DC mov edx, [ebp-$24] 0082461C 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0082461F E8A447BFFF call 00418DC8 00824624 8D45E0 lea eax, [ebp-$20] 00824627 50 push eax 00824628 8B55F8 mov edx, [ebp-$08] 0082462B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082462D E88225CAFF call 004C6BB4 00824632 5A pop edx 00824633 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00824635 FF91B4000000 call dword ptr [ecx+$00B4] 0082463B 8BC3 mov eax, ebx 0082463D 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0082463F FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00824645 8B9E0C030000 mov ebx, [esi+$030C] 0082464B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082464D E88212CAFF call 004C58D4 00824652 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824654 E85399CBFF call 004DDFAC 00824659 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0082465B FF5244 call dword ptr [edx+$44] 0082465E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824660 E84799CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00824665 BA9C478200 mov edx, $0082479C 0082466A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082466C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 0082466F 68B8478200 push $008247B8 00824674 FF75F8 push dword ptr [ebp-$08] 00824677 68C8478200 push $008247C8 0082467C 8D55D4 lea edx, [ebp-$2C] 0082467F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824682 E86562BEFF call 0040A8EC 00824687 FF75D4 push dword ptr [ebp-$2C] 0082468A 8D45D8 lea eax, [ebp-$28] 0082468D BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00824692 E81D10BEFF call 004056B4 00824697 8B45D8 mov eax, [ebp-$28] 0082469A 50 push eax 0082469B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082469D E80A99CBFF call 004DDFAC 008246A2 5A pop edx 008246A3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008246A5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008246A8 68D4478200 push $008247D4 008246AD 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYFFP.v2BatchNoPropertiesEditValueChanged(Sender : TObject); begin (* 00824834 55 push ebp 00824835 8BEC mov ebp, esp 00824837 B907000000 mov ecx, $00000007 0082483C 6A00 push $00 0082483E 6A00 push $00 00824840 49 dec ecx 00824841 75F9 jnz 0082483C 00824843 51 push ecx 00824844 53 push ebx 00824845 56 push esi 00824846 8BDA mov ebx, edx 00824848 8BF0 mov esi, eax 0082484A 33C0 xor eax, eax 0082484C 55 push ebp * Possible String Reference to: '殡' | 0082484D 68044A8200 push $00824A04 ***** TRY | 00824852 64FF30 push dword ptr fs:[eax] 00824855 648920 mov fs:[eax], esp 00824858 8D55FC lea edx, [ebp-$04] 0082485B 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; | 0082485D E85AAED6FF call 0058F6BC * Reference to control TfrmYFFP.Tv2 : TcxGridDBTableView | 00824862 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; | 00824868 E8DF7AE3FF 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; | 0082486D E8F2D2E2FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00824872 8B4050 mov eax, [eax+$50] 00824875 8D55F4 lea edx, [ebp-$0C] 00824878 8B08 mov ecx, [eax] 0082487A FF5110 call dword ptr [ecx+$10] 0082487D 8B45F4 mov eax, [ebp-$0C] 00824880 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824883 E86460BEFF call 0040A8EC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824888 8B9E64030000 mov ebx, [esi+$0364] 0082488E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00824890 E8AB3BCAFF call 004C8440 00824895 8D55E0 lea edx, [ebp-$20] 00824898 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082489B E84C60BEFF call 0040A8EC 008248A0 8B55E0 mov edx, [ebp-$20] 008248A3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008248A6 E81D45BFFF call 00418DC8 008248AB 8D45E4 lea eax, [ebp-$1C] 008248AE 50 push eax 008248AF 8B55F8 mov edx, [ebp-$08] 008248B2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008248B4 E8FB22CAFF call 004C6BB4 008248B9 5A pop edx 008248BA 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008248BC FF91B4000000 call dword ptr [ecx+$00B4] 008248C2 8BC3 mov eax, ebx 008248C4 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008248C6 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 008248CC 8B9E0C030000 mov ebx, [esi+$030C] 008248D2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008248D4 E8FB0FCAFF call 004C58D4 008248D9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008248DB E8CC96CBFF call 004DDFAC 008248E0 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008248E2 FF5244 call dword ptr [edx+$44] 008248E5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008248E7 E8C096CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008248EC BA1C4A8200 mov edx, $00824A1C 008248F1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008248F3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008248F6 68384A8200 push $00824A38 008248FB FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008248FE 68484A8200 push $00824A48 00824903 8D55D8 lea edx, [ebp-$28] 00824906 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824909 E8DE5FBEFF call 0040A8EC 0082490E FF75D8 push dword ptr [ebp-$28] 00824911 68544A8200 push $00824A54 00824916 8D45DC lea eax, [ebp-$24] 00824919 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 0082491E E8910DBEFF call 004056B4 00824923 8B45DC mov eax, [ebp-$24] 00824926 50 push eax 00824927 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824929 E87E96CBFF call 004DDFAC 0082492E 5A pop edx 0082492F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824931 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00824934 68604A8200 push $00824A60 00824939 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYFFP.v2PayMentPropertiesButtonClick(Sender : TObject); begin (* 00824AB4 55 push ebp 00824AB5 8BEC mov ebp, esp 00824AB7 51 push ecx 00824AB8 B906000000 mov ecx, $00000006 00824ABD 6A00 push $00 00824ABF 6A00 push $00 00824AC1 49 dec ecx 00824AC2 75F9 jnz 00824ABD 00824AC4 51 push ecx 00824AC5 874DFC xchg [ebp-$04], ecx 00824AC8 53 push ebx 00824AC9 56 push esi 00824ACA 8BF0 mov esi, eax 00824ACC 33C0 xor eax, eax 00824ACE 55 push ebp 00824ACF 680B4D8200 push $00824D0B ***** TRY | 00824AD4 64FF30 push dword ptr fs:[eax] 00824AD7 648920 mov fs:[eax], esp 00824ADA 33C0 xor eax, eax 00824ADC 55 push ebp 00824ADD 68E14C8200 push $00824CE1 ***** TRY | 00824AE2 64FF30 push dword ptr fs:[eax] 00824AE5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.OrderNoChange(Sender : TObject); begin (* 00824DE8 56 push esi * Reference to control TfrmYFFP.ToolButton2 : TToolButton | 00824DE9 8B8014030000 mov eax, [eax+$0314] 00824DEF 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00824DF3 E85CF7BDFF call 00404554 00824DF8 5E pop esi 00824DF9 C3 ret *) end; procedure TfrmYFFP.OrderNoKeyPress(Sender : TObject); begin (* 00824DFC 55 push ebp 00824DFD 8BEC mov ebp, esp 00824DFF 51 push ecx 00824E00 B904000000 mov ecx, $00000004 00824E05 6A00 push $00 00824E07 6A00 push $00 00824E09 49 dec ecx 00824E0A 75F9 jnz 00824E05 00824E0C 51 push ecx 00824E0D 874DFC xchg [ebp-$04], ecx 00824E10 53 push ebx 00824E11 8945FC mov [ebp-$04], eax 00824E14 33C0 xor eax, eax 00824E16 55 push ebp * Possible String Reference to: '轫胨[嬪]' | 00824E17 6802508200 push $00825002 ***** TRY | 00824E1C 64FF30 push dword ptr fs:[eax] 00824E1F 648920 mov fs:[eax], esp 00824E22 80390D cmp byte ptr [ecx], $0D 00824E25 0F859C010000 jnz 00824FC7 00824E2B 8D55F4 lea edx, [ebp-$0C] 00824E2E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.OrderNo : TEdit | 00824E31 8B8084030000 mov eax, [eax+$0384] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 00824E37 E8B437C6FF call 004885F0 00824E3C 8B45F4 mov eax, [ebp-$0C] 00824E3F 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824E42 E8A55ABEFF call 0040A8EC 00824E47 8B45F8 mov eax, [ebp-$08] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 00824E4A E8A507BEFF call 004055F4 00824E4F 83F804 cmp eax, +$04 00824E52 0F8C6F010000 jl 00824FC7 00824E58 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.begdate : TDateTimePicker | 00824E5B 8B8054030000 mov eax, [eax+$0354] 00824E61 8B10 mov edx, [eax] * Reference to method TDateTimePicker.SetFocus() | 00824E63 FF92C4000000 call dword ptr [edx+$00C4] 00824E69 33C0 xor eax, eax 00824E6B 55 push ebp 00824E6C 68C04F8200 push $00824FC0 ***** TRY | 00824E71 64FF30 push dword ptr fs:[eax] 00824E74 648920 mov fs:[eax], esp 00824E77 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00824E7A 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 00824E80 E8CF26CAFF call 004C7554 00824E85 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00824E88 8B9820030000 mov ebx, [eax+$0320] 00824E8E 33D2 xor edx, edx 00824E90 8BC3 mov eax, ebx 00824E92 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 00824E94 FF9190010000 call dword ptr [ecx+$0190] 00824E9A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00824E9C E8330ACAFF call 004C58D4 00824EA1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824EA3 E80491CBFF call 004DDFAC 00824EA8 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00824EAA FF5244 call dword ptr [edx+$44] 00824EAD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824EAF E8F890CBFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 00824EB4 BA18508200 mov edx, $00825018 00824EB9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824EBB FF5138 call dword ptr [ecx+$38] 00824EBE 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824EC0 E8E790CBFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00824EC5 BA38508200 mov edx, $00825038 00824ECA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824ECC FF5138 call dword ptr [ecx+$38] 00824ECF 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824ED1 E8D690CBFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00824ED6 BA58508200 mov edx, $00825058 00824EDB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824EDD FF5138 call dword ptr [ecx+$38] 00824EE0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824EE2 E8C590CBFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId' | 00824EE7 BA8C508200 mov edx, $0082508C 00824EEC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824EEE FF5138 call dword ptr [ecx+$38] 00824EF1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824EF3 E8B490CBFF call 004DDFAC * Possible String Reference to: 'where C.orderNo like :OrderNo' | 00824EF8 BAC4508200 mov edx, $008250C4 00824EFD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824EFF FF5138 call dword ptr [ecx+$38] 00824F02 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00824F04 E8A390CBFF call 004DDFAC * Possible String Reference to: 'and A.CRType='应付款发票登记'' | 00824F09 BAEC508200 mov edx, $008250EC 00824F0E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00824F10 FF5138 call dword ptr [ecx+$38] 00824F13 6814518200 push $00825114 00824F18 8D55D8 lea edx, [ebp-$28] 00824F1B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.OrderNo : TEdit | 00824F1E 8B8084030000 mov eax, [eax+$0384] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 00824F24 E8C736C6FF call 004885F0 00824F29 8B45D8 mov eax, [ebp-$28] 00824F2C 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824F2F E8B859BEFF call 0040A8EC 00824F34 FF75DC push dword ptr [ebp-$24] 00824F37 6814518200 push $00825114 00824F3C 8D45E0 lea eax, [ebp-$20] 00824F3F BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00824F44 E86B07BEFF call 004056B4 00824F49 8B55E0 mov edx, [ebp-$20] 00824F4C 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00824F4F E8743EBFFF call 00418DC8 00824F54 8D45E4 lea eax, [ebp-$1C] 00824F57 50 push eax 00824F58 8BC3 mov eax, ebx * Reference to: ADODB.TCustomADODataSet.GetParameters(TCustomADODataSet):TParameters; | 00824F5A E89173CBFF call 004DC2F0 00824F5F BA1C518200 mov edx, $0082511C * Reference to: ADODB.TParameters.ParamByName(TParameters;WideString):TParameter; | 00824F64 E897F4CAFF call 004D4400 00824F69 5A pop edx * Reference to: ADODB.TParameter.SetValue(TParameter;Variant;Variant); | 00824F6A E85507CBFF call 004D56C4 00824F6F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00824F71 E85209CAFF call 004C58C8 00824F76 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824F79 8B9064030000 mov edx, [eax+$0364] 00824F7F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00824F82 8B8020030000 mov eax, [eax+$0320] | 00824F88 E8031FF9FF call 007B6E90 00824F8D 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00824F90 8B9064030000 mov edx, [eax+$0364] 00824F96 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00824F99 8B8020030000 mov eax, [eax+$0320] | 00824F9F E87420F9FF call 007B7018 00824FA4 33C0 xor eax, eax 00824FA6 5A pop edx 00824FA7 59 pop ecx 00824FA8 59 pop ecx 00824FA9 648910 mov fs:[eax], edx ****** FINALLY | 00824FAC 68C74F8200 push $00824FC7 00824FB1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 00824FB4 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 00824FBA E8B525CAFF call 004C7574 00824FBF C3 ret * Reference to: System.@HandleFinally; | 00824FC0 E92FFBBDFF jmp 00404AF4 00824FC5 EBEA jmp 00824FB1 ****** END | 00824FC7 33C0 xor eax, eax 00824FC9 5A pop edx 00824FCA 59 pop ecx 00824FCB 59 pop ecx 00824FCC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[嬪]' | 00824FCF 6809508200 push $00825009 00824FD4 8D45D8 lea eax, [ebp-$28] * Reference to: System.@LStrClr(void;void); | 00824FD7 E84803BEFF call 00405324 00824FDC 8D45DC lea eax, [ebp-$24] 00824FDF BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00824FE4 E85F03BEFF call 00405348 00824FE9 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00824FEC E883F6BEFF call 00414674 00824FF1 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 00824FF4 E82B03BEFF call 00405324 00824FF9 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 00824FFC E82303BEFF call 00405324 00825001 C3 ret * Reference to: System.@HandleFinally; | 00825002 E9EDFABDFF jmp 00404AF4 00825007 EBCB jmp 00824FD4 ****** END | 00825009 5B pop ebx 0082500A 8BE5 mov esp, ebp 0082500C 5D pop ebp 0082500D C3 ret *) end; procedure TfrmYFFP.v2Column2PropertiesButtonClick(Sender : TObject); begin (* 0082512C 55 push ebp 0082512D 8BEC mov ebp, esp 0082512F 51 push ecx 00825130 B90F000000 mov ecx, $0000000F 00825135 6A00 push $00 00825137 6A00 push $00 00825139 49 dec ecx 0082513A 75F9 jnz 00825135 0082513C 51 push ecx 0082513D 874DFC xchg [ebp-$04], ecx 00825140 53 push ebx 00825141 56 push esi 00825142 8BF0 mov esi, eax 00825144 33C0 xor eax, eax 00825146 55 push ebp 00825147 68D8548200 push $008254D8 ***** TRY | 0082514C 64FF30 push dword ptr fs:[eax] 0082514F 648920 mov fs:[eax], esp 00825152 33C0 xor eax, eax 00825154 55 push ebp 00825155 6884548200 push $00825484 ***** TRY | 0082515A 64FF30 push dword ptr fs:[eax] 0082515D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2ComTaitouPropertiesButtonClick(Sender : TObject); begin (* 00825620 55 push ebp 00825621 8BEC mov ebp, esp 00825623 51 push ecx 00825624 B906000000 mov ecx, $00000006 00825629 6A00 push $00 0082562B 6A00 push $00 0082562D 49 dec ecx 0082562E 75F9 jnz 00825629 00825630 51 push ecx 00825631 874DFC xchg [ebp-$04], ecx 00825634 53 push ebx 00825635 56 push esi 00825636 8BF0 mov esi, eax 00825638 33C0 xor eax, eax 0082563A 55 push ebp 0082563B 6877588200 push $00825877 ***** TRY | 00825640 64FF30 push dword ptr fs:[eax] 00825643 648920 mov fs:[eax], esp 00825646 33C0 xor eax, eax 00825648 55 push ebp 00825649 684D588200 push $0082584D ***** TRY | 0082564E 64FF30 push dword ptr fs:[eax] 00825651 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.VBZPropertiesButtonClick(Sender : TObject); begin (* 0082595C 55 push ebp 0082595D 8BEC mov ebp, esp 0082595F 51 push ecx 00825960 B906000000 mov ecx, $00000006 00825965 6A00 push $00 00825967 6A00 push $00 00825969 49 dec ecx 0082596A 75F9 jnz 00825965 0082596C 51 push ecx 0082596D 874DFC xchg [ebp-$04], ecx 00825970 53 push ebx 00825971 56 push esi 00825972 8BF0 mov esi, eax 00825974 33C0 xor eax, eax 00825976 55 push ebp * Possible String Reference to: ':锝脬^[嬪]' | 00825977 68B55B8200 push $00825BB5 ***** TRY | 0082597C 64FF30 push dword ptr fs:[eax] 0082597F 648920 mov fs:[eax], esp 00825982 33C0 xor eax, eax 00825984 55 push ebp 00825985 688B5B8200 push $00825B8B ***** TRY | 0082598A 64FF30 push dword ptr fs:[eax] 0082598D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2Column4PropertiesButtonClick(Sender : TObject); begin (* 00825CA0 55 push ebp 00825CA1 8BEC mov ebp, esp 00825CA3 51 push ecx 00825CA4 B906000000 mov ecx, $00000006 00825CA9 6A00 push $00 00825CAB 6A00 push $00 00825CAD 49 dec ecx 00825CAE 75F9 jnz 00825CA9 00825CB0 51 push ecx 00825CB1 874DFC xchg [ebp-$04], ecx 00825CB4 53 push ebx 00825CB5 56 push esi 00825CB6 8BF0 mov esi, eax 00825CB8 33C0 xor eax, eax 00825CBA 55 push ebp * Possible String Reference to: '轹虢脬^[嬪]' | 00825CBB 68F95E8200 push $00825EF9 ***** TRY | 00825CC0 64FF30 push dword ptr fs:[eax] 00825CC3 648920 mov fs:[eax], esp 00825CC6 33C0 xor eax, eax 00825CC8 55 push ebp 00825CC9 68CF5E8200 push $00825ECF ***** TRY | 00825CCE 64FF30 push dword ptr fs:[eax] 00825CD1 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2Column3PropertiesEditValueChanged(Sender : TObject); begin (* 00825FE4 55 push ebp 00825FE5 8BEC mov ebp, esp 00825FE7 B905000000 mov ecx, $00000005 00825FEC 6A00 push $00 00825FEE 6A00 push $00 00825FF0 49 dec ecx 00825FF1 75F9 jnz 00825FEC 00825FF3 51 push ecx 00825FF4 53 push ebx 00825FF5 56 push esi 00825FF6 8BDA mov ebx, edx 00825FF8 8BF0 mov esi, eax 00825FFA 33C0 xor eax, eax 00825FFC 55 push ebp * Possible String Reference to: '榉榻脎^[嬪]' | 00825FFD 6838618200 push $00826138 ***** TRY | 00826002 64FF30 push dword ptr fs:[eax] 00826005 648920 mov fs:[eax], esp 00826008 8D55FC lea edx, [ebp-$04] 0082600B 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; | 0082600D E8AA96D6FF call 0058F6BC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00826012 8B9E64030000 mov ebx, [esi+$0364] 00826018 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0082601A E82124CAFF call 004C8440 0082601F 8D55E8 lea edx, [ebp-$18] 00826022 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826025 E8C248BEFF call 0040A8EC 0082602A 8B55E8 mov edx, [ebp-$18] 0082602D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826030 E8932DBFFF call 00418DC8 00826035 8D45EC lea eax, [ebp-$14] 00826038 50 push eax * Possible String Reference to: 'P_CodeName' | 00826039 BA50618200 mov edx, $00826150 0082603E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826040 E86F0BCAFF call 004C6BB4 00826045 5A pop edx 00826046 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00826048 FF91B4000000 call dword ptr [ecx+$00B4] 0082604E 8BC3 mov eax, ebx 00826050 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00826052 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00826058 8B9E0C030000 mov ebx, [esi+$030C] 0082605E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826060 E86FF8C9FF call 004C58D4 00826065 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826067 E8407FCBFF call 004DDFAC 0082606C 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0082606E FF5244 call dword ptr [edx+$44] 00826071 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826073 E8347FCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826078 BA64618200 mov edx, $00826164 0082607D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082607F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_CodeName='' | 00826082 6880618200 push $00826180 00826087 8D55E0 lea edx, [ebp-$20] 0082608A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082608D E85A48BEFF call 0040A8EC 00826092 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826095 689C618200 push $0082619C 0082609A 8D45E4 lea eax, [ebp-$1C] 0082609D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008260A2 E80DF6BDFF call 004056B4 008260A7 8B45E4 mov eax, [ebp-$1C] 008260AA 50 push eax 008260AB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008260AD E8FA7ECBFF call 004DDFAC 008260B2 5A pop edx 008260B3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008260B5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 008260B8 68A8618200 push $008261A8 * Possible String Reference to: 'YFId' | 008260BD BAC0618200 mov edx, $008261C0 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008260C2 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008260C8 E8E70ACAFF call 004C6BB4 008260CD 8D55D4 lea edx, [ebp-$2C] 008260D0 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008260D2 FF5160 call dword ptr [ecx+$60] 008260D5 8B45D4 mov eax, [ebp-$2C] 008260D8 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008260DB E80C48BEFF call 0040A8EC 008260E0 FF75D8 push dword ptr [ebp-$28] 008260E3 68D0618200 push $008261D0 008260E8 8D45DC lea eax, [ebp-$24] 008260EB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008260F0 E8BFF5BDFF call 004056B4 008260F5 8B45DC mov eax, [ebp-$24] 008260F8 50 push eax 008260F9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008260FB E8AC7ECBFF call 004DDFAC 00826100 5A pop edx 00826101 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826103 FF5138 call dword ptr [ecx+$38] 00826106 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00826108 E8C77DCBFF call 004DDED4 0082610D 33C0 xor eax, eax 0082610F 5A pop edx 00826110 59 pop ecx 00826111 59 pop ecx 00826112 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 00826115 683F618200 push $0082613F 0082611A 8D45D4 lea eax, [ebp-$2C] 0082611D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00826122 E821F2BDFF call 00405348 00826127 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0082612A E845E5BEFF call 00414674 0082612F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00826132 E8EDF1BDFF call 00405324 00826137 C3 ret * Reference to: System.@HandleFinally; | 00826138 E9B7E9BDFF jmp 00404AF4 0082613D EBDB jmp 0082611A ****** END | 0082613F 5E pop esi 00826140 5B pop ebx 00826141 8BE5 mov esp, ebp 00826143 5D pop ebp 00826144 C3 ret *) end; procedure TfrmYFFP.v2Column4PropertiesEditValueChanged(Sender : TObject); begin (* 008261D4 55 push ebp 008261D5 8BEC mov ebp, esp 008261D7 B905000000 mov ecx, $00000005 008261DC 6A00 push $00 008261DE 6A00 push $00 008261E0 49 dec ecx 008261E1 75F9 jnz 008261DC 008261E3 51 push ecx 008261E4 53 push ebx 008261E5 56 push esi 008261E6 8BDA mov ebx, edx 008261E8 8BF0 mov esi, eax 008261EA 33C0 xor eax, eax 008261EC 55 push ebp * Possible String Reference to: '榍缃脎^[嬪]' | 008261ED 6828638200 push $00826328 ***** TRY | 008261F2 64FF30 push dword ptr fs:[eax] 008261F5 648920 mov fs:[eax], esp 008261F8 8D55FC lea edx, [ebp-$04] 008261FB 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; | 008261FD E8BA94D6FF call 0058F6BC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00826202 8B9E64030000 mov ebx, [esi+$0364] 00826208 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0082620A E83122CAFF call 004C8440 0082620F 8D55E8 lea edx, [ebp-$18] 00826212 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826215 E8D246BEFF call 0040A8EC 0082621A 8B55E8 mov edx, [ebp-$18] 0082621D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826220 E8A32BBFFF call 00418DC8 00826225 8D45EC lea eax, [ebp-$14] 00826228 50 push eax * Possible String Reference to: 'P_Spec' | 00826229 BA40638200 mov edx, $00826340 0082622E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826230 E87F09CAFF call 004C6BB4 00826235 5A pop edx 00826236 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00826238 FF91B4000000 call dword ptr [ecx+$00B4] 0082623E 8BC3 mov eax, ebx 00826240 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00826242 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00826248 8B9E0C030000 mov ebx, [esi+$030C] 0082624E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826250 E87FF6C9FF call 004C58D4 00826255 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826257 E8507DCBFF call 004DDFAC 0082625C 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0082625E FF5244 call dword ptr [edx+$44] 00826261 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826263 E8447DCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826268 BA50638200 mov edx, $00826350 0082626D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082626F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_Spec='' | 00826272 686C638200 push $0082636C 00826277 8D55E0 lea edx, [ebp-$20] 0082627A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082627D E86A46BEFF call 0040A8EC 00826282 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826285 6884638200 push $00826384 0082628A 8D45E4 lea eax, [ebp-$1C] 0082628D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00826292 E81DF4BDFF call 004056B4 00826297 8B45E4 mov eax, [ebp-$1C] 0082629A 50 push eax 0082629B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082629D E80A7DCBFF call 004DDFAC 008262A2 5A pop edx 008262A3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008262A5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 008262A8 6890638200 push $00826390 * Possible String Reference to: 'YFId' | 008262AD BAA8638200 mov edx, $008263A8 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008262B2 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008262B8 E8F708CAFF call 004C6BB4 008262BD 8D55D4 lea edx, [ebp-$2C] 008262C0 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008262C2 FF5160 call dword ptr [ecx+$60] 008262C5 8B45D4 mov eax, [ebp-$2C] 008262C8 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008262CB E81C46BEFF call 0040A8EC 008262D0 FF75D8 push dword ptr [ebp-$28] 008262D3 68B8638200 push $008263B8 008262D8 8D45DC lea eax, [ebp-$24] 008262DB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008262E0 E8CFF3BDFF call 004056B4 008262E5 8B45DC mov eax, [ebp-$24] 008262E8 50 push eax 008262E9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008262EB E8BC7CCBFF call 004DDFAC 008262F0 5A pop edx 008262F1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008262F3 FF5138 call dword ptr [ecx+$38] 008262F6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008262F8 E8D77BCBFF call 004DDED4 008262FD 33C0 xor eax, eax 008262FF 5A pop edx 00826300 59 pop ecx 00826301 59 pop ecx 00826302 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 00826305 682F638200 push $0082632F 0082630A 8D45D4 lea eax, [ebp-$2C] 0082630D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00826312 E831F0BDFF call 00405348 00826317 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0082631A E855E3BEFF call 00414674 0082631F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00826322 E8FDEFBDFF call 00405324 00826327 C3 ret * Reference to: System.@HandleFinally; | 00826328 E9C7E7BDFF jmp 00404AF4 0082632D EBDB jmp 0082630A ****** END | 0082632F 5E pop esi 00826330 5B pop ebx 00826331 8BE5 mov esp, ebp 00826333 5D pop ebp 00826334 C3 ret *) end; procedure TfrmYFFP.v2KPNOPropertiesEditValueChanged(Sender : TObject); begin (* 008263BC 55 push ebp 008263BD 8BEC mov ebp, esp 008263BF B905000000 mov ecx, $00000005 008263C4 6A00 push $00 008263C6 6A00 push $00 008263C8 49 dec ecx 008263C9 75F9 jnz 008263C4 008263CB 51 push ecx 008263CC 53 push ebx 008263CD 56 push esi 008263CE 8BDA mov ebx, edx 008263D0 8BF0 mov esi, eax 008263D2 33C0 xor eax, eax 008263D4 55 push ebp * Possible String Reference to: '檫褰脎^[嬪]' | 008263D5 6810658200 push $00826510 ***** TRY | 008263DA 64FF30 push dword ptr fs:[eax] 008263DD 648920 mov fs:[eax], esp 008263E0 8D55FC lea edx, [ebp-$04] 008263E3 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; | 008263E5 E8D292D6FF call 0058F6BC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008263EA 8B9E64030000 mov ebx, [esi+$0364] 008263F0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008263F2 E84920CAFF call 004C8440 008263F7 8D55E8 lea edx, [ebp-$18] 008263FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008263FD E8EA44BEFF call 0040A8EC 00826402 8B55E8 mov edx, [ebp-$18] 00826405 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826408 E8BB29BFFF call 00418DC8 0082640D 8D45EC lea eax, [ebp-$14] 00826410 50 push eax * Possible String Reference to: 'KPNO' | 00826411 BA28658200 mov edx, $00826528 00826416 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826418 E89707CAFF call 004C6BB4 0082641D 5A pop edx 0082641E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00826420 FF91B4000000 call dword ptr [ecx+$00B4] 00826426 8BC3 mov eax, ebx 00826428 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0082642A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00826430 8B9E0C030000 mov ebx, [esi+$030C] 00826436 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826438 E897F4C9FF call 004C58D4 0082643D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082643F E8687BCBFF call 004DDFAC 00826444 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00826446 FF5244 call dword ptr [edx+$44] 00826449 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082644B E85C7BCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826450 BA38658200 mov edx, $00826538 00826455 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826457 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPNO='' | 0082645A 6854658200 push $00826554 0082645F 8D55E0 lea edx, [ebp-$20] 00826462 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826465 E88244BEFF call 0040A8EC 0082646A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 0082646D 6868658200 push $00826568 00826472 8D45E4 lea eax, [ebp-$1C] 00826475 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0082647A E835F2BDFF call 004056B4 0082647F 8B45E4 mov eax, [ebp-$1C] 00826482 50 push eax 00826483 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826485 E8227BCBFF call 004DDFAC 0082648A 5A pop edx 0082648B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082648D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00826490 6874658200 push $00826574 * Possible String Reference to: 'YFId' | 00826495 BA8C658200 mov edx, $0082658C * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 0082649A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008264A0 E80F07CAFF call 004C6BB4 008264A5 8D55D4 lea edx, [ebp-$2C] 008264A8 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008264AA FF5160 call dword ptr [ecx+$60] 008264AD 8B45D4 mov eax, [ebp-$2C] 008264B0 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008264B3 E83444BEFF call 0040A8EC 008264B8 FF75D8 push dword ptr [ebp-$28] 008264BB 689C658200 push $0082659C 008264C0 8D45DC lea eax, [ebp-$24] 008264C3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008264C8 E8E7F1BDFF call 004056B4 008264CD 8B45DC mov eax, [ebp-$24] 008264D0 50 push eax 008264D1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008264D3 E8D47ACBFF call 004DDFAC 008264D8 5A pop edx 008264D9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008264DB FF5138 call dword ptr [ecx+$38] 008264DE 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008264E0 E8EF79CBFF call 004DDED4 008264E5 33C0 xor eax, eax 008264E7 5A pop edx 008264E8 59 pop ecx 008264E9 59 pop ecx 008264EA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 008264ED 6817658200 push $00826517 008264F2 8D45D4 lea eax, [ebp-$2C] 008264F5 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008264FA E849EEBDFF call 00405348 008264FF 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00826502 E86DE1BEFF call 00414674 00826507 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 0082650A E815EEBDFF call 00405324 0082650F C3 ret * Reference to: System.@HandleFinally; | 00826510 E9DFE5BDFF jmp 00404AF4 00826515 EBDB jmp 008264F2 ****** END | 00826517 5E pop esi 00826518 5B pop ebx 00826519 8BE5 mov esp, ebp 0082651B 5D pop ebp 0082651C C3 ret *) end; procedure TfrmYFFP.v2KPDMNoPropertiesEditValueChanged(Sender : TObject); begin (* 008265A0 55 push ebp 008265A1 8BEC mov ebp, esp 008265A3 B905000000 mov ecx, $00000005 008265A8 6A00 push $00 008265AA 6A00 push $00 008265AC 49 dec ecx 008265AD 75F9 jnz 008265A8 008265AF 51 push ecx 008265B0 53 push ebx 008265B1 56 push esi 008265B2 8BDA mov ebx, edx 008265B4 8BF0 mov esi, eax 008265B6 33C0 xor eax, eax 008265B8 55 push ebp * Possible String Reference to: '辂憬脎^[嬪]' | 008265B9 68F4668200 push $008266F4 ***** TRY | 008265BE 64FF30 push dword ptr fs:[eax] 008265C1 648920 mov fs:[eax], esp 008265C4 8D55FC lea edx, [ebp-$04] 008265C7 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; | 008265C9 E8EE90D6FF call 0058F6BC * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008265CE 8B9E64030000 mov ebx, [esi+$0364] 008265D4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008265D6 E8651ECAFF call 004C8440 008265DB 8D55E8 lea edx, [ebp-$18] 008265DE 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008265E1 E80643BEFF call 0040A8EC 008265E6 8B55E8 mov edx, [ebp-$18] 008265E9 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008265EC E8D727BFFF call 00418DC8 008265F1 8D45EC lea eax, [ebp-$14] 008265F4 50 push eax * Possible String Reference to: 'KPDMNo' | 008265F5 BA0C678200 mov edx, $0082670C 008265FA 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008265FC E8B305CAFF call 004C6BB4 00826601 5A pop edx 00826602 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00826604 FF91B4000000 call dword ptr [ecx+$00B4] 0082660A 8BC3 mov eax, ebx 0082660C 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0082660E FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 00826614 8B9E0C030000 mov ebx, [esi+$030C] 0082661A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082661C E8B3F2C9FF call 004C58D4 00826621 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826623 E88479CBFF call 004DDFAC 00826628 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0082662A FF5244 call dword ptr [edx+$44] 0082662D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082662F E87879CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826634 BA1C678200 mov edx, $0082671C 00826639 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082663B FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPDMNo='' | 0082663E 6838678200 push $00826738 00826643 8D55E0 lea edx, [ebp-$20] 00826646 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826649 E89E42BEFF call 0040A8EC 0082664E FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826651 6850678200 push $00826750 00826656 8D45E4 lea eax, [ebp-$1C] 00826659 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0082665E E851F0BDFF call 004056B4 00826663 8B45E4 mov eax, [ebp-$1C] 00826666 50 push eax 00826667 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00826669 E83E79CBFF call 004DDFAC 0082666E 5A pop edx 0082666F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826671 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00826674 685C678200 push $0082675C * Possible String Reference to: 'YFId' | 00826679 BA74678200 mov edx, $00826774 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 0082667E 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826684 E82B05CAFF call 004C6BB4 00826689 8D55D4 lea edx, [ebp-$2C] 0082668C 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0082668E FF5160 call dword ptr [ecx+$60] 00826691 8B45D4 mov eax, [ebp-$2C] 00826694 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826697 E85042BEFF call 0040A8EC 0082669C FF75D8 push dword ptr [ebp-$28] 0082669F 6884678200 push $00826784 008266A4 8D45DC lea eax, [ebp-$24] 008266A7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008266AC E803F0BDFF call 004056B4 008266B1 8B45DC mov eax, [ebp-$24] 008266B4 50 push eax 008266B5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008266B7 E8F078CBFF call 004DDFAC 008266BC 5A pop edx 008266BD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008266BF FF5138 call dword ptr [ecx+$38] 008266C2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008266C4 E80B78CBFF call 004DDED4 008266C9 33C0 xor eax, eax 008266CB 5A pop edx 008266CC 59 pop ecx 008266CD 59 pop ecx 008266CE 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 008266D1 68FB668200 push $008266FB 008266D6 8D45D4 lea eax, [ebp-$2C] 008266D9 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008266DE E865ECBDFF call 00405348 008266E3 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 008266E6 E889DFBEFF call 00414674 008266EB 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 008266EE E831ECBDFF call 00405324 008266F3 C3 ret * Reference to: System.@HandleFinally; | 008266F4 E9FBE3BDFF jmp 00404AF4 008266F9 EBDB jmp 008266D6 ****** END | 008266FB 5E pop esi 008266FC 5B pop ebx 008266FD 8BE5 mov esp, ebp 008266FF 5D pop ebp 00826700 C3 ret *) end; procedure TfrmYFFP.KPNOKeyPress(Sender : TObject); begin (* 00826788 55 push ebp 00826789 8BEC mov ebp, esp 0082678B 6A00 push $00 0082678D 6A00 push $00 0082678F 6A00 push $00 00826791 6A00 push $00 00826793 53 push ebx 00826794 8945FC mov [ebp-$04], eax 00826797 33C0 xor eax, eax 00826799 55 push ebp 0082679A 68F4688200 push $008268F4 ***** TRY | 0082679F 64FF30 push dword ptr fs:[eax] 008267A2 648920 mov fs:[eax], esp 008267A5 33C0 xor eax, eax 008267A7 55 push ebp 008267A8 68CA688200 push $008268CA ***** TRY | 008267AD 64FF30 push dword ptr fs:[eax] 008267B0 648920 mov fs:[eax], esp 008267B3 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008267B6 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 008267BC E8930DCAFF call 004C7554 008267C1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008267C4 8B9820030000 mov ebx, [eax+$0320] 008267CA 33D2 xor edx, edx 008267CC 8BC3 mov eax, ebx 008267CE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 008267D0 FF9190010000 call dword ptr [ecx+$0190] 008267D6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008267D8 E8F7F0C9FF call 004C58D4 008267DD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008267DF E8C877CBFF call 004DDFAC 008267E4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008267E6 FF5244 call dword ptr [edx+$44] 008267E9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008267EB E8BC77CBFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 008267F0 BA08698200 mov edx, $00826908 008267F5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008267F7 FF5138 call dword ptr [ecx+$38] 008267FA 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008267FC E8AB77CBFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00826801 BA28698200 mov edx, $00826928 00826806 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826808 FF5138 call dword ptr [ecx+$38] 0082680B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082680D E89A77CBFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00826812 BA48698200 mov edx, $00826948 00826817 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826819 FF5138 call dword ptr [ecx+$38] 0082681C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082681E E88977CBFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId ' | 00826823 BA7C698200 mov edx, $0082697C 00826828 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0082682A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where A.KPNO='%' | 0082682D 68B4698200 push $008269B4 00826832 8D55F0 lea edx, [ebp-$10] 00826835 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.KPNO : TEdit | 00826838 8B80A0030000 mov eax, [eax+$03A0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 0082683E E8AD1DC6FF call 004885F0 00826843 8B45F0 mov eax, [ebp-$10] 00826846 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826849 E89E40BEFF call 0040A8EC 0082684E FF75F4 push dword ptr [ebp-$0C] 00826851 68CC698200 push $008269CC * Possible String Reference to: '' and A.CRType='应付款发票登记' ' | 00826856 68D8698200 push $008269D8 0082685B 8D45F8 lea eax, [ebp-$08] 0082685E BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00826863 E84CEEBDFF call 004056B4 00826868 8B45F8 mov eax, [ebp-$08] 0082686B 50 push eax 0082686C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0082686E E83977CBFF call 004DDFAC 00826873 5A pop edx 00826874 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00826876 FF5138 call dword ptr [ecx+$38] 00826879 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 0082687B E848F0C9FF call 004C58C8 00826880 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00826883 8B9064030000 mov edx, [eax+$0364] 00826889 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 0082688C 8B8020030000 mov eax, [eax+$0320] | 00826892 E8F905F9FF call 007B6E90 00826897 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 0082689A 8B9064030000 mov edx, [eax+$0364] 008268A0 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008268A3 8B8020030000 mov eax, [eax+$0320] | 008268A9 E86A07F9FF call 007B7018 008268AE 33C0 xor eax, eax 008268B0 5A pop edx 008268B1 59 pop ecx 008268B2 59 pop ecx 008268B3 648910 mov fs:[eax], edx ****** FINALLY | 008268B6 68D1688200 push $008268D1 008268BB 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryMain : TADOQuery | 008268BE 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 008268C4 E8AB0CCAFF call 004C7574 008268C9 C3 ret * Reference to: System.@HandleFinally; | 008268CA E925E2BDFF jmp 00404AF4 008268CF EBEA jmp 008268BB ****** END | 008268D1 33C0 xor eax, eax 008268D3 5A pop edx 008268D4 59 pop ecx 008268D5 59 pop ecx 008268D6 648910 mov fs:[eax], edx ****** FINALLY | 008268D9 68FB688200 push $008268FB 008268DE 8D45F0 lea eax, [ebp-$10] * Reference to: System.@LStrClr(void;void); | 008268E1 E83EEABDFF call 00405324 008268E6 8D45F4 lea eax, [ebp-$0C] 008268E9 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008268EE E855EABDFF call 00405348 008268F3 C3 ret * Reference to: System.@HandleFinally; | 008268F4 E9FBE1BDFF jmp 00404AF4 008268F9 EBE3 jmp 008268DE ****** END | 008268FB 5B pop ebx 008268FC 8BE5 mov esp, ebp 008268FE 5D pop ebp 008268FF C3 ret *) end; procedure TfrmYFFP.N1Click(Sender : TObject); begin (* 008269FC B201 mov dl, $01 * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 008269FE 8B8064030000 mov eax, [eax+$0364] * Reference to : TfrmSelExportField._PROC_007B84A4() | 00826A04 E89B1AF9FF call 007B84A4 00826A09 C3 ret *) end; procedure TfrmYFFP.N2Click(Sender : TObject); begin (* 00826A0C 33D2 xor edx, edx * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00826A0E 8B8064030000 mov eax, [eax+$0364] * Reference to : TfrmSelExportField._PROC_007B84A4() | 00826A14 E88B1AF9FF call 007B84A4 00826A19 C3 ret *) end; procedure TfrmYFFP.v2SselPropertiesChange(Sender : TObject); begin (* 00826A1C 53 push ebx 00826A1D 56 push esi 00826A1E 8BD8 mov ebx, eax * Reference to control TfrmYFFP.ToolBar1 : TToolBar | 00826A20 8B83F8020000 mov eax, [ebx+$02F8] 00826A26 8B10 mov edx, [eax] * Reference to method TToolBar.SetFocus() | 00826A28 FF92C4000000 call dword ptr [edx+$00C4] * Possible String Reference to: 'KPMoney' | 00826A2E BA6C6A8200 mov edx, $00826A6C * Reference to control TfrmYFFP.CDS_HZ : TClientDataSet | 00826A33 8BB364030000 mov esi, [ebx+$0364] 00826A39 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826A3B E87401CAFF call 004C6BB4 00826A40 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_4C | 00826A42 FF524C call dword ptr [edx+$4C] 00826A45 D835746A8200 fdiv dword ptr [$00826A74] 00826A4B 83C4F8 add esp, -$08 00826A4E DD1C24 fstp qword ptr [esp] 00826A51 9B wait * Reference to control TfrmYFFP.Label12 : TLabel | 00826A52 8B93C0030000 mov edx, [ebx+$03C0] 00826A58 8BC6 mov eax, esi * Reference to : TfrmSelExportField._PROC_007B6D90() | 00826A5A E83103F9FF call 007B6D90 00826A5F 5E pop esi 00826A60 5B pop ebx 00826A61 C3 ret *) end; procedure TfrmYFFP.v2GYSNamePropertiesButtonClick(Sender : TObject); begin (* 00826A78 55 push ebp 00826A79 8BEC mov ebp, esp 00826A7B 51 push ecx 00826A7C B906000000 mov ecx, $00000006 00826A81 6A00 push $00 00826A83 6A00 push $00 00826A85 49 dec ecx 00826A86 75F9 jnz 00826A81 00826A88 51 push ecx 00826A89 874DFC xchg [ebp-$04], ecx 00826A8C 53 push ebx 00826A8D 56 push esi 00826A8E 8BF0 mov esi, eax 00826A90 33C0 xor eax, eax 00826A92 55 push ebp 00826A93 68CF6C8200 push $00826CCF ***** TRY | 00826A98 64FF30 push dword ptr fs:[eax] 00826A9B 648920 mov fs:[eax], esp 00826A9E 33C0 xor eax, eax 00826AA0 55 push ebp 00826AA1 68A56C8200 push $00826CA5 ***** TRY | 00826AA6 64FF30 push dword ptr fs:[eax] 00826AA9 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2YFNamePropertiesButtonClick(Sender : TObject); begin (* 00826DC0 55 push ebp 00826DC1 8BEC mov ebp, esp 00826DC3 51 push ecx 00826DC4 B907000000 mov ecx, $00000007 00826DC9 6A00 push $00 00826DCB 6A00 push $00 00826DCD 49 dec ecx 00826DCE 75F9 jnz 00826DC9 00826DD0 874DFC xchg [ebp-$04], ecx 00826DD3 53 push ebx 00826DD4 56 push esi 00826DD5 8BF0 mov esi, eax 00826DD7 33C0 xor eax, eax 00826DD9 55 push ebp * Possible String Reference to: '椹诮脎^[嬪]' | 00826DDA 6846708200 push $00827046 ***** TRY | 00826DDF 64FF30 push dword ptr fs:[eax] 00826DE2 648920 mov fs:[eax], esp 00826DE5 33C0 xor eax, eax 00826DE7 55 push ebp 00826DE8 6814708200 push $00827014 ***** TRY | 00826DED 64FF30 push dword ptr fs:[eax] 00826DF0 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2KPStatusPropertiesButtonClick(Sender : TObject); begin (* 00827134 55 push ebp 00827135 8BEC mov ebp, esp 00827137 51 push ecx 00827138 B907000000 mov ecx, $00000007 0082713D 6A00 push $00 0082713F 6A00 push $00 00827141 49 dec ecx 00827142 75F9 jnz 0082713D 00827144 874DFC xchg [ebp-$04], ecx 00827147 53 push ebx 00827148 56 push esi 00827149 8BF0 mov esi, eax 0082714B 33C0 xor eax, eax 0082714D 55 push ebp * Possible String Reference to: '5捉脎^[嬪]' | 0082714E 68BA738200 push $008273BA ***** TRY | 00827153 64FF30 push dword ptr fs:[eax] 00827156 648920 mov fs:[eax], esp 00827159 33C0 xor eax, eax 0082715B 55 push ebp 0082715C 6888738200 push $00827388 ***** TRY | 00827161 64FF30 push dword ptr fs:[eax] 00827164 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP.v2FKTaitouPropertiesButtonClick(Sender : TObject); begin (* 008274AC 55 push ebp 008274AD 8BEC mov ebp, esp 008274AF 51 push ecx 008274B0 B906000000 mov ecx, $00000006 008274B5 6A00 push $00 008274B7 6A00 push $00 008274B9 49 dec ecx 008274BA 75F9 jnz 008274B5 008274BC 51 push ecx 008274BD 874DFC xchg [ebp-$04], ecx 008274C0 53 push ebx 008274C1 56 push esi 008274C2 8BF0 mov esi, eax 008274C4 33C0 xor eax, eax 008274C6 55 push ebp * Possible String Reference to: '轶咏胫^[嬪]' | 008274C7 68FC768200 push $008276FC ***** TRY | 008274CC 64FF30 push dword ptr fs:[eax] 008274CF 648920 mov fs:[eax], esp 008274D2 33C0 xor eax, eax 008274D4 55 push ebp 008274D5 68C5768200 push $008276C5 ***** TRY | 008274DA 64FF30 push dword ptr fs:[eax] 008274DD 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00820F3D(Sender : TObject); begin (* 00820F3D 7064 jo 00820FA3 00820F3F 61 popa 00820F40 7465 jz 00820FA7 00820F42 205946 and [ecx+$46], bl 00820F45 5F pop edi 00820F46 4D dec ebp 00820F47 6F outsd 00820F48 6E outsb 00820F49 65795F jns 00820FAB 00820F4C 4B dec ebx 00820F4D 43 inc ebx 00820F4E 205365 and [ebx+$65], dl 00820F51 7420 jz 00820F73 00820F53 4B dec ebx 00820F54 43 inc ebx 00820F55 42 inc edx 00820F56 42 inc edx 00820F57 4D dec ebp 00820F58 6F outsd 00820F59 6E outsb 00820F5A 65793D jns 00820F9A 00820F5D 4B dec ebx 00820F5E 43 inc ebx 00820F5F 42 inc edx 00820F60 42 inc edx 00820F61 4D dec ebp 00820F62 6F outsd 00820F63 6E outsb 00820F64 65792D jns 00820F94 00820F67 00FF add bh, bh 00820F69 FFFF DB $FF, $FF // 00820F6B FF0D00000020 dec dword ptr [$20000000] 00820F71 7768 jnbe 00820FDB 00820F73 657265 jb 00820FDB 00820F76 204352 and [ebx+$52], al 00820F79 49 dec ecx 00820F7A 44 inc esp 00820F7B 3D27000000 cmp eax, $00000027 00820F80 FFFF DB $FF, $FF // 00820F82 FFFF DB $FF, $FF // 00820F84 0400 add al, +$00 00820F86 0000 add [eax], al 00820F88 43 inc ebx 00820F89 52 push edx 00820F8A 49 dec ecx 00820F8B 44 inc esp 00820F8C 0000 add [eax], al 00820F8E 0000 add [eax], al 00820F90 55 push ebp 00820F91 8BEC mov ebp, esp 00820F93 53 push ebx 00820F94 8BD8 mov ebx, eax 00820F96 33C0 xor eax, eax 00820F98 55 push ebp * Possible String Reference to: '猷:滕[]' | 00820F99 680F108200 push $0082100F ***** TRY | 00820F9E 64FF30 push dword ptr fs:[eax] 00820FA1 648920 mov fs:[eax], esp * Possible String Reference to: '财务管理' | 00820FA4 B924108200 mov ecx, $00821024 * Reference to control ADOTemp : N.A. | 00820FA9 8B933C030000 mov edx, [ebx+$033C] * Possible String Reference to: '应付款发票' | 00820FAF B838108200 mov eax, $00821038 | 00820FB4 E8EB69F9FF call 007B79A4 * Reference to control Label3 : TLabel | 00820FB9 8B8308030000 mov eax, [ebx+$0308] | 00820FBF E8C439F9FF call 007B4988 00820FC4 83C4F8 add esp, -$08 00820FC7 DD1C24 fstp qword ptr [esp] 00820FCA 9B wait * Reference to control ConPerson1 : N.A. | 00820FCB 8B8358030000 mov eax, [ebx+$0358] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00820FD1 E85612C5FF call 0047222C * Reference to control ConPerson1 : N.A. | 00820FD6 8B8358030000 mov eax, [ebx+$0358] 00820FDC DD8010020000 fld qword ptr [eax+$0210] 00820FE2 D82544108200 fsub dword ptr [$00821044] 00820FE8 83C4F8 add esp, -$08 00820FEB DD1C24 fstp qword ptr [esp] 00820FEE 9B wait * Reference to control Label9 : TLabel | 00820FEF 8B8354030000 mov eax, [ebx+$0354] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00820FF5 E83212C5FF call 0047222C 00820FFA 8BC3 mov eax, ebx | 00820FFC E8ABF8FFFF call 008208AC 00821001 33C0 xor eax, eax 00821003 5A pop edx 00821004 59 pop ecx 00821005 59 pop ecx 00821006 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[]' | 00821009 6816108200 push $00821016 0082100E C3 ret *) end; procedure TfrmYFFP._PROC_00821285(Sender : TObject); begin (* 00821285 8BEC mov ebp, esp 00821287 B92D000000 mov ecx, $0000002D 0082128C 6A00 push $00 0082128E 6A00 push $00 00821290 49 dec ecx 00821291 75F9 jnz 0082128C 00821293 51 push ecx 00821294 53 push ebx 00821295 56 push esi 00821296 57 push edi 00821297 8945FC mov [ebp-$04], eax 0082129A 33C0 xor eax, eax 0082129C 55 push ebp * Possible String Reference to: '閮0殇嬅_^[嬪]' | 0082129D 686C1A8200 push $00821A6C ***** TRY | 008212A2 64FF30 push dword ptr fs:[eax] 008212A5 648920 mov fs:[eax], esp 008212A8 33C0 xor eax, eax 008212AA 55 push ebp 008212AB 6816198200 push $00821916 ***** TRY | 008212B0 64FF30 push dword ptr fs:[eax] 008212B3 648920 mov fs:[eax], esp 008212B6 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 008212B9 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 008212BF E868ABCBFF call 004DBE2C * Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer; | 008212C4 E8CB0FCBFF call 004D2294 * Possible String Reference to: 'YF_Money_CR' | 008212C9 68881A8200 push $00821A88 008212CE 6A04 push $04 008212D0 6A01 push $01 008212D2 8D55F8 lea edx, [ebp-$08] 008212D5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 008212D8 8B800C030000 mov eax, [eax+$030C] * Possible String Reference to: 'YF' | 008212DE B99C1A8200 mov ecx, $00821A9C * Reference to : TfrmSelExportField._PROC_007B7708() | 008212E3 E82064F9FF call 007B7708 008212E8 84C0 test al, al 008212EA 753A jnz 00821326 008212EC 33DB xor ebx, ebx 008212EE 8B45FC mov eax, [ebp-$04] * Reference to control TfrmYFFP.ADOQueryCmd : TADOQuery | 008212F1 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 008212F7 E830ABCBFF call 004DBE2C * Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection); | 008212FC E8DF0FCBFF call 004D22E0 00821301 6A00 push $00 * Possible String Reference to: '提示' | 00821303 B9A01A8200 mov ecx, $00821AA0 * Possible String Reference to: '取最大号失败！' | 00821308 BAA81A8200 mov edx, $00821AA8 *) end; procedure TfrmYFFP._PROC_00821B29(Sender : TObject); begin (* 00821B29 7064 jo 00821B8F 00821B2B 61 popa 00821B2C 7465 jz 00821B93 00821B2E 205946 and [ecx+$46], bl 00821B31 5F pop edi 00821B32 4D dec ebp 00821B33 6F outsd 00821B34 6E outsb 00821B35 65795F jns 00821B97 00821B38 43 inc ebx 00821B39 52 push edx 00821B3A 49 dec ecx 00821B3B 44 inc esp 00821B3C 207365 and [ebx+$65], dh 00821B3F 7420 jz 00821B61 00821B41 43 inc ebx 00821B42 52 push edx 00821B43 49 dec ecx 00821B44 44 inc esp 00821B45 3D43524944 cmp eax, $44495243 00821B4A 2B31 sub esi, dword ptr [ecx] 00821B4C 0000 add [eax], al 00821B4E 0000 add [eax], al 00821B50 FFFF DB $FF, $FF // 00821B52 FFFF DB $FF, $FF // 00821B54 1C00 sbb al, $00 00821B56 0000 add [eax], al 00821B58 7365 jnb 00821BBF 00821B5A 6C insb 00821B5B 656374202A arpl gs:[eax+$2A], si 00821B60 206672 and [esi+$72], ah 00821B63 6F outsd 00821B64 6D insd 00821B65 205946 and [ecx+$46], bl 00821B68 5F pop edi 00821B69 4D dec ebp 00821B6A 6F outsd 00821B6B 6E outsb 00821B6C 65795F jns 00821BCE 00821B6F 43 inc ebx 00821B70 52 push edx 00821B71 49 dec ecx 00821B72 44 inc esp 00821B73 2000 and [eax], al 00821B75 0000 add [eax], al 00821B77 00FF add bh, bh 00821B79 FFFF DB $FF, $FF // 00821B7B FF23 jmp dword ptr [ebx] 00821B7D 0000 add [eax], al 00821B7F 007365 add [ebx+$65], dh 00821B82 6C insb 00821B83 656374202A arpl gs:[eax+$2A], si 00821B88 206672 and [esi+$72], ah 00821B8B 6F outsd 00821B8C 6D insd 00821B8D 205946 and [ecx+$46], bl 00821B90 5F pop edi 00821B91 4D dec ebp 00821B92 6F outsd 00821B93 6E outsb 00821B94 65795F jns 00821BF6 00821B97 4B dec ebx 00821B98 43 inc ebx 00821B99 207768 and [edi+$68], dh 00821B9C 657265 jb 00821C04 00821B9F 2031 and [ecx], dh 00821BA1 3D3200FFFF cmp eax, $FFFF0032 00821BA6 FFFF DB $FF, $FF // 00821BA8 0900 or [eax], eax 00821BAA 0000 add [eax], al 00821BAC 46 inc esi 00821BAD 61 popa 00821BAE 63746F72 arpl [edi+ebp*2+$72], si 00821BB2 794E jns 00821C02 00821BB4 6F outsd 00821BB5 0000 add [eax], al 00821BB7 00FF add bh, bh 00821BB9 FFFF DB $FF, $FF // 00821BBB FF07 inc dword ptr [edi] 00821BBD 0000 add [eax], al 00821BBF 005A64 add [edx+$64], bl 00821BC2 7953 jns 00821C17 00821BC4 7472 jz 00821C38 00821BC6 3100 xor [eax], eax 00821BC8 FFFF DB $FF, $FF // 00821BCA FFFF DB $FF, $FF // 00821BCC 06 push es 00821BCD 0000 add [eax], al 00821BCF 00D3 add bl, dl 00821BD1 A6 cmpsb 00821BD2 B8B6B8B600 mov eax, $00B6B8B6 00821BD7 00FF add bh, bh 00821BD9 FFFF DB $FF, $FF // 00821BDB FF23 jmp dword ptr [ebx] 00821BDD 0000 add [eax], al 00821BDF 007365 add [ebx+$65], dh 00821BE2 6C insb 00821BE3 656374202A arpl gs:[eax+$2A], si 00821BE8 206672 and [esi+$72], ah 00821BEB 6F outsd 00821BEC 6D insd 00821BED 205946 and [ecx+$46], bl 00821BF0 5F pop edi 00821BF1 4D dec ebp 00821BF2 6F outsd 00821BF3 6E outsb 00821BF4 65795F jns 00821C56 00821BF7 43 inc ebx 00821BF8 52 push edx 00821BF9 207768 and [edi+$68], dh 00821BFC 657265 jb 00821C64 00821BFF 2031 and [ecx], dh 00821C01 3D3200FFFF cmp eax, $FFFF0032 00821C06 FFFF DB $FF, $FF // 00821C08 0400 add al, +$00 00821C0A 0000 add [eax], al 00821C0C 59 pop ecx 00821C0D 46 inc esi 00821C0E 49 dec ecx 00821C0F 44 inc esp 00821C10 0000 add [eax], al 00821C12 0000 add [eax], al 00821C14 FFFF DB $FF, $FF // 00821C16 FFFF DB $FF, $FF // 00821C18 06 push es 00821C19 0000 add [eax], al 00821C1B 004669 add [esi+$69], al 00821C1E 6C insb 00821C1F 6C insb 00821C20 657200 jb 00821C23 00821C23 00FF add bh, bh 00821C25 FFFF DB $FF, $FF // 00821C27 FF06 inc dword ptr [esi] 00821C29 0000 add [eax], al 00821C2B 004352 add [ebx+$52], al 00821C2E 54 push esp 00821C2F 7970 jns 00821CA1 00821C31 650000 add gs:[eax], al 00821C34 FFFF DB $FF, $FF // 00821C36 FFFF DB $FF, $FF // 00821C38 0E push cs 00821C39 0000 add [eax], al 00821C3B 00D3 add bl, dl 00821C3D A6 cmpsb 00821C3E B8B6BFEEB7 mov eax, $B7EEBFB6 00821C43 A2C6B1B5C7 mov byte ptr [$C7B5B1C6], al 00821C48 BCC70000FF mov esp, $FF0000C7 00821C4D FFFF DB $FF, $FF // 00821C4F FF06 inc dword ptr [esi] 00821C51 0000 add [eax], al 00821C53 004352 add [ebx+$52], al 00821C56 46 inc esi 00821C57 6C insb 00821C58 61 popa 00821C59 670000 add [bx+si], al 00821C5C FFFF DB $FF, $FF // 00821C5E FFFF DB $FF, $FF // 00821C60 07 pop es 00821C61 0000 add [eax], al 00821C63 005174 add [ecx+$74], dl 00821C66 7946 jns 00821CAE 00821C68 6C insb 00821C69 61 popa 00821C6A 6700FF add bh, bh 00821C6D FFFF DB $FF, $FF // 00821C6F FF06 inc dword ptr [esi] 00821C71 0000 add [eax], al 00821C73 004352 add [ebx+$52], al 00821C76 54 push esp 00821C77 696D650000FFFF imul ebp, [ebp+$65], $FFFF0000 00821C7E FFFF DB $FF, $FF // 00821C80 06 push es 00821C81 0000 add [eax], al 00821C83 004650 add [esi+$50], al 00821C86 59 pop ecx 00821C87 46 inc esi 00821C88 49 dec ecx 00821C89 44 inc esp 00821C8A 0000 add [eax], al 00821C8C FFFF DB $FF, $FF // 00821C8E FFFF DB $FF, $FF // 00821C90 06 push es 00821C91 0000 add [eax], al 00821C93 00425A add [edx+$5A], al 00821C96 54 push esp 00821C97 7970 jns 00821D09 00821C99 650000 add gs:[eax], al 00821C9C FFFF DB $FF, $FF // 00821C9E FFFF DB $FF, $FF // 00821CA0 0300 add eax, [eax] 00821CA2 0000 add [eax], al 00821CA4 52 push edx 00821CA5 4D dec ebp 00821CA6 42 inc edx 00821CA7 00FF add bh, bh 00821CA9 FFFF DB $FF, $FF // 00821CAB FF0500000048 inc dword ptr [$48000000] 00821CB1 7569 jnz 00821D1C 00821CB3 4C dec esp 00821CB4 7600 jbe 00821CB6 00821CB6 0000 add [eax], al 00821CB8 FFFF DB $FF, $FF // 00821CBA FFFF DB $FF, $FF // 00821CBC 0400 add al, +$00 00821CBE 0000 add [eax], al 00821CC0 59 pop ecx 00821CC1 46 inc esi 00821CC2 49 dec ecx 00821CC3 640000 add fs:[eax], al 00821CC6 0000 add [eax], al 00821CC8 D4 aam 00821CC9 F6D0 not al 00821CCB D0CA ror dl, 1 00821CCD A7 cmpsd 00821CCE B0DC mov al, $DC 00821CD0 2100 and [eax], eax 00821CD2 0000 add [eax], al 00821CD4 55 push ebp 00821CD5 8BEC mov ebp, esp 00821CD7 B908000000 mov ecx, $00000008 00821CDC 6A00 push $00 00821CDE 6A00 push $00 00821CE0 49 dec ecx 00821CE1 75F9 jnz 00821CDC 00821CE3 51 push ecx 00821CE4 53 push ebx 00821CE5 56 push esi 00821CE6 8BDA mov ebx, edx 00821CE8 8BF0 mov esi, eax 00821CEA 33C0 xor eax, eax 00821CEC 55 push ebp * Possible String Reference to: ',胫^[嬪]' | 00821CED 68E21E8200 push $00821EE2 ***** TRY | 00821CF2 64FF30 push dword ptr fs:[eax] 00821CF5 648920 mov fs:[eax], esp 00821CF8 8D55FC lea edx, [ebp-$04] 00821CFB 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; | 00821CFD E8BAD9D6FF call 0058F6BC * Reference to control ADOTemp : N.A. | 00821D02 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; | 00821D08 E83FA6E3FF 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; | 00821D0D E852FEE2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00821D12 8B4050 mov eax, [eax+$50] 00821D15 8D55F4 lea edx, [ebp-$0C] 00821D18 8B08 mov ecx, [eax] 00821D1A FF5110 call dword ptr [ecx+$10] 00821D1D 8B45F4 mov eax, [ebp-$0C] 00821D20 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D23 E8C48BBEFF call 0040A8EC * Reference to control Label11 : TLabel | 00821D28 8B9E64030000 mov ebx, [esi+$0364] 00821D2E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00821D30 E80B67CAFF call 004C8440 00821D35 8D55E0 lea edx, [ebp-$20] 00821D38 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D3B E8AC8BBEFF call 0040A8EC 00821D40 8B55E0 mov edx, [ebp-$20] 00821D43 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00821D46 E87D70BFFF call 00418DC8 00821D4B 8D45E4 lea eax, [ebp-$1C] 00821D4E 50 push eax 00821D4F 8B55F8 mov edx, [ebp-$08] 00821D52 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00821D54 E85B4ECAFF call 004C6BB4 00821D59 5A pop edx 00821D5A 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00821D5C FF91B4000000 call dword ptr [ecx+$00B4] 00821D62 8BC3 mov eax, ebx 00821D64 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 00821D66 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00821D6C 8B9E0C030000 mov ebx, [esi+$030C] 00821D72 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00821D74 E85B3BCAFF call 004C58D4 00821D79 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; | 00821D7B E82CC2CBFF call 004DDFAC 00821D80 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00821D82 FF5244 call dword ptr [edx+$44] 00821D85 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; | 00821D87 E820C2CBFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 00821D8C BAF81E8200 mov edx, $00821EF8 00821D91 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00821D93 FF5138 call dword ptr [ecx+$38] 00821D96 8D55DC lea edx, [ebp-$24] 00821D99 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821D9C E84B8BBEFF call 0040A8EC 00821DA1 837DDC00 cmp dword ptr [ebp-$24], +$00 00821DA5 7440 jz 00821DE7 * Possible String Reference to: ' Set ' | 00821DA7 68141F8200 push $00821F14 00821DAC FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00821DAF 68241F8200 push $00821F24 00821DB4 8D55D4 lea edx, [ebp-$2C] 00821DB7 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821DBA E82D8BBEFF call 0040A8EC 00821DBF FF75D4 push dword ptr [ebp-$2C] 00821DC2 68301F8200 push $00821F30 00821DC7 8D45D8 lea eax, [ebp-$28] 00821DCA BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00821DCF E8E038BEFF call 004056B4 00821DD4 8B45D8 mov eax, [ebp-$28] 00821DD7 50 push eax 00821DD8 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; | 00821DDA E8CDC1CBFF call 004DDFAC 00821DDF 5A pop edx 00821DE0 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00821DE2 FF5138 call dword ptr [ecx+$38] 00821DE5 EB2B jmp 00821E12 00821DE7 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; | 00821DE9 E8BEC1CBFF call 004DDFAC 00821DEE 50 push eax * Possible String Reference to: ' Set ' | 00821DEF 68141F8200 push $00821F14 00821DF4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 00821DF7 683C1F8200 push $00821F3C 00821DFC 8D45D0 lea eax, [ebp-$30] 00821DFF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00821E04 E8AB38BEFF call 004056B4 00821E09 8B55D0 mov edx, [ebp-$30] 00821E0C 58 pop eax 00821E0D 8B08 mov ecx, [eax] 00821E0F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00821E12 684C1F8200 push $00821F4C 00821E17 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP._PROC_00821EF9(Sender : TObject); begin (* 00821EF9 50 push eax 00821EFA 6461 popa 00821EFC 7465 jz 00821F63 00821EFE 205943 and [ecx+$43], bl 00821F01 4C dec esp 00821F02 5F pop edi 00821F03 53 push ebx 00821F04 47 inc edi 00821F05 5F pop edi 00821F06 48 dec eax 00821F07 5A pop edx 00821F08 2000 and [eax], al 00821F0A 0000 add [eax], al 00821F0C FFFF DB $FF, $FF // 00821F0E FFFF DB $FF, $FF // 00821F10 0500000020 add eax, +$20000000 00821F15 53 push ebx 00821F16 657420 jz 00821F39 00821F19 0000 add [eax], al 00821F1B 00FF add bh, bh 00821F1D FFFF DB $FF, $FF // 00821F1F FF02 inc dword ptr [edx] 00821F21 0000 add [eax], al 00821F23 003D270000FF add [$FF000027], bh 00821F29 FFFF DB $FF, $FF // 00821F2B FF01 inc dword ptr [ecx] 00821F2D 0000 add [eax], al 00821F2F 0027 add [edi], ah 00821F31 0000 add [eax], al 00821F33 00FF add bh, bh 00821F35 FFFF DB $FF, $FF // 00821F37 FF050000003D inc dword ptr [$3D000000] 00821F3D 4E dec esi 00821F3E 55 push ebp 00821F3F 4C dec esp 00821F40 4C dec esp 00821F41 0000 add [eax], al 00821F43 00FF add bh, bh 00821F45 FFFF DB $FF, $FF // 00821F47 FF09 dec dword ptr [ecx] 00821F49 0000 add [eax], al 00821F4B 002C4564697465 add [$65746964+eax*2], ch 00821F52 723D jb 00821F91 00821F54 27 daa 00821F55 0000 add [eax], al 00821F57 00FF add bh, bh 00821F59 FFFF DB $FF, $FF // 00821F5B FF1400 call dword ptr [eax+eax] 00821F5E 0000 add [eax], al 00821F60 2C45 sub al, $45 00821F62 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00821F6B 657464 jz 00821FD2 00821F6E 61 popa 00821F6F 7465 jz 00821FD6 00821F71 2829 sub [ecx], ch 00821F73 2000 and [eax], al 00821F75 0000 add [eax], al 00821F77 00FF add bh, bh 00821F79 FFFF DB $FF, $FF // 00821F7B FF0E dec dword ptr [esi] 00821F7D 0000 add [eax], al 00821F7F 0020 add [eax], ah 00821F81 7768 jnbe 00821FEB 00821F83 657265 jb 00821FEB 00821F86 205375 and [ebx+$75], dl 00821F89 624964 bound ecx, qword ptr [ecx+$64] 00821F8C 3D270000FF cmp eax, $FF000027 00821F91 FFFF DB $FF, $FF // 00821F93 FF0500000053 inc dword ptr [$53000000] 00821F99 7562 jnz 00821FFD 00821F9B 49 dec ecx 00821F9C 640000 add fs:[eax], al 00821F9F 00558B add [ebp-$75], dl 00821FA2 EC in al, dx 00821FA3 B920000000 mov ecx, $00000020 00821FA8 6A00 push $00 00821FAA 6A00 push $00 00821FAC 49 dec ecx 00821FAD 75F9 jnz 00821FA8 00821FAF 51 push ecx 00821FB0 53 push ebx 00821FB1 56 push esi 00821FB2 8BF2 mov esi, edx 00821FB4 8BD8 mov ebx, eax 00821FB6 33C0 xor eax, eax 00821FB8 55 push ebp * Possible String Reference to: '閞$霅^[嬪]' | 00821FB9 687D268200 push $0082267D ***** TRY | 00821FBE 64FF30 push dword ptr fs:[eax] 00821FC1 648920 mov fs:[eax], esp 00821FC4 8D55FC lea edx, [ebp-$04] 00821FC7 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; | 00821FC9 E8EED6D6FF call 0058F6BC 00821FCE 8D55DC lea edx, [ebp-$24] 00821FD1 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00821FD4 E81389BEFF call 0040A8EC 00821FD9 837DDC00 cmp dword ptr [ebp-$24], +$00 00821FDD 750D jnz 00821FEC 00821FDF 8D45FC lea eax, [ebp-$04] 00821FE2 BA94268200 mov edx, $00822694 * Reference to: System.@LStrLAsg(void;void;void;void); | 00821FE7 E8D033BEFF call 004053BC * Reference to control ADOTemp : N.A. | 00821FEC 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; | 00821FF2 E855A3E3FF 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; | 00821FF7 E868FBE2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00821FFC 8B4050 mov eax, [eax+$50] 00821FFF 8D55D8 lea edx, [ebp-$28] 00822002 8B08 mov ecx, [eax] 00822004 FF5110 call dword ptr [ecx+$10] 00822007 8B45D8 mov eax, [ebp-$28] 0082200A 8D55E4 lea edx, [ebp-$1C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082200D E8DA88BEFF call 0040A8EC * Reference to control Label11 : TLabel | 00822012 8BB364030000 mov esi, [ebx+$0364] 00822018 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 0082201A E82164CAFF call 004C8440 0082201F 8D55C4 lea edx, [ebp-$3C] 00822022 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822025 E8C288BEFF call 0040A8EC 0082202A 8B55C4 mov edx, [ebp-$3C] 0082202D 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00822030 E8936DBFFF call 00418DC8 00822035 8D45C8 lea eax, [ebp-$38] 00822038 50 push eax 00822039 8B55E4 mov edx, [ebp-$1C] 0082203C 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082203E E8714BCAFF call 004C6BB4 00822043 5A pop edx 00822044 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00822046 FF91B4000000 call dword ptr [ecx+$00B4] 0082204C 8D55C0 lea edx, [ebp-$40] *) end; procedure TfrmYFFP._PROC_008227AD(Sender : TObject); begin (* 008227AD 50 push eax 008227AE 6461 popa 008227B0 7465 jz 00822817 008227B2 205946 and [ecx+$46], bl 008227B5 5F pop edi 008227B6 4D dec ebp 008227B7 6F outsd 008227B8 6E outsb 008227B9 65795F jns 0082281B 008227BC 43 inc ebx 008227BD 52 push edx 008227BE 2000 and [eax], al 008227C0 FFFF DB $FF, $FF // 008227C2 FFFF DB $FF, $FF // 008227C4 0500000020 add eax, +$20000000 008227C9 53 push ebx 008227CA 657420 jz 008227ED 008227CD 0000 add [eax], al 008227CF 00FF add bh, bh 008227D1 FFFF DB $FF, $FF // 008227D3 FF01 inc dword ptr [ecx] 008227D5 0000 add [eax], al 008227D7 003D000000FF add [$FF000000], bh 008227DD FFFF DB $FF, $FF // 008227DF FF0E dec dword ptr [esi] 008227E1 0000 add [eax], al 008227E3 002C53 add [ebx+edx*2], ch 008227E6 687569486F push $6F486975 008227EB 754D jnz 0082283A 008227ED 6F outsd 008227EE 6E outsb 008227EF 65793D jns 0082282F 008227F2 0000 add [eax], al 008227F4 FFFF DB $FF, $FF // 008227F6 FFFF DB $FF, $FF // 008227F8 0A00 or al, byte ptr [eax] 008227FA 0000 add [eax], al 008227FC 2C4B sub al, $4B 008227FE 50 push eax 008227FF 4D dec ebp 00822800 6F outsd 00822801 6E outsb 00822802 65793D jns 00822842 00822805 27 daa 00822806 0000 add [eax], al 00822808 FFFF DB $FF, $FF // 0082280A FFFF DB $FF, $FF // 0082280C 0900 or [eax], eax 0082280E 0000 add [eax], al 00822810 2C45 sub al, $45 00822812 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D 0082281B 00FF add bh, bh 0082281D FFFF DB $FF, $FF // 0082281F FF1400 call dword ptr [eax+eax] 00822822 0000 add [eax], al 00822824 2C45 sub al, $45 00822826 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0082282F 657464 jz 00822896 00822832 61 popa 00822833 7465 jz 0082289A 00822835 2829 sub [ecx], ch 00822837 2000 and [eax], al 00822839 0000 add [eax], al 0082283B 00FF add bh, bh 0082283D FFFF DB $FF, $FF // 0082283F FF0D00000020 dec dword ptr [$20000000] 00822845 7768 jnbe 008228AF 00822847 657265 jb 008228AF 0082284A 205946 and [ecx+$46], bl 0082284D 49 dec ecx 0082284E 643D27000000 cmp eax, $00000027 00822854 FFFF DB $FF, $FF // 00822856 FFFF DB $FF, $FF // 00822858 0400 add al, +$00 0082285A 0000 add [eax], al 0082285C 59 pop ecx 0082285D 46 inc esi 0082285E 49 dec ecx 0082285F 640000 add fs:[eax], al 00822862 0000 add [eax], al 00822864 FFFF DB $FF, $FF // 00822866 FFFF DB $FF, $FF // 00822868 2B00 sub eax, dword ptr [eax] 0082286A 0000 add [eax], al 0082286C 55 push ebp 0082286D 7064 jo 008228D3 0082286F 61 popa 00822870 7465 jz 008228D7 00822872 205946 and [ecx+$46], bl 00822875 5F pop edi 00822876 4D dec ebp 00822877 6F outsd 00822878 6E outsb 00822879 65795F jns 008228DB 0082287C 4B dec ebx 0082287D 43 inc ebx 0082287E 205365 and [ebx+$65], dl 00822881 7420 jz 008228A3 00822883 4B dec ebx 00822884 43 inc ebx 00822885 4B dec ebx 00822886 50 push eax 00822887 4D dec ebp 00822888 6F outsd 00822889 6E outsb 0082288A 65793D jns 008228CA 0082288D 4B dec ebx 0082288E 43 inc ebx 0082288F 4B dec ebx 00822890 50 push eax 00822891 4D dec ebp 00822892 6F outsd 00822893 6E outsb 00822894 65792D jns 008228C4 00822897 00FF add bh, bh 00822899 FFFF DB $FF, $FF // 0082289B FF01 inc dword ptr [ecx] 0082289D 0000 add [eax], al 0082289F 002B add [ebx], ch 008228A1 0000 add [eax], al 008228A3 00FF add bh, bh 008228A5 FFFF DB $FF, $FF // 008228A7 FF0D00000020 dec dword ptr [$20000000] 008228AD 7768 jnbe 00822917 008228AF 657265 jb 00822917 008228B2 204352 and [ebx+$52], al 008228B5 49 dec ecx 008228B6 44 inc esp 008228B7 3D27000000 cmp eax, $00000027 008228BC FFFF DB $FF, $FF // 008228BE FFFF DB $FF, $FF // 008228C0 0400 add al, +$00 008228C2 0000 add [eax], al 008228C4 43 inc ebx 008228C5 52 push edx 008228C6 49 dec ecx 008228C7 44 inc esp 008228C8 0000 add [eax], al 008228CA 0000 add [eax], al 008228CC 55 push ebp 008228CD 8BEC mov ebp, esp 008228CF B908000000 mov ecx, $00000008 008228D4 6A00 push $00 008228D6 6A00 push $00 008228D8 49 dec ecx 008228D9 75F9 jnz 008228D4 008228DB 51 push ecx 008228DC 53 push ebx 008228DD 56 push esi 008228DE 8BDA mov ebx, edx 008228E0 8BF0 mov esi, eax 008228E2 33C0 xor eax, eax 008228E4 55 push ebp 008228E5 68DA2A8200 push $00822ADA ***** TRY | 008228EA 64FF30 push dword ptr fs:[eax] 008228ED 648920 mov fs:[eax], esp 008228F0 8D55FC lea edx, [ebp-$04] 008228F3 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; | 008228F5 E8C2CDD6FF call 0058F6BC * Reference to control ADOTemp : N.A. | 008228FA 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; | 00822900 E8479AE3FF 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; | 00822905 E85AF2E2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 0082290A 8B4050 mov eax, [eax+$50] 0082290D 8D55F4 lea edx, [ebp-$0C] 00822910 8B08 mov ecx, [eax] 00822912 FF5110 call dword ptr [ecx+$10] 00822915 8B45F4 mov eax, [ebp-$0C] 00822918 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082291B E8CC7FBEFF call 0040A8EC * Reference to control Label11 : TLabel | 00822920 8B9E64030000 mov ebx, [esi+$0364] 00822926 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00822928 E8135BCAFF call 004C8440 0082292D 8D55E0 lea edx, [ebp-$20] 00822930 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822933 E8B47FBEFF call 0040A8EC 00822938 8B55E0 mov edx, [ebp-$20] 0082293B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0082293E E88564BFFF call 00418DC8 00822943 8D45E4 lea eax, [ebp-$1C] 00822946 50 push eax 00822947 8B55F8 mov edx, [ebp-$08] 0082294A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082294C E86342CAFF call 004C6BB4 00822951 5A pop edx 00822952 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00822954 FF91B4000000 call dword ptr [ecx+$00B4] 0082295A 8BC3 mov eax, ebx 0082295C 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 0082295E FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00822964 8B9E0C030000 mov ebx, [esi+$030C] 0082296A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082296C E8632FCAFF call 004C58D4 00822971 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; | 00822973 E834B6CBFF call 004DDFAC 00822978 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0082297A FF5244 call dword ptr [edx+$44] 0082297D 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; | 0082297F E828B6CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00822984 BAF02A8200 mov edx, $00822AF0 00822989 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082298B FF5138 call dword ptr [ecx+$38] 0082298E 8D55DC lea edx, [ebp-$24] 00822991 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00822994 E8537FBEFF call 0040A8EC 00822999 837DDC00 cmp dword ptr [ebp-$24], +$00 0082299D 7440 jz 008229DF * Possible String Reference to: ' Set ' | 0082299F 680C2B8200 push $00822B0C 008229A4 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008229A7 681C2B8200 push $00822B1C 008229AC 8D55D4 lea edx, [ebp-$2C] 008229AF 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008229B2 E8357FBEFF call 0040A8EC 008229B7 FF75D4 push dword ptr [ebp-$2C] 008229BA 68282B8200 push $00822B28 008229BF 8D45D8 lea eax, [ebp-$28] 008229C2 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008229C7 E8E82CBEFF call 004056B4 008229CC 8B45D8 mov eax, [ebp-$28] 008229CF 50 push eax 008229D0 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; | 008229D2 E8D5B5CBFF call 004DDFAC 008229D7 5A pop edx 008229D8 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008229DA FF5138 call dword ptr [ecx+$38] 008229DD EB2B jmp 00822A0A 008229DF 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; | 008229E1 E8C6B5CBFF call 004DDFAC 008229E6 50 push eax * Possible String Reference to: ' Set ' | 008229E7 680C2B8200 push $00822B0C 008229EC FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 008229EF 68342B8200 push $00822B34 008229F4 8D45D0 lea eax, [ebp-$30] 008229F7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008229FC E8B32CBEFF call 004056B4 00822A01 8B55D0 mov edx, [ebp-$30] 00822A04 58 pop eax 00822A05 8B08 mov ecx, [eax] 00822A07 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00822A0A 68442B8200 push $00822B44 00822A0F 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmYFFP._PROC_00822AF1(Sender : TObject); begin (* 00822AF1 50 push eax 00822AF2 6461 popa 00822AF4 7465 jz 00822B5B 00822AF6 205946 and [ecx+$46], bl 00822AF9 5F pop edi 00822AFA 4D dec ebp 00822AFB 6F outsd 00822AFC 6E outsb 00822AFD 65795F jns 00822B5F 00822B00 43 inc ebx 00822B01 52 push edx 00822B02 2000 and [eax], al 00822B04 FFFF DB $FF, $FF // 00822B06 FFFF DB $FF, $FF // 00822B08 0500000020 add eax, +$20000000 00822B0D 53 push ebx 00822B0E 657420 jz 00822B31 00822B11 0000 add [eax], al 00822B13 00FF add bh, bh 00822B15 FFFF DB $FF, $FF // 00822B17 FF02 inc dword ptr [edx] 00822B19 0000 add [eax], al 00822B1B 003D270000FF add [$FF000027], bh 00822B21 FFFF DB $FF, $FF // 00822B23 FF01 inc dword ptr [ecx] 00822B25 0000 add [eax], al 00822B27 0027 add [edi], ah 00822B29 0000 add [eax], al 00822B2B 00FF add bh, bh 00822B2D FFFF DB $FF, $FF // 00822B2F FF050000003D inc dword ptr [$3D000000] 00822B35 4E dec esi 00822B36 55 push ebp 00822B37 4C dec esp 00822B38 4C dec esp 00822B39 0000 add [eax], al 00822B3B 00FF add bh, bh 00822B3D FFFF DB $FF, $FF // 00822B3F FF09 dec dword ptr [ecx] 00822B41 0000 add [eax], al 00822B43 002C4564697465 add [$65746964+eax*2], ch 00822B4A 723D jb 00822B89 00822B4C 27 daa 00822B4D 0000 add [eax], al 00822B4F 00FF add bh, bh 00822B51 FFFF DB $FF, $FF // 00822B53 FF1400 call dword ptr [eax+eax] 00822B56 0000 add [eax], al 00822B58 2C45 sub al, $45 00822B5A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00822B63 657464 jz 00822BCA 00822B66 61 popa 00822B67 7465 jz 00822BCE 00822B69 2829 sub [ecx], ch 00822B6B 2000 and [eax], al 00822B6D 0000 add [eax], al 00822B6F 00FF add bh, bh 00822B71 FFFF DB $FF, $FF // 00822B73 FF0D00000020 dec dword ptr [$20000000] 00822B79 7768 jnbe 00822BE3 00822B7B 657265 jb 00822BE3 00822B7E 205946 and [ecx+$46], bl 00822B81 49 dec ecx 00822B82 643D27000000 cmp eax, $00000027 00822B88 FFFF DB $FF, $FF // 00822B8A FFFF DB $FF, $FF // 00822B8C 0400 add al, +$00 00822B8E 0000 add [eax], al 00822B90 59 pop ecx 00822B91 46 inc esi 00822B92 49 dec ecx 00822B93 640000 add fs:[eax], al 00822B96 0000 add [eax], al 00822B98 55 push ebp 00822B99 8BEC mov ebp, esp 00822B9B B911000000 mov ecx, $00000011 00822BA0 6A00 push $00 00822BA2 6A00 push $00 00822BA4 49 dec ecx 00822BA5 75F9 jnz 00822BA0 00822BA7 51 push ecx 00822BA8 56 push esi 00822BA9 8945FC mov [ebp-$04], eax 00822BAC 33C0 xor eax, eax 00822BAE 55 push ebp 00822BAF 685C2E8200 push $00822E5C ***** TRY | 00822BB4 64FF30 push dword ptr fs:[eax] 00822BB7 648920 mov fs:[eax], esp 00822BBA 33C0 xor eax, eax 00822BBC 55 push ebp 00822BBD 68C12D8200 push $00822DC1 ***** TRY | 00822BC2 64FF30 push dword ptr fs:[eax] 00822BC5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_008232E5(Sender : TObject); begin (* 008232E5 50 push eax 008232E6 6461 popa 008232E8 7465 jz 0082334F 008232EA 205946 and [ecx+$46], bl 008232ED 5F pop edi 008232EE 4D dec ebp 008232EF 6F outsd 008232F0 6E outsb 008232F1 65795F jns 00823353 008232F4 43 inc ebx 008232F5 52 push edx 008232F6 2000 and [eax], al 008232F8 FFFF DB $FF, $FF // 008232FA FFFF DB $FF, $FF // 008232FC 0D00000020 or eax, $20000000 00823301 53 push ebx 00823302 657420 jz 00823325 00823305 59 pop ecx 00823306 46 inc esi 00823307 43 inc ebx 00823308 6F outsd 00823309 64653D27000000 cmp eax, $00000027 00823310 FFFF DB $FF, $FF // 00823312 FFFF DB $FF, $FF // 00823314 0100 add [eax], eax 00823316 0000 add [eax], al 00823318 27 daa 00823319 0000 add [eax], al 0082331B 00FF add bh, bh 0082331D FFFF DB $FF, $FF // 0082331F FF0A dec dword ptr [edx] 00823321 0000 add [eax], al 00823323 0020 add [eax], ah 00823325 2C59 sub al, $59 00823327 46 inc esi 00823328 4E dec esi 00823329 61 popa 0082332A 6D insd 0082332B 653D270000FF cmp eax, $FF000027 00823331 FFFF DB $FF, $FF // 00823333 FF09 dec dword ptr [ecx] 00823335 0000 add [eax], al 00823337 002C4564697465 add [$65746964+eax*2], ch 0082333E 723D jb 0082337D 00823340 27 daa 00823341 0000 add [eax], al 00823343 00FF add bh, bh 00823345 FFFF DB $FF, $FF // 00823347 FF1400 call dword ptr [eax+eax] 0082334A 0000 add [eax], al 0082334C 2C45 sub al, $45 0082334E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00823357 657464 jz 008233BE 0082335A 61 popa 0082335B 7465 jz 008233C2 0082335D 2829 sub [ecx], ch 0082335F 2000 and [eax], al 00823361 0000 add [eax], al 00823363 00FF add bh, bh 00823365 FFFF DB $FF, $FF // 00823367 FF0D00000020 dec dword ptr [$20000000] 0082336D 7768 jnbe 008233D7 0082336F 657265 jb 008233D7 00823372 205946 and [ecx+$46], bl 00823375 49 dec ecx 00823376 643D27000000 cmp eax, $00000027 0082337C FFFF DB $FF, $FF // 0082337E FFFF DB $FF, $FF // 00823380 0400 add al, +$00 00823382 0000 add [eax], al 00823384 59 pop ecx 00823385 46 inc esi 00823386 49 dec ecx 00823387 640000 add fs:[eax], al 0082338A 0000 add [eax], al 0082338C 55 push ebp 0082338D 8BEC mov ebp, esp 0082338F 51 push ecx 00823390 B906000000 mov ecx, $00000006 00823395 6A00 push $00 00823397 6A00 push $00 00823399 49 dec ecx 0082339A 75F9 jnz 00823395 0082339C 51 push ecx 0082339D 874DFC xchg [ebp-$04], ecx 008233A0 53 push ebx 008233A1 56 push esi 008233A2 8BF0 mov esi, eax 008233A4 33C0 xor eax, eax 008233A6 55 push ebp 008233A7 68E5358200 push $008235E5 ***** TRY | 008233AC 64FF30 push dword ptr fs:[eax] 008233AF 648920 mov fs:[eax], esp 008233B2 33C0 xor eax, eax 008233B4 55 push ebp 008233B5 68BB358200 push $008235BB ***** TRY | 008233BA 64FF30 push dword ptr fs:[eax] 008233BD 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00823602(Sender : TObject); begin (* 00823602 6E outsb 00823603 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 0082360B FF08 dec dword ptr [eax] 0082360D 0000 add [eax], al *) end; procedure TfrmYFFP._PROC_00823638(Sender : TObject); begin (* 00823638 6E outsb 00823639 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 00823641 0000 add [eax], al *) end; procedure TfrmYFFP._PROC_00823645(Sender : TObject); begin (* 00823645 50 push eax 00823646 6461 popa 00823648 7465 jz 008236AF 0082364A 205946 and [ecx+$46], bl 0082364D 5F pop edi 0082364E 4D dec ebp 0082364F 6F outsd 00823650 6E outsb 00823651 65795F jns 008236B3 00823654 43 inc ebx 00823655 52 push edx 00823656 2000 and [eax], al 00823658 FFFF DB $FF, $FF // 0082365A FFFF DB $FF, $FF // 0082365C 0E push cs 0082365D 0000 add [eax], al 0082365F 0020 add [eax], ah 00823661 53 push ebx 00823662 657420 jz 00823685 00823665 51 push ecx 00823666 7479 jz 008236E1 00823668 55 push ebp 00823669 6E outsb 0082366A 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 00823672 FFFF DB $FF, $FF // 00823674 07 pop es 00823675 0000 add [eax], al 00823677 005A64 add [edx+$64], bl 0082367A 794E jns 008236CA 0082367C 61 popa 0082367D 6D insd 0082367E 6500FF add bh, bh 00823681 FFFF DB $FF, $FF // 00823683 FF01 inc dword ptr [ecx] 00823685 0000 add [eax], al 00823687 0027 add [edi], ah 00823689 0000 add [eax], al 0082368B 00FF add bh, bh 0082368D FFFF DB $FF, $FF // 0082368F FF09 dec dword ptr [ecx] 00823691 0000 add [eax], al 00823693 002C4564697465 add [$65746964+eax*2], ch 0082369A 723D jb 008236D9 0082369C 27 daa 0082369D 0000 add [eax], al 0082369F 00FF add bh, bh 008236A1 FFFF DB $FF, $FF // 008236A3 FF1400 call dword ptr [eax+eax] 008236A6 0000 add [eax], al 008236A8 2C45 sub al, $45 008236AA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008236B3 657464 jz 0082371A 008236B6 61 popa 008236B7 7465 jz 0082371E 008236B9 2829 sub [ecx], ch 008236BB 2000 and [eax], al 008236BD 0000 add [eax], al 008236BF 00FF add bh, bh 008236C1 FFFF DB $FF, $FF // 008236C3 FF0D00000020 dec dword ptr [$20000000] 008236C9 7768 jnbe 00823733 008236CB 657265 jb 00823733 008236CE 205946 and [ecx+$46], bl 008236D1 49 dec ecx 008236D2 643D27000000 cmp eax, $00000027 008236D8 FFFF DB $FF, $FF // 008236DA FFFF DB $FF, $FF // 008236DC 0400 add al, +$00 008236DE 0000 add [eax], al 008236E0 59 pop ecx 008236E1 46 inc esi 008236E2 49 dec ecx 008236E3 640000 add fs:[eax], al 008236E6 0000 add [eax], al 008236E8 55 push ebp 008236E9 8BEC mov ebp, esp 008236EB 51 push ecx 008236EC B906000000 mov ecx, $00000006 008236F1 6A00 push $00 008236F3 6A00 push $00 008236F5 49 dec ecx 008236F6 75F9 jnz 008236F1 008236F8 51 push ecx 008236F9 874DFC xchg [ebp-$04], ecx 008236FC 53 push ebx 008236FD 56 push esi 008236FE 8BF0 mov esi, eax 00823700 33C0 xor eax, eax 00823702 55 push ebp 00823703 6841398200 push $00823941 ***** TRY | 00823708 64FF30 push dword ptr fs:[eax] 0082370B 648920 mov fs:[eax], esp 0082370E 33C0 xor eax, eax 00823710 55 push ebp 00823711 6817398200 push $00823917 ***** TRY | 00823716 64FF30 push dword ptr fs:[eax] 00823719 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_0082398D(Sender : TObject); begin (* 0082398D 50 push eax 0082398E 6461 popa 00823990 7465 jz 008239F7 00823992 205946 and [ecx+$46], bl 00823995 5F pop edi 00823996 4D dec ebp 00823997 6F outsd 00823998 6E outsb 00823999 65795F jns 008239FB 0082399C 43 inc ebx 0082399D 52 push edx 0082399E 2000 and [eax], al 008239A0 FFFF DB $FF, $FF // 008239A2 FFFF DB $FF, $FF // 008239A4 1100 adc [eax], eax 008239A6 0000 add [eax], al 008239A8 205365 and [ebx+$65], dl 008239AB 7420 jz 008239CD 008239AD 50 push eax 008239AE 5F pop edi 008239AF 43 inc ebx 008239B0 6F outsd 008239B1 64654E dec esi 008239B4 61 popa 008239B5 6D insd 008239B6 653D27000000 cmp eax, $00000027 008239BC FFFF DB $FF, $FF // 008239BE FFFF DB $FF, $FF // 008239C0 07 pop es 008239C1 0000 add [eax], al 008239C3 005A64 add [edx+$64], bl 008239C6 794E jns 00823A16 008239C8 61 popa 008239C9 6D insd 008239CA 6500FF add bh, bh 008239CD FFFF DB $FF, $FF // 008239CF FF01 inc dword ptr [ecx] 008239D1 0000 add [eax], al 008239D3 0027 add [edi], ah 008239D5 0000 add [eax], al 008239D7 00FF add bh, bh 008239D9 FFFF DB $FF, $FF // 008239DB FF09 dec dword ptr [ecx] 008239DD 0000 add [eax], al 008239DF 002C4564697465 add [$65746964+eax*2], ch 008239E6 723D jb 00823A25 008239E8 27 daa 008239E9 0000 add [eax], al 008239EB 00FF add bh, bh 008239ED FFFF DB $FF, $FF // 008239EF FF1400 call dword ptr [eax+eax] 008239F2 0000 add [eax], al 008239F4 2C45 sub al, $45 008239F6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008239FF 657464 jz 00823A66 00823A02 61 popa 00823A03 7465 jz 00823A6A 00823A05 2829 sub [ecx], ch 00823A07 2000 and [eax], al 00823A09 0000 add [eax], al 00823A0B 00FF add bh, bh 00823A0D FFFF DB $FF, $FF // 00823A0F FF0D00000020 dec dword ptr [$20000000] 00823A15 7768 jnbe 00823A7F 00823A17 657265 jb 00823A7F 00823A1A 205946 and [ecx+$46], bl 00823A1D 49 dec ecx 00823A1E 643D27000000 cmp eax, $00000027 00823A24 FFFF DB $FF, $FF // 00823A26 FFFF DB $FF, $FF // 00823A28 0400 add al, +$00 00823A2A 0000 add [eax], al 00823A2C 59 pop ecx 00823A2D 46 inc esi 00823A2E 49 dec ecx 00823A2F 640000 add fs:[eax], al 00823A32 0000 add [eax], al 00823A34 53 push ebx 00823A35 8BD8 mov ebx, eax * Reference to control ToolButton1 : TToolButton | 00823A37 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00823A3D E87E44CAFF call 004C7EC0 00823A42 84C0 test al, al 00823A44 7516 jnz 00823A5C * Possible String Reference to: '应付款列表' | 00823A46 B9683A8200 mov ecx, $00823A68 * Reference to control ToolButton1 : TToolButton | 00823A4B 8B9320030000 mov edx, [ebx+$0320] * Reference to control ADOTemp : N.A. | 00823A51 8B833C030000 mov eax, [ebx+$033C] | 00823A57 E8D447F9FF call 007B8230 00823A5C 5B pop ebx 00823A5D C3 ret 00823A5E 0000 add [eax], al 00823A60 FFFF DB $FF, $FF // 00823A62 FFFF DB $FF, $FF // 00823A64 0A00 or al, byte ptr [eax] 00823A66 0000 add [eax], al 00823A68 D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl 00823A6E C1D0B1 rcl eax, $B1 00823A71 ED in eax, dx 00823A72 0000 add [eax], al 00823A74 55 push ebp 00823A75 8BEC mov ebp, esp 00823A77 51 push ecx 00823A78 B90E000000 mov ecx, $0000000E 00823A7D 6A00 push $00 00823A7F 6A00 push $00 00823A81 49 dec ecx 00823A82 75F9 jnz 00823A7D 00823A84 874DFC xchg [ebp-$04], ecx 00823A87 53 push ebx 00823A88 56 push esi 00823A89 8BF0 mov esi, eax 00823A8B 33C0 xor eax, eax 00823A8D 55 push ebp * Possible String Reference to: ''牍^[嬪]' | 00823A8E 68C83D8200 push $00823DC8 ***** TRY | 00823A93 64FF30 push dword ptr fs:[eax] 00823A96 648920 mov fs:[eax], esp 00823A99 33C0 xor eax, eax 00823A9B 55 push ebp 00823A9C 68743D8200 push $00823D74 ***** TRY | 00823AA1 64FF30 push dword ptr fs:[eax] 00823AA4 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00823E39(Sender : TObject); begin (* 00823E39 50 push eax 00823E3A 6461 popa 00823E3C 7465 jz 00823EA3 00823E3E 205946 and [ecx+$46], bl 00823E41 5F pop edi 00823E42 4D dec ebp 00823E43 6F outsd 00823E44 6E outsb 00823E45 65795F jns 00823EA7 00823E48 43 inc ebx 00823E49 52 push edx 00823E4A 2000 and [eax], al 00823E4C FFFF DB $FF, $FF // 00823E4E FFFF DB $FF, $FF // 00823E50 0D00000020 or eax, $20000000 00823E55 53 push ebx 00823E56 657420 jz 00823E79 00823E59 4D dec ebp 00823E5A 61 popa 00823E5B 696E49643D2700 imul ebp, [esi+$49], $00273D64 00823E62 0000 add [eax], al 00823E64 FFFF DB $FF, $FF // 00823E66 FFFF DB $FF, $FF // 00823E68 0100 add [eax], eax 00823E6A 0000 add [eax], al 00823E6C 27 daa 00823E6D 0000 add [eax], al 00823E6F 00FF add bh, bh 00823E71 FFFF DB $FF, $FF // 00823E73 FF0C00 dec dword ptr [eax+eax] 00823E76 0000 add [eax], al 00823E78 2C43 sub al, $43 00823E7A 6F outsd 00823E7B 6D insd 00823E7C 54 push esp 00823E7D 61 popa 00823E7E 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D 00823E86 0000 add [eax], al 00823E88 FFFF DB $FF, $FF // 00823E8A FFFF DB $FF, $FF // 00823E8C 0900 or [eax], eax 00823E8E 0000 add [eax], al 00823E90 2C45 sub al, $45 00823E92 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D 00823E9B 00FF add bh, bh 00823E9D FFFF DB $FF, $FF // 00823E9F FF1400 call dword ptr [eax+eax] 00823EA2 0000 add [eax], al 00823EA4 2C45 sub al, $45 00823EA6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00823EAF 657464 jz 00823F16 00823EB2 61 popa 00823EB3 7465 jz 00823F1A 00823EB5 2829 sub [ecx], ch 00823EB7 2000 and [eax], al 00823EB9 0000 add [eax], al 00823EBB 00FF add bh, bh 00823EBD FFFF DB $FF, $FF // 00823EBF FF0D00000020 dec dword ptr [$20000000] 00823EC5 7768 jnbe 00823F2F 00823EC7 657265 jb 00823F2F 00823ECA 205946 and [ecx+$46], bl 00823ECD 49 dec ecx 00823ECE 643D27000000 cmp eax, $00000027 00823ED4 FFFF DB $FF, $FF // 00823ED6 FFFF DB $FF, $FF // 00823ED8 0400 add al, +$00 00823EDA 0000 add [eax], al 00823EDC 59 pop ecx 00823EDD 46 inc esi 00823EDE 49 dec ecx 00823EDF 640000 add fs:[eax], al 00823EE2 0000 add [eax], al 00823EE4 55 push ebp 00823EE5 8BEC mov ebp, esp 00823EE7 B915000000 mov ecx, $00000015 00823EEC 6A00 push $00 00823EEE 6A00 push $00 00823EF0 49 dec ecx 00823EF1 75F9 jnz 00823EEC 00823EF3 53 push ebx 00823EF4 56 push esi 00823EF5 57 push edi 00823EF6 8BDA mov ebx, edx 00823EF8 8BF0 mov esi, eax 00823EFA 33C0 xor eax, eax 00823EFC 55 push ebp 00823EFD 689E438200 push $0082439E ***** TRY | 00823F02 64FF30 push dword ptr fs:[eax] 00823F05 648920 mov fs:[eax], esp 00823F08 8D55FC lea edx, [ebp-$04] 00823F0B 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; | 00823F0D E8AAB7D6FF call 0058F6BC 00823F12 8D55DC lea edx, [ebp-$24] 00823F15 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F18 E8CF69BEFF call 0040A8EC 00823F1D 837DDC00 cmp dword ptr [ebp-$24], +$00 00823F21 750D jnz 00823F30 00823F23 8D45FC lea eax, [ebp-$04] 00823F26 BAB4438200 mov edx, $008243B4 * Reference to: System.@LStrLAsg(void;void;void;void); | 00823F2B E88C14BEFF call 004053BC * Reference to control ADOTemp : N.A. | 00823F30 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; | 00823F36 E81184E3FF 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; | 00823F3B E824DCE2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00823F40 8B4050 mov eax, [eax+$50] 00823F43 8D55D8 lea edx, [ebp-$28] 00823F46 8B08 mov ecx, [eax] 00823F48 FF5110 call dword ptr [ecx+$10] 00823F4B 8B45D8 mov eax, [ebp-$28] 00823F4E 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F51 E89669BEFF call 0040A8EC * Reference to control Label11 : TLabel | 00823F56 8B9E64030000 mov ebx, [esi+$0364] 00823F5C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00823F5E E8DD44CAFF call 004C8440 00823F63 8D55C4 lea edx, [ebp-$3C] 00823F66 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00823F69 E87E69BEFF call 0040A8EC 00823F6E 8B55C4 mov edx, [ebp-$3C] 00823F71 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00823F74 E84F4EBFFF call 00418DC8 00823F79 8D45C8 lea eax, [ebp-$38] 00823F7C 50 push eax 00823F7D 8B55F0 mov edx, [ebp-$10] 00823F80 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00823F82 E82D2CCAFF call 004C6BB4 00823F87 5A pop edx 00823F88 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00823F8A FF91B4000000 call dword ptr [ecx+$00B4] 00823F90 8BC3 mov eax, ebx 00823F92 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 00823F94 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00823F9A 8B9E08030000 mov ebx, [esi+$0308] 00823FA0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00823FA2 E82D19CAFF call 004C58D4 00823FA7 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00823FA9 E8FE9FCBFF call 004DDFAC 00823FAE 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00823FB0 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(KPMoney,0) KPMoney fr | om YF_Money_CR where YFID='' | 00823FB3 68C0438200 push $008243C0 * Possible String Reference to: 'YFID' | 00823FB8 BA08448200 mov edx, $00824408 * Reference to control Label11 : TLabel | 00823FBD 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00823FC3 E8EC2BCAFF call 004C6BB4 00823FC8 8D55BC lea edx, [ebp-$44] 00823FCB 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 00823FCD FF5160 call dword ptr [ecx+$60] 00823FD0 FF75BC push dword ptr [ebp-$44] 00823FD3 6818448200 push $00824418 00823FD8 8D45C0 lea eax, [ebp-$40] 00823FDB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00823FE0 E8CF16BEFF call 004056B4 00823FE5 8B45C0 mov eax, [ebp-$40] 00823FE8 50 push eax 00823FE9 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00823FEB E8BC9FCBFF call 004DDFAC 00823FF0 5A pop edx 00823FF1 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00823FF3 FF5138 call dword ptr [ecx+$38] 00823FF6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00823FF8 E8CB18CAFF call 004C58C8 * Possible String Reference to: 'KPMoney' | 00823FFD BA24448200 mov edx, $00824424 * Reference to control Label3 : TLabel | 00824002 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824008 E8A72BCAFF call 004C6BB4 0082400D 8D55F4 lea edx, [ebp-$0C] 00824010 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 00824012 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'KPMoney' | 00824015 BA24448200 mov edx, $00824424 * Reference to control Label11 : TLabel | 0082401A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824020 E88F2BCAFF call 004C6BB4 00824025 8D55F8 lea edx, [ebp-$08] 00824028 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 0082402A FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 0082402D BA34448200 mov edx, $00824434 * Reference to control Label11 : TLabel | 00824032 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824038 E8772BCAFF call 004C6BB4 0082403D 8D55B4 lea edx, [ebp-$4C] 00824040 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 00824042 FF5160 call dword ptr [ecx+$60] 00824045 8B45B4 mov eax, [ebp-$4C] 00824048 8D55B8 lea edx, [ebp-$48] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082404B E89C68BEFF call 0040A8EC 00824050 837DB800 cmp dword ptr [ebp-$48], +$00 00824054 0F8434010000 jz 0082418E * Possible String Reference to: 'Qty' | 0082405A BA34448200 mov edx, $00824434 * Reference to control Label11 : TLabel | 0082405F 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824065 E84A2BCAFF call 004C6BB4 0082406A 8D55EC lea edx, [ebp-$14] 0082406D 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 0082406F FF5160 call dword ptr [ecx+$60] 00824072 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00824075 E8B296BEFF call 0040D72C 0082407A D81D38448200 fcomp dword ptr [$00824438] 00824080 DFE0 fstsw ax 00824082 9E sahf 00824083 0F84C0020000 jz 00824349 00824089 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0082408C E89B96BEFF call 0040D72C 00824091 D80D3C448200 fmul dword ptr [$0082443C] 00824097 DB7DA8 fstp tbyte ptr [ebp-$58] 0082409A 9B wait 0082409B 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0082409E E88996BEFF call 0040D72C 008240A3 DB6DA8 fld tbyte ptr [ebp-$58] 008240A6 DEF1 fdivrp st(1), st(0) 008240A8 DD5DE0 fstp qword ptr [ebp-$20] 008240AB 9B wait * Reference to control Label11 : TLabel | 008240AC 8BBE64030000 mov edi, [esi+$0364] 008240B2 8BC7 mov eax, edi * Reference to: DB.TDataSet.Edit(TDataSet); | 008240B4 E88743CAFF call 004C8440 * Possible String Reference to: 'Price' | 008240B9 BA48448200 mov edx, $00824448 008240BE 8BC7 mov eax, edi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008240C0 E8EF2ACAFF call 004C6BB4 008240C5 50 push eax 008240C6 DD45E0 fld qword ptr [ebp-$20] 008240C9 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 008240CC E8BB4CBFFF call 00418D8C 008240D1 8D5598 lea edx, [ebp-$68] 008240D4 58 pop eax 008240D5 8B08 mov ecx, [eax] 008240D7 FF91B4000000 call dword ptr [ecx+$00B4] 008240DD 8BC7 mov eax, edi 008240DF 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 008240E1 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 008240E7 8B9E0C030000 mov ebx, [esi+$030C] 008240ED 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008240EF E8E017CAFF call 004C58D4 008240F4 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; | 008240F6 E8B19ECBFF call 004DDFAC 008240FB 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 008240FD FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'Price' | 00824100 BA48448200 mov edx, $00824448 * Reference to control Label11 : TLabel | 00824105 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082410B E8A42ACAFF call 004C6BB4 00824110 8D5590 lea edx, [ebp-$70] 00824113 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 00824115 FF5160 call dword ptr [ecx+$60] 00824118 8B4D90 mov ecx, [ebp-$70] 0082411B 8D4594 lea eax, [ebp-$6C] * Possible String Reference to: 'UPdate YF_Money_CR Set Price=' | 0082411E BA58448200 mov edx, $00824458 * Reference to: System.@LStrCat3; | 00824123 E81815BEFF call 00405640 00824128 8B4594 mov eax, [ebp-$6C] 0082412B 50 push eax 0082412C 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; | 0082412E E8799ECBFF call 004DDFAC 00824133 5A pop edx 00824134 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00824136 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFID='' | 00824139 6880448200 push $00824480 * Possible String Reference to: 'YFID' | 0082413E BA08448200 mov edx, $00824408 * Reference to control Label11 : TLabel | 00824143 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00824149 E8662ACAFF call 004C6BB4 0082414E 8D5584 lea edx, [ebp-$7C] 00824151 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 00824153 FF5160 call dword ptr [ecx+$60] 00824156 8B4584 mov eax, [ebp-$7C] 00824159 8D5588 lea edx, [ebp-$78] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082415C E88B67BEFF call 0040A8EC 00824161 FF7588 push dword ptr [ebp-$78] 00824164 6818448200 push $00824418 00824169 8D458C lea eax, [ebp-$74] 0082416C BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00824171 E83E15BEFF call 004056B4 00824176 8B458C mov eax, [ebp-$74] 00824179 50 push eax 0082417A 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; | 0082417C E82B9ECBFF call 004DDFAC 00824181 5A pop edx 00824182 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00824184 FF5138 call dword ptr [ecx+$38] 00824187 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00824189 E8469DCBFF call 004DDED4 * Reference to control OrdDate : N.A. | 0082418E 8B9E0C030000 mov ebx, [esi+$030C] 00824194 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00824196 E83917CAFF call 004C58D4 0082419B 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; | 0082419D E80A9ECBFF call 004DDFAC 008241A2 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 008241A4 FF5244 call dword ptr [edx+$44] 008241A7 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; | 008241A9 E8FE9DCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008241AE BA98448200 mov edx, $00824498 008241B3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008241B5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008241B8 68B4448200 push $008244B4 008241BD FF75F0 push dword ptr [ebp-$10] 008241C0 68C4448200 push $008244C4 008241C5 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 008241CB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008241CE E81967BEFF call 0040A8EC 008241D3 FFB57CFFFFFF push dword ptr [ebp+$FFFFFF7C] 008241D9 8D4580 lea eax, [ebp-$80] 008241DC BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008241E1 E8CE14BEFF call 004056B4 008241E6 8B4580 mov eax, [ebp-$80] 008241E9 50 push eax 008241EA 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; | 008241EC E8BB9DCBFF call 004DDFAC 008241F1 5A pop edx 008241F2 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008241F4 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008241F7 68D0448200 push $008244D0 008241FC 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmYFFP._PROC_00824459(Sender : TObject); begin (* 00824459 50 push eax 0082445A 6461 popa 0082445C 7465 jz 008244C3 0082445E 205946 and [ecx+$46], bl 00824461 5F pop edi 00824462 4D dec ebp 00824463 6F outsd 00824464 6E outsb 00824465 65795F jns 008244C7 00824468 43 inc ebx 00824469 52 push edx 0082446A 205365 and [ebx+$65], dl 0082446D 7420 jz 0082448F 0082446F 50 push eax 00824470 7269 jb 008244DB 00824472 63653D arpl [ebp+$3D], sp 00824475 0000 add [eax], al 00824477 00FF add bh, bh 00824479 FFFF DB $FF, $FF // 0082447B FF0D00000020 dec dword ptr [$20000000] 00824481 7768 jnbe 008244EB 00824483 657265 jb 008244EB 00824486 205946 and [ecx+$46], bl 00824489 49 dec ecx 0082448A 44 inc esp 0082448B 3D27000000 cmp eax, $00000027 00824490 FFFF DB $FF, $FF // 00824492 FFFF DB $FF, $FF // 00824494 1300 adc eax, [eax] 00824496 0000 add [eax], al 00824498 55 push ebp 00824499 50 push eax 0082449A 6461 popa 0082449C 7465 jz 00824503 0082449E 205946 and [ecx+$46], bl 008244A1 5F pop edi 008244A2 4D dec ebp 008244A3 6F outsd 008244A4 6E outsb 008244A5 65795F jns 00824507 008244A8 43 inc ebx 008244A9 52 push edx 008244AA 2000 and [eax], al 008244AC FFFF DB $FF, $FF // 008244AE FFFF DB $FF, $FF // 008244B0 0500000020 add eax, +$20000000 008244B5 53 push ebx 008244B6 657420 jz 008244D9 008244B9 0000 add [eax], al 008244BB 00FF add bh, bh 008244BD FFFF DB $FF, $FF // 008244BF FF01 inc dword ptr [ecx] 008244C1 0000 add [eax], al 008244C3 003D000000FF add [$FF000000], bh 008244C9 FFFF DB $FF, $FF // 008244CB FF09 dec dword ptr [ecx] 008244CD 0000 add [eax], al 008244CF 002C4564697465 add [$65746964+eax*2], ch 008244D6 723D jb 00824515 008244D8 27 daa 008244D9 0000 add [eax], al 008244DB 00FF add bh, bh 008244DD FFFF DB $FF, $FF // 008244DF FF1400 call dword ptr [eax+eax] 008244E2 0000 add [eax], al 008244E4 2C45 sub al, $45 008244E6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008244EF 657464 jz 00824556 008244F2 61 popa 008244F3 7465 jz 0082455A 008244F5 2829 sub [ecx], ch 008244F7 2000 and [eax], al 008244F9 0000 add [eax], al 008244FB 00FF add bh, bh 008244FD FFFF DB $FF, $FF // 008244FF FF0D00000020 dec dword ptr [$20000000] 00824505 7768 jnbe 0082456F 00824507 657265 jb 0082456F 0082450A 205946 and [ecx+$46], bl 0082450D 49 dec ecx 0082450E 643D27000000 cmp eax, $00000027 00824514 FFFF DB $FF, $FF // 00824516 FFFF DB $FF, $FF // 00824518 0400 add al, +$00 0082451A 0000 add [eax], al 0082451C 59 pop ecx 0082451D 46 inc esi 0082451E 49 dec ecx 0082451F 640000 add fs:[eax], al 00824522 0000 add [eax], al 00824524 FFFF DB $FF, $FF // 00824526 FFFF DB $FF, $FF // 00824528 2C00 sub al, $00 0082452A 0000 add [eax], al 0082452C 205570 and [ebp+$70], dl 0082452F 6461 popa 00824531 7465 jz 00824598 00824533 205946 and [ecx+$46], bl 00824536 5F pop edi 00824537 4D dec ebp 00824538 6F outsd 00824539 6E outsb 0082453A 65795F jns 0082459C 0082453D 4B dec ebx 0082453E 43 inc ebx 0082453F 205365 and [ebx+$65], dl 00824542 7420 jz 00824564 00824544 4B dec ebx 00824545 43 inc ebx 00824546 4B dec ebx 00824547 50 push eax 00824548 4D dec ebp 00824549 6F outsd 0082454A 6E outsb 0082454B 65793D jns 0082458B 0082454E 4B dec ebx 0082454F 43 inc ebx 00824550 4B dec ebx 00824551 50 push eax 00824552 4D dec ebp 00824553 6F outsd 00824554 6E outsb 00824555 65792D jns 00824585 00824558 0000 add [eax], al 0082455A 0000 add [eax], al 0082455C FFFF DB $FF, $FF // 0082455E FFFF DB $FF, $FF // 00824560 0100 add [eax], eax 00824562 0000 add [eax], al 00824564 2B00 sub eax, dword ptr [eax] 00824566 0000 add [eax], al 00824568 FFFF DB $FF, $FF // 0082456A FFFF DB $FF, $FF // 0082456C 0D00000020 or eax, $20000000 00824571 7768 jnbe 008245DB 00824573 657265 jb 008245DB 00824576 204352 and [ebx+$52], al 00824579 49 dec ecx 0082457A 44 inc esp 0082457B 3D27000000 cmp eax, $00000027 00824580 FFFF DB $FF, $FF // 00824582 FFFF DB $FF, $FF // 00824584 0400 add al, +$00 00824586 0000 add [eax], al 00824588 43 inc ebx 00824589 52 push edx 0082458A 49 dec ecx 0082458B 44 inc esp 0082458C 0000 add [eax], al 0082458E 0000 add [eax], al 00824590 55 push ebp 00824591 8BEC mov ebp, esp 00824593 B908000000 mov ecx, $00000008 00824598 6A00 push $00 0082459A 6A00 push $00 0082459C 49 dec ecx 0082459D 75F9 jnz 00824598 0082459F 53 push ebx 008245A0 56 push esi 008245A1 8BDA mov ebx, edx 008245A3 8BF0 mov esi, eax 008245A5 33C0 xor eax, eax 008245A7 55 push ebp 008245A8 6878478200 push $00824778 ***** TRY | 008245AD 64FF30 push dword ptr fs:[eax] 008245B0 648920 mov fs:[eax], esp 008245B3 8D55FC lea edx, [ebp-$04] 008245B6 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; | 008245B8 E8FFB0D6FF call 0058F6BC 008245BD 8D55F4 lea edx, [ebp-$0C] 008245C0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008245C3 E82463BEFF call 0040A8EC 008245C8 837DF400 cmp dword ptr [ebp-$0C], +$00 008245CC 750D jnz 008245DB 008245CE 8D45FC lea eax, [ebp-$04] 008245D1 BA90478200 mov edx, $00824790 * Reference to: System.@LStrLAsg(void;void;void;void); | 008245D6 E8E10DBEFF call 004053BC * Reference to control ADOTemp : N.A. | 008245DB 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; | 008245E1 E8667DE3FF 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; | 008245E6 E879D5E2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 008245EB 8B4050 mov eax, [eax+$50] 008245EE 8D55F0 lea edx, [ebp-$10] 008245F1 8B08 mov ecx, [eax] 008245F3 FF5110 call dword ptr [ecx+$10] 008245F6 8B45F0 mov eax, [ebp-$10] 008245F9 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008245FC E8EB62BEFF call 0040A8EC * Reference to control Label11 : TLabel | 00824601 8B9E64030000 mov ebx, [esi+$0364] 00824607 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00824609 E8323ECAFF call 004C8440 0082460E 8D55DC lea edx, [ebp-$24] 00824611 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824614 E8D362BEFF call 0040A8EC 00824619 8B55DC mov edx, [ebp-$24] 0082461C 8D45E0 lea eax, [ebp-$20] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0082461F E8A447BFFF call 00418DC8 00824624 8D45E0 lea eax, [ebp-$20] 00824627 50 push eax 00824628 8B55F8 mov edx, [ebp-$08] 0082462B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0082462D E88225CAFF call 004C6BB4 00824632 5A pop edx 00824633 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00824635 FF91B4000000 call dword ptr [ecx+$00B4] 0082463B 8BC3 mov eax, ebx 0082463D 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 0082463F FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00824645 8B9E0C030000 mov ebx, [esi+$030C] 0082464B 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082464D E88212CAFF call 004C58D4 00824652 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; | 00824654 E85399CBFF call 004DDFAC 00824659 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0082465B FF5244 call dword ptr [edx+$44] 0082465E 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; | 00824660 E84799CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00824665 BA9C478200 mov edx, $0082479C 0082466A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082466C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 0082466F 68B8478200 push $008247B8 00824674 FF75F8 push dword ptr [ebp-$08] 00824677 68C8478200 push $008247C8 0082467C 8D55D4 lea edx, [ebp-$2C] 0082467F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824682 E86562BEFF call 0040A8EC 00824687 FF75D4 push dword ptr [ebp-$2C] 0082468A 8D45D8 lea eax, [ebp-$28] 0082468D BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00824692 E81D10BEFF call 004056B4 00824697 8B45D8 mov eax, [ebp-$28] 0082469A 50 push eax 0082469B 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; | 0082469D E80A99CBFF call 004DDFAC 008246A2 5A pop edx 008246A3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008246A5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008246A8 68D4478200 push $008247D4 008246AD 8D55CC lea edx, [ebp-$34] *) end; procedure TfrmYFFP._PROC_0082479D(Sender : TObject); begin (* 0082479D 50 push eax 0082479E 6461 popa 008247A0 7465 jz 00824807 008247A2 205946 and [ecx+$46], bl 008247A5 5F pop edi 008247A6 4D dec ebp 008247A7 6F outsd 008247A8 6E outsb 008247A9 65795F jns 0082480B 008247AC 43 inc ebx 008247AD 52 push edx 008247AE 2000 and [eax], al 008247B0 FFFF DB $FF, $FF // 008247B2 FFFF DB $FF, $FF // 008247B4 0500000020 add eax, +$20000000 008247B9 53 push ebx 008247BA 657420 jz 008247DD 008247BD 0000 add [eax], al 008247BF 00FF add bh, bh 008247C1 FFFF DB $FF, $FF // 008247C3 FF01 inc dword ptr [ecx] 008247C5 0000 add [eax], al 008247C7 003D000000FF add [$FF000000], bh 008247CD FFFF DB $FF, $FF // 008247CF FF09 dec dword ptr [ecx] 008247D1 0000 add [eax], al 008247D3 002C4564697465 add [$65746964+eax*2], ch 008247DA 723D jb 00824819 008247DC 27 daa 008247DD 0000 add [eax], al 008247DF 00FF add bh, bh 008247E1 FFFF DB $FF, $FF // 008247E3 FF01 inc dword ptr [ecx] 008247E5 0000 add [eax], al 008247E7 0027 add [edi], ah 008247E9 0000 add [eax], al 008247EB 00FF add bh, bh 008247ED FFFF DB $FF, $FF // 008247EF FF1400 call dword ptr [eax+eax] 008247F2 0000 add [eax], al 008247F4 2C45 sub al, $45 008247F6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008247FF 657464 jz 00824866 00824802 61 popa 00824803 7465 jz 0082486A 00824805 2829 sub [ecx], ch 00824807 2000 and [eax], al 00824809 0000 add [eax], al 0082480B 00FF add bh, bh 0082480D FFFF DB $FF, $FF // 0082480F FF0D00000020 dec dword ptr [$20000000] 00824815 7768 jnbe 0082487F 00824817 657265 jb 0082487F 0082481A 205946 and [ecx+$46], bl 0082481D 49 dec ecx 0082481E 643D27000000 cmp eax, $00000027 00824824 FFFF DB $FF, $FF // 00824826 FFFF DB $FF, $FF // 00824828 0400 add al, +$00 0082482A 0000 add [eax], al 0082482C 59 pop ecx 0082482D 46 inc esi 0082482E 49 dec ecx 0082482F 640000 add fs:[eax], al 00824832 0000 add [eax], al 00824834 55 push ebp 00824835 8BEC mov ebp, esp 00824837 B907000000 mov ecx, $00000007 0082483C 6A00 push $00 0082483E 6A00 push $00 00824840 49 dec ecx 00824841 75F9 jnz 0082483C 00824843 51 push ecx 00824844 53 push ebx 00824845 56 push esi 00824846 8BDA mov ebx, edx 00824848 8BF0 mov esi, eax 0082484A 33C0 xor eax, eax 0082484C 55 push ebp * Possible String Reference to: '殡' | 0082484D 68044A8200 push $00824A04 ***** TRY | 00824852 64FF30 push dword ptr fs:[eax] 00824855 648920 mov fs:[eax], esp 00824858 8D55FC lea edx, [ebp-$04] 0082485B 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; | 0082485D E85AAED6FF call 0058F6BC * Reference to control ADOTemp : N.A. | 00824862 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; | 00824868 E8DF7AE3FF 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; | 0082486D E8F2D2E2FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00824872 8B4050 mov eax, [eax+$50] 00824875 8D55F4 lea edx, [ebp-$0C] 00824878 8B08 mov ecx, [eax] 0082487A FF5110 call dword ptr [ecx+$10] 0082487D 8B45F4 mov eax, [ebp-$0C] 00824880 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824883 E86460BEFF call 0040A8EC * Reference to control Label11 : TLabel | 00824888 8B9E64030000 mov ebx, [esi+$0364] 0082488E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00824890 E8AB3BCAFF call 004C8440 00824895 8D55E0 lea edx, [ebp-$20] 00824898 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082489B E84C60BEFF call 0040A8EC 008248A0 8B55E0 mov edx, [ebp-$20] 008248A3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008248A6 E81D45BFFF call 00418DC8 008248AB 8D45E4 lea eax, [ebp-$1C] 008248AE 50 push eax 008248AF 8B55F8 mov edx, [ebp-$08] 008248B2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008248B4 E8FB22CAFF call 004C6BB4 008248B9 5A pop edx 008248BA 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 008248BC FF91B4000000 call dword ptr [ecx+$00B4] 008248C2 8BC3 mov eax, ebx 008248C4 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 008248C6 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 008248CC 8B9E0C030000 mov ebx, [esi+$030C] 008248D2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008248D4 E8FB0FCAFF call 004C58D4 008248D9 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; | 008248DB E8CC96CBFF call 004DDFAC 008248E0 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 008248E2 FF5244 call dword ptr [edx+$44] 008248E5 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; | 008248E7 E8C096CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008248EC BA1C4A8200 mov edx, $00824A1C 008248F1 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008248F3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008248F6 68384A8200 push $00824A38 008248FB FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008248FE 68484A8200 push $00824A48 00824903 8D55D8 lea edx, [ebp-$28] 00824906 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824909 E8DE5FBEFF call 0040A8EC 0082490E FF75D8 push dword ptr [ebp-$28] 00824911 68544A8200 push $00824A54 00824916 8D45DC lea eax, [ebp-$24] 00824919 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 0082491E E8910DBEFF call 004056B4 00824923 8B45DC mov eax, [ebp-$24] 00824926 50 push eax 00824927 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; | 00824929 E87E96CBFF call 004DDFAC 0082492E 5A pop edx 0082492F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00824931 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00824934 68604A8200 push $00824A60 00824939 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmYFFP._PROC_00824A1D(Sender : TObject); begin (* 00824A1D 50 push eax 00824A1E 6461 popa 00824A20 7465 jz 00824A87 00824A22 205946 and [ecx+$46], bl 00824A25 5F pop edi 00824A26 4D dec ebp 00824A27 6F outsd 00824A28 6E outsb 00824A29 65795F jns 00824A8B 00824A2C 43 inc ebx 00824A2D 52 push edx 00824A2E 2000 and [eax], al 00824A30 FFFF DB $FF, $FF // 00824A32 FFFF DB $FF, $FF // 00824A34 0500000020 add eax, +$20000000 00824A39 53 push ebx 00824A3A 657420 jz 00824A5D 00824A3D 0000 add [eax], al 00824A3F 00FF add bh, bh 00824A41 FFFF DB $FF, $FF // 00824A43 FF02 inc dword ptr [edx] 00824A45 0000 add [eax], al 00824A47 003D270000FF add [$FF000027], bh 00824A4D FFFF DB $FF, $FF // 00824A4F FF01 inc dword ptr [ecx] 00824A51 0000 add [eax], al 00824A53 0027 add [edi], ah 00824A55 0000 add [eax], al 00824A57 00FF add bh, bh 00824A59 FFFF DB $FF, $FF // 00824A5B FF09 dec dword ptr [ecx] 00824A5D 0000 add [eax], al 00824A5F 002C4564697465 add [$65746964+eax*2], ch 00824A66 723D jb 00824AA5 00824A68 27 daa 00824A69 0000 add [eax], al 00824A6B 00FF add bh, bh 00824A6D FFFF DB $FF, $FF // 00824A6F FF1400 call dword ptr [eax+eax] 00824A72 0000 add [eax], al 00824A74 2C45 sub al, $45 00824A76 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00824A7F 657464 jz 00824AE6 00824A82 61 popa 00824A83 7465 jz 00824AEA 00824A85 2829 sub [ecx], ch 00824A87 2000 and [eax], al 00824A89 0000 add [eax], al 00824A8B 00FF add bh, bh 00824A8D FFFF DB $FF, $FF // 00824A8F FF0D00000020 dec dword ptr [$20000000] 00824A95 7768 jnbe 00824AFF 00824A97 657265 jb 00824AFF 00824A9A 205946 and [ecx+$46], bl 00824A9D 49 dec ecx 00824A9E 643D27000000 cmp eax, $00000027 00824AA4 FFFF DB $FF, $FF // 00824AA6 FFFF DB $FF, $FF // 00824AA8 0400 add al, +$00 00824AAA 0000 add [eax], al 00824AAC 59 pop ecx 00824AAD 46 inc esi 00824AAE 49 dec ecx 00824AAF 640000 add fs:[eax], al 00824AB2 0000 add [eax], al 00824AB4 55 push ebp 00824AB5 8BEC mov ebp, esp 00824AB7 51 push ecx 00824AB8 B906000000 mov ecx, $00000006 00824ABD 6A00 push $00 00824ABF 6A00 push $00 00824AC1 49 dec ecx 00824AC2 75F9 jnz 00824ABD 00824AC4 51 push ecx 00824AC5 874DFC xchg [ebp-$04], ecx 00824AC8 53 push ebx 00824AC9 56 push esi 00824ACA 8BF0 mov esi, eax 00824ACC 33C0 xor eax, eax 00824ACE 55 push ebp 00824ACF 680B4D8200 push $00824D0B ***** TRY | 00824AD4 64FF30 push dword ptr fs:[eax] 00824AD7 648920 mov fs:[eax], esp 00824ADA 33C0 xor eax, eax 00824ADC 55 push ebp 00824ADD 68E14C8200 push $00824CE1 ***** TRY | 00824AE2 64FF30 push dword ptr fs:[eax] 00824AE5 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00824D55(Sender : TObject); begin (* 00824D55 50 push eax 00824D56 6461 popa 00824D58 7465 jz 00824DBF 00824D5A 205946 and [ecx+$46], bl 00824D5D 5F pop edi 00824D5E 4D dec ebp 00824D5F 6F outsd 00824D60 6E outsb 00824D61 65795F jns 00824DC3 00824D64 43 inc ebx 00824D65 52 push edx 00824D66 2000 and [eax], al 00824D68 FFFF DB $FF, $FF // 00824D6A FFFF DB $FF, $FF // 00824D6C 0E push cs 00824D6D 0000 add [eax], al 00824D6F 0020 add [eax], ah 00824D71 53 push ebx 00824D72 657420 jz 00824D95 00824D75 50 push eax 00824D76 61 popa 00824D77 794D jns 00824DC6 00824D79 656E outsb 00824D7B 743D jz 00824DBA 00824D7D 27 daa 00824D7E 0000 add [eax], al 00824D80 FFFF DB $FF, $FF // 00824D82 FFFF DB $FF, $FF // 00824D84 0100 add [eax], eax 00824D86 0000 add [eax], al 00824D88 27 daa 00824D89 0000 add [eax], al 00824D8B 00FF add bh, bh 00824D8D FFFF DB $FF, $FF // 00824D8F FF09 dec dword ptr [ecx] 00824D91 0000 add [eax], al 00824D93 002C4564697465 add [$65746964+eax*2], ch 00824D9A 723D jb 00824DD9 00824D9C 27 daa 00824D9D 0000 add [eax], al 00824D9F 00FF add bh, bh 00824DA1 FFFF DB $FF, $FF // 00824DA3 FF1400 call dword ptr [eax+eax] 00824DA6 0000 add [eax], al 00824DA8 2C45 sub al, $45 00824DAA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00824DB3 657464 jz 00824E1A 00824DB6 61 popa 00824DB7 7465 jz 00824E1E 00824DB9 2829 sub [ecx], ch 00824DBB 2000 and [eax], al 00824DBD 0000 add [eax], al 00824DBF 00FF add bh, bh 00824DC1 FFFF DB $FF, $FF // 00824DC3 FF0D00000020 dec dword ptr [$20000000] 00824DC9 7768 jnbe 00824E33 00824DCB 657265 jb 00824E33 00824DCE 205946 and [ecx+$46], bl 00824DD1 49 dec ecx 00824DD2 643D27000000 cmp eax, $00000027 00824DD8 FFFF DB $FF, $FF // 00824DDA FFFF DB $FF, $FF // 00824DDC 0400 add al, +$00 00824DDE 0000 add [eax], al 00824DE0 59 pop ecx 00824DE1 46 inc esi 00824DE2 49 dec ecx 00824DE3 640000 add fs:[eax], al 00824DE6 0000 add [eax], al 00824DE8 56 push esi * Reference to control DlyDate : N.A. | 00824DE9 8B8014030000 mov eax, [eax+$0314] 00824DEF 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00824DF3 E85CF7BDFF call 00404554 00824DF8 5E pop esi 00824DF9 C3 ret 00824DFA 8BC0 mov eax, eax 00824DFC 55 push ebp 00824DFD 8BEC mov ebp, esp 00824DFF 51 push ecx 00824E00 B904000000 mov ecx, $00000004 00824E05 6A00 push $00 00824E07 6A00 push $00 00824E09 49 dec ecx 00824E0A 75F9 jnz 00824E05 00824E0C 51 push ecx 00824E0D 874DFC xchg [ebp-$04], ecx 00824E10 53 push ebx 00824E11 8945FC mov [ebp-$04], eax 00824E14 33C0 xor eax, eax 00824E16 55 push ebp * Possible String Reference to: '轫胨[嬪]' | 00824E17 6802508200 push $00825002 ***** TRY | 00824E1C 64FF30 push dword ptr fs:[eax] 00824E1F 648920 mov fs:[eax], esp 00824E22 80390D cmp byte ptr [ecx], $0D 00824E25 0F859C010000 jnz 00824FC7 00824E2B 8D55F4 lea edx, [ebp-$0C] 00824E2E 8B45FC mov eax, [ebp-$04] * Reference to control v1PriceUnit : N.A. | 00824E31 8B8084030000 mov eax, [eax+$0384] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 00824E37 E8B437C6FF call 004885F0 00824E3C 8B45F4 mov eax, [ebp-$0C] 00824E3F 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824E42 E8A55ABEFF call 0040A8EC 00824E47 8B45F8 mov eax, [ebp-$08] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 00824E4A E8A507BEFF call 004055F4 00824E4F 83F804 cmp eax, +$04 00824E52 0F8C6F010000 jl 00824FC7 00824E58 8B45FC mov eax, [ebp-$04] * Reference to control Label9 : TLabel | 00824E5B 8B8054030000 mov eax, [eax+$0354] 00824E61 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_00C4 | 00824E63 FF92C4000000 call dword ptr [edx+$00C4] 00824E69 33C0 xor eax, eax 00824E6B 55 push ebp 00824E6C 68C04F8200 push $00824FC0 ***** TRY | 00824E71 64FF30 push dword ptr fs:[eax] 00824E74 648920 mov fs:[eax], esp 00824E77 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00824E7A 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 00824E80 E8CF26CAFF call 004C7554 00824E85 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00824E88 8B9820030000 mov ebx, [eax+$0320] 00824E8E 33D2 xor edx, edx 00824E90 8BC3 mov eax, ebx 00824E92 8B08 mov ecx, [eax] * Possible reference to virtual method TToolButton.OFFS_0190 | 00824E94 FF9190010000 call dword ptr [ecx+$0190] 00824E9A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00824E9C E8330ACAFF call 004C58D4 00824EA1 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824EA3 E80491CBFF call 004DDFAC 00824EA8 8B10 mov edx, [eax] * Reference to method TToolButton.GetClientRect() | 00824EAA FF5244 call dword ptr [edx+$44] 00824EAD 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824EAF E8F890CBFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 00824EB4 BA18508200 mov edx, $00825018 00824EB9 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824EBB FF5138 call dword ptr [ecx+$38] 00824EBE 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824EC0 E8E790CBFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00824EC5 BA38508200 mov edx, $00825038 00824ECA 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824ECC FF5138 call dword ptr [ecx+$38] 00824ECF 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824ED1 E8D690CBFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00824ED6 BA58508200 mov edx, $00825058 00824EDB 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824EDD FF5138 call dword ptr [ecx+$38] 00824EE0 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824EE2 E8C590CBFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId' | 00824EE7 BA8C508200 mov edx, $0082508C 00824EEC 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824EEE FF5138 call dword ptr [ecx+$38] 00824EF1 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824EF3 E8B490CBFF call 004DDFAC * Possible String Reference to: 'where C.orderNo like :OrderNo' | 00824EF8 BAC4508200 mov edx, $008250C4 00824EFD 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824EFF FF5138 call dword ptr [ecx+$38] 00824F02 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00824F04 E8A390CBFF call 004DDFAC * Possible String Reference to: 'and A.CRType='应付款发票登记'' | 00824F09 BAEC508200 mov edx, $008250EC 00824F0E 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00824F10 FF5138 call dword ptr [ecx+$38] 00824F13 6814518200 push $00825114 00824F18 8D55D8 lea edx, [ebp-$28] 00824F1B 8B45FC mov eax, [ebp-$04] * Reference to control v1PriceUnit : N.A. | 00824F1E 8B8084030000 mov eax, [eax+$0384] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 00824F24 E8C736C6FF call 004885F0 00824F29 8B45D8 mov eax, [ebp-$28] 00824F2C 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00824F2F E8B859BEFF call 0040A8EC 00824F34 FF75DC push dword ptr [ebp-$24] 00824F37 6814518200 push $00825114 00824F3C 8D45E0 lea eax, [ebp-$20] 00824F3F BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00824F44 E86B07BEFF call 004056B4 00824F49 8B55E0 mov edx, [ebp-$20] 00824F4C 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00824F4F E8743EBFFF call 00418DC8 00824F54 8D45E4 lea eax, [ebp-$1C] 00824F57 50 push eax 00824F58 8BC3 mov eax, ebx * Reference to: ADODB.TCustomADODataSet.GetParameters(TCustomADODataSet):TParameters; | 00824F5A E89173CBFF call 004DC2F0 00824F5F BA1C518200 mov edx, $0082511C * Reference to: ADODB.TParameters.ParamByName(TParameters;WideString):TParameter; | 00824F64 E897F4CAFF call 004D4400 00824F69 5A pop edx * Reference to: ADODB.TParameter.SetValue(TParameter;Variant;Variant); | 00824F6A E85507CBFF call 004D56C4 00824F6F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00824F71 E85209CAFF call 004C58C8 00824F76 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : TLabel | 00824F79 8B9064030000 mov edx, [eax+$0364] 00824F7F 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00824F82 8B8020030000 mov eax, [eax+$0320] | 00824F88 E8031FF9FF call 007B6E90 00824F8D 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : TLabel | 00824F90 8B9064030000 mov edx, [eax+$0364] 00824F96 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00824F99 8B8020030000 mov eax, [eax+$0320] | 00824F9F E87420F9FF call 007B7018 00824FA4 33C0 xor eax, eax 00824FA6 5A pop edx 00824FA7 59 pop ecx 00824FA8 59 pop ecx 00824FA9 648910 mov fs:[eax], edx ****** FINALLY | 00824FAC 68C74F8200 push $00824FC7 00824FB1 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00824FB4 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 00824FBA E8B525CAFF call 004C7574 00824FBF C3 ret * Reference to: System.@HandleFinally; | 00824FC0 E92FFBBDFF jmp 00404AF4 00824FC5 EBEA jmp 00824FB1 ****** END | 00824FC7 33C0 xor eax, eax 00824FC9 5A pop edx 00824FCA 59 pop ecx 00824FCB 59 pop ecx 00824FCC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[嬪]' | 00824FCF 6809508200 push $00825009 00824FD4 8D45D8 lea eax, [ebp-$28] * Reference to: System.@LStrClr(void;void); | 00824FD7 E84803BEFF call 00405324 00824FDC 8D45DC lea eax, [ebp-$24] 00824FDF BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00824FE4 E85F03BEFF call 00405348 00824FE9 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00824FEC E883F6BEFF call 00414674 00824FF1 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 00824FF4 E82B03BEFF call 00405324 00824FF9 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 00824FFC E82303BEFF call 00405324 00825001 C3 ret *) end; procedure TfrmYFFP._PROC_00825551(Sender : TObject); begin (* 00825551 50 push eax 00825552 6461 popa 00825554 7465 jz 008255BB 00825556 205946 and [ecx+$46], bl 00825559 5F pop edi 0082555A 4D dec ebp 0082555B 6F outsd 0082555C 6E outsb 0082555D 65795F jns 008255BF 00825560 43 inc ebx 00825561 52 push edx 00825562 2000 and [eax], al 00825564 FFFF DB $FF, $FF // 00825566 FFFF DB $FF, $FF // 00825568 0E push cs 00825569 0000 add [eax], al 0082556B 0020 add [eax], ah 0082556D 53 push ebx 0082556E 657420 jz 00825591 00825571 4F dec edi 00825572 7264 jb 008255D8 00825574 65724E jb 008255C5 00825577 4F dec edi 00825578 3D270000FF cmp eax, $FF000027 0082557D FFFF DB $FF, $FF // 0082557F FF07 inc dword ptr [edi] 00825581 0000 add [eax], al 00825583 004F72 add [edi+$72], cl 00825586 6465724E jb 008255D8 0082558A 4F dec edi 0082558B 00FF add bh, bh 0082558D FFFF DB $FF, $FF // 0082558F FF01 inc dword ptr [ecx] 00825591 0000 add [eax], al 00825593 0027 add [edi], ah 00825595 0000 add [eax], al 00825597 00FF add bh, bh 00825599 FFFF DB $FF, $FF // 0082559B FF0E dec dword ptr [esi] 0082559D 0000 add [eax], al 0082559F 0020 add [eax], ah 008255A1 2C50 sub al, $50 008255A3 5F pop edi 008255A4 43 inc ebx 008255A5 6F outsd 008255A6 64654E dec esi 008255A9 61 popa 008255AA 6D insd 008255AB 653D270000FF cmp eax, $FF000027 008255B1 FFFF DB $FF, $FF // 008255B3 FF0A dec dword ptr [edx] 008255B5 0000 add [eax], al 008255B7 0020 add [eax], ah 008255B9 2C50 sub al, $50 008255BB 5F pop edi 008255BC 53 push ebx 008255BD 7065 jo 00825624 008255BF 633D270000FF arpl [$FF000027], di 008255C5 FFFF DB $FF, $FF // 008255C7 FF09 dec dword ptr [ecx] 008255C9 0000 add [eax], al 008255CB 002C4564697465 add [$65746964+eax*2], ch 008255D2 723D jb 00825611 008255D4 27 daa 008255D5 0000 add [eax], al 008255D7 00FF add bh, bh 008255D9 FFFF DB $FF, $FF // 008255DB FF1400 call dword ptr [eax+eax] 008255DE 0000 add [eax], al 008255E0 2C45 sub al, $45 008255E2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008255EB 657464 jz 00825652 008255EE 61 popa 008255EF 7465 jz 00825656 008255F1 2829 sub [ecx], ch 008255F3 2000 and [eax], al 008255F5 0000 add [eax], al 008255F7 00FF add bh, bh 008255F9 FFFF DB $FF, $FF // 008255FB FF0D00000020 dec dword ptr [$20000000] 00825601 7768 jnbe 0082566B 00825603 657265 jb 0082566B 00825606 205946 and [ecx+$46], bl 00825609 49 dec ecx 0082560A 643D27000000 cmp eax, $00000027 00825610 FFFF DB $FF, $FF // 00825612 FFFF DB $FF, $FF // 00825614 0400 add al, +$00 00825616 0000 add [eax], al 00825618 59 pop ecx 00825619 46 inc esi 0082561A 49 dec ecx 0082561B 640000 add fs:[eax], al 0082561E 0000 add [eax], al 00825620 55 push ebp 00825621 8BEC mov ebp, esp 00825623 51 push ecx 00825624 B906000000 mov ecx, $00000006 00825629 6A00 push $00 0082562B 6A00 push $00 0082562D 49 dec ecx 0082562E 75F9 jnz 00825629 00825630 51 push ecx 00825631 874DFC xchg [ebp-$04], ecx 00825634 53 push ebx 00825635 56 push esi 00825636 8BF0 mov esi, eax 00825638 33C0 xor eax, eax 0082563A 55 push ebp 0082563B 6877588200 push $00825877 ***** TRY | 00825640 64FF30 push dword ptr fs:[eax] 00825643 648920 mov fs:[eax], esp 00825646 33C0 xor eax, eax 00825648 55 push ebp 00825649 684D588200 push $0082584D ***** TRY | 0082564E 64FF30 push dword ptr fs:[eax] 00825651 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_008258C5(Sender : TObject); begin (* 008258C5 50 push eax 008258C6 6461 popa 008258C8 7465 jz 0082592F 008258CA 205946 and [ecx+$46], bl 008258CD 5F pop edi 008258CE 4D dec ebp 008258CF 6F outsd 008258D0 6E outsb 008258D1 65795F jns 00825933 008258D4 43 inc ebx 008258D5 52 push edx 008258D6 2000 and [eax], al 008258D8 FFFF DB $FF, $FF // 008258DA FFFF DB $FF, $FF // 008258DC 1000 adc [eax], al 008258DE 0000 add [eax], al 008258E0 205365 and [ebx+$65], dl 008258E3 7420 jz 00825905 008258E5 43 inc ebx 008258E6 6F outsd 008258E7 6D insd 008258E8 54 push esp 008258E9 61 popa 008258EA 69746F753D270000 imul esi, [edi+ebp*2+$75], $0000273D 008258F2 0000 add [eax], al 008258F4 FFFF DB $FF, $FF // 008258F6 FFFF DB $FF, $FF // 008258F8 0100 add [eax], eax 008258FA 0000 add [eax], al 008258FC 27 daa 008258FD 0000 add [eax], al 008258FF 00FF add bh, bh 00825901 FFFF DB $FF, $FF // 00825903 FF09 dec dword ptr [ecx] 00825905 0000 add [eax], al 00825907 002C4564697465 add [$65746964+eax*2], ch 0082590E 723D jb 0082594D 00825910 27 daa 00825911 0000 add [eax], al 00825913 00FF add bh, bh 00825915 FFFF DB $FF, $FF // 00825917 FF1400 call dword ptr [eax+eax] 0082591A 0000 add [eax], al 0082591C 2C45 sub al, $45 0082591E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00825927 657464 jz 0082598E 0082592A 61 popa 0082592B 7465 jz 00825992 0082592D 2829 sub [ecx], ch 0082592F 2000 and [eax], al 00825931 0000 add [eax], al 00825933 00FF add bh, bh 00825935 FFFF DB $FF, $FF // 00825937 FF0D00000020 dec dword ptr [$20000000] 0082593D 7768 jnbe 008259A7 0082593F 657265 jb 008259A7 00825942 205946 and [ecx+$46], bl 00825945 49 dec ecx 00825946 643D27000000 cmp eax, $00000027 0082594C FFFF DB $FF, $FF // 0082594E FFFF DB $FF, $FF // 00825950 0400 add al, +$00 00825952 0000 add [eax], al 00825954 59 pop ecx 00825955 46 inc esi 00825956 49 dec ecx 00825957 640000 add fs:[eax], al 0082595A 0000 add [eax], al 0082595C 55 push ebp 0082595D 8BEC mov ebp, esp 0082595F 51 push ecx 00825960 B906000000 mov ecx, $00000006 00825965 6A00 push $00 00825967 6A00 push $00 00825969 49 dec ecx 0082596A 75F9 jnz 00825965 0082596C 51 push ecx 0082596D 874DFC xchg [ebp-$04], ecx 00825970 53 push ebx 00825971 56 push esi 00825972 8BF0 mov esi, eax 00825974 33C0 xor eax, eax 00825976 55 push ebp * Possible String Reference to: ':锝脬^[嬪]' | 00825977 68B55B8200 push $00825BB5 ***** TRY | 0082597C 64FF30 push dword ptr fs:[eax] 0082597F 648920 mov fs:[eax], esp 00825982 33C0 xor eax, eax 00825984 55 push ebp 00825985 688B5B8200 push $00825B8B ***** TRY | 0082598A 64FF30 push dword ptr fs:[eax] 0082598D 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00825BFD(Sender : TObject); begin (* 00825BFD 50 push eax 00825BFE 6461 popa 00825C00 7465 jz 00825C67 00825C02 205946 and [ecx+$46], bl 00825C05 5F pop edi 00825C06 4D dec ebp 00825C07 6F outsd 00825C08 6E outsb 00825C09 65795F jns 00825C6B 00825C0C 43 inc ebx 00825C0D 52 push edx 00825C0E 2000 and [eax], al 00825C10 FFFF DB $FF, $FF // 00825C12 FFFF DB $FF, $FF // 00825C14 0D00000020 or eax, $20000000 00825C19 53 push ebx 00825C1A 657420 jz 00825C3D 00825C1D 42 inc edx 00825C1E 5A pop edx 00825C1F 54 push esp 00825C20 7970 jns 00825C92 00825C22 653D27000000 cmp eax, $00000027 00825C28 FFFF DB $FF, $FF // 00825C2A FFFF DB $FF, $FF // 00825C2C 07 pop es 00825C2D 0000 add [eax], al 00825C2F 005A64 add [edx+$64], bl 00825C32 794E jns 00825C82 00825C34 61 popa 00825C35 6D insd 00825C36 6500FF add bh, bh 00825C39 FFFF DB $FF, $FF // 00825C3B FF01 inc dword ptr [ecx] 00825C3D 0000 add [eax], al 00825C3F 0027 add [edi], ah 00825C41 0000 add [eax], al 00825C43 00FF add bh, bh 00825C45 FFFF DB $FF, $FF // 00825C47 FF09 dec dword ptr [ecx] 00825C49 0000 add [eax], al 00825C4B 002C4564697465 add [$65746964+eax*2], ch 00825C52 723D jb 00825C91 00825C54 27 daa 00825C55 0000 add [eax], al 00825C57 00FF add bh, bh 00825C59 FFFF DB $FF, $FF // 00825C5B FF1400 call dword ptr [eax+eax] 00825C5E 0000 add [eax], al 00825C60 2C45 sub al, $45 00825C62 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00825C6B 657464 jz 00825CD2 00825C6E 61 popa 00825C6F 7465 jz 00825CD6 00825C71 2829 sub [ecx], ch 00825C73 2000 and [eax], al 00825C75 0000 add [eax], al 00825C77 00FF add bh, bh 00825C79 FFFF DB $FF, $FF // 00825C7B FF0D00000020 dec dword ptr [$20000000] 00825C81 7768 jnbe 00825CEB 00825C83 657265 jb 00825CEB 00825C86 205946 and [ecx+$46], bl 00825C89 49 dec ecx 00825C8A 643D27000000 cmp eax, $00000027 00825C90 FFFF DB $FF, $FF // 00825C92 FFFF DB $FF, $FF // 00825C94 0400 add al, +$00 00825C96 0000 add [eax], al 00825C98 59 pop ecx 00825C99 46 inc esi 00825C9A 49 dec ecx 00825C9B 640000 add fs:[eax], al 00825C9E 0000 add [eax], al 00825CA0 55 push ebp 00825CA1 8BEC mov ebp, esp 00825CA3 51 push ecx 00825CA4 B906000000 mov ecx, $00000006 00825CA9 6A00 push $00 00825CAB 6A00 push $00 00825CAD 49 dec ecx 00825CAE 75F9 jnz 00825CA9 00825CB0 51 push ecx 00825CB1 874DFC xchg [ebp-$04], ecx 00825CB4 53 push ebx 00825CB5 56 push esi 00825CB6 8BF0 mov esi, eax 00825CB8 33C0 xor eax, eax 00825CBA 55 push ebp * Possible String Reference to: '轹虢脬^[嬪]' | 00825CBB 68F95E8200 push $00825EF9 ***** TRY | 00825CC0 64FF30 push dword ptr fs:[eax] 00825CC3 648920 mov fs:[eax], esp 00825CC6 33C0 xor eax, eax 00825CC8 55 push ebp 00825CC9 68CF5E8200 push $00825ECF ***** TRY | 00825CCE 64FF30 push dword ptr fs:[eax] 00825CD1 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00825F41(Sender : TObject); begin (* 00825F41 50 push eax 00825F42 6461 popa 00825F44 7465 jz 00825FAB 00825F46 205946 and [ecx+$46], bl 00825F49 5F pop edi 00825F4A 4D dec ebp 00825F4B 6F outsd 00825F4C 6E outsb 00825F4D 65795F jns 00825FAF 00825F50 43 inc ebx 00825F51 52 push edx 00825F52 2000 and [eax], al 00825F54 FFFF DB $FF, $FF // 00825F56 FFFF DB $FF, $FF // 00825F58 0D00000020 or eax, $20000000 00825F5D 53 push ebx 00825F5E 657420 jz 00825F81 00825F61 50 push eax 00825F62 5F pop edi 00825F63 53 push ebx 00825F64 7065 jo 00825FCB 00825F66 633D27000000 arpl [$00000027], di 00825F6C FFFF DB $FF, $FF // 00825F6E FFFF DB $FF, $FF // 00825F70 07 pop es 00825F71 0000 add [eax], al 00825F73 005A64 add [edx+$64], bl 00825F76 794E jns 00825FC6 00825F78 61 popa 00825F79 6D insd 00825F7A 6500FF add bh, bh 00825F7D FFFF DB $FF, $FF // 00825F7F FF01 inc dword ptr [ecx] 00825F81 0000 add [eax], al 00825F83 0027 add [edi], ah 00825F85 0000 add [eax], al 00825F87 00FF add bh, bh 00825F89 FFFF DB $FF, $FF // 00825F8B FF09 dec dword ptr [ecx] 00825F8D 0000 add [eax], al 00825F8F 002C4564697465 add [$65746964+eax*2], ch 00825F96 723D jb 00825FD5 00825F98 27 daa 00825F99 0000 add [eax], al 00825F9B 00FF add bh, bh 00825F9D FFFF DB $FF, $FF // 00825F9F FF1400 call dword ptr [eax+eax] 00825FA2 0000 add [eax], al 00825FA4 2C45 sub al, $45 00825FA6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00825FAF 657464 jz 00826016 00825FB2 61 popa 00825FB3 7465 jz 0082601A 00825FB5 2829 sub [ecx], ch 00825FB7 2000 and [eax], al 00825FB9 0000 add [eax], al 00825FBB 00FF add bh, bh 00825FBD FFFF DB $FF, $FF // 00825FBF FF0D00000020 dec dword ptr [$20000000] 00825FC5 7768 jnbe 0082602F 00825FC7 657265 jb 0082602F 00825FCA 205946 and [ecx+$46], bl 00825FCD 49 dec ecx 00825FCE 643D27000000 cmp eax, $00000027 00825FD4 FFFF DB $FF, $FF // 00825FD6 FFFF DB $FF, $FF // 00825FD8 0400 add al, +$00 00825FDA 0000 add [eax], al 00825FDC 59 pop ecx 00825FDD 46 inc esi 00825FDE 49 dec ecx 00825FDF 640000 add fs:[eax], al 00825FE2 0000 add [eax], al 00825FE4 55 push ebp 00825FE5 8BEC mov ebp, esp 00825FE7 B905000000 mov ecx, $00000005 00825FEC 6A00 push $00 00825FEE 6A00 push $00 00825FF0 49 dec ecx 00825FF1 75F9 jnz 00825FEC 00825FF3 51 push ecx 00825FF4 53 push ebx 00825FF5 56 push esi 00825FF6 8BDA mov ebx, edx 00825FF8 8BF0 mov esi, eax 00825FFA 33C0 xor eax, eax 00825FFC 55 push ebp * Possible String Reference to: '榉榻脎^[嬪]' | 00825FFD 6838618200 push $00826138 ***** TRY | 00826002 64FF30 push dword ptr fs:[eax] 00826005 648920 mov fs:[eax], esp 00826008 8D55FC lea edx, [ebp-$04] 0082600B 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; | 0082600D E8AA96D6FF call 0058F6BC * Reference to control Label11 : TLabel | 00826012 8B9E64030000 mov ebx, [esi+$0364] 00826018 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0082601A E82124CAFF call 004C8440 0082601F 8D55E8 lea edx, [ebp-$18] 00826022 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826025 E8C248BEFF call 0040A8EC 0082602A 8B55E8 mov edx, [ebp-$18] 0082602D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826030 E8932DBFFF call 00418DC8 00826035 8D45EC lea eax, [ebp-$14] 00826038 50 push eax * Possible String Reference to: 'P_CodeName' | 00826039 BA50618200 mov edx, $00826150 0082603E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826040 E86F0BCAFF call 004C6BB4 00826045 5A pop edx 00826046 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00826048 FF91B4000000 call dword ptr [ecx+$00B4] 0082604E 8BC3 mov eax, ebx 00826050 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 00826052 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00826058 8B9E0C030000 mov ebx, [esi+$030C] 0082605E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826060 E86FF8C9FF call 004C58D4 00826065 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; | 00826067 E8407FCBFF call 004DDFAC 0082606C 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0082606E FF5244 call dword ptr [edx+$44] 00826071 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; | 00826073 E8347FCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826078 BA64618200 mov edx, $00826164 0082607D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082607F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_CodeName='' | 00826082 6880618200 push $00826180 00826087 8D55E0 lea edx, [ebp-$20] 0082608A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082608D E85A48BEFF call 0040A8EC 00826092 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826095 689C618200 push $0082619C 0082609A 8D45E4 lea eax, [ebp-$1C] 0082609D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008260A2 E80DF6BDFF call 004056B4 008260A7 8B45E4 mov eax, [ebp-$1C] 008260AA 50 push eax 008260AB 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; | 008260AD E8FA7ECBFF call 004DDFAC 008260B2 5A pop edx 008260B3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008260B5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 008260B8 68A8618200 push $008261A8 * Possible String Reference to: 'YFId' | 008260BD BAC0618200 mov edx, $008261C0 * Reference to control Label11 : TLabel | 008260C2 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008260C8 E8E70ACAFF call 004C6BB4 008260CD 8D55D4 lea edx, [ebp-$2C] 008260D0 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008260D2 FF5160 call dword ptr [ecx+$60] 008260D5 8B45D4 mov eax, [ebp-$2C] 008260D8 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008260DB E80C48BEFF call 0040A8EC 008260E0 FF75D8 push dword ptr [ebp-$28] 008260E3 68D0618200 push $008261D0 008260E8 8D45DC lea eax, [ebp-$24] 008260EB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008260F0 E8BFF5BDFF call 004056B4 008260F5 8B45DC mov eax, [ebp-$24] 008260F8 50 push eax 008260F9 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; | 008260FB E8AC7ECBFF call 004DDFAC 00826100 5A pop edx 00826101 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00826103 FF5138 call dword ptr [ecx+$38] 00826106 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00826108 E8C77DCBFF call 004DDED4 0082610D 33C0 xor eax, eax 0082610F 5A pop edx 00826110 59 pop ecx 00826111 59 pop ecx 00826112 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 00826115 683F618200 push $0082613F 0082611A 8D45D4 lea eax, [ebp-$2C] 0082611D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00826122 E821F2BDFF call 00405348 00826127 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0082612A E845E5BEFF call 00414674 0082612F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00826132 E8EDF1BDFF call 00405324 00826137 C3 ret *) end; procedure TfrmYFFP._PROC_00826165(Sender : TObject); begin (* 00826165 50 push eax 00826166 6461 popa 00826168 7465 jz 008261CF 0082616A 205946 and [ecx+$46], bl 0082616D 5F pop edi 0082616E 4D dec ebp 0082616F 6F outsd 00826170 6E outsb 00826171 65795F jns 008261D3 00826174 43 inc ebx 00826175 52 push edx 00826176 2000 and [eax], al 00826178 FFFF DB $FF, $FF // 0082617A FFFF DB $FF, $FF // 0082617C 1100 adc [eax], eax 0082617E 0000 add [eax], al 00826180 205365 and [ebx+$65], dl 00826183 7420 jz 008261A5 00826185 50 push eax 00826186 5F pop edi 00826187 43 inc ebx 00826188 6F outsd 00826189 64654E dec esi 0082618C 61 popa 0082618D 6D insd 0082618E 653D27000000 cmp eax, $00000027 00826194 FFFF DB $FF, $FF // 00826196 FFFF DB $FF, $FF // 00826198 0200 add al, byte ptr [eax] 0082619A 0000 add [eax], al 0082619C 27 daa 0082619D 2000 and [eax], al 0082619F 00FF add bh, bh 008261A1 FFFF DB $FF, $FF // 008261A3 FF0D00000020 dec dword ptr [$20000000] 008261A9 7768 jnbe 00826213 008261AB 657265 jb 00826213 008261AE 205946 and [ecx+$46], bl 008261B1 49 dec ecx 008261B2 643D27000000 cmp eax, $00000027 008261B8 FFFF DB $FF, $FF // 008261BA FFFF DB $FF, $FF // 008261BC 0400 add al, +$00 008261BE 0000 add [eax], al 008261C0 59 pop ecx 008261C1 46 inc esi 008261C2 49 dec ecx 008261C3 640000 add fs:[eax], al 008261C6 0000 add [eax], al 008261C8 FFFF DB $FF, $FF // 008261CA FFFF DB $FF, $FF // 008261CC 0100 add [eax], eax 008261CE 0000 add [eax], al 008261D0 27 daa 008261D1 0000 add [eax], al 008261D3 00558B add [ebp-$75], dl 008261D6 EC in al, dx 008261D7 B905000000 mov ecx, $00000005 008261DC 6A00 push $00 008261DE 6A00 push $00 008261E0 49 dec ecx 008261E1 75F9 jnz 008261DC 008261E3 51 push ecx 008261E4 53 push ebx 008261E5 56 push esi 008261E6 8BDA mov ebx, edx 008261E8 8BF0 mov esi, eax 008261EA 33C0 xor eax, eax 008261EC 55 push ebp * Possible String Reference to: '榍缃脎^[嬪]' | 008261ED 6828638200 push $00826328 ***** TRY | 008261F2 64FF30 push dword ptr fs:[eax] 008261F5 648920 mov fs:[eax], esp 008261F8 8D55FC lea edx, [ebp-$04] 008261FB 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; | 008261FD E8BA94D6FF call 0058F6BC * Reference to control Label11 : TLabel | 00826202 8B9E64030000 mov ebx, [esi+$0364] 00826208 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0082620A E83122CAFF call 004C8440 0082620F 8D55E8 lea edx, [ebp-$18] 00826212 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826215 E8D246BEFF call 0040A8EC 0082621A 8B55E8 mov edx, [ebp-$18] 0082621D 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826220 E8A32BBFFF call 00418DC8 00826225 8D45EC lea eax, [ebp-$14] 00826228 50 push eax * Possible String Reference to: 'P_Spec' | 00826229 BA40638200 mov edx, $00826340 0082622E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826230 E87F09CAFF call 004C6BB4 00826235 5A pop edx 00826236 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00826238 FF91B4000000 call dword ptr [ecx+$00B4] 0082623E 8BC3 mov eax, ebx 00826240 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 00826242 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00826248 8B9E0C030000 mov ebx, [esi+$030C] 0082624E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826250 E87FF6C9FF call 004C58D4 00826255 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; | 00826257 E8507DCBFF call 004DDFAC 0082625C 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0082625E FF5244 call dword ptr [edx+$44] 00826261 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; | 00826263 E8447DCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826268 BA50638200 mov edx, $00826350 0082626D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082626F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set P_Spec='' | 00826272 686C638200 push $0082636C 00826277 8D55E0 lea edx, [ebp-$20] 0082627A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082627D E86A46BEFF call 0040A8EC 00826282 FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826285 6884638200 push $00826384 0082628A 8D45E4 lea eax, [ebp-$1C] 0082628D BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00826292 E81DF4BDFF call 004056B4 00826297 8B45E4 mov eax, [ebp-$1C] 0082629A 50 push eax 0082629B 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; | 0082629D E80A7DCBFF call 004DDFAC 008262A2 5A pop edx 008262A3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008262A5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 008262A8 6890638200 push $00826390 * Possible String Reference to: 'YFId' | 008262AD BAA8638200 mov edx, $008263A8 * Reference to control Label11 : TLabel | 008262B2 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008262B8 E8F708CAFF call 004C6BB4 008262BD 8D55D4 lea edx, [ebp-$2C] 008262C0 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008262C2 FF5160 call dword ptr [ecx+$60] 008262C5 8B45D4 mov eax, [ebp-$2C] 008262C8 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008262CB E81C46BEFF call 0040A8EC 008262D0 FF75D8 push dword ptr [ebp-$28] 008262D3 68B8638200 push $008263B8 008262D8 8D45DC lea eax, [ebp-$24] 008262DB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008262E0 E8CFF3BDFF call 004056B4 008262E5 8B45DC mov eax, [ebp-$24] 008262E8 50 push eax 008262E9 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; | 008262EB E8BC7CCBFF call 004DDFAC 008262F0 5A pop edx 008262F1 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008262F3 FF5138 call dword ptr [ecx+$38] 008262F6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008262F8 E8D77BCBFF call 004DDED4 008262FD 33C0 xor eax, eax 008262FF 5A pop edx 00826300 59 pop ecx 00826301 59 pop ecx 00826302 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 00826305 682F638200 push $0082632F 0082630A 8D45D4 lea eax, [ebp-$2C] 0082630D BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00826312 E831F0BDFF call 00405348 00826317 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0082631A E855E3BEFF call 00414674 0082631F 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00826322 E8FDEFBDFF call 00405324 00826327 C3 ret *) end; procedure TfrmYFFP._PROC_00826351(Sender : TObject); begin (* 00826351 50 push eax 00826352 6461 popa 00826354 7465 jz 008263BB 00826356 205946 and [ecx+$46], bl 00826359 5F pop edi 0082635A 4D dec ebp 0082635B 6F outsd 0082635C 6E outsb 0082635D 65795F jns 008263BF 00826360 43 inc ebx 00826361 52 push edx 00826362 2000 and [eax], al 00826364 FFFF DB $FF, $FF // 00826366 FFFF DB $FF, $FF // 00826368 0D00000020 or eax, $20000000 0082636D 53 push ebx 0082636E 657420 jz 00826391 00826371 50 push eax 00826372 5F pop edi 00826373 53 push ebx 00826374 7065 jo 008263DB 00826376 633D27000000 arpl [$00000027], di 0082637C FFFF DB $FF, $FF // 0082637E FFFF DB $FF, $FF // 00826380 0200 add al, byte ptr [eax] 00826382 0000 add [eax], al 00826384 27 daa 00826385 2000 and [eax], al 00826387 00FF add bh, bh 00826389 FFFF DB $FF, $FF // 0082638B FF0D00000020 dec dword ptr [$20000000] 00826391 7768 jnbe 008263FB 00826393 657265 jb 008263FB 00826396 205946 and [ecx+$46], bl 00826399 49 dec ecx 0082639A 643D27000000 cmp eax, $00000027 008263A0 FFFF DB $FF, $FF // 008263A2 FFFF DB $FF, $FF // 008263A4 0400 add al, +$00 008263A6 0000 add [eax], al 008263A8 59 pop ecx 008263A9 46 inc esi 008263AA 49 dec ecx 008263AB 640000 add fs:[eax], al 008263AE 0000 add [eax], al 008263B0 FFFF DB $FF, $FF // 008263B2 FFFF DB $FF, $FF // 008263B4 0100 add [eax], eax 008263B6 0000 add [eax], al 008263B8 27 daa 008263B9 0000 add [eax], al 008263BB 00558B add [ebp-$75], dl 008263BE EC in al, dx 008263BF B905000000 mov ecx, $00000005 008263C4 6A00 push $00 008263C6 6A00 push $00 008263C8 49 dec ecx 008263C9 75F9 jnz 008263C4 008263CB 51 push ecx 008263CC 53 push ebx 008263CD 56 push esi 008263CE 8BDA mov ebx, edx 008263D0 8BF0 mov esi, eax 008263D2 33C0 xor eax, eax 008263D4 55 push ebp * Possible String Reference to: '檫褰脎^[嬪]' | 008263D5 6810658200 push $00826510 ***** TRY | 008263DA 64FF30 push dword ptr fs:[eax] 008263DD 648920 mov fs:[eax], esp 008263E0 8D55FC lea edx, [ebp-$04] 008263E3 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; | 008263E5 E8D292D6FF call 0058F6BC * Reference to control Label11 : TLabel | 008263EA 8B9E64030000 mov ebx, [esi+$0364] 008263F0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008263F2 E84920CAFF call 004C8440 008263F7 8D55E8 lea edx, [ebp-$18] 008263FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008263FD E8EA44BEFF call 0040A8EC 00826402 8B55E8 mov edx, [ebp-$18] 00826405 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00826408 E8BB29BFFF call 00418DC8 0082640D 8D45EC lea eax, [ebp-$14] 00826410 50 push eax * Possible String Reference to: 'KPNO' | 00826411 BA28658200 mov edx, $00826528 00826416 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826418 E89707CAFF call 004C6BB4 0082641D 5A pop edx 0082641E 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00826420 FF91B4000000 call dword ptr [ecx+$00B4] 00826426 8BC3 mov eax, ebx 00826428 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 0082642A FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00826430 8B9E0C030000 mov ebx, [esi+$030C] 00826436 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00826438 E897F4C9FF call 004C58D4 0082643D 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; | 0082643F E8687BCBFF call 004DDFAC 00826444 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00826446 FF5244 call dword ptr [edx+$44] 00826449 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; | 0082644B E85C7BCBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826450 BA38658200 mov edx, $00826538 00826455 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00826457 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPNO='' | 0082645A 6854658200 push $00826554 0082645F 8D55E0 lea edx, [ebp-$20] 00826462 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826465 E88244BEFF call 0040A8EC 0082646A FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 0082646D 6868658200 push $00826568 00826472 8D45E4 lea eax, [ebp-$1C] 00826475 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0082647A E835F2BDFF call 004056B4 0082647F 8B45E4 mov eax, [ebp-$1C] 00826482 50 push eax 00826483 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; | 00826485 E8227BCBFF call 004DDFAC 0082648A 5A pop edx 0082648B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082648D FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00826490 6874658200 push $00826574 * Possible String Reference to: 'YFId' | 00826495 BA8C658200 mov edx, $0082658C * Reference to control Label11 : TLabel | 0082649A 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008264A0 E80F07CAFF call 004C6BB4 008264A5 8D55D4 lea edx, [ebp-$2C] 008264A8 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008264AA FF5160 call dword ptr [ecx+$60] 008264AD 8B45D4 mov eax, [ebp-$2C] 008264B0 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008264B3 E83444BEFF call 0040A8EC 008264B8 FF75D8 push dword ptr [ebp-$28] 008264BB 689C658200 push $0082659C 008264C0 8D45DC lea eax, [ebp-$24] 008264C3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008264C8 E8E7F1BDFF call 004056B4 008264CD 8B45DC mov eax, [ebp-$24] 008264D0 50 push eax 008264D1 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; | 008264D3 E8D47ACBFF call 004DDFAC 008264D8 5A pop edx 008264D9 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008264DB FF5138 call dword ptr [ecx+$38] 008264DE 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008264E0 E8EF79CBFF call 004DDED4 008264E5 33C0 xor eax, eax 008264E7 5A pop edx 008264E8 59 pop ecx 008264E9 59 pop ecx 008264EA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 008264ED 6817658200 push $00826517 008264F2 8D45D4 lea eax, [ebp-$2C] 008264F5 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008264FA E849EEBDFF call 00405348 008264FF 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00826502 E86DE1BEFF call 00414674 00826507 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 0082650A E815EEBDFF call 00405324 0082650F C3 ret *) end; procedure TfrmYFFP._PROC_00826539(Sender : TObject); begin (* 00826539 50 push eax 0082653A 6461 popa 0082653C 7465 jz 008265A3 0082653E 205946 and [ecx+$46], bl 00826541 5F pop edi 00826542 4D dec ebp 00826543 6F outsd 00826544 6E outsb 00826545 65795F jns 008265A7 00826548 43 inc ebx 00826549 52 push edx 0082654A 2000 and [eax], al 0082654C FFFF DB $FF, $FF // 0082654E FFFF DB $FF, $FF // 00826550 0B00 or eax, [eax] 00826552 0000 add [eax], al 00826554 205365 and [ebx+$65], dl 00826557 7420 jz 00826579 00826559 4B dec ebx 0082655A 50 push eax 0082655B 4E dec esi 0082655C 4F dec edi 0082655D 3D2700FFFF cmp eax, $FFFF0027 00826562 FFFF DB $FF, $FF // 00826564 0200 add al, byte ptr [eax] 00826566 0000 add [eax], al 00826568 27 daa 00826569 2000 and [eax], al 0082656B 00FF add bh, bh 0082656D FFFF DB $FF, $FF // 0082656F FF0D00000020 dec dword ptr [$20000000] 00826575 7768 jnbe 008265DF 00826577 657265 jb 008265DF 0082657A 205946 and [ecx+$46], bl 0082657D 49 dec ecx 0082657E 643D27000000 cmp eax, $00000027 00826584 FFFF DB $FF, $FF // 00826586 FFFF DB $FF, $FF // 00826588 0400 add al, +$00 0082658A 0000 add [eax], al 0082658C 59 pop ecx 0082658D 46 inc esi 0082658E 49 dec ecx 0082658F 640000 add fs:[eax], al 00826592 0000 add [eax], al 00826594 FFFF DB $FF, $FF // 00826596 FFFF DB $FF, $FF // 00826598 0100 add [eax], eax 0082659A 0000 add [eax], al 0082659C 27 daa 0082659D 0000 add [eax], al 0082659F 00558B add [ebp-$75], dl 008265A2 EC in al, dx 008265A3 B905000000 mov ecx, $00000005 008265A8 6A00 push $00 008265AA 6A00 push $00 008265AC 49 dec ecx 008265AD 75F9 jnz 008265A8 008265AF 51 push ecx 008265B0 53 push ebx 008265B1 56 push esi 008265B2 8BDA mov ebx, edx 008265B4 8BF0 mov esi, eax 008265B6 33C0 xor eax, eax 008265B8 55 push ebp * Possible String Reference to: '辂憬脎^[嬪]' | 008265B9 68F4668200 push $008266F4 ***** TRY | 008265BE 64FF30 push dword ptr fs:[eax] 008265C1 648920 mov fs:[eax], esp 008265C4 8D55FC lea edx, [ebp-$04] 008265C7 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; | 008265C9 E8EE90D6FF call 0058F6BC * Reference to control Label11 : TLabel | 008265CE 8B9E64030000 mov ebx, [esi+$0364] 008265D4 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008265D6 E8651ECAFF call 004C8440 008265DB 8D55E8 lea edx, [ebp-$18] 008265DE 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008265E1 E80643BEFF call 0040A8EC 008265E6 8B55E8 mov edx, [ebp-$18] 008265E9 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008265EC E8D727BFFF call 00418DC8 008265F1 8D45EC lea eax, [ebp-$14] 008265F4 50 push eax * Possible String Reference to: 'KPDMNo' | 008265F5 BA0C678200 mov edx, $0082670C 008265FA 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008265FC E8B305CAFF call 004C6BB4 00826601 5A pop edx 00826602 8B08 mov ecx, [eax] * Possible reference to virtual method TLabel.OFFS_00B4 | 00826604 FF91B4000000 call dword ptr [ecx+$00B4] 0082660A 8BC3 mov eax, ebx 0082660C 8B10 mov edx, [eax] * Possible reference to virtual method TLabel.OFFS_024C | 0082660E FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00826614 8B9E0C030000 mov ebx, [esi+$030C] 0082661A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0082661C E8B3F2C9FF call 004C58D4 00826621 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; | 00826623 E88479CBFF call 004DDFAC 00826628 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0082662A FF5244 call dword ptr [edx+$44] 0082662D 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; | 0082662F E87879CBFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00826634 BA1C678200 mov edx, $0082671C 00826639 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0082663B FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set KPDMNo='' | 0082663E 6838678200 push $00826738 00826643 8D55E0 lea edx, [ebp-$20] 00826646 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826649 E89E42BEFF call 0040A8EC 0082664E FF75E0 push dword ptr [ebp-$20] * Possible String Reference to: '' ' | 00826651 6850678200 push $00826750 00826656 8D45E4 lea eax, [ebp-$1C] 00826659 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0082665E E851F0BDFF call 004056B4 00826663 8B45E4 mov eax, [ebp-$1C] 00826666 50 push eax 00826667 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; | 00826669 E83E79CBFF call 004DDFAC 0082666E 5A pop edx 0082666F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00826671 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00826674 685C678200 push $0082675C * Possible String Reference to: 'YFId' | 00826679 BA74678200 mov edx, $00826774 * Reference to control Label11 : TLabel | 0082667E 8B8664030000 mov eax, [esi+$0364] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00826684 E82B05CAFF call 004C6BB4 00826689 8D55D4 lea edx, [ebp-$2C] 0082668C 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 0082668E FF5160 call dword ptr [ecx+$60] 00826691 8B45D4 mov eax, [ebp-$2C] 00826694 8D55D8 lea edx, [ebp-$28] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826697 E85042BEFF call 0040A8EC 0082669C FF75D8 push dword ptr [ebp-$28] 0082669F 6884678200 push $00826784 008266A4 8D45DC lea eax, [ebp-$24] 008266A7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008266AC E803F0BDFF call 004056B4 008266B1 8B45DC mov eax, [ebp-$24] 008266B4 50 push eax 008266B5 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; | 008266B7 E8F078CBFF call 004DDFAC 008266BC 5A pop edx 008266BD 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008266BF FF5138 call dword ptr [ecx+$38] 008266C2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008266C4 E80B78CBFF call 004DDED4 008266C9 33C0 xor eax, eax 008266CB 5A pop edx 008266CC 59 pop ecx 008266CD 59 pop ecx 008266CE 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[嬪]' | 008266D1 68FB668200 push $008266FB 008266D6 8D45D4 lea eax, [ebp-$2C] 008266D9 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008266DE E865ECBDFF call 00405348 008266E3 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 008266E6 E889DFBEFF call 00414674 008266EB 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 008266EE E831ECBDFF call 00405324 008266F3 C3 ret *) end; procedure TfrmYFFP._PROC_0082671D(Sender : TObject); begin (* 0082671D 50 push eax 0082671E 6461 popa 00826720 7465 jz 00826787 00826722 205946 and [ecx+$46], bl 00826725 5F pop edi 00826726 4D dec ebp 00826727 6F outsd 00826728 6E outsb 00826729 65795F jns 0082678B 0082672C 43 inc ebx 0082672D 52 push edx 0082672E 2000 and [eax], al 00826730 FFFF DB $FF, $FF // 00826732 FFFF DB $FF, $FF // 00826734 0D00000020 or eax, $20000000 00826739 53 push ebx 0082673A 657420 jz 0082675D 0082673D 4B dec ebx 0082673E 50 push eax 0082673F 44 inc esp 00826740 4D dec ebp 00826741 4E dec esi 00826742 6F outsd 00826743 3D27000000 cmp eax, $00000027 00826748 FFFF DB $FF, $FF // 0082674A FFFF DB $FF, $FF // 0082674C 0200 add al, byte ptr [eax] 0082674E 0000 add [eax], al 00826750 27 daa 00826751 2000 and [eax], al 00826753 00FF add bh, bh 00826755 FFFF DB $FF, $FF // 00826757 FF0D00000020 dec dword ptr [$20000000] 0082675D 7768 jnbe 008267C7 0082675F 657265 jb 008267C7 00826762 205946 and [ecx+$46], bl 00826765 49 dec ecx 00826766 643D27000000 cmp eax, $00000027 0082676C FFFF DB $FF, $FF // 0082676E FFFF DB $FF, $FF // 00826770 0400 add al, +$00 00826772 0000 add [eax], al 00826774 59 pop ecx 00826775 46 inc esi 00826776 49 dec ecx 00826777 640000 add fs:[eax], al 0082677A 0000 add [eax], al 0082677C FFFF DB $FF, $FF // 0082677E FFFF DB $FF, $FF // 00826780 0100 add [eax], eax 00826782 0000 add [eax], al 00826784 27 daa 00826785 0000 add [eax], al 00826787 00558B add [ebp-$75], dl 0082678A EC in al, dx 0082678B 6A00 push $00 0082678D 6A00 push $00 0082678F 6A00 push $00 00826791 6A00 push $00 00826793 53 push ebx 00826794 8945FC mov [ebp-$04], eax 00826797 33C0 xor eax, eax 00826799 55 push ebp 0082679A 68F4688200 push $008268F4 ***** TRY | 0082679F 64FF30 push dword ptr fs:[eax] 008267A2 648920 mov fs:[eax], esp 008267A5 33C0 xor eax, eax 008267A7 55 push ebp 008267A8 68CA688200 push $008268CA ***** TRY | 008267AD 64FF30 push dword ptr fs:[eax] 008267B0 648920 mov fs:[eax], esp 008267B3 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008267B6 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 008267BC E8930DCAFF call 004C7554 008267C1 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008267C4 8B9820030000 mov ebx, [eax+$0320] 008267CA 33D2 xor edx, edx 008267CC 8BC3 mov eax, ebx 008267CE 8B08 mov ecx, [eax] * Possible reference to virtual method TToolButton.OFFS_0190 | 008267D0 FF9190010000 call dword ptr [ecx+$0190] 008267D6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008267D8 E8F7F0C9FF call 004C58D4 008267DD 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008267DF E8C877CBFF call 004DDFAC 008267E4 8B10 mov edx, [eax] * Reference to method TToolButton.GetClientRect() | 008267E6 FF5244 call dword ptr [edx+$44] 008267E9 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008267EB E8BC77CBFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 008267F0 BA08698200 mov edx, $00826908 008267F5 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 008267F7 FF5138 call dword ptr [ecx+$38] 008267FA 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008267FC E8AB77CBFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00826801 BA28698200 mov edx, $00826928 00826806 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00826808 FF5138 call dword ptr [ecx+$38] 0082680B 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0082680D E89A77CBFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00826812 BA48698200 mov edx, $00826948 00826817 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00826819 FF5138 call dword ptr [ecx+$38] 0082681C 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0082681E E88977CBFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId ' | 00826823 BA7C698200 mov edx, $0082697C 00826828 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 0082682A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where A.KPNO='%' | 0082682D 68B4698200 push $008269B4 00826832 8D55F0 lea edx, [ebp-$10] 00826835 8B45FC mov eax, [ebp-$04] * Reference to control Label1 : TLabel | 00826838 8B80A0030000 mov eax, [eax+$03A0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 0082683E E8AD1DC6FF call 004885F0 00826843 8B45F0 mov eax, [ebp-$10] 00826846 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00826849 E89E40BEFF call 0040A8EC 0082684E FF75F4 push dword ptr [ebp-$0C] 00826851 68CC698200 push $008269CC * Possible String Reference to: '' and A.CRType='应付款发票登记' ' | 00826856 68D8698200 push $008269D8 0082685B 8D45F8 lea eax, [ebp-$08] 0082685E BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00826863 E84CEEBDFF call 004056B4 00826868 8B45F8 mov eax, [ebp-$08] 0082686B 50 push eax 0082686C 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0082686E E83977CBFF call 004DDFAC 00826873 5A pop edx 00826874 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00826876 FF5138 call dword ptr [ecx+$38] 00826879 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 0082687B E848F0C9FF call 004C58C8 00826880 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : TLabel | 00826883 8B9064030000 mov edx, [eax+$0364] 00826889 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 0082688C 8B8020030000 mov eax, [eax+$0320] | 00826892 E8F905F9FF call 007B6E90 00826897 8B45FC mov eax, [ebp-$04] * Reference to control Label11 : TLabel | 0082689A 8B9064030000 mov edx, [eax+$0364] 008268A0 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008268A3 8B8020030000 mov eax, [eax+$0320] | 008268A9 E86A07F9FF call 007B7018 008268AE 33C0 xor eax, eax 008268B0 5A pop edx 008268B1 59 pop ecx 008268B2 59 pop ecx 008268B3 648910 mov fs:[eax], edx ****** FINALLY | 008268B6 68D1688200 push $008268D1 008268BB 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008268BE 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 008268C4 E8AB0CCAFF call 004C7574 008268C9 C3 ret * Reference to: System.@HandleFinally; | 008268CA E925E2BDFF jmp 00404AF4 008268CF EBEA jmp 008268BB ****** END | 008268D1 33C0 xor eax, eax 008268D3 5A pop edx 008268D4 59 pop ecx 008268D5 59 pop ecx 008268D6 648910 mov fs:[eax], edx ****** FINALLY | 008268D9 68FB688200 push $008268FB 008268DE 8D45F0 lea eax, [ebp-$10] * Reference to: System.@LStrClr(void;void); | 008268E1 E83EEABDFF call 00405324 008268E6 8D45F4 lea eax, [ebp-$0C] 008268E9 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008268EE E855EABDFF call 00405348 008268F3 C3 ret *) end; procedure TfrmYFFP._PROC_00826D2D(Sender : TObject); begin (* 00826D2D 50 push eax 00826D2E 6461 popa 00826D30 7465 jz 00826D97 00826D32 205946 and [ecx+$46], bl 00826D35 5F pop edi 00826D36 4D dec ebp 00826D37 6F outsd 00826D38 6E outsb 00826D39 65795F jns 00826D9B 00826D3C 43 inc ebx 00826D3D 52 push edx 00826D3E 2000 and [eax], al 00826D40 FFFF DB $FF, $FF // 00826D42 FFFF DB $FF, $FF // 00826D44 0F0000 sldt word ptr [eax] 00826D47 0020 add [eax], ah 00826D49 53 push ebx 00826D4A 657420 jz 00826D6D 00826D4D 46 inc esi 00826D4E 4B dec ebx 00826D4F 54 push esp 00826D50 61 popa 00826D51 69746F753D2700FF imul esi, [edi+ebp*2+$75], $FF00273D 00826D59 FFFF DB $FF, $FF // 00826D5B FF01 inc dword ptr [ecx] 00826D5D 0000 add [eax], al 00826D5F 0027 add [edi], ah 00826D61 0000 add [eax], al 00826D63 00FF add bh, bh 00826D65 FFFF DB $FF, $FF // 00826D67 FF09 dec dword ptr [ecx] 00826D69 0000 add [eax], al 00826D6B 002C4564697465 add [$65746964+eax*2], ch 00826D72 723D jb 00826DB1 00826D74 27 daa 00826D75 0000 add [eax], al 00826D77 00FF add bh, bh 00826D79 FFFF DB $FF, $FF // 00826D7B FF1400 call dword ptr [eax+eax] 00826D7E 0000 add [eax], al 00826D80 2C45 sub al, $45 00826D82 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00826D8B 657464 jz 00826DF2 00826D8E 61 popa 00826D8F 7465 jz 00826DF6 00826D91 2829 sub [ecx], ch 00826D93 2000 and [eax], al 00826D95 0000 add [eax], al 00826D97 00FF add bh, bh 00826D99 FFFF DB $FF, $FF // 00826D9B FF0D00000020 dec dword ptr [$20000000] 00826DA1 7768 jnbe 00826E0B 00826DA3 657265 jb 00826E0B 00826DA6 205946 and [ecx+$46], bl 00826DA9 49 dec ecx 00826DAA 643D27000000 cmp eax, $00000027 00826DB0 FFFF DB $FF, $FF // 00826DB2 FFFF DB $FF, $FF // 00826DB4 0400 add al, +$00 00826DB6 0000 add [eax], al 00826DB8 59 pop ecx 00826DB9 46 inc esi 00826DBA 49 dec ecx 00826DBB 640000 add fs:[eax], al 00826DBE 0000 add [eax], al 00826DC0 55 push ebp 00826DC1 8BEC mov ebp, esp 00826DC3 51 push ecx 00826DC4 B907000000 mov ecx, $00000007 00826DC9 6A00 push $00 00826DCB 6A00 push $00 00826DCD 49 dec ecx 00826DCE 75F9 jnz 00826DC9 00826DD0 874DFC xchg [ebp-$04], ecx 00826DD3 53 push ebx 00826DD4 56 push esi 00826DD5 8BF0 mov esi, eax 00826DD7 33C0 xor eax, eax 00826DD9 55 push ebp * Possible String Reference to: '椹诮脎^[嬪]' | 00826DDA 6846708200 push $00827046 ***** TRY | 00826DDF 64FF30 push dword ptr fs:[eax] 00826DE2 648920 mov fs:[eax], esp 00826DE5 33C0 xor eax, eax 00826DE7 55 push ebp 00826DE8 6814708200 push $00827014 ***** TRY | 00826DED 64FF30 push dword ptr fs:[eax] 00826DF0 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_008270A1(Sender : TObject); begin (* 008270A1 50 push eax 008270A2 6461 popa 008270A4 7465 jz 0082710B 008270A6 205946 and [ecx+$46], bl 008270A9 5F pop edi 008270AA 4D dec ebp 008270AB 6F outsd 008270AC 6E outsb 008270AD 65795F jns 0082710F 008270B0 43 inc ebx 008270B1 52 push edx 008270B2 2000 and [eax], al 008270B4 FFFF DB $FF, $FF // 008270B6 FFFF DB $FF, $FF // 008270B8 0D00000020 or eax, $20000000 008270BD 53 push ebx 008270BE 657420 jz 008270E1 008270C1 59 pop ecx 008270C2 46 inc esi 008270C3 4E dec esi 008270C4 61 popa 008270C5 6D insd 008270C6 653D27000000 cmp eax, $00000027 008270CC FFFF DB $FF, $FF // 008270CE FFFF DB $FF, $FF // 008270D0 0100 add [eax], eax 008270D2 0000 add [eax], al 008270D4 27 daa 008270D5 0000 add [eax], al 008270D7 00FF add bh, bh 008270D9 FFFF DB $FF, $FF // 008270DB FF09 dec dword ptr [ecx] 008270DD 0000 add [eax], al 008270DF 002C4564697465 add [$65746964+eax*2], ch 008270E6 723D jb 00827125 008270E8 27 daa 008270E9 0000 add [eax], al 008270EB 00FF add bh, bh 008270ED FFFF DB $FF, $FF // 008270EF FF1400 call dword ptr [eax+eax] 008270F2 0000 add [eax], al 008270F4 2C45 sub al, $45 008270F6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008270FF 657464 jz 00827166 00827102 61 popa 00827103 7465 jz 0082716A 00827105 2829 sub [ecx], ch 00827107 2000 and [eax], al 00827109 0000 add [eax], al 0082710B 00FF add bh, bh 0082710D FFFF DB $FF, $FF // 0082710F FF0D00000020 dec dword ptr [$20000000] 00827115 7768 jnbe 0082717F 00827117 657265 jb 0082717F 0082711A 205946 and [ecx+$46], bl 0082711D 49 dec ecx 0082711E 643D27000000 cmp eax, $00000027 00827124 FFFF DB $FF, $FF // 00827126 FFFF DB $FF, $FF // 00827128 0400 add al, +$00 0082712A 0000 add [eax], al 0082712C 59 pop ecx 0082712D 46 inc esi 0082712E 49 dec ecx 0082712F 640000 add fs:[eax], al 00827132 0000 add [eax], al 00827134 55 push ebp 00827135 8BEC mov ebp, esp 00827137 51 push ecx 00827138 B907000000 mov ecx, $00000007 0082713D 6A00 push $00 0082713F 6A00 push $00 00827141 49 dec ecx 00827142 75F9 jnz 0082713D 00827144 874DFC xchg [ebp-$04], ecx 00827147 53 push ebx 00827148 56 push esi 00827149 8BF0 mov esi, eax 0082714B 33C0 xor eax, eax 0082714D 55 push ebp * Possible String Reference to: '5捉脎^[嬪]' | 0082714E 68BA738200 push $008273BA ***** TRY | 00827153 64FF30 push dword ptr fs:[eax] 00827156 648920 mov fs:[eax], esp 00827159 33C0 xor eax, eax 0082715B 55 push ebp 0082715C 6888738200 push $00827388 ***** TRY | 00827161 64FF30 push dword ptr fs:[eax] 00827164 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00827419(Sender : TObject); begin (* 00827419 50 push eax 0082741A 6461 popa 0082741C 7465 jz 00827483 0082741E 205946 and [ecx+$46], bl 00827421 5F pop edi 00827422 4D dec ebp 00827423 6F outsd 00827424 6E outsb 00827425 65795F jns 00827487 00827428 43 inc ebx 00827429 52 push edx 0082742A 2000 and [eax], al 0082742C FFFF DB $FF, $FF // 0082742E FFFF DB $FF, $FF // 00827430 0F0000 sldt word ptr [eax] 00827433 0020 add [eax], ah 00827435 53 push ebx 00827436 657420 jz 00827459 00827439 4B dec ebx 0082743A 50 push eax 0082743B 53 push ebx 0082743C 7461 jz 0082749F 0082743E 7475 jz 008274B5 00827440 733D jnb 0082747F 00827442 27 daa 00827443 00FF add bh, bh 00827445 FFFF DB $FF, $FF // 00827447 FF01 inc dword ptr [ecx] 00827449 0000 add [eax], al 0082744B 0027 add [edi], ah 0082744D 0000 add [eax], al 0082744F 00FF add bh, bh 00827451 FFFF DB $FF, $FF // 00827453 FF09 dec dword ptr [ecx] 00827455 0000 add [eax], al 00827457 002C4564697465 add [$65746964+eax*2], ch 0082745E 723D jb 0082749D 00827460 27 daa 00827461 0000 add [eax], al 00827463 00FF add bh, bh 00827465 FFFF DB $FF, $FF // 00827467 FF1400 call dword ptr [eax+eax] 0082746A 0000 add [eax], al 0082746C 2C45 sub al, $45 0082746E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00827477 657464 jz 008274DE 0082747A 61 popa 0082747B 7465 jz 008274E2 0082747D 2829 sub [ecx], ch 0082747F 2000 and [eax], al 00827481 0000 add [eax], al 00827483 00FF add bh, bh 00827485 FFFF DB $FF, $FF // 00827487 FF0D00000020 dec dword ptr [$20000000] 0082748D 7768 jnbe 008274F7 0082748F 657265 jb 008274F7 00827492 205946 and [ecx+$46], bl 00827495 49 dec ecx 00827496 643D27000000 cmp eax, $00000027 0082749C FFFF DB $FF, $FF // 0082749E FFFF DB $FF, $FF // 008274A0 0400 add al, +$00 008274A2 0000 add [eax], al 008274A4 59 pop ecx 008274A5 46 inc esi 008274A6 49 dec ecx 008274A7 640000 add fs:[eax], al 008274AA 0000 add [eax], al 008274AC 55 push ebp 008274AD 8BEC mov ebp, esp 008274AF 51 push ecx 008274B0 B906000000 mov ecx, $00000006 008274B5 6A00 push $00 008274B7 6A00 push $00 008274B9 49 dec ecx 008274BA 75F9 jnz 008274B5 008274BC 51 push ecx 008274BD 874DFC xchg [ebp-$04], ecx 008274C0 53 push ebx 008274C1 56 push esi 008274C2 8BF0 mov esi, eax 008274C4 33C0 xor eax, eax 008274C6 55 push ebp * Possible String Reference to: '轶咏胫^[嬪]' | 008274C7 68FC768200 push $008276FC ***** TRY | 008274CC 64FF30 push dword ptr fs:[eax] 008274CF 648920 mov fs:[eax], esp 008274D2 33C0 xor eax, eax 008274D4 55 push ebp 008274D5 68C5768200 push $008276C5 ***** TRY | 008274DA 64FF30 push dword ptr fs:[eax] 008274DD 648920 mov fs:[eax], esp *) end; procedure TfrmYFFP._PROC_00827775(Sender : TObject); begin (* 00827775 50 push eax 00827776 6461 popa 00827778 7465 jz 008277DF 0082777A 205946 and [ecx+$46], bl 0082777D 5F pop edi 0082777E 4D dec ebp 0082777F 6F outsd 00827780 6E outsb 00827781 65795F jns 008277E3 00827784 43 inc ebx 00827785 52 push edx 00827786 2000 and [eax], al 00827788 FFFF DB $FF, $FF // 0082778A FFFF DB $FF, $FF // 0082778C 0F0000 sldt word ptr [eax] 0082778F 0020 add [eax], ah 00827791 53 push ebx 00827792 657420 jz 008277B5 00827795 46 inc esi 00827796 4B dec ebx 00827797 54 push esp 00827798 61 popa 00827799 69746F753D2700FF imul esi, [edi+ebp*2+$75], $FF00273D 008277A1 FFFF DB $FF, $FF // 008277A3 FF01 inc dword ptr [ecx] 008277A5 0000 add [eax], al 008277A7 0027 add [edi], ah 008277A9 0000 add [eax], al 008277AB 00FF add bh, bh 008277AD FFFF DB $FF, $FF // 008277AF FF0D00000020 dec dword ptr [$20000000] 008277B5 7768 jnbe 0082781F 008277B7 657265 jb 0082781F 008277BA 205946 and [ecx+$46], bl 008277BD 49 dec ecx 008277BE 643D27000000 cmp eax, $00000027 008277C4 FFFF DB $FF, $FF // 008277C6 FFFF DB $FF, $FF // 008277C8 0400 add al, +$00 008277CA 0000 add [eax], al 008277CC 59 pop ecx 008277CD 46 inc esi 008277CE 49 dec ecx 008277CF 640000 add fs:[eax], al 008277D2 0000 add [eax], al 008277D4 55 push ebp 008277D5 8BEC mov ebp, esp 008277D7 33C0 xor eax, eax 008277D9 55 push ebp * Possible String Reference to: '轹医滕]脣纼-繷' | 008277DA 68F9778200 push $008277F9 ***** TRY | 008277DF 64FF30 push dword ptr fs:[eax] 008277E2 648920 mov fs:[eax], esp 008277E5 FF05C0598900 inc dword ptr [$008959C0] 008277EB 33C0 xor eax, eax 008277ED 5A pop edx 008277EE 59 pop ecx 008277EF 59 pop ecx 008277F0 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']脣纼-繷' | 008277F3 6800788200 push $00827800 008277F8 C3 ret * Reference to: System.@HandleFinally; | 008277F9 E9F6D2BDFF jmp 00404AF4 008277FE EBF8 jmp 008277F8 ****** END | 00827800 5D pop ebp 00827801 C3 ret 00827802 8BC0 mov eax, eax 00827804 832DC059890001 sub dword ptr [$008959C0], +$01 0082780B C3 ret 0082780C 58 pop eax 0082780D 7882 js 00827791 0082780F 0000 add [eax], al 00827811 0000 add [eax], al 00827813 0000 add [eax], al 00827815 0000 add [eax], al 00827817 004C7982 add [ecx+edi*2-$7E], cl 0082781B 00748182 add [ecx+eax*4-$7E], dh 0082781F 006679 add [esi+$79], ah 00827822 820012 add dword ptr [eax], $12 00827825 7D82 jnl 008277A9 00827827 0000 add [eax], al *) end; procedure TfrmYFFP._PROC_00827872(Sender : TObject); begin (* 00827872 48 dec eax 00827873 0050D4 add [eax-$2C], dl 00827876 42 inc edx 00827877 0008 add [eax], cl 00827879 2D4A007CD0 sub eax, $D07C004A 0082787E 42 inc edx 0082787F 00F4 add ah, dh 00827881 6B4A00D0 imul ecx, [edx+$00], $D0 00827885 1D4A0030F6 sbb eax, $F630004A 0082788A 48 dec eax 0082788B 004CFB48 add [ebx+edi*8+$48], cl 0082788F 0098FA48000C add [eax+$C0048FA], bl 00827895 7948 jns 008278DF 00827897 00ACF04800E829 add [eax+esi*8+$29E80048], ch 0082789E 4A dec edx 0082789F 00E4 add ah, ah 008278A1 ED in eax, dx 008278A2 48 dec eax 008278A3 00547848 add [eax+edi*2+$48], dl 008278A7 005878 add [eax+$78], bl 008278AA 48 dec eax 008278AB 00DC add ah, bl 008278AD 2A4A00 sub cl, byte ptr [edx+$00] 008278B0 3CA9 cmp al, $A9 008278B2 48 dec eax 008278B3 00C0 add al, al 008278B5 834800D0 or dword ptr [eax+$00], -$30 008278B9 7948 jns 00827903 008278BB 004C8548 add [ebp+eax*4+$48], cl 008278BF 00D0 add al, dl 008278C1 2C4A sub al, $4A 008278C3 009C2B4A008486 add [ebx+ebp+$8684004A], bl 008278CA 48 dec eax 008278CB 00482D add [eax+$2D], cl 008278CE 4A dec edx 008278CF 00C0 add al, al 008278D1 A9480038EE test eax, $EE380048 008278D6 48 dec eax 008278D7 00F4 add ah, dh 008278D9 EE out dx, al 008278DA 48 dec eax 008278DB 00F0 add al, dh 008278DD E94800D8EE jmp EF5A792A 008278E2 48 dec eax 008278E3 00D8 add al, bl 008278E5 1B4A00 sbb ecx, [edx+$00] 008278E8 EC in al, dx 008278E9 334A00 xor ecx, [edx+$00] 008278EC 20C4 and ah, al 008278EE 48 dec eax 008278EF 00B0404A0010 add [eax+$10004A40], dh 008278F5 44 inc esp 008278F6 4A dec edx 008278F7 00CC add ah, cl 008278F9 42 inc edx 008278FA 4A dec edx 008278FB 00B8C44800BC add [eax+$BC0048C4], bh 00827901 C44800 les ecx, [eax+$00] 00827904 48 dec eax 00827905 45 inc ebp 00827906 4A dec edx 00827907 001CC3 add [ebx+eax*8], bl 0082790A 48 dec eax 0082790B 0018 add [eax], bl 0082790D F0 lock 0082790E 48 dec eax 0082790F 00444C4A add [esp+ecx*2+$4A], al 00827913 000C02 add [edx+eax], cl 00827916 49 dec ecx 00827917 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 0082791E 4A dec edx 0082791F 008C154A003C18 add [ebp+edx+$183C004A], cl 00827926 4A dec edx 00827927 0038 add [eax], bh 00827929 52 push edx 0082792A 4A dec edx 0082792B 005C224A add [edx+$4A], bl 0082792F 00D8 add al, bl 00827931 224A00 and cl, byte ptr [edx+$00] 00827934 7C68 jl 0082799E 00827936 4A dec edx 00827937 00941F4A003C60 add [edi+ebx+$603C004A], dl 0082793E 4A dec edx 0082793F 001447 add [edi+eax*2], dl 00827942 4A dec edx 00827943 0034654A00CC2C add [$2CCC004A], dh 0082794A 4A dec edx 0082794B 000E add [esi], cl 0082794D 0000 add [eax], al 0082794F 0000 add [eax], al 00827951 0002 add [edx], al 00827953 0000 add [eax], al 00827955 0020 add [eax], ah 00827957 114000 adc [eax+$00], eax 0082795A F0 lock 0082795B 0300 add eax, [eax] 0082795D 0020 add [eax], ah 0082795F 114000 adc [eax+$00], eax 00827962 F4 hlt 00827963 0300 add eax, [eax] 00827965 003E add [esi], bh 00827967 0025818200F8 add [$F8008281], ah 0082796D 0200 add al, byte ptr [eax] 0082796F 0000 add [eax], al 00827971 0008 add [eax], cl 00827973 54 push esp 00827974 6F outsd 00827975 6F outsd 00827976 6C insb 00827977 42 inc edx 00827978 61 popa 00827979 7231 jb 008279AC 0082797B FC cld 0082797C 0200 add al, byte ptr [eax] 0082797E 0001 add [ecx], al 00827980 0009 add [ecx], cl 00827982 54 push esp 00827983 42 inc edx 00827984 52 push edx 00827985 61 popa 00827986 667265 jb 008279EE 00827989 7368 jnb 008279F3 0082798B 0003 add [ebx], al 0082798D 0000 add [eax], al 0082798F 0100 add [eax], eax 00827991 0554424465 add eax, +$65444254 00827996 6C insb 00827997 0403 add al, +$03 00827999 0000 add [eax], al 0082799B 0100 add [eax], eax 0082799D 07 pop es 0082799E 54 push esp 0082799F 42 inc edx 008279A0 43 inc ebx 008279A1 6C insb 008279A2 6F outsd 008279A3 7365 jnb 00827A0A 008279A5 0803 or [ebx], al 008279A7 0000 add [eax], al 008279A9 0200 add al, byte ptr [eax] 008279AB 0C41 or al, $41 008279AD 44 inc esp 008279AE 4F dec edi 008279AF 51 push ecx 008279B0 7565 jnz 00827A17 008279B2 7279 jb 00827A2D 008279B4 54 push esp 008279B5 656D insd 008279B7 700C jo 008279C5 008279B9 0300 add eax, [eax] 008279BB 0002 add [edx], al 008279BD 000B add [ebx], cl 008279BF 41 inc ecx 008279C0 44 inc esp 008279C1 4F dec edi 008279C2 51 push ecx 008279C3 7565 jnz 00827A2A 008279C5 7279 jb 00827A40 008279C7 43 inc ebx 008279C8 6D insd 008279C9 641003 adc fs:[ebx], al 008279CC 0000 add [eax], al 008279CE 0300 add eax, [eax] 008279D0 06 push es 008279D1 50 push eax 008279D2 61 popa 008279D3 6E outsb 008279D4 656C insb 008279D6 311403 xor [ebx+eax], edx 008279D9 0000 add [eax], al 008279DB 0100 add [eax], eax 008279DD 0B546F6F or edx, [edi+ebp*2+$6F] 008279E1 6C insb 008279E2 42 inc edx 008279E3 7574 jnz 00827A59 008279E5 746F jz 00827A56 008279E7 6E outsb 008279E8 3218 xor bl, byte ptr [eax] 008279EA 0300 add eax, [eax] 008279EC 000400 add [eax+eax], al 008279EF 06 push es 008279F0 4C dec esp 008279F1 61 popa 008279F2 62656C bound esp, qword ptr [ebp+$6C] 008279F5 311C03 xor [ebx+eax], ebx 008279F8 0000 add [eax], al 008279FA 05000A505F add eax, +$5F500A00 008279FF 43 inc ebx 00827A00 6F outsd 00827A01 64654E dec esi 00827A04 61 popa 00827A05 6D insd 00827A06 652003 and gs:[ebx], al 00827A09 0000 add [eax], al 00827A0B 0200 add al, byte ptr [eax] 00827A0D 0C41 or al, $41 00827A0F 44 inc esp 00827A10 4F dec edi 00827A11 51 push ecx 00827A12 7565 jnz 00827A79 00827A14 7279 jb 00827A8F 00827A16 4D dec ebp 00827A17 61 popa 00827A18 696E2403000001 imul ebp, [esi+$24], $01000003 00827A1F 000B add [ebx], cl 00827A21 54 push esp 00827A22 6F outsd 00827A23 6F outsd 00827A24 6C insb 00827A25 42 inc edx 00827A26 7574 jnz 00827A9C 00827A28 746F jz 00827A99 00827A2A 6E outsb 00827A2B 3128 xor [eax], ebp 00827A2D 0300 add eax, [eax] 00827A2F 0006 add [esi], al 00827A31 0003 add [ebx], al 00827A33 52 push edx 00827A34 4D dec ebp 00827A35 312C03 xor [ebx+eax], ebp 00827A38 0000 add [eax], al 00827A3A 07 pop es 00827A3B 0009 add [ecx], cl 00827A3D 52 push edx 00827A3E 4D dec ebp 00827A3F 44 inc esp 00827A40 42 inc edx 00827A41 5F pop edi 00827A42 4D dec ebp 00827A43 61 popa 00827A44 696E3003000004 imul ebp, [esi+$30], $04000003 00827A4B 0006 add [esi], al 00827A4D 4C dec esp 00827A4E 61 popa 00827A4F 62656C bound esp, qword ptr [ebp+$6C] 00827A52 333403 xor esi, [ebx+eax] 00827A55 0000 add [eax], al 00827A57 05000B4661 add eax, +$61460B00 00827A5C 63746F72 arpl [edi+ebp*2+$72], si 00827A60 794E jns 00827AB0 00827A62 61 popa 00827A63 6D insd 00827A64 653803 cmp gs:[ebx], al 00827A67 0000 add [eax], al 00827A69 0800 or [eax], al 00827A6B 07 pop es 00827A6C 637847 arpl [eax+$47], di 00827A6F 7269 jb 00827ADA 00827A71 64323C03 xor bh, byte ptr fs:[ebx+eax] 00827A75 0000 add [eax], al 00827A77 0900 or [eax], eax 00827A79 03547632 add edx, [esi+esi*2+$32] 00827A7D 40 inc eax 00827A7E 0300 add eax, [eax] 00827A80 000A add [edx], cl 00827A82 000F add [edi], cl 00827A84 637847 arpl [eax+$47], di 00827A87 7269 jb 00827AF2 00827A89 6444 inc esp 00827A8B 42 inc edx 00827A8C 43 inc ebx 00827A8D 6F outsd 00827A8E 6C insb 00827A8F 756D jnz 00827AFE 00827A91 6E outsb 00827A92 31440300 xor [ebx+eax+$00], eax 00827A96 000A add [edx], cl 00827A98 000F add [edi], cl 00827A9A 637847 arpl [eax+$47], di 00827A9D 7269 jb 00827B08 00827A9F 6444 inc esp 00827AA1 42 inc edx 00827AA2 43 inc ebx 00827AA3 6F outsd 00827AA4 6C insb 00827AA5 756D jnz 00827B14 00827AA7 6E outsb 00827AA8 334803 xor ecx, [eax+$03] 00827AAB 0000 add [eax], al 00827AAD 0A00 or al, byte ptr [eax] 00827AAF 0F637847 packusdw MM7, [eax+$47] 00827AB3 7269 jb 00827B1E 00827AB5 6444 inc esp 00827AB7 42 inc edx 00827AB8 43 inc ebx 00827AB9 6F outsd 00827ABA 6C insb 00827ABB 756D jnz 00827B2A 00827ABD 6E outsb 00827ABE 354C030000 xor eax, $0000034C 00827AC3 0A00 or al, byte ptr [eax] 00827AC5 0F637847 packusdw MM7, [eax+$47] 00827AC9 7269 jb 00827B34 00827ACB 6444 inc esp 00827ACD 42 inc edx 00827ACE 43 inc ebx 00827ACF 6F outsd 00827AD0 6C insb 00827AD1 756D jnz 00827B40 00827AD3 6E outsb 00827AD4 3650 push eax 00827AD6 0300 add eax, [eax] 00827AD8 000B add [ebx], cl 00827ADA 000C63 add [ebx], cl 00827ADD 7847 js 00827B26 00827ADF 7269 jb 00827B4A 00827AE1 644C dec esp 00827AE3 657665 jbe 00827B4B 00827AE6 6C insb 00827AE7 31540300 xor [ebx+eax+$00], edx 00827AEB 000400 add [eax+eax], al 00827AEE 06 push es 00827AEF 4C dec esp 00827AF0 61 popa 00827AF1 62656C bound esp, qword ptr [ebp+$6C] 00827AF4 325803 xor bl, byte ptr [eax+$03] 00827AF7 0000 add [eax], al 00827AF9 0C00 or al, $00 00827AFB 07 pop es 00827AFC 626567 bound esp, qword ptr [ebp+$67] 00827AFF 6461 popa 00827B01 7465 jz 00827B68 00827B03 5C pop esp 00827B04 0300 add eax, [eax] 00827B06 000C00 add [eax+eax], cl 00827B09 07 pop es 00827B0A 45 inc ebp 00827B0B 6E outsb 00827B0C 646461 popa 00827B0F 7465 jz 00827B76 00827B11 60 pusha 00827B12 0300 add eax, [eax] 00827B14 000D00106378 add [$78631000], cl 00827B1A 47 inc edi 00827B1B 7269 jb 00827B86 00827B1D 6450 push eax 00827B1F 6F outsd 00827B20 7075 jo 00827B97 00827B22 704D jo 00827B71 00827B24 656E outsb 00827B26 7532 jnz 00827B5A 00827B28 640300 add eax, fs:[eax] 00827B2B 000E add [esi], cl 00827B2D 000544535F48 add [$485F5344], al 00827B33 5A pop edx 00827B34 680300000F push $0F000003 00827B39 0006 add [esi], al 00827B3B 43 inc ebx 00827B3C 44 inc esp 00827B3D 53 push ebx 00827B3E 5F pop edi 00827B3F 48 dec eax 00827B40 5A pop edx 00827B41 6C insb 00827B42 0300 add eax, [eax] 00827B44 0001 add [ecx], al 00827B46 000B add [ebx], cl 00827B48 54 push esp 00827B49 6F outsd 00827B4A 6F outsd 00827B4B 6C insb 00827B4C 42 inc edx 00827B4D 7574 jnz 00827BC3 00827B4F 746F jz 00827BC0 00827B51 6E outsb 00827B52 337003 xor esi, [eax+$03] 00827B55 0000 add [eax], al 00827B57 0A00 or al, byte ptr [eax] 00827B59 097632 or [esi+$32], esi 00827B5C 43 inc ebx 00827B5D 6F outsd 00827B5E 6C insb 00827B5F 756D jnz 00827BCE 00827B61 6E outsb 00827B62 31740300 xor [ebx+eax+$00], esi 00827B66 000A add [edx], cl 00827B68 0003 add [ebx], al 00827B6A 56 push esi 00827B6B 42 inc edx 00827B6C 5A pop edx 00827B6D 7803 js 00827B72 00827B6F 0000 add [eax], al 00827B71 0A00 or al, byte ptr [eax] 00827B73 097632 or [esi+$32], esi 00827B76 43 inc ebx 00827B77 6F outsd 00827B78 6C insb 00827B79 756D jnz 00827BE8 00827B7B 6E outsb 00827B7C 367C03 jl 00827B82 00827B7F 0000 add [eax], al 00827B81 0A00 or al, byte ptr [eax] 00827B83 05564B504E add eax, +$4E504B56 00827B88 4F dec edi 00827B89 800300 add byte ptr [ebx], $00 00827B8C 000A add [edx], cl 00827B8E 000476 add [esi+esi*2], al 00827B91 324B50 xor cl, byte ptr [ebx+$50] 00827B94 8403 test [ebx], al 00827B96 0000 add [eax], al 00827B98 0A00 or al, byte ptr [eax] 00827B9A 097632 or [esi+$32], esi 00827B9D 50 push eax 00827B9E 61 popa 00827B9F 794D jns 00827BEE 00827BA1 656E outsb 00827BA3 7488 jz 00827B2D 00827BA5 0300 add eax, [eax] 00827BA7 000A add [edx], cl 00827BA9 0006 add [esi], al 00827BAB 7632 jbe 00827BDF 00827BAD 4E dec esi 00827BAE 6F outsd 00827BAF 7465 jz 00827C16 00827BB1 8C03 mov word ptr [ebx], es 00827BB3 0000 add [eax], al 00827BB5 0400 add al, +$00 00827BB7 06 push es 00827BB8 4C dec esp 00827BB9 61 popa 00827BBA 62656C bound esp, qword ptr [ebp+$6C] 00827BBD 3490 xor al, $90 00827BBF 0300 add eax, [eax] 00827BC1 000500044B50 add [$504B0400], al 00827BC7 4E dec esi 00827BC8 4F dec edi 00827BC9 94 xchg eax, esp 00827BCA 0300 add eax, [eax] 00827BCC 000A add [edx], cl 00827BCE 0006 add [esi], al 00827BD0 7632 jbe 00827C04 00827BD2 5A pop edx 00827BD3 46 inc esi 00827BD4 54 push esp 00827BD5 54 push esp 00827BD6 98 cwde 00827BD7 0300 add eax, [eax] 00827BD9 000A add [edx], cl 00827BDB 0008 add [eax], cl 00827BDD 7632 jbe 00827C11 00827BDF 50 push eax 00827BE0 5F pop edi 00827BE1 53 push ebx 00827BE2 7065 jo 00827C49 00827BE4 639C0300000400 arpl [ebx+eax+$40000], bx 00827BEB 07 pop es 00827BEC 4C dec esp 00827BED 61 popa 00827BEE 62656C bound esp, qword ptr [ebp+$6C] 00827BF1 3130 xor [eax], esi 00827BF3 A003000004 mov al, byte ptr [$04000003] 00827BF8 0007 add [edi], al 00827BFA 4C dec esp 00827BFB 61 popa 00827BFC 62656C bound esp, qword ptr [ebp+$6C] 00827BFF 3132 xor [edx], esi 00827C01 A4 movsb 00827C02 0300 add eax, [eax] 00827C04 000A add [edx], cl 00827C06 0006 add [esi], al 00827C08 7632 jbe 00827C3C 00827C0A 53 push ebx 00827C0B 7365 jnb 00827C72 00827C0D 6C insb 00827C0E A803 test al, $03 00827C10 0000 add [eax], al 00827C12 1000 adc [eax], al 00827C14 0A506F or dl, byte ptr [eax+$6F] 00827C17 7075 jo 00827C8E 00827C19 704D jo 00827C68 00827C1B 656E outsb 00827C1D 7531 jnz 00827C50 00827C1F AC lodsb 00827C20 0300 add eax, [eax] 00827C22 0011 add [ecx], dl 00827C24 0002 add [edx], al 00827C26 4E dec esi 00827C27 31B003000011 xor [eax+$11000003], esi 00827C2D 0002 add [edx], al 00827C2F 4E dec esi 00827C30 32B40300000400 xor dh, byte ptr [ebx+eax+$40000] 00827C37 06 push es 00827C38 4C dec esp 00827C39 61 popa 00827C3A 62656C bound esp, qword ptr [ebp+$6C] 00827C3D 36B803000005 mov eax, $05000003 00827C43 0009 add [ecx], cl 00827C45 43 inc ebx 00827C46 6F outsd 00827C47 6D insd 00827C48 54 push esp 00827C49 61 popa 00827C4A 69546F75BC030000 imul edx, [edi+ebp*2+$75], $000003BC 00827C52 0400 add al, +$00 00827C54 06 push es 00827C55 4C dec esp 00827C56 61 popa 00827C57 62656C bound esp, qword ptr [ebp+$6C] 00827C5A 37 aaa 00827C5B C00300 rol byte ptr [ebx], $00 00827C5E 000500075061 add [$61500700], al 00827C64 794D jns 00827CB3 00827C66 656E outsb 00827C68 74C4 jz 00827C2E 00827C6A 0300 add eax, [eax] 00827C6C 000400 add [eax+eax], al 00827C6F 06 push es 00827C70 4C dec esp 00827C71 61 popa 00827C72 62656C bound esp, qword ptr [ebp+$6C] 00827C75 38C8 cmp al, cl 00827C77 0300 add eax, [eax] 00827C79 00050008464B add [$4B460800], al 00827C7F 54 push esp 00827C80 61 popa 00827C81 69546F75CC030000 imul edx, [edi+ebp*2+$75], $000003CC 00827C89 0400 add al, +$00 00827C8B 07 pop es 00827C8C 4C dec esp 00827C8D 61 popa 00827C8E 62656C bound esp, qword ptr [ebp+$6C] 00827C91 3134D0 xor [eax+edx*8], esi 00827C94 0300 add eax, [eax] 00827C96 000500084B50 add [$504B0800], al 00827C9C 53 push ebx 00827C9D 7461 jz 00827D00 00827C9F 7475 jz 00827D16 00827CA1 73D4 jnb 00827C77 00827CA3 0300 add eax, [eax] 00827CA5 000A add [edx], cl 00827CA7 000A add [edx], cl 00827CA9 7632 jbe 00827CDD 00827CAB 4B dec ebx 00827CAC 50 push eax 00827CAD 53 push ebx 00827CAE 7461 jz 00827D11 00827CB0 7475 jz 00827D27 00827CB2 73D8 jnb 00827C8C 00827CB4 0300 add eax, [eax] 00827CB6 000400 add [eax+eax], al 00827CB9 07 pop es 00827CBA 4C dec esp 00827CBB 61 popa 00827CBC 62656C bound esp, qword ptr [ebp+$6C] 00827CBF 3135DC030000 xor [$000003DC], esi 00827CC5 0500044E6F add eax, +$6F4E0400 00827CCA 7465 jz 00827D31 00827CCC E003 loopn +$03 00827CCE 0000 add [eax], al 00827CD0 0A00 or al, byte ptr [eax] 00827CD2 0A7632 or dh, byte ptr [esi+$32] 00827CD5 46 inc esi 00827CD6 4B dec ebx 00827CD7 54 push esp 00827CD8 61 popa 00827CD9 69746F75E4030000 imul esi, [edi+ebp*2+$75], $000003E4 00827CE1 0A00 or al, byte ptr [eax] 00827CE3 07 pop es 00827CE4 7632 jbe 00827D18 00827CE6 48 dec eax 00827CE7 7569 jnz 00827D52 00827CE9 6C insb 00827CEA 76E8 jbe 00827CD4 00827CEC 0300 add eax, [eax] 00827CEE 000A add [edx], cl 00827CF0 000B add [ebx], cl 00827CF2 7632 jbe 00827D26 00827CF4 53 push ebx 00827CF5 6875694D6F push $6F4D6975 00827CFA 6E outsb 00827CFB 6579EC jns 00827CEA 00827CFE 0300 add eax, [eax] 00827D00 000A add [edx], cl 00827D02 000E add [esi], cl 00827D04 7632 jbe 00827D38 00827D06 53 push ebx 00827D07 687569486F push $6F486975 00827D0C 754D jnz 00827D5B 00827D0E 6F outsd 00827D0F 6E outsb 00827D10 657921 jns 00827D34 00827D13 0012 add [edx], dl 00827D15 00F0 add al, dh 00827D17 8482000B466F test [edx+$6F460B00], al 00827D1D 726D jb 00827D8C 00827D1F 44 inc esp 00827D20 657374 jnb 00827D97 00827D23 726F jb 00827D94 00827D25 7910 jns 00827D37 00827D27 00F8 add al, bh 00827D29 84820009466F test [edx+$6F460900], al 00827D2F 726D jb 00827D9E 00827D31 43 inc ebx 00827D32 6C insb 00827D33 6F outsd 00827D34 7365 jnb 00827D9B 00827D36 1300 adc eax, [eax] 00827D38 FC cld 00827D39 8482000C5442 test [edx+$42540C00], al 00827D3F 43 inc ebx 00827D40 6C insb 00827D41 6F outsd 00827D42 7365 jnb 00827DA9 00827D44 43 inc ebx 00827D45 6C insb 00827D46 69636B11004885 imul esp, [ebx+$6B], $85480011 00827D4D 82000A add dword ptr [eax], $0A 00827D50 54 push esp 00827D51 42 inc edx 00827D52 44 inc esp 00827D53 656C insb 00827D55 43 inc ebx 00827D56 6C insb 00827D57 69636B0F007888 imul esp, [ebx+$6B], $8878000F 00827D5E 820008 add dword ptr [eax], $08 00827D61 46 inc esi 00827D62 6F outsd 00827D63 726D jb 00827DD2 00827D65 53 push ebx 00827D66 686F771500 push $0015776F 00827D6B 308982000E54 xor [ecx+$540E0082], cl 00827D71 42 inc edx 00827D72 52 push edx 00827D73 61 popa 00827D74 667265 jb 00827DDC 00827D77 7368 jnb 00827DE1 00827D79 43 inc ebx 00827D7A 6C insb 00827D7B 69636B17004C89 imul esp, [ebx+$6B], $894C0017 00827D82 820010 add dword ptr [eax], $10 00827D85 54 push esp 00827D86 6F outsd 00827D87 6F outsd 00827D88 6C insb 00827D89 42 inc edx 00827D8A 7574 jnz 00827E00 00827D8C 746F jz 00827DFD 00827D8E 6E outsb 00827D8F 32436C xor al, byte ptr [ebx+$6C] 00827D92 69636B1800DC89 imul esp, [ebx+$6B], $89DC0018 00827D99 820011 add dword ptr [eax], $11 00827D9C 46 inc esi 00827D9D 61 popa 00827D9E 63746F72 arpl [edi+ebp*2+$72], si 00827DA2 794E jns 00827DF2 00827DA4 61 popa 00827DA5 6D insd 00827DA6 6543 inc ebx 00827DA8 68616E6765 push $65676E61 00827DAD 1300 adc eax, [eax] 00827DAF F0 lock 00827DB0 8982000C4275 mov [edx+$75420C00], eax 00827DB6 7474 jz 00827E2C 00827DB8 6F outsd 00827DB9 6E outsb 00827DBA 32436C xor al, byte ptr [ebx+$6C] 00827DBD 69636B30003095 imul esp, [ebx+$6B], $95300030 00827DC4 820029 add dword ptr [eax], $29 00827DC7 637847 arpl [eax+$47], di 00827DCA 7269 jb 00827E35 00827DCC 6444 inc esp 00827DCE 42 inc edx 00827DCF 43 inc ebx 00827DD0 6F outsd 00827DD1 6C insb 00827DD2 756D jnz 00827E41 00827DD4 6E outsb 00827DD5 385072 cmp [eax+$72], dl 00827DD8 6F outsd 00827DD9 7065 jo 00827E40 00827DDB 7274 jb 00827E51 00827DDD 69657345646974 imul esp, [ebp+$73], $74696445 00827DE4 56 push esi 00827DE5 61 popa 00827DE6 6C insb 00827DE7 7565 jnz 00827E4E 00827DE9 43 inc ebx 00827DEA 68616E6765 push $65676E61 00827DEF 643000 xor fs:[eax], al 00827DF2 FC cld 00827DF3 97 xchg eax, edi 00827DF4 820029 add dword ptr [eax], $29 00827DF7 637847 arpl [eax+$47], di 00827DFA 7269 jb 00827E65 00827DFC 6444 inc esp 00827DFE 42 inc edx 00827DFF 43 inc ebx 00827E00 6F outsd 00827E01 6C insb 00827E02 756D jnz 00827E71 00827E04 6E outsb 00827E05 3550726F70 xor eax, $706F7250 00827E0A 657274 jb 00827E81 00827E0D 69657345646974 imul esp, [ebp+$73], $74696445 00827E14 56 push esi 00827E15 61 popa 00827E16 6C insb 00827E17 7565 jnz 00827E7E 00827E19 43 inc ebx 00827E1A 68616E6765 push $65676E61 00827E1F 643000 xor fs:[eax], al 00827E22 28A182002963 sub [ecx+$63290082], ah 00827E28 7847 js 00827E71 00827E2A 7269 jb 00827E95 00827E2C 6444 inc esp 00827E2E 42 inc edx 00827E2F 43 inc ebx 00827E30 6F outsd 00827E31 6C insb 00827E32 756D jnz 00827EA1 00827E34 6E outsb 00827E35 315072 xor [eax+$72], edx 00827E38 6F outsd 00827E39 7065 jo 00827EA0 00827E3B 7274 jb 00827EB1 00827E3D 69657345646974 imul esp, [ebp+$73], $74696445 00827E44 56 push esi 00827E45 61 popa 00827E46 6C insb 00827E47 7565 jnz 00827EAE 00827E49 43 inc ebx 00827E4A 68616E6765 push $65676E61 00827E4F 6417 pop ss 00827E51 00F4 add ah, dh 00827E53 A382001054 mov dword ptr [$54100082], eax 00827E58 6F outsd 00827E59 6F outsd 00827E5A 6C insb 00827E5B 42 inc edx 00827E5C 7574 jnz 00827ED2 00827E5E 746F jz 00827ECF 00827E60 6E outsb 00827E61 33436C xor eax, [ebx+$6C] 00827E64 69636B2B0090A6 imul esp, [ebx+$6B], $A690002B 00827E6B 820024 add dword ptr [eax], $24 00827E6E 637847 arpl [eax+$47], di 00827E71 7269 jb 00827EDC 00827E73 6444 inc esp 00827E75 42 inc edx 00827E76 43 inc ebx 00827E77 6F outsd 00827E78 6C insb 00827E79 756D jnz 00827EE8 00827E7B 6E outsb 00827E7C 335072 xor edx, [eax+$72] 00827E7F 6F outsd 00827E80 7065 jo 00827EE7 00827E82 7274 jb 00827EF8 00827E84 69657342757474 imul esp, [ebp+$73], $74747542 00827E8B 6F outsd 00827E8C 6E outsb 00827E8D 43 inc ebx 00827E8E 6C insb 00827E8F 69636B2B0010AB imul esp, [ebx+$6B], $AB10002B 00827E96 820024 add dword ptr [eax], $24 00827E99 637847 arpl [eax+$47], di 00827E9C 7269 jb 00827F07 00827E9E 6444 inc esp 00827EA0 42 inc edx 00827EA1 43 inc ebx 00827EA2 6F outsd 00827EA3 6C insb 00827EA4 756D jnz 00827F13 00827EA6 6E outsb 00827EA7 3650 push eax 00827EA9 726F jb 00827F1A 00827EAB 7065 jo 00827F12 00827EAD 7274 jb 00827F23 00827EAF 69657342757474 imul esp, [ebp+$73], $74747542 00827EB6 6F outsd 00827EB7 6E outsb 00827EB8 43 inc ebx 00827EB9 6C insb 00827EBA 69636B25006CAE imul esp, [ebx+$6B], $AE6C0025 00827EC1 82001E add dword ptr [eax], $1E 00827EC4 7632 jbe 00827EF8 00827EC6 43 inc ebx 00827EC7 6F outsd 00827EC8 6C insb 00827EC9 756D jnz 00827F38 00827ECB 6E outsb 00827ECC 335072 xor edx, [eax+$72] 00827ECF 6F outsd 00827ED0 7065 jo 00827F37 00827ED2 7274 jb 00827F48 00827ED4 69657342757474 imul esp, [ebp+$73], $74747542 00827EDB 6F outsd 00827EDC 6E outsb 00827EDD 43 inc ebx 00827EDE 6C insb 00827EDF 69636B1700B0B1 imul esp, [ebx+$6B], $B1B00017 00827EE6 820010 add dword ptr [eax], $10 00827EE9 54 push esp 00827EEA 6F outsd 00827EEB 6F outsd 00827EEC 6C insb 00827EED 42 inc edx 00827EEE 7574 jnz 00827F64 00827EF0 746F jz 00827F61 00827EF2 6E outsb 00827EF3 31436C xor [ebx+$6C], eax 00827EF6 69636B2500F0B1 imul esp, [ebx+$6B], $B1F00025 00827EFD 82001E add dword ptr [eax], $1E 00827F00 7632 jbe 00827F34 00827F02 43 inc ebx 00827F03 6F outsd 00827F04 6C insb 00827F05 756D jnz 00827F74 00827F07 6E outsb 00827F08 37 aaa 00827F09 50 push eax 00827F0A 726F jb 00827F7B 00827F0C 7065 jo 00827F73 00827F0E 7274 jb 00827F84 00827F10 69657342757474 imul esp, [ebp+$73], $74747542 00827F17 6F outsd 00827F18 6E outsb 00827F19 43 inc ebx 00827F1A 6C insb 00827F1B 69636B2A0060B6 imul esp, [ebx+$6B], $B660002A 00827F22 820023 add dword ptr [eax], $23 00827F25 7632 jbe 00827F59 00827F27 43 inc ebx 00827F28 6F outsd 00827F29 6C insb 00827F2A 756D jnz 00827F99 00827F2C 6E outsb 00827F2D 325072 xor dl, byte ptr [eax+$72] 00827F30 6F outsd 00827F31 7065 jo 00827F98 00827F33 7274 jb 00827FA9 00827F35 69657345646974 imul esp, [ebp+$73], $74696445 00827F3C 56 push esi 00827F3D 61 popa 00827F3E 6C insb 00827F3F 7565 jnz 00827FA6 00827F41 43 inc ebx 00827F42 68616E6765 push $65676E61 00827F47 64250024BC82 and eax, $82BC2400 00827F4D 001E add [esi], bl 00827F4F 7632 jbe 00827F83 00827F51 50 push eax 00827F52 53 push ebx 00827F53 50 push eax 00827F54 726F jb 00827FC5 00827F56 7065 jo 00827FBD 00827F58 7274 jb 00827FCE 00827F5A 69657345646974 imul esp, [ebp+$73], $74696445 00827F61 56 push esi 00827F62 61 popa 00827F63 6C insb 00827F64 7565 jnz 00827FCB 00827F66 43 inc ebx 00827F67 68616E6765 push $65676E61 00827F6C 642A00 sub al, byte ptr fs:[eax] 00827F6F C8BE enter , $BE 00827F71 820023 add dword ptr [eax], $23 00827F74 7632 jbe 00827FA8 00827F76 42 inc edx 00827F77 61 popa 00827F78 7463 jz 00827FDD 00827F7A 684E6F5072 push $72506F4E 00827F7F 6F outsd 00827F80 7065 jo 00827FE7 00827F82 7274 jb 00827FF8 00827F84 69657345646974 imul esp, [ebp+$73], $74696445 00827F8B 56 push esi 00827F8C 61 popa 00827F8D 6C insb 00827F8E 7565 jnz 00827FF5 00827F90 43 inc ebx 00827F91 68616E6765 push $65676E61 00827F96 64250048C182 and eax, $82C14800 00827F9C 001E add [esi], bl 00827F9E 7632 jbe 00827FD2 00827FA0 50 push eax 00827FA1 61 popa 00827FA2 794D jns 00827FF1 00827FA4 656E outsb 00827FA6 7450 jz 00827FF8 00827FA8 726F jb 00828019 00827FAA 7065 jo 00828011 00827FAC 7274 jb 00828022 00827FAE 69657342757474 imul esp, [ebp+$73], $74747542 00827FB5 6F outsd 00827FB6 6E outsb 00827FB7 43 inc ebx 00827FB8 6C insb 00827FB9 69636B11007CC4 imul esp, [ebx+$6B], $C47C0011 00827FC0 82000A add dword ptr [eax], $0A 00827FC3 4B dec ebx 00827FC4 50 push eax 00827FC5 4E dec esi 00827FC6 4F dec edi 00827FC7 43 inc ebx 00827FC8 68616E6765 push $65676E61 00827FCD 260090C482001F add es:[eax+$1F0082C4], dl 00827FD4 56 push esi 00827FD5 4B dec ebx 00827FD6 50 push eax 00827FD7 4E dec esi 00827FD8 4F dec edi 00827FD9 50 push eax 00827FDA 726F jb 0082804B 00827FDC 7065 jo 00828043 00827FDE 7274 jb 00828054 00827FE0 69657345646974 imul esp, [ebp+$73], $74696445 00827FE7 56 push esi 00827FE8 61 popa 00827FE9 6C insb 00827FEA 7565 jnz 00828051 00827FEC 43 inc ebx 00827FED 68616E6765 push $65676E61 00827FF2 642900 sub dword ptr fs:[eax], eax 00827FF5 74C6 jz 00827FBD 00827FF7 820022 add dword ptr [eax], $22 00827FFA 7632 jbe 0082802E 00827FFC 4B dec ebx 00827FFD 50 push eax 00827FFE 44 inc esp 00827FFF 4D dec ebp 00828000 4E dec esi 00828001 6F outsd 00828002 50 push eax 00828003 726F jb 00828074 00828005 7065 jo 0082806C 00828007 7274 jb 0082807D 00828009 69657345646974 imul esp, [ebp+$73], $74696445 00828010 56 push esi 00828011 61 popa 00828012 6C insb 00828013 7565 jnz 0082807A 00828015 43 inc ebx 00828016 68616E6765 push $65676E61 0082801B 642200 and al, byte ptr fs:[eax] 0082801E 5C pop esp 0082801F C882 enter , $82 00828021 001B add [ebx], bl 00828023 7632 jbe 00828057 00828025 5A pop edx 00828026 46 inc esi 00828027 54 push esp 00828028 54 push esp 00828029 50 push eax 0082802A 726F jb 0082809B 0082802C 7065 jo 00828093 0082802E 7274 jb 008280A4 00828030 69657342757474 imul esp, [ebp+$73], $74747542 00828037 6F outsd 00828038 6E outsb 00828039 43 inc ebx 0082803A 6C insb 0082803B 69636B30001CCB imul esp, [ebx+$6B], $CB1C0030 00828042 820029 add dword ptr [eax], $29 00828045 637847 arpl [eax+$47], di 00828048 7269 jb 008280B3 0082804A 6444 inc esp 0082804C 42 inc edx 0082804D 43 inc ebx 0082804E 6F outsd 0082804F 6C insb 00828050 756D jnz 008280BF 00828052 6E outsb 00828053 335072 xor edx, [eax+$72] 00828056 6F outsd 00828057 7065 jo 008280BE 00828059 7274 jb 008280CF 0082805B 69657345646974 imul esp, [ebp+$73], $74696445 00828062 56 push esi 00828063 61 popa 00828064 6C insb 00828065 7565 jnz 008280CC 00828067 43 inc ebx 00828068 68616E6765 push $65676E61 0082806D 642900 sub dword ptr fs:[eax], eax 00828070 0CCD or al, $CD 00828072 820022 add dword ptr [eax], $22 00828075 7632 jbe 008280A9 00828077 50 push eax 00828078 5F pop edi 00828079 53 push ebx 0082807A 7065 jo 008280E1 0082807C 635072 arpl [eax+$72], dx 0082807F 6F outsd 00828080 7065 jo 008280E7 00828082 7274 jb 008280F8 00828084 69657345646974 imul esp, [ebp+$73], $74696445 0082808B 56 push esi 0082808C 61 popa 0082808D 6C insb 0082808E 7565 jnz 008280F5 00828090 43 inc ebx 00828091 68616E6765 push $65676E61 00828096 640E push cs 00828098 00F4 add ah, dh 0082809A CE into 0082809B 820007 add dword ptr [eax], $07 0082809E 4E dec esi 0082809F 31436C xor [ebx+$6C], eax 008280A2 69636B0E0004CF imul esp, [ebx+$6B], $CF04000E 008280A9 820007 add dword ptr [eax], $07 008280AC 4E dec esi 008280AD 32436C xor al, byte ptr [ebx+$6C] 008280B0 69636B1D0014CF imul esp, [ebx+$6B], $CF14001D 008280B7 820016 add dword ptr [eax], $16 008280BA 7632 jbe 008280EE 008280BC 53 push ebx 008280BD 7365 jnb 00828124 008280BF 6C insb 008280C0 50 push eax 008280C1 726F jb 00828132 008280C3 7065 jo 0082812A 008280C5 7274 jb 0082813B 008280C7 6965734368616E imul esp, [ebp+$73], $6E616843 008280CE 6765260070CF add es:[bx+si-$31], dh 008280D4 82001F add dword ptr [eax], $1F 008280D7 7632 jbe 0082810B 008280D9 46 inc esi 008280DA 4B dec ebx 008280DB 54 push esp 008280DC 61 popa 008280DD 69546F7550726F70 imul edx, [edi+ebp*2+$75], $706F7250 008280E5 657274 jb 0082815C 008280E8 69657342757474 imul esp, [ebp+$73], $74747542 008280EF 6F outsd 008280F0 6E outsb 008280F1 43 inc ebx 008280F2 6C insb 008280F3 69636B260000D3 imul esp, [ebx+$6B], $D3000026 008280FA 82001F add dword ptr [eax], $1F 008280FD 7632 jbe 00828131 008280FF 4B dec ebx 00828100 50 push eax 00828101 53 push ebx 00828102 7461 jz 00828165 00828104 7475 jz 0082817B 00828106 7350 jnb 00828158 00828108 726F jb 00828179 0082810A 7065 jo 00828171 0082810C 7274 jb 00828182 0082810E 69657342757474 imul esp, [ebp+$73], $74747542 00828115 6F outsd 00828116 6E outsb 00828117 43 inc ebx 00828118 6C insb 00828119 69636B08546672 imul esp, [ebx+$6B], $72665408 00828120 6D insd 00828121 59 pop ecx 00828122 53 push ebx 00828123 46 inc esi 00828124 50 push eax 00828125 1200 adc al, byte ptr [eax] 00828127 28944500648A45 sub [ebp+eax*2+$458A6400], dl 0082812E 00B8124D0020 add [eax+$20004D12], bh 00828134 42 inc edx 00828135 44 inc esp 00828136 001C5F add [edi+ebx*2], bl 00828139 47 inc edi 0082813A 00B867470064 add [eax+$64004767], bh 00828140 D37800 sar dword ptr [eax+$00], cl 00828143 A80A test al, $0A 00828145 7800 js 00828147 00828147 0016 add [esi], dl 00828149 6300 arpl [eax], ax 0082814B F4 hlt 0082814C B466 mov ah, $66 0082814E 0034B1 add [ecx+esi*4], dh 00828151 6600A40E6400E0A5 add [esi+ecx+$A5E00064], ah 00828159 45 inc ebp 0082815A 005876 add [eax+$76], bl 0082815D 7C00 jl 0082815F 0082815F 087F4B or [edi+$4B], bh 00828162 0088996A0088 add [eax+$88006A99], cl 00828168 7E49 jle 008281B3 0082816A 008C7649009074 add [esi+esi*2+$74900049], cl 00828171 81820007085466726D59 add dword ptr [edx+$54080700], $596D7266 0082817B 53 push ebx 0082817C 46 inc esi 0082817D 50 push eax 0082817E 58 pop eax 0082817F 7882 js 00828103 00828181 00D0 add al, dl 00828183 F2 repne 00828184 49 dec ecx 00828185 005E00 add [esi+$00], bl 00828188 06 push es 00828189 55 push ebp 0082818A 5F pop edi 0082818B 59 pop ecx 0082818C 53 push ebx 0082818D 46 inc esi 0082818E 50 push eax 0082818F 0000 add [eax], al 00828191 8D4000 lea eax, [eax+$00] 00828194 55 push ebp 00828195 8BEC mov ebp, esp 00828197 B906000000 mov ecx, $00000006 0082819C 6A00 push $00 0082819E 6A00 push $00 008281A0 49 dec ecx 008281A1 75F9 jnz 0082819C 008281A3 51 push ecx 008281A4 53 push ebx 008281A5 8945FC mov [ebp-$04], eax 008281A8 33C0 xor eax, eax 008281AA 55 push ebp * Possible String Reference to: '閈墙胛[嬪]' | 008281AB 6893838200 push $00828393 ***** TRY | 008281B0 64FF30 push dword ptr fs:[eax] 008281B3 648920 mov fs:[eax], esp 008281B6 33C0 xor eax, eax 008281B8 55 push ebp 008281B9 6854838200 push $00828354 ***** TRY | 008281BE 64FF30 push dword ptr fs:[eax] 008281C1 648920 mov fs:[eax], esp 008281C4 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008281C7 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 008281CD E882F3C9FF call 004C7554 008281D2 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 008281D5 8B9820030000 mov ebx, [eax+$0320] 008281DB 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008281DD E8F2D6C9FF call 004C58D4 008281E2 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008281E4 E8C35DCBFF call 004DDFAC 008281E9 8B10 mov edx, [eax] * Reference to method TToolButton.GetClientRect() | 008281EB FF5244 call dword ptr [edx+$44] 008281EE 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008281F0 E8B75DCBFF call 004DDFAC * Possible String Reference to: ' select A.*,C.OrderNo ' | 008281F5 BAA8838200 mov edx, $008283A8 008281FA 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 008281FC FF5138 call dword ptr [ecx+$38] 008281FF 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00828201 E8A65DCBFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00828206 BAC8838200 mov edx, $008283C8 0082820B 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 0082820D FF5138 call dword ptr [ecx+$38] 00828210 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00828212 E8955DCBFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00828217 BAE8838200 mov edx, $008283E8 0082821C 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 0082821E FF5138 call dword ptr [ecx+$38] 00828221 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00828223 E8845DCBFF call 004DDFAC * Possible String Reference to: ' left join JYOrder_Main C on A.Main | Id=C.MainId' | 00828228 BA1C848200 mov edx, $0082841C 0082822D 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 0082822F FF5138 call dword ptr [ecx+$38] 00828232 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00828234 E8735DCBFF call 004DDFAC * Possible String Reference to: 'where A.CRTime>=:begdate and A.CRTi | me<:Enddate and A.CRType='应收款发 | 钡羌' ' | 00828239 BA54848200 mov edx, $00828454 0082823E 8B08 mov ecx, [eax] * Reference to method TToolButton.ConstrainedResize(Integer,Integer,Integer,Integer) | 00828240 FF5138 call dword ptr [ecx+$38] 00828243 8B45FC mov eax, [ebp-$04] * Reference to control ConPerson1 : N.A. | 00828246 8B8058030000 mov eax, [eax+$0358] 0082824C FFB014020000 push dword ptr [eax+$0214] 00828252 FFB010020000 push dword ptr [eax+$0210] 00828258 8D55E4 lea edx, [ebp-$1C] * Possible String Reference to: 'yyyy-MM-dd' | 0082825B B8AC848200 mov eax, $008284AC | 00828260 E85769BEFF call 0040EBBC 00828265 8B45E4 mov eax, [ebp-$1C] 00828268 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0082826B E87C26BEFF call 0040A8EC 00828270 8B55E8 mov edx, [ebp-$18] 00828273 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00828276 E84D0BBFFF call 00418DC8 0082827B 8D45EC lea eax, [ebp-$14] 0082827E 50 push eax 0082827F 8BC3 mov eax, ebx * Reference to: ADODB.TCustomADODataSet.GetParameters(TCustomADODataSet):TParameters; | 00828281 E86A40CBFF call 004DC2F0 00828286 BABC848200 mov edx, $008284BC * Reference to: ADODB.TParameters.ParamByName(TParameters;WideString):TParameter; | 0082828B E870C1CAFF call 004D4400 00828290 5A pop edx * Reference to: ADODB.TParameter.SetValue(TParameter;Variant;Variant); | 00828291 E82ED4CAFF call 004D56C4 00828296 8B45FC mov eax, [ebp-$04] * Reference to control Label10 : TLabel | 00828299 8B805C030000 mov eax, [eax+$035C] 0082829F DD8010020000 fld qword ptr [eax+$0210] 008282A5 D805CC848200 fadd dword ptr [$008284CC] 008282AB 83C4F8 add esp, -$08 008282AE DD1C24 fstp qword ptr [esp] 008282B1 9B wait 008282B2 8D55CC lea edx, [ebp-$34] * Possible String Reference to: 'yyyy-MM-dd' | 008282B5 B8AC848200 mov eax, $008284AC | 008282BA E8FD68BEFF call 0040EBBC 008282BF 8B45CC mov eax, [ebp-$34] 008282C2 8D55D0 lea edx, [ebp-$30] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008282C5 E82226BEFF call 0040A8EC 008282CA 8B55D0 mov edx, [ebp-$30] 008282CD 8D45D4 lea eax, [ebp-$2C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008282D0 E8F30ABFFF call 00418DC8 008282D5 8D45D4 lea eax, [ebp-$2C] 008282D8 50 push eax 008282D9 8BC3 mov eax, ebx * Reference to: ADODB.TCustomADODataSet.GetParameters(TCustomADODataSet):TParameters; | 008282DB E81040CBFF call 004DC2F0 008282E0 BAD4848200 mov edx, $008284D4 * Reference to: ADODB.TParameters.ParamByName(TParameters;WideString):TParameter; | 008282E5 E816C1CAFF call 004D4400 008282EA 5A pop edx * Reference to: ADODB.TParameter.SetValue(TParameter;Variant;Variant); | 008282EB E8D4D3CAFF call 004D56C4 008282F0 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 008282F2 E8D1D5C9FF call 004C58C8 008282F7 8B45FC mov eax, [ebp-$04] * Reference to control Label14 : TLabel | 008282FA 8B9068030000 mov edx, [eax+$0368] 00828300 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00828303 8B8020030000 mov eax, [eax+$0320] | 00828309 E882EBF8FF call 007B6E90 0082830E 8B45FC mov eax, [ebp-$04] * Reference to control Label14 : TLabel | 00828311 8B9068030000 mov edx, [eax+$0368] 00828317 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 0082831A 8B8020030000 mov eax, [eax+$0320] | 00828320 E8F3ECF8FF call 007B7018 00828325 8B45FC mov eax, [ebp-$04] * Reference to control Label1 : TLabel | 00828328 8B80A0030000 mov eax, [eax+$03A0] 0082832E BAEC848200 mov edx, $008284EC * Reference to: Controls.TControl.SetText(TControl;TCaption); | 00828333 E8E802C6FF call 00488620 00828338 33C0 xor eax, eax 0082833A 5A pop edx 0082833B 59 pop ecx 0082833C 59 pop ecx 0082833D 648910 mov fs:[eax], edx ****** FINALLY | 00828340 685B838200 push $0082835B 00828345 8B45FC mov eax, [ebp-$04] * Reference to control ToolButton1 : TToolButton | 00828348 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 0082834E E821F2C9FF call 004C7574 00828353 C3 ret * Reference to: System.@HandleFinally; | 00828354 E99BC7BDFF jmp 00404AF4 00828359 EBEA jmp 00828345 ****** END | 0082835B 33C0 xor eax, eax 0082835D 5A pop edx 0082835E 59 pop ecx 0082835F 59 pop ecx 00828360 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[嬪]' | 00828363 689A838200 push $0082839A 00828368 8D45CC lea eax, [ebp-$34] 0082836B BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00828370 E8D3CFBDFF call 00405348 00828375 8D45D4 lea eax, [ebp-$2C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00828378 E8F7C2BEFF call 00414674 0082837D 8D45E4 lea eax, [ebp-$1C] 00828380 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00828385 E8BECFBDFF call 00405348 0082838A 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0082838D E8E2C2BEFF call 00414674 00828392 C3 ret *) end; end.