unit U_SKCR_YF; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmSKCR_YF=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBClose: TToolButton; ADOQueryTemp: TADOQuery; ADOQueryCmd: TADOQuery; Panel1: TPanel; ToolButton2: TToolButton; Label1: TLabel; YWY: TEdit; ADOQueryMain: TADOQuery; ToolButton1: TToolButton; RMDB_PB: TRMDBDataSet; Label3: TLabel; CustomerNoName: TEdit; cxGrid2: TcxGrid; Tv2: TcxGridDBTableView; V1OrdDate: TcxGridDBColumn; cxGridLevel1: TcxGridLevel; Label6: TLabel; begdate: TDateTimePicker; Enddate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; v2CustomerNoName: TcxGridDBColumn; v2ConNo: TcxGridDBColumn; TCK: TToolButton; Label4: TLabel; ConNo: TEdit; v2YWY: TcxGridDBColumn; v2PBMoney: TcxGridDBColumn; v2JGMoney: TcxGridDBColumn; v2ZFMoney: TcxGridDBColumn; v2MLMoney: TcxGridDBColumn; TPrint: TToolButton; v2SKMoney: TcxGridDBColumn; Order_PB: TClientDataSet; Order_FYZC: TClientDataSet; Order_RF: TClientDataSet; Order_XS: TClientDataSet; Order_SK: TClientDataSet; RMDB_FYZC: TRMDBDataSet; RMD_RF: TRMDBDataSet; RMDB_XS: TRMDBDataSet; RMDB_SK: TRMDBDataSet; ADOQuery1: TADOQuery; RMXLSExport1: TRMXLSExport; ADOQuery2: TADOQuery; ADOQuery3: TADOQuery; ADOQuery4: TADOQuery; ADOQuery5: TADOQuery; RM1: TRMGridReport; v2YGMoney: TcxGridDBColumn; THTCX: TToolButton; v2MPRTCodeName: TcxGridDBColumn; v2Qty: TcxGridDBColumn; v2QTYUnit: TcxGridDBColumn; v2TSMoney: TcxGridDBColumn; v2YSZMoney: TcxGridDBColumn; v2OrderNo: TcxGridDBColumn; Label2: TLabel; OrderNO: TEdit; ComboBox1: TComboBox; RMD_FL: TRMDBDataSet; Order_FL: TClientDataSet; ADOQuery6: TADOQuery; v2FLMoney: TcxGridDBColumn; cxTabControl1: TcxTabControl; v2CJJGBiLV: TcxGridDBColumn; v2JFJGMoney: TcxGridDBColumn; ToolButton3: TToolButton; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure CustomerNoNameChange(Sender : TObject); procedure Button2Click(Sender : TObject); procedure cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn3PropertiesButtonClick(Sender : TObject); procedure cxGridDBColumn6PropertiesButtonClick(Sender : TObject); procedure v2Column3PropertiesButtonClick(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure v2Column4PropertiesEditValueChanged(Sender : TObject); procedure v2Column1PropertiesButtonClick(Sender : TObject); procedure VBBPropertiesEditValueChanged(Sender : TObject); procedure ConNoChange(Sender : TObject); procedure v2Column1PropertiesEditValueChanged(Sender : TObject); procedure v2DerateMoneyPropertiesEditValueChanged(Sender : TObject); procedure cxTabControl1Change(Sender : TObject); procedure v2ComTaitouPropertiesButtonClick(Sender : TObject); procedure TCKClick(Sender : TObject); procedure Tv2CellDblClick(Sender : TObject); procedure FormCreate(Sender : TObject); procedure TPrintClick(Sender : TObject); procedure THTCXClick(Sender : TObject); procedure ComboBox1Change(Sender : TObject); procedure v2CJJGBiLVPropertiesEditValueChanged(Sender : TObject); procedure ToolButton3Click(Sender : TObject); procedure _PROC_00843ACD(Sender : TObject); procedure _PROC_008442C1(Sender : TObject); procedure _PROC_00844615(Sender : TObject); procedure _PROC_00844A95(Sender : TObject); procedure _PROC_00844DB2(Sender : TObject); procedure _PROC_00844DE8(Sender : TObject); procedure _PROC_00844DF5(Sender : TObject); procedure _PROC_00845139(Sender : TObject); procedure _PROC_0084575D(Sender : TObject); procedure _PROC_00845B8D(Sender : TObject); procedure _PROC_00845F81(Sender : TObject); procedure _PROC_00846239(Sender : TObject); procedure _PROC_0084644D(Sender : TObject); procedure _PROC_00846769(Sender : TObject); procedure _PROC_00848172(Sender : TObject); procedure _PROC_00848AA5(Sender : TObject); procedure _PROC_00848AD4(Sender : TObject); procedure _PROC_00848ADC(Sender : TObject); procedure _PROC_00848B0C(Sender : TObject); procedure _PROC_00848B14(Sender : TObject); procedure _PROC_00848B44(Sender : TObject); procedure _PROC_00848B4C(Sender : TObject); procedure _PROC_00848B7C(Sender : TObject); procedure _PROC_00848B84(Sender : TObject); procedure _PROC_00848BB4(Sender : TObject); procedure _PROC_00848BBC(Sender : TObject); procedure _PROC_00848BEC(Sender : TObject); procedure _PROC_00848BF4(Sender : TObject); procedure _PROC_00848C24(Sender : TObject); procedure _PROC_00848C2C(Sender : TObject); procedure _PROC_00848C5C(Sender : TObject); procedure _PROC_00848C64(Sender : TObject); procedure _PROC_00848CCA(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmSKCR_YF: TfrmSKCR_YF; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmSKCR_YF.FormDestroy(Sender : TObject); begin (* 008435A0 33C0 xor eax, eax * Reference to GlobalVar_00895A48 | 008435A2 A3485A8900 mov dword ptr [$00895A48], eax 008435A7 C3 ret *) end; procedure TfrmSKCR_YF.FormClose(Sender : TObject); begin (* 008435A8 C60102 mov byte ptr [ecx], $02 008435AB C3 ret *) end; procedure TfrmSKCR_YF.TBCloseClick(Sender : TObject); begin (* 008435AC 53 push ebx 008435AD 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 008435AF B9D8358400 mov ecx, $008435D8 * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008435B4 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '¶©µ¥Ã«Àû' | 008435BA B8EC358400 mov eax, $008435EC | 008435BF E8DC45F7FF call 007B7BA0 008435C4 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 008435C6 E8CD29C6FF call 004A5F98 008435CB 5B pop ebx 008435CC C3 ret *) end; procedure TfrmSKCR_YF.FormShow(Sender : TObject); begin (* 008435F8 53 push ebx 008435F9 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 008435FB B95C368400 mov ecx, $0084365C * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 00843600 8B9334030000 mov edx, [ebx+$0334] * Possible String Reference to: '¶©µ¥Ã«Àû' | 00843606 B870368400 mov eax, $00843670 | 0084360B E89443F7FF call 007B79A4 * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00843610 8B8304030000 mov eax, [ebx+$0304] | 00843616 E86D13F7FF call 007B4988 0084361B 83C4F8 add esp, -$08 0084361E DD1C24 fstp qword ptr [esp] 00843621 9B wait * Reference to control TfrmSKCR_YF.Enddate : TDateTimePicker | 00843622 8B8348030000 mov eax, [ebx+$0348] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00843628 E8FFEBC2FF call 0047222C * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 0084362D 8B8304030000 mov eax, [ebx+$0304] | 00843633 E85013F7FF call 007B4988 00843638 D8257C368400 fsub dword ptr [$0084367C] 0084363E 83C4F8 add esp, -$08 00843641 DD1C24 fstp qword ptr [esp] 00843644 9B wait * Reference to control TfrmSKCR_YF.begdate : TDateTimePicker | 00843645 8B8344030000 mov eax, [ebx+$0344] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 0084364B E8DCEBC2FF call 0047222C 00843650 5B pop ebx 00843651 C3 ret *) end; procedure TfrmSKCR_YF.TBRafreshClick(Sender : TObject); begin (* | 00843680 E833FBFFFF call 008431B8 00843685 C3 ret *) end; procedure TfrmSKCR_YF.ToolButton2Click(Sender : TObject); begin (* 00843688 55 push ebp 00843689 8BEC mov ebp, esp 0084368B 6A00 push $00 0084368D 53 push ebx 0084368E 8BD8 mov ebx, eax 00843690 33C0 xor eax, eax 00843692 55 push ebp 00843693 680C378400 push $0084370C ***** TRY | 00843698 64FF30 push dword ptr fs:[eax] 0084369B 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 0084369E 8B831C030000 mov eax, [ebx+$031C] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 008436A4 E86B23C8FF call 004C5A14 008436A9 84C0 test al, al 008436AB 7449 jz 008436F6 008436AD 8D45FC lea eax, [ebp-$04] 008436B0 50 push eax 008436B1 B902000000 mov ecx, $00000002 008436B6 BA01000000 mov edx, $00000001 * Reference to control TfrmSKCR_YF.Panel1 : TPanel | 008436BB 8B830C030000 mov eax, [ebx+$030C] | 008436C1 E8EA29F7FF call 007B60B0 008436C6 8B55FC mov edx, [ebp-$04] * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 008436C9 8B831C030000 mov eax, [ebx+$031C] | 008436CF E8F435F7FF call 007B6CC8 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008436D4 8B9354030000 mov edx, [ebx+$0354] * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 008436DA 8B831C030000 mov eax, [ebx+$031C] | 008436E0 E8AB37F7FF call 007B6E90 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008436E5 8B9354030000 mov edx, [ebx+$0354] * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 008436EB 8B831C030000 mov eax, [ebx+$031C] | 008436F1 E82239F7FF call 007B7018 008436F6 33C0 xor eax, eax 008436F8 5A pop edx 008436F9 59 pop ecx 008436FA 59 pop ecx 008436FB 648910 mov fs:[eax], edx ****** FINALLY | 008436FE 6813378400 push $00843713 00843703 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 00843706 E8191CBCFF call 00405324 0084370B C3 ret * Reference to: System.@HandleFinally; | 0084370C E9E313BCFF jmp 00404AF4 00843711 EBF0 jmp 00843703 ****** END | 00843713 5B pop ebx 00843714 59 pop ecx 00843715 5D pop ebp 00843716 C3 ret *) end; procedure TfrmSKCR_YF.CustomerNoNameChange(Sender : TObject); begin (* 00843718 56 push esi * Reference to control TfrmSKCR_YF.ToolButton2 : TToolButton | 00843719 8B8010030000 mov eax, [eax+$0310] 0084371F 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00843723 E82C0EBCFF call 00404554 00843728 5E pop esi 00843729 C3 ret *) end; procedure TfrmSKCR_YF.Button2Click(Sender : TObject); begin (* 0084372C 55 push ebp 0084372D 8BEC mov ebp, esp 0084372F 33C9 xor ecx, ecx 00843731 51 push ecx 00843732 51 push ecx 00843733 51 push ecx 00843734 51 push ecx 00843735 51 push ecx 00843736 53 push ebx 00843737 56 push esi 00843738 8BD8 mov ebx, eax 0084373A 33C0 xor eax, eax 0084373C 55 push ebp 0084373D 6839388400 push $00843839 ***** TRY | 00843742 64FF30 push dword ptr fs:[eax] 00843745 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843748 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 0084374E E86D47C8FF call 004C7EC0 00843753 84C0 test al, al 00843755 0F85C3000000 jnz 0084381E 0084375B 6A24 push $24 * Possible String Reference to: 'Ìáʾ' | 0084375D B948388400 mov ecx, $00843848 * Possible String Reference to: 'È·¶¨ÒªÉ¾³ýÊý¾ÝÂð£¿' | 00843762 BA50388400 mov edx, $00843850 *) end; procedure TfrmSKCR_YF.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 008438A8 55 push ebp 008438A9 8BEC mov ebp, esp 008438AB B908000000 mov ecx, $00000008 008438B0 6A00 push $00 008438B2 6A00 push $00 008438B4 49 dec ecx 008438B5 75F9 jnz 008438B0 008438B7 51 push ecx 008438B8 53 push ebx 008438B9 56 push esi 008438BA 8BDA mov ebx, edx 008438BC 8BF0 mov esi, eax 008438BE 33C0 xor eax, eax 008438C0 55 push ebp 008438C1 68B63A8400 push $00843AB6 ***** TRY | 008438C6 64FF30 push dword ptr fs:[eax] 008438C9 648920 mov fs:[eax], esp 008438CC 8D55FC lea edx, [ebp-$04] 008438CF 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; | 008438D1 E8E6BDD4FF call 0058F6BC * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008438D6 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008438DC E86B8AE1FF 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; | 008438E1 E87EE2E0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 008438E6 8B4050 mov eax, [eax+$50] 008438E9 8D55F4 lea edx, [ebp-$0C] 008438EC 8B08 mov ecx, [eax] 008438EE FF5110 call dword ptr [ecx+$10] 008438F1 8B45F4 mov eax, [ebp-$0C] 008438F4 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008438F7 E8F06FBCFF call 0040A8EC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008438FC 8B9E54030000 mov ebx, [esi+$0354] 00843902 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00843904 E8374BC8FF call 004C8440 00843909 8D55E0 lea edx, [ebp-$20] 0084390C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084390F E8D86FBCFF call 0040A8EC 00843914 8B55E0 mov edx, [ebp-$20] 00843917 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0084391A E8A954BDFF call 00418DC8 0084391F 8D45E4 lea eax, [ebp-$1C] 00843922 50 push eax 00843923 8B55F8 mov edx, [ebp-$08] 00843926 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843928 E88732C8FF call 004C6BB4 0084392D 5A pop edx 0084392E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00843930 FF91B4000000 call dword ptr [ecx+$00B4] 00843936 8BC3 mov eax, ebx 00843938 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0084393A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 00843940 8B9E08030000 mov ebx, [esi+$0308] 00843946 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00843948 E8871FC8FF call 004C58D4 0084394D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084394F E858A6C9FF call 004DDFAC 00843954 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00843956 FF5244 call dword ptr [edx+$44] 00843959 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084395B E84CA6C9FF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 00843960 BACC3A8400 mov edx, $00843ACC 00843965 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00843967 FF5138 call dword ptr [ecx+$38] 0084396A 8D55DC lea edx, [ebp-$24] 0084396D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843970 E8776FBCFF call 0040A8EC 00843975 837DDC00 cmp dword ptr [ebp-$24], +$00 00843979 7440 jz 008439BB * Possible String Reference to: ' Set ' | 0084397B 68E83A8400 push $00843AE8 00843980 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00843983 68F83A8400 push $00843AF8 00843988 8D55D4 lea edx, [ebp-$2C] 0084398B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084398E E8596FBCFF call 0040A8EC 00843993 FF75D4 push dword ptr [ebp-$2C] 00843996 68043B8400 push $00843B04 0084399B 8D45D8 lea eax, [ebp-$28] 0084399E BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008439A3 E80C1DBCFF call 004056B4 008439A8 8B45D8 mov eax, [ebp-$28] 008439AB 50 push eax 008439AC 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008439AE E8F9A5C9FF call 004DDFAC 008439B3 5A pop edx 008439B4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008439B6 FF5138 call dword ptr [ecx+$38] 008439B9 EB2B jmp 008439E6 008439BB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008439BD E8EAA5C9FF call 004DDFAC 008439C2 50 push eax * Possible String Reference to: ' Set ' | 008439C3 68E83A8400 push $00843AE8 008439C8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 008439CB 68103B8400 push $00843B10 008439D0 8D45D0 lea eax, [ebp-$30] 008439D3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008439D8 E8D71CBCFF call 004056B4 008439DD 8B55D0 mov edx, [ebp-$30] 008439E0 58 pop eax 008439E1 8B08 mov ecx, [eax] 008439E3 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008439E6 68203B8400 push $00843B20 008439EB 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmSKCR_YF.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 00843B74 55 push ebp 00843B75 8BEC mov ebp, esp 00843B77 B91C000000 mov ecx, $0000001C 00843B7C 6A00 push $00 00843B7E 6A00 push $00 00843B80 49 dec ecx 00843B81 75F9 jnz 00843B7C 00843B83 51 push ecx 00843B84 53 push ebx 00843B85 56 push esi 00843B86 8BF2 mov esi, edx 00843B88 8BD8 mov ebx, eax 00843B8A 33C0 xor eax, eax 00843B8C 55 push ebp 00843B8D 68EF418400 push $008441EF ***** TRY | 00843B92 64FF30 push dword ptr fs:[eax] 00843B95 648920 mov fs:[eax], esp 00843B98 8D55FC lea edx, [ebp-$04] 00843B9B 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; | 00843B9D E81ABBD4FF call 0058F6BC 00843BA2 8D55DC lea edx, [ebp-$24] 00843BA5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BA8 E83F6DBCFF call 0040A8EC 00843BAD 837DDC00 cmp dword ptr [ebp-$24], +$00 00843BB1 750D jnz 00843BC0 00843BB3 8D45FC lea eax, [ebp-$04] 00843BB6 BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843BBB E8FC17BCFF call 004053BC * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 00843BC0 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 00843BC6 E88187E1FF 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; | 00843BCB E894DFE0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00843BD0 8B4050 mov eax, [eax+$50] 00843BD3 8D55D8 lea edx, [ebp-$28] 00843BD6 8B08 mov ecx, [eax] 00843BD8 FF5110 call dword ptr [ecx+$10] 00843BDB 8B45D8 mov eax, [ebp-$28] 00843BDE 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BE1 E8066DBCFF call 0040A8EC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843BE6 8BB354030000 mov esi, [ebx+$0354] 00843BEC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00843BEE E84D48C8FF call 004C8440 00843BF3 8D55C4 lea edx, [ebp-$3C] 00843BF6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BF9 E8EE6CBCFF call 0040A8EC 00843BFE 8B55C4 mov edx, [ebp-$3C] 00843C01 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00843C04 E8BF51BDFF call 00418DC8 00843C09 8D45C8 lea eax, [ebp-$38] 00843C0C 50 push eax 00843C0D 8B55E0 mov edx, [ebp-$20] 00843C10 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C12 E89D2FC8FF call 004C6BB4 00843C17 5A pop edx 00843C18 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00843C1A FF91B4000000 call dword ptr [ecx+$00B4] 00843C20 8BC6 mov eax, esi 00843C22 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00843C24 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00843C2A 8BB304030000 mov esi, [ebx+$0304] 00843C30 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00843C32 E89D1CC8FF call 004C58D4 00843C37 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843C39 E86EA3C9FF call 004DDFAC 00843C3E 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00843C40 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00843C43 6810428400 push $00844210 * Possible String Reference to: 'YFID' | 00843C48 BA58428400 mov edx, $00844258 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843C4D 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C53 E85C2FC8FF call 004C6BB4 00843C58 8D55BC lea edx, [ebp-$44] 00843C5B 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843C5D FF5160 call dword ptr [ecx+$60] 00843C60 FF75BC push dword ptr [ebp-$44] 00843C63 6868428400 push $00844268 00843C68 8D45C0 lea eax, [ebp-$40] 00843C6B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00843C70 E83F1ABCFF call 004056B4 00843C75 8B45C0 mov eax, [ebp-$40] 00843C78 50 push eax 00843C79 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843C7B E82CA3C9FF call 004DDFAC 00843C80 5A pop edx 00843C81 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00843C83 FF5138 call dword ptr [ecx+$38] 00843C86 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00843C88 E83B1CC8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00843C8D BA74428400 mov edx, $00844274 * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00843C92 8B8304030000 mov eax, [ebx+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C98 E8172FC8FF call 004C6BB4 00843C9D 8D55E4 lea edx, [ebp-$1C] 00843CA0 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 00843CA2 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 00843CA5 BA84428400 mov edx, $00844284 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843CAA 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843CB0 E8FF2EC8FF call 004C6BB4 00843CB5 8D55B8 lea edx, [ebp-$48] 00843CB8 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843CBA FF5160 call dword ptr [ecx+$60] 00843CBD 8B45B8 mov eax, [ebp-$48] 00843CC0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843CC3 E8246CBCFF call 0040A8EC 00843CC8 8D55B4 lea edx, [ebp-$4C] 00843CCB 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843CCE E8196CBCFF call 0040A8EC 00843CD3 837DB400 cmp dword ptr [ebp-$4C], +$00 00843CD7 750D jnz 00843CE6 00843CD9 8D45F8 lea eax, [ebp-$08] 00843CDC BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843CE1 E8D616BCFF call 004053BC * Possible String Reference to: 'Price' | 00843CE6 BA90428400 mov edx, $00844290 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843CEB 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843CF1 E8BE2EC8FF call 004C6BB4 00843CF6 8D55B0 lea edx, [ebp-$50] 00843CF9 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843CFB FF5160 call dword ptr [ecx+$60] 00843CFE 8B45B0 mov eax, [ebp-$50] 00843D01 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D04 E8E36BBCFF call 0040A8EC 00843D09 8D55AC lea edx, [ebp-$54] 00843D0C 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D0F E8D86BBCFF call 0040A8EC 00843D14 837DAC00 cmp dword ptr [ebp-$54], +$00 00843D18 750D jnz 00843D27 00843D1A 8D45F4 lea eax, [ebp-$0C] 00843D1D BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843D22 E89516BCFF call 004053BC * Possible String Reference to: 'Qty' | 00843D27 BA84428400 mov edx, $00844284 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843D2C 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843D32 E87D2EC8FF call 004C6BB4 00843D37 8D55A8 lea edx, [ebp-$58] 00843D3A 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843D3C FF5160 call dword ptr [ecx+$60] 00843D3F 8B45A8 mov eax, [ebp-$58] 00843D42 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D45 E8A26BBCFF call 0040A8EC 00843D4A 8D55A4 lea edx, [ebp-$5C] 00843D4D 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D50 E8976BBCFF call 0040A8EC 00843D55 837DA400 cmp dword ptr [ebp-$5C], +$00 00843D59 750D jnz 00843D68 00843D5B 8D45F8 lea eax, [ebp-$08] 00843D5E BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843D63 E85416BCFF call 004053BC * Possible String Reference to: 'Money' | 00843D68 BAA0428400 mov edx, $008442A0 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843D6D 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843D73 E83C2EC8FF call 004C6BB4 00843D78 8D55A0 lea edx, [ebp-$60] 00843D7B 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843D7D FF5160 call dword ptr [ecx+$60] 00843D80 8B45A0 mov eax, [ebp-$60] 00843D83 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D86 E8616BBCFF call 0040A8EC 00843D8B 8D559C lea edx, [ebp-$64] 00843D8E 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D91 E8566BBCFF call 0040A8EC 00843D96 837D9C00 cmp dword ptr [ebp-$64], +$00 00843D9A 750D jnz 00843DA9 00843D9C 8D45F0 lea eax, [ebp-$10] 00843D9F BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843DA4 E81316BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 00843DA9 BAB0428400 mov edx, $008442B0 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843DAE 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843DB4 E8FB2DC8FF call 004C6BB4 00843DB9 8D5598 lea edx, [ebp-$68] 00843DBC 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00843DBE FF5160 call dword ptr [ecx+$60] 00843DC1 8B4598 mov eax, [ebp-$68] 00843DC4 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DC7 E8206BBCFF call 0040A8EC 00843DCC 8D5594 lea edx, [ebp-$6C] 00843DCF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DD2 E8156BBCFF call 0040A8EC 00843DD7 837D9400 cmp dword ptr [ebp-$6C], +$00 00843DDB 750D jnz 00843DEA 00843DDD 8D45EC lea eax, [ebp-$14] 00843DE0 BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843DE5 E8D215BCFF call 004053BC 00843DEA 8D5590 lea edx, [ebp-$70] 00843DED 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DF0 E8F76ABCFF call 0040A8EC 00843DF5 8B4590 mov eax, [ebp-$70] * Possible String Reference to: 'Money' | 00843DF8 BAA0428400 mov edx, $008442A0 * Reference to: System.@LStrCmp; | 00843DFD E83E19BCFF call 00405740 00843E02 0F84AD000000 jz 00843EB5 00843E08 8D558C lea edx, [ebp-$74] 00843E0B 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843E0E E8D96ABCFF call 0040A8EC 00843E13 8B458C mov eax, [ebp-$74] * Possible String Reference to: 'HuiLv' | 00843E16 BAB0428400 mov edx, $008442B0 * Reference to: System.@LStrCmp; | 00843E1B E82019BCFF call 00405740 00843E20 7469 jz 00843E8B 00843E22 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E25 E80299BCFF call 0040D72C 00843E2A DB7D80 fstp tbyte ptr [ebp-$80] 00843E2D 9B wait 00843E2E 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E31 E8F698BCFF call 0040D72C 00843E36 DB6D80 fld tbyte ptr [ebp-$80] 00843E39 DEC9 fmulp st(1), st(0) 00843E3B DBBD74FFFFFF fstp tbyte ptr [ebp+$FFFFFF74] 00843E41 9B wait 00843E42 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E45 E8E298BCFF call 0040D72C 00843E4A DBAD74FFFFFF fld tbyte ptr [ebp+$FFFFFF74] 00843E50 DEC9 fmulp st(1), st(0) 00843E52 83C4F4 add esp, -$0C 00843E55 DB3C24 fstp tbyte ptr [esp] 00843E58 9B wait 00843E59 8D45E8 lea eax, [ebp-$18] | 00843E5C E84B97BCFF call 0040D5AC 00843E61 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E64 E8C398BCFF call 0040D72C 00843E69 DB7D80 fstp tbyte ptr [ebp-$80] 00843E6C 9B wait 00843E6D 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E70 E8B798BCFF call 0040D72C 00843E75 DB6D80 fld tbyte ptr [ebp-$80] 00843E78 DEC9 fmulp st(1), st(0) 00843E7A 83C4F4 add esp, -$0C 00843E7D DB3C24 fstp tbyte ptr [esp] 00843E80 9B wait 00843E81 8D45F0 lea eax, [ebp-$10] | 00843E84 E82397BCFF call 0040D5AC 00843E89 EB52 jmp 00843EDD 00843E8B 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E8E E89998BCFF call 0040D72C 00843E93 DB7D80 fstp tbyte ptr [ebp-$80] 00843E96 9B wait 00843E97 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E9A E88D98BCFF call 0040D72C 00843E9F DB6D80 fld tbyte ptr [ebp-$80] 00843EA2 DEC9 fmulp st(1), st(0) 00843EA4 83C4F4 add esp, -$0C 00843EA7 DB3C24 fstp tbyte ptr [esp] 00843EAA 9B wait 00843EAB 8D45E8 lea eax, [ebp-$18] | 00843EAE E8F996BCFF call 0040D5AC 00843EB3 EB28 jmp 00843EDD 00843EB5 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EB8 E86F98BCFF call 0040D72C 00843EBD DB7D80 fstp tbyte ptr [ebp-$80] 00843EC0 9B wait 00843EC1 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EC4 E86398BCFF call 0040D72C 00843EC9 DB6D80 fld tbyte ptr [ebp-$80] 00843ECC DEC9 fmulp st(1), st(0) 00843ECE 83C4F4 add esp, -$0C 00843ED1 DB3C24 fstp tbyte ptr [esp] 00843ED4 9B wait 00843ED5 8D45E8 lea eax, [ebp-$18] | 00843ED8 E8CF96BCFF call 0040D5AC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00843EDD 8BB354030000 mov esi, [ebx+$0354] 00843EE3 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00843EE5 E85645C8FF call 004C8440 * Possible String Reference to: 'Money' | 00843EEA BAA0428400 mov edx, $008442A0 00843EEF 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843EF1 E8BE2CC8FF call 004C6BB4 00843EF6 50 push eax 00843EF7 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EFA E82D98BCFF call 0040D72C 00843EFF 8D8564FFFFFF lea eax, [ebp+$FFFFFF64] * Reference to: Variants.@VarFromReal; | 00843F05 E8824EBDFF call 00418D8C 00843F0A 8D9564FFFFFF lea edx, [ebp+$FFFFFF64] 00843F10 58 pop eax 00843F11 8B08 mov ecx, [eax] 00843F13 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00843F19 BA74428400 mov edx, $00844274 00843F1E 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843F20 E88F2CC8FF call 004C6BB4 00843F25 50 push eax 00843F26 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843F29 E8FE97BCFF call 0040D72C 00843F2E 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] * Reference to: Variants.@VarFromReal; | 00843F34 E8534EBDFF call 00418D8C 00843F39 8D9554FFFFFF lea edx, [ebp+$FFFFFF54] 00843F3F 58 pop eax 00843F40 8B08 mov ecx, [eax] 00843F42 FF91B4000000 call dword ptr [ecx+$00B4] 00843F48 8BC6 mov eax, esi 00843F4A 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00843F4C FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 00843F52 8BB308030000 mov esi, [ebx+$0308] 00843F58 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00843F5A E87519C8FF call 004C58D4 00843F5F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843F61 E846A0C9FF call 004DDFAC 00843F66 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00843F68 FF5244 call dword ptr [edx+$44] 00843F6B 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843F6D E83AA0C9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00843F72 BAC0428400 mov edx, $008442C0 00843F77 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00843F79 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00843F7C 68DC428400 push $008442DC 00843F81 FF75E0 push dword ptr [ebp-$20] 00843F84 68EC428400 push $008442EC 00843F89 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 00843F8F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843F92 E85569BCFF call 0040A8EC 00843F97 FFB54CFFFFFF push dword ptr [ebp+$FFFFFF4C] 00843F9D 8D8550FFFFFF lea eax, [ebp+$FFFFFF50] 00843FA3 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00843FA8 E80717BCFF call 004056B4 00843FAD 8B8550FFFFFF mov eax, [ebp+$FFFFFF50] 00843FB3 50 push eax 00843FB4 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843FB6 E8F19FC9FF call 004DDFAC 00843FBB 5A pop edx 00843FBC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00843FBE FF5138 call dword ptr [ecx+$38] 00843FC1 8D9548FFFFFF lea edx, [ebp+$FFFFFF48] 00843FC7 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843FCA E81D69BCFF call 0040A8EC 00843FCF 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] * Possible String Reference to: 'Money' | 00843FD5 BAA0428400 mov edx, $008442A0 * Reference to: System.@LStrCmp; | 00843FDA E86117BCFF call 00405740 00843FDF 7427 jz 00844008 00843FE1 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00843FE3 E8C49FC9FF call 004DDFAC 00843FE8 50 push eax 00843FE9 8D8544FFFFFF lea eax, [ebp+$FFFFFF44] 00843FEF 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 00843FF2 BAF8428400 mov edx, $008442F8 * Reference to: System.@LStrCat3; | 00843FF7 E84416BCFF call 00405640 00843FFC 8B9544FFFFFF mov edx, [ebp+$FFFFFF44] 00844002 58 pop eax 00844003 8B08 mov ecx, [eax] 00844005 FF5138 call dword ptr [ecx+$38] 00844008 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084400A E89D9FC9FF call 004DDFAC 0084400F 50 push eax 00844010 8D8540FFFFFF lea eax, [ebp+$FFFFFF40] 00844016 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 00844019 BA08438400 mov edx, $00844308 * Reference to: System.@LStrCat3; | 0084401E E81D16BCFF call 00405640 00844023 8B9540FFFFFF mov edx, [ebp+$FFFFFF40] 00844029 58 pop eax 0084402A 8B08 mov ecx, [eax] 0084402C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 0084402F 681C438400 push $0084431C 00844034 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] *) end; procedure TfrmSKCR_YF.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 008443D8 55 push ebp 008443D9 8BEC mov ebp, esp 008443DB B908000000 mov ecx, $00000008 008443E0 6A00 push $00 008443E2 6A00 push $00 008443E4 49 dec ecx 008443E5 75F9 jnz 008443E0 008443E7 51 push ecx 008443E8 53 push ebx 008443E9 56 push esi 008443EA 8BDA mov ebx, edx 008443EC 8BF0 mov esi, eax 008443EE 33C0 xor eax, eax 008443F0 55 push ebp 008443F1 68FE458400 push $008445FE ***** TRY | 008443F6 64FF30 push dword ptr fs:[eax] 008443F9 648920 mov fs:[eax], esp 008443FC 8D55FC lea edx, [ebp-$04] 008443FF 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; | 00844401 E8B6B2D4FF call 0058F6BC * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 00844406 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 0084440C E83B7FE1FF 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; | 00844411 E84ED7E0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00844416 8B4050 mov eax, [eax+$50] 00844419 8D55F4 lea edx, [ebp-$0C] 0084441C 8B08 mov ecx, [eax] 0084441E FF5110 call dword ptr [ecx+$10] 00844421 8B45F4 mov eax, [ebp-$0C] 00844424 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00844427 E8C064BCFF call 0040A8EC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084442C 8B9E54030000 mov ebx, [esi+$0354] 00844432 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00844434 E80740C8FF call 004C8440 00844439 8D55E0 lea edx, [ebp-$20] 0084443C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084443F E8A864BCFF call 0040A8EC 00844444 8B55E0 mov edx, [ebp-$20] 00844447 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0084444A E87949BDFF call 00418DC8 0084444F 8D45E4 lea eax, [ebp-$1C] 00844452 50 push eax 00844453 8B55F8 mov edx, [ebp-$08] 00844456 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00844458 E85727C8FF call 004C6BB4 0084445D 5A pop edx 0084445E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00844460 FF91B4000000 call dword ptr [ecx+$00B4] 00844466 8BC3 mov eax, ebx 00844468 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0084446A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 00844470 8B9E08030000 mov ebx, [esi+$0308] 00844476 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00844478 E85714C8FF call 004C58D4 0084447D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084447F E8289BC9FF call 004DDFAC 00844484 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00844486 FF5244 call dword ptr [edx+$44] 00844489 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084448B E81C9BC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00844490 BA14468400 mov edx, $00844614 00844495 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00844497 FF5138 call dword ptr [ecx+$38] 0084449A 8D55DC lea edx, [ebp-$24] 0084449D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008444A0 E84764BCFF call 0040A8EC 008444A5 837DDC00 cmp dword ptr [ebp-$24], +$00 008444A9 7440 jz 008444EB * Possible String Reference to: ' Set ' | 008444AB 6830468400 push $00844630 008444B0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008444B3 6840468400 push $00844640 008444B8 8D55D4 lea edx, [ebp-$2C] 008444BB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008444BE E82964BCFF call 0040A8EC 008444C3 FF75D4 push dword ptr [ebp-$2C] 008444C6 684C468400 push $0084464C 008444CB 8D45D8 lea eax, [ebp-$28] 008444CE BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008444D3 E8DC11BCFF call 004056B4 008444D8 8B45D8 mov eax, [ebp-$28] 008444DB 50 push eax 008444DC 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008444DE E8C99AC9FF call 004DDFAC 008444E3 5A pop edx 008444E4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008444E6 FF5138 call dword ptr [ecx+$38] 008444E9 EB2B jmp 00844516 008444EB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008444ED E8BA9AC9FF call 004DDFAC 008444F2 50 push eax * Possible String Reference to: ' Set ' | 008444F3 6830468400 push $00844630 008444F8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 008444FB 6858468400 push $00844658 00844500 8D45D0 lea eax, [ebp-$30] 00844503 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00844508 E8A711BCFF call 004056B4 0084450D 8B55D0 mov edx, [ebp-$30] 00844510 58 pop eax 00844511 8B08 mov ecx, [eax] 00844513 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00844516 6868468400 push $00844668 0084451B 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmSKCR_YF.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 008446BC 55 push ebp 008446BD 8BEC mov ebp, esp 008446BF 51 push ecx 008446C0 B90B000000 mov ecx, $0000000B 008446C5 6A00 push $00 008446C7 6A00 push $00 008446C9 49 dec ecx 008446CA 75F9 jnz 008446C5 008446CC 51 push ecx 008446CD 874DFC xchg [ebp-$04], ecx 008446D0 53 push ebx 008446D1 56 push esi 008446D2 8BF0 mov esi, eax 008446D4 33C0 xor eax, eax 008446D6 55 push ebp * Possible String Reference to: 'éè' | 008446D7 68074A8400 push $00844A07 ***** TRY | 008446DC 64FF30 push dword ptr fs:[eax] 008446DF 648920 mov fs:[eax], esp 008446E2 33C0 xor eax, eax 008446E4 55 push ebp 008446E5 68C0498400 push $008449C0 ***** TRY | 008446EA 64FF30 push dword ptr fs:[eax] 008446ED 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 00844B3C 55 push ebp 00844B3D 8BEC mov ebp, esp 00844B3F 51 push ecx 00844B40 B906000000 mov ecx, $00000006 00844B45 6A00 push $00 00844B47 6A00 push $00 00844B49 49 dec ecx 00844B4A 75F9 jnz 00844B45 00844B4C 51 push ecx 00844B4D 874DFC xchg [ebp-$04], ecx 00844B50 53 push ebx 00844B51 56 push esi 00844B52 8BF0 mov esi, eax 00844B54 33C0 xor eax, eax 00844B56 55 push ebp * Possible String Reference to: 'éZý»ÿëã^[‹å]Ã' | 00844B57 68954D8400 push $00844D95 ***** TRY | 00844B5C 64FF30 push dword ptr fs:[eax] 00844B5F 648920 mov fs:[eax], esp 00844B62 33C0 xor eax, eax 00844B64 55 push ebp 00844B65 686B4D8400 push $00844D6B ***** TRY | 00844B6A 64FF30 push dword ptr fs:[eax] 00844B6D 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 00844E98 55 push ebp 00844E99 8BEC mov ebp, esp 00844E9B 51 push ecx 00844E9C B906000000 mov ecx, $00000006 00844EA1 6A00 push $00 00844EA3 6A00 push $00 00844EA5 49 dec ecx 00844EA6 75F9 jnz 00844EA1 00844EA8 51 push ecx 00844EA9 874DFC xchg [ebp-$04], ecx 00844EAC 53 push ebx 00844EAD 56 push esi 00844EAE 8BF0 mov esi, eax 00844EB0 33C0 xor eax, eax 00844EB2 55 push ebp * Possible String Reference to: 'éþù»ÿëã^[‹å]Ã' | 00844EB3 68F1508400 push $008450F1 ***** TRY | 00844EB8 64FF30 push dword ptr fs:[eax] 00844EBB 648920 mov fs:[eax], esp 00844EBE 33C0 xor eax, eax 00844EC0 55 push ebp 00844EC1 68C7508400 push $008450C7 ***** TRY | 00844EC6 64FF30 push dword ptr fs:[eax] 00844EC9 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF.ToolButton1Click(Sender : TObject); begin (* 008451DC 53 push ebx 008451DD 8BD8 mov ebx, eax * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 008451DF 8B831C030000 mov eax, [ebx+$031C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 008451E5 E8D62CC8FF call 004C7EC0 008451EA 84C0 test al, al 008451EC 7516 jnz 00845204 * Possible String Reference to: '¶©µ¥ÀûÈó±í' | 008451EE B910528400 mov ecx, $00845210 * Reference to control TfrmSKCR_YF.ADOQueryMain : TADOQuery | 008451F3 8B931C030000 mov edx, [ebx+$031C] * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008451F9 8B8334030000 mov eax, [ebx+$0334] | 008451FF E82C30F7FF call 007B8230 00845204 5B pop ebx 00845205 C3 ret *) end; procedure TfrmSKCR_YF.v2Column4PropertiesEditValueChanged(Sender : TObject); begin (* 0084521C 55 push ebp 0084521D 8BEC mov ebp, esp 0084521F B915000000 mov ecx, $00000015 00845224 6A00 push $00 00845226 6A00 push $00 00845228 49 dec ecx 00845229 75F9 jnz 00845224 0084522B 53 push ebx 0084522C 56 push esi 0084522D 8BF2 mov esi, edx 0084522F 8BD8 mov ebx, eax 00845231 33C0 xor eax, eax 00845233 55 push ebp * Possible String Reference to: 'éIô»ÿë³^[‹å]Ã' | 00845234 68A6568400 push $008456A6 ***** TRY | 00845239 64FF30 push dword ptr fs:[eax] 0084523C 648920 mov fs:[eax], esp 0084523F 8D55FC lea edx, [ebp-$04] 00845242 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; | 00845244 E873A4D4FF call 0058F6BC 00845249 8D55E4 lea edx, [ebp-$1C] 0084524C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084524F E89856BCFF call 0040A8EC 00845254 837DE400 cmp dword ptr [ebp-$1C], +$00 00845258 750D jnz 00845267 0084525A 8D45FC lea eax, [ebp-$04] 0084525D BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 00845262 E85501BCFF call 004053BC * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 00845267 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 0084526D E8DA70E1FF 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; | 00845272 E8EDC8E0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00845277 8B4050 mov eax, [eax+$50] 0084527A 8D55E0 lea edx, [ebp-$20] 0084527D 8B08 mov ecx, [eax] 0084527F FF5110 call dword ptr [ecx+$10] 00845282 8B45E0 mov eax, [ebp-$20] 00845285 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845288 E85F56BCFF call 0040A8EC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084528D 8BB354030000 mov esi, [ebx+$0354] 00845293 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00845295 E8A631C8FF call 004C8440 0084529A 8D55CC lea edx, [ebp-$34] 0084529D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008452A0 E84756BCFF call 0040A8EC 008452A5 8B55CC mov edx, [ebp-$34] 008452A8 8D45D0 lea eax, [ebp-$30] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008452AB E8183BBDFF call 00418DC8 008452B0 8D45D0 lea eax, [ebp-$30] 008452B3 50 push eax 008452B4 8B55E8 mov edx, [ebp-$18] 008452B7 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008452B9 E8F618C8FF call 004C6BB4 008452BE 5A pop edx 008452BF 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 008452C1 FF91B4000000 call dword ptr [ecx+$00B4] 008452C7 8BC6 mov eax, esi 008452C9 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008452CB FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 008452D1 8BB304030000 mov esi, [ebx+$0304] 008452D7 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 008452D9 E8F605C8FF call 004C58D4 008452DE 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008452E0 E8C78CC9FF call 004DDFAC 008452E5 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008452E7 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 008452EA 68C8568400 push $008456C8 * Possible String Reference to: 'YFID' | 008452EF BA10578400 mov edx, $00845710 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008452F4 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008452FA E8B518C8FF call 004C6BB4 008452FF 8D55C4 lea edx, [ebp-$3C] 00845302 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00845304 FF5160 call dword ptr [ecx+$60] 00845307 FF75C4 push dword ptr [ebp-$3C] 0084530A 6820578400 push $00845720 0084530F 8D45C8 lea eax, [ebp-$38] 00845312 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00845317 E89803BCFF call 004056B4 0084531C 8B45C8 mov eax, [ebp-$38] 0084531F 50 push eax 00845320 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845322 E8858CC9FF call 004DDFAC 00845327 5A pop edx 00845328 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084532A FF5138 call dword ptr [ecx+$38] 0084532D 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 0084532F E89405C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00845334 BA2C578400 mov edx, $0084572C * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00845339 8B8304030000 mov eax, [ebx+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0084533F E87018C8FF call 004C6BB4 00845344 8D55EC lea edx, [ebp-$14] 00845347 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 00845349 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Money' | 0084534C BA3C578400 mov edx, $0084573C * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00845351 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845357 E85818C8FF call 004C6BB4 0084535C 8D55C0 lea edx, [ebp-$40] 0084535F 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00845361 FF5160 call dword ptr [ecx+$60] 00845364 8B45C0 mov eax, [ebp-$40] 00845367 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084536A E87D55BCFF call 0040A8EC 0084536F 8D55BC lea edx, [ebp-$44] 00845372 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845375 E87255BCFF call 0040A8EC 0084537A 837DBC00 cmp dword ptr [ebp-$44], +$00 0084537E 750D jnz 0084538D 00845380 8D45F8 lea eax, [ebp-$08] 00845383 BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 00845388 E82F00BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 0084538D BA4C578400 mov edx, $0084574C * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00845392 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845398 E81718C8FF call 004C6BB4 0084539D 8D55B8 lea edx, [ebp-$48] 008453A0 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008453A2 FF5160 call dword ptr [ecx+$60] 008453A5 8B45B8 mov eax, [ebp-$48] 008453A8 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008453AB E83C55BCFF call 0040A8EC 008453B0 8D55B4 lea edx, [ebp-$4C] 008453B3 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008453B6 E83155BCFF call 0040A8EC 008453BB 837DB400 cmp dword ptr [ebp-$4C], +$00 008453BF 750D jnz 008453CE 008453C1 8D45F4 lea eax, [ebp-$0C] 008453C4 BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 008453C9 E8EEFFBBFF call 004053BC 008453CE 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008453D1 E85683BCFF call 0040D72C 008453D6 DB7DA8 fstp tbyte ptr [ebp-$58] 008453D9 9B wait 008453DA 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008453DD E84A83BCFF call 0040D72C 008453E2 DB6DA8 fld tbyte ptr [ebp-$58] 008453E5 DEC9 fmulp st(1), st(0) 008453E7 83C4F4 add esp, -$0C 008453EA DB3C24 fstp tbyte ptr [esp] 008453ED 9B wait 008453EE 8D45F0 lea eax, [ebp-$10] | 008453F1 E8B681BCFF call 0040D5AC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008453F6 8BB354030000 mov esi, [ebx+$0354] 008453FC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 008453FE E83D30C8FF call 004C8440 * Possible String Reference to: 'Money' | 00845403 BA3C578400 mov edx, $0084573C 00845408 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0084540A E8A517C8FF call 004C6BB4 0084540F 50 push eax 00845410 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00845413 E81483BCFF call 0040D72C 00845418 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 0084541B E86C39BDFF call 00418D8C 00845420 8D5598 lea edx, [ebp-$68] 00845423 58 pop eax 00845424 8B08 mov ecx, [eax] 00845426 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 0084542C BA2C578400 mov edx, $0084572C 00845431 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845433 E87C17C8FF call 004C6BB4 00845438 50 push eax 00845439 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0084543C E8EB82BCFF call 0040D72C 00845441 8D4588 lea eax, [ebp-$78] * Reference to: Variants.@VarFromReal; | 00845444 E84339BDFF call 00418D8C 00845449 8D5588 lea edx, [ebp-$78] 0084544C 58 pop eax 0084544D 8B08 mov ecx, [eax] 0084544F FF91B4000000 call dword ptr [ecx+$00B4] 00845455 8BC6 mov eax, esi 00845457 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00845459 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 0084545F 8BB308030000 mov esi, [ebx+$0308] 00845465 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00845467 E86804C8FF call 004C58D4 0084546C 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084546E E8398BC9FF call 004DDFAC 00845473 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00845475 FF5244 call dword ptr [edx+$44] 00845478 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084547A E82D8BC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084547F BA5C578400 mov edx, $0084575C 00845484 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00845486 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00845489 6878578400 push $00845778 0084548E FF75E8 push dword ptr [ebp-$18] 00845491 6888578400 push $00845788 00845496 8D5580 lea edx, [ebp-$80] 00845499 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084549C E84B54BCFF call 0040A8EC 008454A1 FF7580 push dword ptr [ebp-$80] 008454A4 8D4584 lea eax, [ebp-$7C] 008454A7 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008454AC E80302BCFF call 004056B4 008454B1 8B4584 mov eax, [ebp-$7C] 008454B4 50 push eax 008454B5 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008454B7 E8F08AC9FF call 004DDFAC 008454BC 5A pop edx 008454BD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008454BF FF5138 call dword ptr [ecx+$38] 008454C2 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008454C4 E8E38AC9FF call 004DDFAC 008454C9 50 push eax 008454CA 8D857CFFFFFF lea eax, [ebp+$FFFFFF7C] 008454D0 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',BBMoney=' | 008454D3 BA94578400 mov edx, $00845794 * Reference to: System.@LStrCat3; | 008454D8 E86301BCFF call 00405640 008454DD 8B957CFFFFFF mov edx, [ebp+$FFFFFF7C] 008454E3 58 pop eax 008454E4 8B08 mov ecx, [eax] 008454E6 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008454E9 68A8578400 push $008457A8 008454EE 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmSKCR_YF.v2Column1PropertiesButtonClick(Sender : TObject); begin (* 00845864 55 push ebp 00845865 8BEC mov ebp, esp 00845867 51 push ecx 00845868 B90B000000 mov ecx, $0000000B 0084586D 6A00 push $00 0084586F 6A00 push $00 00845871 49 dec ecx 00845872 75F9 jnz 0084586D 00845874 874DFC xchg [ebp-$04], ecx 00845877 53 push ebx 00845878 56 push esi 00845879 8BF0 mov esi, eax 0084587B 33C0 xor eax, eax 0084587D 55 push ebp 0084587E 68575B8400 push $00845B57 ***** TRY | 00845883 64FF30 push dword ptr fs:[eax] 00845886 648920 mov fs:[eax], esp 00845889 33C0 xor eax, eax 0084588B 55 push ebp 0084588C 68185B8400 push $00845B18 ***** TRY | 00845891 64FF30 push dword ptr fs:[eax] 00845894 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF.VBBPropertiesEditValueChanged(Sender : TObject); begin (* 00845C34 55 push ebp 00845C35 8BEC mov ebp, esp 00845C37 B909000000 mov ecx, $00000009 00845C3C 6A00 push $00 00845C3E 6A00 push $00 00845C40 49 dec ecx 00845C41 75F9 jnz 00845C3C 00845C43 51 push ecx 00845C44 53 push ebx 00845C45 56 push esi 00845C46 8BDA mov ebx, edx 00845C48 8BF0 mov esi, eax 00845C4A 33C0 xor eax, eax 00845C4C 55 push ebp 00845C4D 68EA5E8400 push $00845EEA ***** TRY | 00845C52 64FF30 push dword ptr fs:[eax] 00845C55 648920 mov fs:[eax], esp 00845C58 8D55FC lea edx, [ebp-$04] 00845C5B 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; | 00845C5D E85A9AD4FF call 0058F6BC * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00845C62 8B9E04030000 mov ebx, [esi+$0304] 00845C68 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00845C6A E865FCC7FF call 004C58D4 00845C6F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845C71 E83683C9FF call 004DDFAC 00845C76 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00845C78 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00845C7B 68005F8400 push $00845F00 * Possible String Reference to: 'YFID' | 00845C80 BA485F8400 mov edx, $00845F48 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00845C85 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845C8B E8240FC8FF call 004C6BB4 00845C90 8D55F0 lea edx, [ebp-$10] 00845C93 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00845C95 FF5160 call dword ptr [ecx+$60] 00845C98 FF75F0 push dword ptr [ebp-$10] 00845C9B 68585F8400 push $00845F58 00845CA0 8D45F4 lea eax, [ebp-$0C] 00845CA3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00845CA8 E807FABBFF call 004056B4 00845CAD 8B45F4 mov eax, [ebp-$0C] 00845CB0 50 push eax 00845CB1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845CB3 E8F482C9FF call 004DDFAC 00845CB8 5A pop edx 00845CB9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00845CBB FF5138 call dword ptr [ecx+$38] 00845CBE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00845CC0 E803FCC7FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00845CC5 BA645F8400 mov edx, $00845F64 * Reference to control TfrmSKCR_YF.ADOQueryTemp : TADOQuery | 00845CCA 8B8604030000 mov eax, [esi+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845CD0 E8DF0EC8FF call 004C6BB4 00845CD5 8D55F8 lea edx, [ebp-$08] 00845CD8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 00845CDA FF5160 call dword ptr [ecx+$60] 00845CDD 8D55EC lea edx, [ebp-$14] 00845CE0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845CE3 E8044CBCFF call 0040A8EC 00845CE8 837DEC00 cmp dword ptr [ebp-$14], +$00 00845CEC 750D jnz 00845CFB 00845CEE 8D45FC lea eax, [ebp-$04] 00845CF1 BA745F8400 mov edx, $00845F74 * Reference to: System.@LStrLAsg(void;void;void;void); | 00845CF6 E8C1F6BBFF call 004053BC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00845CFB 8B9E54030000 mov ebx, [esi+$0354] 00845D01 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00845D03 E83827C8FF call 004C8440 * Possible String Reference to: 'BBMoney' | 00845D08 BA645F8400 mov edx, $00845F64 00845D0D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845D0F E8A00EC8FF call 004C6BB4 00845D14 50 push eax 00845D15 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00845D18 E80F7ABCFF call 0040D72C 00845D1D 8D45DC lea eax, [ebp-$24] * Reference to: Variants.@VarFromReal; | 00845D20 E86730BDFF call 00418D8C 00845D25 8D55DC lea edx, [ebp-$24] 00845D28 58 pop eax 00845D29 8B08 mov ecx, [eax] 00845D2B FF91B4000000 call dword ptr [ecx+$00B4] 00845D31 8BC3 mov eax, ebx 00845D33 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00845D35 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 00845D3B 8B9E08030000 mov ebx, [esi+$0308] 00845D41 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00845D43 E88CFBC7FF call 004C58D4 00845D48 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845D4A E85D82C9FF call 004DDFAC 00845D4F 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00845D51 FF5244 call dword ptr [edx+$44] 00845D54 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845D56 E85182C9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00845D5B BA805F8400 mov edx, $00845F80 00845D60 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00845D62 FF5138 call dword ptr [ecx+$38] 00845D65 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00845D67 E84082C9FF call 004DDFAC 00845D6C 50 push eax 00845D6D 8D45D8 lea eax, [ebp-$28] 00845D70 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set BBMoney=' | 00845D73 BA9C5F8400 mov edx, $00845F9C * Reference to: System.@LStrCat3; | 00845D78 E8C3F8BBFF call 00405640 00845D7D 8B55D8 mov edx, [ebp-$28] 00845D80 58 pop eax 00845D81 8B08 mov ecx, [eax] 00845D83 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00845D86 68B45F8400 push $00845FB4 00845D8B 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmSKCR_YF.ConNoChange(Sender : TObject); begin (* 00846070 56 push esi * Reference to control TfrmSKCR_YF.ToolButton2 : TToolButton | 00846071 8B8010030000 mov eax, [eax+$0310] 00846077 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 0084607B E8D4E4BBFF call 00404554 00846080 5E pop esi 00846081 C3 ret *) end; procedure TfrmSKCR_YF.v2Column1PropertiesEditValueChanged(Sender : TObject); begin (* 00846084 55 push ebp 00846085 8BEC mov ebp, esp 00846087 B906000000 mov ecx, $00000006 0084608C 6A00 push $00 0084608E 6A00 push $00 00846090 49 dec ecx 00846091 75F9 jnz 0084608C 00846093 51 push ecx 00846094 53 push ebx 00846095 56 push esi 00846096 8BDA mov ebx, edx 00846098 8BF0 mov esi, eax 0084609A 33C0 xor eax, eax 0084609C 55 push ebp * Possible String Reference to: 'éÎè»ÿëÖ^[‹å]Ã' | 0084609D 6821628400 push $00846221 ***** TRY | 008460A2 64FF30 push dword ptr fs:[eax] 008460A5 648920 mov fs:[eax], esp 008460A8 8D55FC lea edx, [ebp-$04] 008460AB 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; | 008460AD E80A96D4FF call 0058F6BC * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008460B2 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008460B8 E88F62E1FF 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; | 008460BD E8A2BAE0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 008460C2 8B4050 mov eax, [eax+$50] 008460C5 8D55F4 lea edx, [ebp-$0C] 008460C8 8B08 mov ecx, [eax] 008460CA FF5110 call dword ptr [ecx+$10] 008460CD 8B45F4 mov eax, [ebp-$0C] 008460D0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008460D3 E81448BCFF call 0040A8EC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008460D8 8B9E54030000 mov ebx, [esi+$0354] 008460DE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008460E0 E85B23C8FF call 004C8440 008460E5 8D55E0 lea edx, [ebp-$20] 008460E8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008460EB E8FC47BCFF call 0040A8EC 008460F0 8B55E0 mov edx, [ebp-$20] 008460F3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008460F6 E8CD2CBDFF call 00418DC8 008460FB 8D45E4 lea eax, [ebp-$1C] 008460FE 50 push eax 008460FF 8B55F8 mov edx, [ebp-$08] 00846102 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846104 E8AB0AC8FF call 004C6BB4 00846109 5A pop edx 0084610A 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 0084610C FF91B4000000 call dword ptr [ecx+$00B4] 00846112 8BC3 mov eax, ebx 00846114 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00846116 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 0084611C 8B9E08030000 mov ebx, [esi+$0308] 00846122 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00846124 E8ABF7C7FF call 004C58D4 00846129 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084612B E87C7EC9FF call 004DDFAC 00846130 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00846132 FF5244 call dword ptr [edx+$44] 00846135 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846137 E8707EC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084613C BA38628400 mov edx, $00846238 00846141 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846143 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00846146 6854628400 push $00846254 0084614B FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 0084614E 6864628400 push $00846264 00846153 8D55D8 lea edx, [ebp-$28] 00846156 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846159 E88E47BCFF call 0040A8EC 0084615E FF75D8 push dword ptr [ebp-$28] 00846161 6870628400 push $00846270 00846166 8D45DC lea eax, [ebp-$24] 00846169 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 0084616E E841F5BBFF call 004056B4 00846173 8B45DC mov eax, [ebp-$24] 00846176 50 push eax 00846177 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846179 E82E7EC9FF call 004DDFAC 0084617E 5A pop edx 0084617F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846181 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00846184 687C628400 push $0084627C * Possible String Reference to: 'YFId' | 00846189 BA94628400 mov edx, $00846294 * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084618E 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846194 E81B0AC8FF call 004C6BB4 00846199 8D55CC lea edx, [ebp-$34] 0084619C 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0084619E FF5160 call dword ptr [ecx+$60] 008461A1 8B45CC mov eax, [ebp-$34] 008461A4 8D55D0 lea edx, [ebp-$30] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008461A7 E84047BCFF call 0040A8EC 008461AC FF75D0 push dword ptr [ebp-$30] 008461AF 6870628400 push $00846270 008461B4 8D45D4 lea eax, [ebp-$2C] 008461B7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008461BC E8F3F4BBFF call 004056B4 008461C1 8B45D4 mov eax, [ebp-$2C] 008461C4 50 push eax 008461C5 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008461C7 E8E07DC9FF call 004DDFAC 008461CC 5A pop edx 008461CD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008461CF FF5138 call dword ptr [ecx+$38] 008461D2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008461D4 E8FB7CC9FF call 004DDED4 * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008461D9 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008461DF E86861E1FF call 0065C34C * Reference to field TcxGridDBTableView.OFFS_0080 | 008461E4 8B8080000000 mov eax, [eax+$0080] 008461EA 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_0062075C() | 008461EC E86BA5DDFF call 0062075C 008461F1 33C0 xor eax, eax 008461F3 5A pop edx 008461F4 59 pop ecx 008461F5 59 pop ecx 008461F6 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 008461F9 6828628400 push $00846228 008461FE 8D45CC lea eax, [ebp-$34] 00846201 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00846206 E83DF1BBFF call 00405348 0084620B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0084620E E861E4BCFF call 00414674 00846213 8D45F4 lea eax, [ebp-$0C] 00846216 BA03000000 mov edx, $00000003 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0084621B E828F1BBFF call 00405348 00846220 C3 ret * Reference to: System.@HandleFinally; | 00846221 E9CEE8BBFF jmp 00404AF4 00846226 EBD6 jmp 008461FE ****** END | 00846228 5E pop esi 00846229 5B pop ebx 0084622A 8BE5 mov esp, ebp 0084622C 5D pop ebp 0084622D C3 ret *) end; procedure TfrmSKCR_YF.v2DerateMoneyPropertiesEditValueChanged(Sender : TObject); begin (* 0084629C 55 push ebp 0084629D 8BEC mov ebp, esp 0084629F B905000000 mov ecx, $00000005 008462A4 6A00 push $00 008462A6 6A00 push $00 008462A8 49 dec ecx 008462A9 75F9 jnz 008462A4 008462AB 53 push ebx 008462AC 56 push esi 008462AD 8BDA mov ebx, edx 008462AF 8BF0 mov esi, eax 008462B1 33C0 xor eax, eax 008462B3 55 push ebp * Possible String Reference to: 'éÚæ»ÿëÖ^[‹å]Ã' | 008462B4 6815648400 push $00846415 ***** TRY | 008462B9 64FF30 push dword ptr fs:[eax] 008462BC 648920 mov fs:[eax], esp 008462BF 8D55FC lea edx, [ebp-$04] 008462C2 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; | 008462C4 E8F393D4FF call 0058F6BC 008462C9 8D55F8 lea edx, [ebp-$08] 008462CC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008462CF E81846BCFF call 0040A8EC 008462D4 837DF800 cmp dword ptr [ebp-$08], +$00 008462D8 750D jnz 008462E7 008462DA 8D45FC lea eax, [ebp-$04] 008462DD BA2C648400 mov edx, $0084642C * Reference to: System.@LStrLAsg(void;void;void;void); | 008462E2 E8D5F0BBFF call 004053BC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008462E7 8B9E54030000 mov ebx, [esi+$0354] 008462ED 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008462EF E84C21C8FF call 004C8440 008462F4 6A00 push $00 008462F6 6A00 push $00 008462F8 6A00 push $00 008462FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloatDef(AnsiString;Extended):Extended;overload; | 008462FD E86674BCFF call 0040D768 00846302 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarFromReal; | 00846305 E8822ABDFF call 00418D8C 0084630A 8D45E8 lea eax, [ebp-$18] 0084630D 50 push eax * Possible String Reference to: 'DerateMoney' | 0084630E BA38648400 mov edx, $00846438 00846313 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846315 E89A08C8FF call 004C6BB4 0084631A 5A pop edx 0084631B 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 0084631D FF91B4000000 call dword ptr [ecx+$00B4] 00846323 8BC3 mov eax, ebx 00846325 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00846327 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 0084632D 8B9E08030000 mov ebx, [esi+$0308] 00846333 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00846335 E89AF5C7FF call 004C58D4 0084633A 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084633C E86B7CC9FF call 004DDFAC 00846341 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00846343 FF5244 call dword ptr [edx+$44] 00846346 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846348 E85F7CC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084634D BA4C648400 mov edx, $0084644C 00846352 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846354 FF5138 call dword ptr [ecx+$38] 00846357 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846359 E84E7CC9FF call 004DDFAC 0084635E 50 push eax 0084635F 8D45E4 lea eax, [ebp-$1C] 00846362 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set DerateMoney=' | 00846365 BA68648400 mov edx, $00846468 * Reference to: System.@LStrCat3; | 0084636A E8D1F2BBFF call 00405640 0084636F 8B55E4 mov edx, [ebp-$1C] 00846372 58 pop eax 00846373 8B08 mov ecx, [eax] 00846375 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00846378 6884648400 push $00846484 * Possible String Reference to: 'YFId' | 0084637D BA9C648400 mov edx, $0084649C * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846382 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846388 E82708C8FF call 004C6BB4 0084638D 8D55D8 lea edx, [ebp-$28] 00846390 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00846392 FF5160 call dword ptr [ecx+$60] 00846395 8B45D8 mov eax, [ebp-$28] 00846398 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084639B E84C45BCFF call 0040A8EC 008463A0 FF75DC push dword ptr [ebp-$24] 008463A3 68AC648400 push $008464AC 008463A8 8D45E0 lea eax, [ebp-$20] 008463AB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008463B0 E8FFF2BBFF call 004056B4 008463B5 8B45E0 mov eax, [ebp-$20] 008463B8 50 push eax 008463B9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008463BB E8EC7BC9FF call 004DDFAC 008463C0 5A pop edx 008463C1 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008463C3 FF5138 call dword ptr [ecx+$38] 008463C6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008463C8 E8077BC9FF call 004DDED4 * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 008463CD 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008463D3 E8745FE1FF call 0065C34C * Reference to field TcxGridDBTableView.OFFS_0080 | 008463D8 8B8080000000 mov eax, [eax+$0080] 008463DE 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_0062075C() | 008463E0 E877A3DDFF call 0062075C 008463E5 33C0 xor eax, eax 008463E7 5A pop edx 008463E8 59 pop ecx 008463E9 59 pop ecx 008463EA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 008463ED 681C648400 push $0084641C 008463F2 8D45D8 lea eax, [ebp-$28] 008463F5 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008463FA E849EFBBFF call 00405348 008463FF 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00846402 E86DE2BCFF call 00414674 00846407 8D45F8 lea eax, [ebp-$08] 0084640A BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0084640F E834EFBBFF call 00405348 00846414 C3 ret * Reference to: System.@HandleFinally; | 00846415 E9DAE6BBFF jmp 00404AF4 0084641A EBD6 jmp 008463F2 ****** END | 0084641C 5E pop esi 0084641D 5B pop ebx 0084641E 8BE5 mov esp, ebp 00846420 5D pop ebp 00846421 C3 ret *) end; procedure TfrmSKCR_YF.cxTabControl1Change(Sender : TObject); begin (* 008464B0 53 push ebx 008464B1 8BD8 mov ebx, eax 008464B3 8BC3 mov eax, ebx | 008464B5 E8FACCFFFF call 008431B4 008464BA 8BC3 mov eax, ebx | 008464BC E8F7CCFFFF call 008431B8 008464C1 5B pop ebx 008464C2 C3 ret *) end; procedure TfrmSKCR_YF.v2ComTaitouPropertiesButtonClick(Sender : TObject); begin (* 008464C4 55 push ebp 008464C5 8BEC mov ebp, esp 008464C7 51 push ecx 008464C8 B906000000 mov ecx, $00000006 008464CD 6A00 push $00 008464CF 6A00 push $00 008464D1 49 dec ecx 008464D2 75F9 jnz 008464CD 008464D4 51 push ecx 008464D5 874DFC xchg [ebp-$04], ecx 008464D8 53 push ebx 008464D9 56 push esi 008464DA 8BF0 mov esi, eax 008464DC 33C0 xor eax, eax 008464DE 55 push ebp 008464DF 681B678400 push $0084671B ***** TRY | 008464E4 64FF30 push dword ptr fs:[eax] 008464E7 648920 mov fs:[eax], esp 008464EA 33C0 xor eax, eax 008464EC 55 push ebp 008464ED 68F1668400 push $008466F1 ***** TRY | 008464F2 64FF30 push dword ptr fs:[eax] 008464F5 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF.TCKClick(Sender : TObject); begin (* 00846800 55 push ebp 00846801 8BEC mov ebp, esp 00846803 B907000000 mov ecx, $00000007 00846808 6A00 push $00 0084680A 6A00 push $00 0084680C 49 dec ecx 0084680D 75F9 jnz 00846808 0084680F 53 push ebx 00846810 56 push esi 00846811 8BD8 mov ebx, eax *) end; procedure TfrmSKCR_YF.Tv2CellDblClick(Sender : TObject); begin (* 00846A70 55 push ebp 00846A71 8BEC mov ebp, esp 00846A73 6A00 push $00 00846A75 6A00 push $00 00846A77 53 push ebx 00846A78 56 push esi 00846A79 8BD8 mov ebx, eax 00846A7B 33C0 xor eax, eax 00846A7D 55 push ebp 00846A7E 68F96A8400 push $00846AF9 ***** TRY | 00846A83 64FF30 push dword ptr fs:[eax] 00846A86 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.Tv2 : TcxGridDBTableView | 00846A89 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 00846A8F E8B858E1FF 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; | 00846A94 E8CBB0E0FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00846A99 8B4050 mov eax, [eax+$50] 00846A9C 8D55FC lea edx, [ebp-$04] 00846A9F 8B08 mov ecx, [eax] 00846AA1 FF5110 call dword ptr [ecx+$10] 00846AA4 8D55F8 lea edx, [ebp-$08] 00846AA7 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846AAA E83D3EBCFF call 0040A8EC 00846AAF 8B45F8 mov eax, [ebp-$08] * Possible String Reference to: 'ConNo' | 00846AB2 BA106B8400 mov edx, $00846B10 * Reference to: System.@LStrCmp; | 00846AB7 E884ECBBFF call 00405740 00846ABC 7511 jnz 00846ACF * Reference to control TfrmSKCR_YF.THTCX : TToolButton | 00846ABE 8B83CC030000 mov eax, [ebx+$03CC] 00846AC4 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00846AC8 E887DABBFF call 00404554 00846ACD EB0F jmp 00846ADE * Reference to control TfrmSKCR_YF.TCK : TToolButton | 00846ACF 8B8360030000 mov eax, [ebx+$0360] 00846AD5 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00846AD9 E876DABBFF call 00404554 00846ADE 33C0 xor eax, eax 00846AE0 5A pop edx 00846AE1 59 pop ecx 00846AE2 59 pop ecx 00846AE3 648910 mov fs:[eax], edx ****** FINALLY | 00846AE6 68006B8400 push $00846B00 00846AEB 8D45F8 lea eax, [ebp-$08] 00846AEE BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00846AF3 E850E8BBFF call 00405348 00846AF8 C3 ret * Reference to: System.@HandleFinally; | 00846AF9 E9F6DFBBFF jmp 00404AF4 00846AFE EBEB jmp 00846AEB ****** END | 00846B00 5E pop esi 00846B01 5B pop ebx 00846B02 59 pop ecx 00846B03 59 pop ecx 00846B04 5D pop ebp 00846B05 C20C00 ret $000C *) end; procedure TfrmSKCR_YF.FormCreate(Sender : TObject); begin (* 00846B18 B205 mov dl, $05 * Reference to control TfrmSKCR_YF.cxGrid2 : TcxGrid | 00846B1A 8B8030030000 mov eax, [eax+$0330] * Reference to: Controls.TControl.SetAlign(TControl;TAlign); | 00846B20 E8B70FC4FF call 00487ADC 00846B25 C3 ret *) end; procedure TfrmSKCR_YF.TPrintClick(Sender : TObject); begin (* 00846B28 55 push ebp 00846B29 8BEC mov ebp, esp 00846B2B B94A000000 mov ecx, $0000004A 00846B30 6A00 push $00 00846B32 6A00 push $00 00846B34 49 dec ecx 00846B35 75F9 jnz 00846B30 00846B37 53 push ebx 00846B38 56 push esi 00846B39 8BD8 mov ebx, eax 00846B3B 33C0 xor eax, eax 00846B3D 55 push ebp * Possible String Reference to: 'éAÑ»ÿéKÿÿÿ^[‹å]Ã' | 00846B3E 68AE798400 push $008479AE ***** TRY | 00846B43 64FF30 push dword ptr fs:[eax] 00846B46 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846B49 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00846B4F E86C13C8FF call 004C7EC0 00846B54 84C0 test al, al 00846B56 0F859A0D0000 jnz 008478F6 * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846B5C 8BB3AC030000 mov esi, [ebx+$03AC] 00846B62 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00846B64 E86BEDC7FF call 004C58D4 00846B69 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846B6B E83C74C9FF call 004DDFAC 00846B70 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00846B72 FF5244 call dword ptr [edx+$44] 00846B75 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846B77 E83074C9FF call 004DDFAC * Possible String Reference to: 'select AA.* from (select D.CRTime,D | .FactoryName,C.SPName,Sum(C.Qty) TT | Qty,Max(D.Price) Price,Sum(C.Qty*D. | Price) PBMoney ' | 00846B7C BAC8798400 mov edx, $008479C8 00846B81 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846B83 FF5138 call dword ptr [ecx+$38] 00846B86 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846B88 E81F74C9FF call 004DDFAC * Possible String Reference to: 'from CK_SXPB_CR C ' | 00846B8D BA4C7A8400 mov edx, $00847A4C 00846B92 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846B94 FF5138 call dword ptr [ecx+$38] 00846B97 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846B99 E80E74C9FF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_CR D on C.FZSP | ID=D.YFTypeId' | 00846B9E BA687A8400 mov edx, $00847A68 00846BA3 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846BA5 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where C.CKName='Å÷²¼' and C.CRFlag | ='³ö¿â' and C.ORDMainIdCK='' | 00846BA8 68A47A8400 push $00847AA4 * Possible String Reference to: 'Mainid' | 00846BAD BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846BB2 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846BB8 E8F7FFC7FF call 004C6BB4 00846BBD 8D957CFFFFFF lea edx, [ebp+$FFFFFF7C] 00846BC3 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00846BC5 FF5160 call dword ptr [ecx+$60] 00846BC8 8B857CFFFFFF mov eax, [ebp+$FFFFFF7C] 00846BCE 8D5580 lea edx, [ebp-$80] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846BD1 E8163DBCFF call 0040A8EC 00846BD6 FF7580 push dword ptr [ebp-$80] 00846BD9 68FC7A8400 push $00847AFC 00846BDE 8D4584 lea eax, [ebp-$7C] 00846BE1 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00846BE6 E8C9EABBFF call 004056B4 00846BEB 8B4584 mov eax, [ebp-$7C] 00846BEE 50 push eax 00846BEF 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846BF1 E8B673C9FF call 004DDFAC 00846BF6 5A pop edx 00846BF7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846BF9 FF5138 call dword ptr [ecx+$38] 00846BFC 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846BFE E8A973C9FF call 004DDFAC * Possible String Reference to: ' group by D.CRTime,D.FactoryName,C. | SPName' | 00846C03 BA087B8400 mov edx, $00847B08 00846C08 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846C0A FF5138 call dword ptr [ecx+$38] 00846C0D 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846C0F E89873C9FF call 004DDFAC * Possible String Reference to: ' union all' | 00846C14 BA3C7B8400 mov edx, $00847B3C 00846C19 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846C1B FF5138 call dword ptr [ecx+$38] 00846C1E 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846C20 E88773C9FF call 004DDFAC * Possible String Reference to: ' select D.CRTime,D.FactoryName,C.SP | Name,Sum(D.Qty) TTQty,Max(D.Price) | Price,Sum(D.Qty*D.Price) PBMoney ' | 00846C25 BA507B8400 mov edx, $00847B50 00846C2A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846C2C FF5138 call dword ptr [ecx+$38] 00846C2F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846C31 E87673C9FF call 004DDFAC * Possible String Reference to: ' from CK_SXPB_CR C ' | 00846C36 BAC07B8400 mov edx, $00847BC0 00846C3B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846C3D FF5138 call dword ptr [ecx+$38] 00846C40 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846C42 E86573C9FF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_CR D on C.SPID | =D.YFTypeId' | 00846C47 BADC7B8400 mov edx, $00847BDC 00846C4C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846C4E FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where C.CRType='²É¹ºÍË»õ' and C.CR | Flag='³ö¿â' and C.ORDMainIdCK='' | 00846C51 68147C8400 push $00847C14 * Possible String Reference to: 'Mainid' | 00846C56 BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846C5B 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846C61 E84EFFC7FF call 004C6BB4 00846C66 8D9570FFFFFF lea edx, [ebp+$FFFFFF70] 00846C6C 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00846C6E FF5160 call dword ptr [ecx+$60] 00846C71 8B8570FFFFFF mov eax, [ebp+$FFFFFF70] 00846C77 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846C7D E86A3CBCFF call 0040A8EC 00846C82 FFB574FFFFFF push dword ptr [ebp+$FFFFFF74] 00846C88 68FC7A8400 push $00847AFC 00846C8D 8D8578FFFFFF lea eax, [ebp+$FFFFFF78] 00846C93 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00846C98 E817EABBFF call 004056B4 00846C9D 8B8578FFFFFF mov eax, [ebp+$FFFFFF78] 00846CA3 50 push eax 00846CA4 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846CA6 E80173C9FF call 004DDFAC 00846CAB 5A pop edx 00846CAC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846CAE FF5138 call dword ptr [ecx+$38] 00846CB1 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846CB3 E8F472C9FF call 004DDFAC * Possible String Reference to: ' group by D.CRTime,D.FactoryName,C. | SPName) AA' | 00846CB8 BA607C8400 mov edx, $00847C60 00846CBD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846CBF FF5138 call dword ptr [ecx+$38] 00846CC2 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846CC4 E8E372C9FF call 004DDFAC * Possible String Reference to: ' Order By AA.CRTime,AA.FactoryName' | 00846CC9 BA987C8400 mov edx, $00847C98 00846CCE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846CD0 FF5138 call dword ptr [ecx+$38] 00846CD3 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00846CD5 E8EEEBC7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_PB : TClientDataSet | 00846CDA 8B9388030000 mov edx, [ebx+$0388] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846CE0 8B83AC030000 mov eax, [ebx+$03AC] | 00846CE6 E8A501F7FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_PB : TClientDataSet | 00846CEB 8B9388030000 mov edx, [ebx+$0388] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846CF1 8B83AC030000 mov eax, [ebx+$03AC] | 00846CF7 E81C03F7FF call 007B7018 00846CFC 33C0 xor eax, eax 00846CFE 8945F0 mov [ebp-$10], eax 00846D01 8945F4 mov [ebp-$0C], eax 00846D04 33C0 xor eax, eax 00846D06 8945E8 mov [ebp-$18], eax 00846D09 8945EC mov [ebp-$14], eax 00846D0C 33C0 xor eax, eax 00846D0E 8945E0 mov [ebp-$20], eax 00846D11 8945E4 mov [ebp-$1C], eax * Reference to control TfrmSKCR_YF.Order_PB : TClientDataSet | 00846D14 8BB388030000 mov esi, [ebx+$0388] 00846D1A 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 00846D1C E80F13C8FF call 004C8030 00846D21 EB37 jmp 00846D5A * Possible String Reference to: 'TTQty' | 00846D23 BAC47C8400 mov edx, $00847CC4 00846D28 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846D2A E885FEC7FF call 004C6BB4 00846D2F 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846D31 FF5254 call dword ptr [edx+$54] 00846D34 DC45E8 fadd qword ptr [ebp-$18] 00846D37 DD5DE8 fstp qword ptr [ebp-$18] 00846D3A 9B wait * Possible String Reference to: 'PBMoney' | 00846D3B BAD47C8400 mov edx, $00847CD4 00846D40 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846D42 E86DFEC7FF call 004C6BB4 00846D47 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846D49 FF5254 call dword ptr [edx+$54] 00846D4C DC45E0 fadd qword ptr [ebp-$20] 00846D4F DD5DE0 fstp qword ptr [ebp-$20] 00846D52 9B wait 00846D53 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 00846D55 E8F215C8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 00846D5A 80BEA100000000 cmp byte ptr [esi+$00A1], $00 00846D61 74C0 jz 00846D23 * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846D63 8BB3AC030000 mov esi, [ebx+$03AC] 00846D69 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00846D6B E864EBC7FF call 004C58D4 00846D70 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846D72 E83572C9FF call 004DDFAC 00846D77 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00846D79 FF5244 call dword ptr [edx+$44] 00846D7C 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846D7E E82972C9FF call 004DDFAC * Possible String Reference to: 'select C.CRTime,D.FactoryName,C.SPN | ame,C.SPCF PRTColor,Sum(C.Qty) JGQt | y,Max(D.Price) Price,Sum(C.Qty*D.Pr | ice) JGMoney ' | 00846D83 BAE47C8400 mov edx, $00847CE4 00846D88 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846D8A FF5138 call dword ptr [ecx+$38] 00846D8D 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846D8F E81872C9FF call 004DDFAC * Possible String Reference to: 'from CK_SXPB_CR C ' | 00846D94 BA4C7A8400 mov edx, $00847A4C 00846D99 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846D9B FF5138 call dword ptr [ecx+$38] 00846D9E 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846DA0 E80772C9FF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_CR D on C.FZSP | ID=D.YFTypeId' | 00846DA5 BA687A8400 mov edx, $00847A68 00846DAA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846DAC FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where C.CKName in ('Íâ¼Ó¹¤','´ý¼ì² | ¼','³ÉÆ·') and D.CRType='Ó¦¸¶¿îµÇ¼Ç | ' and C.CRFlag='³ö¿â' and C.OrdMain | idCK='' | 00846DAF 68647D8400 push $00847D64 * Possible String Reference to: 'Mainid' | 00846DB4 BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846DB9 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846DBF E8F0FDC7FF call 004C6BB4 00846DC4 8D9564FFFFFF lea edx, [ebp+$FFFFFF64] 00846DCA 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00846DCC FF5160 call dword ptr [ecx+$60] 00846DCF 8B8564FFFFFF mov eax, [ebp+$FFFFFF64] 00846DD5 8D9568FFFFFF lea edx, [ebp+$FFFFFF68] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846DDB E80C3BBCFF call 0040A8EC 00846DE0 FFB568FFFFFF push dword ptr [ebp+$FFFFFF68] 00846DE6 68FC7A8400 push $00847AFC 00846DEB 8D856CFFFFFF lea eax, [ebp+$FFFFFF6C] 00846DF1 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00846DF6 E8B9E8BBFF call 004056B4 00846DFB 8B856CFFFFFF mov eax, [ebp+$FFFFFF6C] 00846E01 50 push eax 00846E02 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846E04 E8A371C9FF call 004DDFAC 00846E09 5A pop edx 00846E0A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846E0C FF5138 call dword ptr [ecx+$38] 00846E0F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846E11 E89671C9FF call 004DDFAC * Possible String Reference to: ' group by C.CRTime,D.FactoryName,C. | SPName,C.SPCF' | 00846E16 BADC7D8400 mov edx, $00847DDC 00846E1B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846E1D FF5138 call dword ptr [ecx+$38] 00846E20 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00846E22 E8A1EAC7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_RF : TClientDataSet | 00846E27 8B9390030000 mov edx, [ebx+$0390] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846E2D 8B83AC030000 mov eax, [ebx+$03AC] | 00846E33 E85800F7FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_RF : TClientDataSet | 00846E38 8B9390030000 mov edx, [ebx+$0390] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846E3E 8B83AC030000 mov eax, [ebx+$03AC] | 00846E44 E8CF01F7FF call 007B7018 00846E49 33C0 xor eax, eax 00846E4B 8945D8 mov [ebp-$28], eax 00846E4E 8945DC mov [ebp-$24], eax 00846E51 33C0 xor eax, eax 00846E53 8945D0 mov [ebp-$30], eax 00846E56 8945D4 mov [ebp-$2C], eax 00846E59 33C0 xor eax, eax 00846E5B 8945C8 mov [ebp-$38], eax 00846E5E 8945CC mov [ebp-$34], eax * Reference to control TfrmSKCR_YF.Order_RF : TClientDataSet | 00846E61 8BB390030000 mov esi, [ebx+$0390] 00846E67 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 00846E69 E8C211C8FF call 004C8030 00846E6E EB37 jmp 00846EA7 * Possible String Reference to: 'JGQty' | 00846E70 BA187E8400 mov edx, $00847E18 00846E75 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846E77 E838FDC7FF call 004C6BB4 00846E7C 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846E7E FF5254 call dword ptr [edx+$54] 00846E81 DC45D0 fadd qword ptr [ebp-$30] 00846E84 DD5DD0 fstp qword ptr [ebp-$30] 00846E87 9B wait * Possible String Reference to: 'JGMoney' | 00846E88 BA287E8400 mov edx, $00847E28 00846E8D 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846E8F E820FDC7FF call 004C6BB4 00846E94 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846E96 FF5254 call dword ptr [edx+$54] 00846E99 DC45C8 fadd qword ptr [ebp-$38] 00846E9C DD5DC8 fstp qword ptr [ebp-$38] 00846E9F 9B wait 00846EA0 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 00846EA2 E8A514C8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 00846EA7 80BEA100000000 cmp byte ptr [esi+$00A1], $00 00846EAE 74C0 jz 00846E70 * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846EB0 8BB3AC030000 mov esi, [ebx+$03AC] 00846EB6 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00846EB8 E817EAC7FF call 004C58D4 00846EBD 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846EBF E8E870C9FF call 004DDFAC 00846EC4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00846EC6 FF5244 call dword ptr [edx+$44] 00846EC9 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846ECB E8DC70C9FF call 004DDFAC * Possible String Reference to: 'select C.CRTime,D.FactoryName,C.SPN | ame,C.SPCF PRTColor,Sum(C.Qty) FLQt | y,Max(D.Price) Price,Sum(C.Qty*D.Pr | ice) FLMoney ' | 00846ED0 BA387E8400 mov edx, $00847E38 00846ED5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846ED7 FF5138 call dword ptr [ecx+$38] 00846EDA 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846EDC E8CB70C9FF call 004DDFAC * Possible String Reference to: 'from CK_SXPB_CR C ' | 00846EE1 BA4C7A8400 mov edx, $00847A4C 00846EE6 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846EE8 FF5138 call dword ptr [ecx+$38] 00846EEB 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846EED E8BA70C9FF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_CR D on C.FZSP | ID=D.YFTypeId' | 00846EF2 BA687A8400 mov edx, $00847A68 00846EF7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846EF9 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where C.CKName in ('¸¨ÁÏ') and D.C | RType='Ó¦¸¶¿îµÇ¼Ç' and C.CRFlag='³ö | ¿â' and C.OrdMainidCK='' | 00846EFC 68B87E8400 push $00847EB8 * Possible String Reference to: 'Mainid' | 00846F01 BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00846F06 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846F0C E8A3FCC7FF call 004C6BB4 00846F11 8D9558FFFFFF lea edx, [ebp+$FFFFFF58] 00846F17 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00846F19 FF5160 call dword ptr [ecx+$60] 00846F1C 8B8558FFFFFF mov eax, [ebp+$FFFFFF58] 00846F22 8D955CFFFFFF lea edx, [ebp+$FFFFFF5C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846F28 E8BF39BCFF call 0040A8EC 00846F2D FFB55CFFFFFF push dword ptr [ebp+$FFFFFF5C] 00846F33 68FC7A8400 push $00847AFC 00846F38 8D8560FFFFFF lea eax, [ebp+$FFFFFF60] 00846F3E BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00846F43 E86CE7BBFF call 004056B4 00846F48 8B8560FFFFFF mov eax, [ebp+$FFFFFF60] 00846F4E 50 push eax 00846F4F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846F51 E85670C9FF call 004DDFAC 00846F56 5A pop edx 00846F57 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846F59 FF5138 call dword ptr [ecx+$38] 00846F5C 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00846F5E E84970C9FF call 004DDFAC * Possible String Reference to: ' group by C.CRTime,D.FactoryName,C. | SPName,C.SPCF' | 00846F63 BADC7D8400 mov edx, $00847DDC 00846F68 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00846F6A FF5138 call dword ptr [ecx+$38] 00846F6D 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00846F6F E854E9C7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_FL : TClientDataSet | 00846F74 8B93F8030000 mov edx, [ebx+$03F8] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846F7A 8B83AC030000 mov eax, [ebx+$03AC] | 00846F80 E80BFFF6FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_FL : TClientDataSet | 00846F85 8B93F8030000 mov edx, [ebx+$03F8] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846F8B 8B83AC030000 mov eax, [ebx+$03AC] | 00846F91 E88200F7FF call 007B7018 00846F96 33C0 xor eax, eax 00846F98 8945C0 mov [ebp-$40], eax 00846F9B 8945C4 mov [ebp-$3C], eax 00846F9E 33C0 xor eax, eax 00846FA0 8945B8 mov [ebp-$48], eax 00846FA3 8945BC mov [ebp-$44], eax * Reference to control TfrmSKCR_YF.Order_FL : TClientDataSet | 00846FA6 8BB3F8030000 mov esi, [ebx+$03F8] 00846FAC 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 00846FAE E87D10C8FF call 004C8030 00846FB3 EB37 jmp 00846FEC * Possible String Reference to: 'FLQty' | 00846FB5 BA207F8400 mov edx, $00847F20 00846FBA 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846FBC E8F3FBC7FF call 004C6BB4 00846FC1 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846FC3 FF5254 call dword ptr [edx+$54] 00846FC6 DC45C0 fadd qword ptr [ebp-$40] 00846FC9 DD5DC0 fstp qword ptr [ebp-$40] 00846FCC 9B wait * Possible String Reference to: 'FLMoney' | 00846FCD BA307F8400 mov edx, $00847F30 00846FD2 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846FD4 E8DBFBC7FF call 004C6BB4 00846FD9 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00846FDB FF5254 call dword ptr [edx+$54] 00846FDE DC45B8 fadd qword ptr [ebp-$48] 00846FE1 DD5DB8 fstp qword ptr [ebp-$48] 00846FE4 9B wait 00846FE5 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 00846FE7 E86013C8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 00846FEC 80BEA100000000 cmp byte ptr [esi+$00A1], $00 00846FF3 74C0 jz 00846FB5 * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00846FF5 8BB3AC030000 mov esi, [ebx+$03AC] 00846FFB 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00846FFD E8D2E8C7FF call 004C58D4 00847002 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847004 E8A36FC9FF call 004DDFAC 00847009 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0084700B FF5244 call dword ptr [edx+$44] 0084700E 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847010 E8976FC9FF call 004DDFAC * Possible String Reference to: 'select A.ConNo,A.CRTime,A.P_CodeNam | e,A.P_Spec,A.BZType,A.Price' | 00847015 BA407F8400 mov edx, $00847F40 0084701A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084701C FF5138 call dword ptr [ecx+$38] 0084701F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847021 E8866FC9FF call 004DDFAC * Possible String Reference to: ',Sum(A.PS) PS,Sum(A.Qty) Qty,A.Huil | v' | 00847026 BA887F8400 mov edx, $00847F88 0084702B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084702D FF5138 call dword ptr [ecx+$38] 00847030 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847032 E8756FC9FF call 004DDFAC * Possible String Reference to: ',RMBMoney=Sum(A.Money*A.HuiLV),Mone | y=Sum(A.Money)' | 00847037 BAB87F8400 mov edx, $00847FB8 0084703C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084703E FF5138 call dword ptr [ecx+$38] 00847041 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847043 E8646FC9FF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A ' | 00847048 BAF47F8400 mov edx, $00847FF4 0084704D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084704F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where A.Mainid='' | 00847052 6814808400 push $00848014 * Possible String Reference to: 'Mainid' | 00847057 BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084705C 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00847062 E84DFBC7FF call 004C6BB4 00847067 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 0084706D 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 0084706F FF5160 call dword ptr [ecx+$60] 00847072 8B854CFFFFFF mov eax, [ebp+$FFFFFF4C] 00847078 8D9550FFFFFF lea edx, [ebp+$FFFFFF50] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084707E E86938BCFF call 0040A8EC 00847083 FFB550FFFFFF push dword ptr [ebp+$FFFFFF50] * Possible String Reference to: '' and A.CRType='Ó¦ÊÕ¿îµÇ¼Ç' ' | 00847089 6830808400 push $00848030 0084708E 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] 00847094 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00847099 E816E6BBFF call 004056B4 0084709E 8B8554FFFFFF mov eax, [ebp+$FFFFFF54] 008470A4 50 push eax 008470A5 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008470A7 E8006FC9FF call 004DDFAC 008470AC 5A pop edx 008470AD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008470AF FF5138 call dword ptr [ecx+$38] 008470B2 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008470B4 E8F36EC9FF call 004DDFAC * Possible String Reference to: ' and A.CRFlag='Ó¦ÊÕÊÕ' and A.Status | <>'0'' | 008470B9 BA58808400 mov edx, $00848058 008470BE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008470C0 FF5138 call dword ptr [ecx+$38] 008470C3 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008470C5 E8E26EC9FF call 004DDFAC * Possible String Reference to: ' group by A.ConNo,A.CRTime,A.P_Code | Name,A.P_Spec,A.BZType,A.Price,A.Hu | ilv' | 008470CA BA8C808400 mov edx, $0084808C 008470CF 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008470D1 FF5138 call dword ptr [ecx+$38] 008470D4 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 008470D6 E8EDE7C7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_XS : TClientDataSet | 008470DB 8B9394030000 mov edx, [ebx+$0394] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 008470E1 8B83AC030000 mov eax, [ebx+$03AC] | 008470E7 E8A4FDF6FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_XS : TClientDataSet | 008470EC 8B9394030000 mov edx, [ebx+$0394] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 008470F2 8B83AC030000 mov eax, [ebx+$03AC] | 008470F8 E81BFFF6FF call 007B7018 008470FD 33C0 xor eax, eax 008470FF 8945B0 mov [ebp-$50], eax 00847102 8945B4 mov [ebp-$4C], eax 00847105 33C0 xor eax, eax 00847107 8945A8 mov [ebp-$58], eax 0084710A 8945AC mov [ebp-$54], eax 0084710D 33C0 xor eax, eax 0084710F 8945A0 mov [ebp-$60], eax 00847112 8945A4 mov [ebp-$5C], eax 00847115 33C0 xor eax, eax 00847117 894598 mov [ebp-$68], eax 0084711A 89459C mov [ebp-$64], eax * Reference to control TfrmSKCR_YF.Order_XS : TClientDataSet | 0084711D 8BB394030000 mov esi, [ebx+$0394] 00847123 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 00847125 E8060FC8FF call 004C8030 0084712A EB4F jmp 0084717B * Possible String Reference to: 'Qty' | 0084712C BAE0808400 mov edx, $008480E0 00847131 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00847133 E87CFAC7FF call 004C6BB4 00847138 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 0084713A FF5254 call dword ptr [edx+$54] 0084713D DC45A8 fadd qword ptr [ebp-$58] 00847140 DD5DA8 fstp qword ptr [ebp-$58] 00847143 9B wait * Possible String Reference to: 'RMBMoney' | 00847144 BAEC808400 mov edx, $008480EC 00847149 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0084714B E864FAC7FF call 004C6BB4 00847150 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 00847152 FF5254 call dword ptr [edx+$54] 00847155 DC45A0 fadd qword ptr [ebp-$60] 00847158 DD5DA0 fstp qword ptr [ebp-$60] 0084715B 9B wait * Possible String Reference to: 'Money' | 0084715C BA00818400 mov edx, $00848100 00847161 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00847163 E84CFAC7FF call 004C6BB4 00847168 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 0084716A FF5254 call dword ptr [edx+$54] 0084716D DC4598 fadd qword ptr [ebp-$68] 00847170 DD5D98 fstp qword ptr [ebp-$68] 00847173 9B wait 00847174 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 00847176 E8D111C8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 0084717B 80BEA100000000 cmp byte ptr [esi+$00A1], $00 00847182 74A8 jz 0084712C * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00847184 8BB3AC030000 mov esi, [ebx+$03AC] 0084718A 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 0084718C E843E7C7FF call 004C58D4 00847191 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847193 E8146EC9FF call 004DDFAC 00847198 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0084719A FF5244 call dword ptr [edx+$44] 0084719D 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084719F E8086EC9FF call 004DDFAC * Possible String Reference to: 'select B.ConNo,A.CRTime,A.BZType,A. | Huilv,A.Note' | 008471A4 BA10818400 mov edx, $00848110 008471A9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008471AB FF5138 call dword ptr [ecx+$38] 008471AE 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008471B0 E8F76DC9FF call 004DDFAC * Possible String Reference to: ',RMBMoney=sum(E.Num*A.Huilv)' | 008471B5 BA48818400 mov edx, $00848148 008471BA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008471BC FF5138 call dword ptr [ecx+$38] 008471BF 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008471C1 E8E66DC9FF call 004DDFAC * Possible String Reference to: ',USDMoney=sum(E.Num)' | 008471C6 BA70818400 mov edx, $00848170 008471CB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008471CD FF5138 call dword ptr [ecx+$38] 008471D0 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008471D2 E8D56DC9FF call 004DDFAC * Possible String Reference to: 'from YF_Money_CR A ' | 008471D7 BA90818400 mov edx, $00848190 008471DC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008471DE FF5138 call dword ptr [ecx+$38] 008471E1 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008471E3 E8C46DC9FF call 004DDFAC * Possible String Reference to: 'inner join YF_log E on E.ListNo=A.Y | FID ' | 008471E8 BAAC818400 mov edx, $008481AC 008471ED 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008471EF FF5138 call dword ptr [ecx+$38] 008471F2 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008471F4 E8B36DC9FF call 004DDFAC * Possible String Reference to: 'inner join YF_Money_CR B on B.YFID= | E.ToNo and B.CRType='Ó¦ÊÕ¿îµÇ¼Ç' ' | 008471F9 BADC818400 mov edx, $008481DC 008471FE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847200 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where B.Mainid='' | 00847203 682C828400 push $0084822C * Possible String Reference to: 'Mainid' | 00847208 BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084720D 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00847213 E89CF9C7FF call 004C6BB4 00847218 8D9540FFFFFF lea edx, [ebp+$FFFFFF40] 0084721E 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00847220 FF5160 call dword ptr [ecx+$60] 00847223 8B8540FFFFFF mov eax, [ebp+$FFFFFF40] 00847229 8D9544FFFFFF lea edx, [ebp+$FFFFFF44] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084722F E8B836BCFF call 0040A8EC 00847234 FFB544FFFFFF push dword ptr [ebp+$FFFFFF44] * Possible String Reference to: '' and A.CRType='ÊÕ¿îµÇ¼Ç' ' | 0084723A 6848828400 push $00848248 0084723F 8D8548FFFFFF lea eax, [ebp+$FFFFFF48] 00847245 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 0084724A E865E4BBFF call 004056B4 0084724F 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] 00847255 50 push eax 00847256 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847258 E84F6DC9FF call 004DDFAC 0084725D 5A pop edx 0084725E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847260 FF5138 call dword ptr [ecx+$38] 00847263 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847265 E8426DC9FF call 004DDFAC * Possible String Reference to: ' and A.status<>'0'' | 0084726A BA6C828400 mov edx, $0084826C 0084726F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847271 FF5138 call dword ptr [ecx+$38] 00847274 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847276 E8316DC9FF call 004DDFAC * Possible String Reference to: ' group by B.ConNo,A.CRTime,A.BZType | ,A.Huilv,A.Note' | 0084727B BA88828400 mov edx, $00848288 00847280 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847282 FF5138 call dword ptr [ecx+$38] 00847285 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00847287 E83CE6C7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_SK : TClientDataSet | 0084728C 8B9398030000 mov edx, [ebx+$0398] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 00847292 8B83AC030000 mov eax, [ebx+$03AC] | 00847298 E8F3FBF6FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_SK : TClientDataSet | 0084729D 8B9398030000 mov edx, [ebx+$0398] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 008472A3 8B83AC030000 mov eax, [ebx+$03AC] | 008472A9 E86AFDF6FF call 007B7018 008472AE 33C0 xor eax, eax 008472B0 894590 mov [ebp-$70], eax 008472B3 894594 mov [ebp-$6C], eax 008472B6 33C0 xor eax, eax 008472B8 894588 mov [ebp-$78], eax 008472BB 89458C mov [ebp-$74], eax * Reference to control TfrmSKCR_YF.Order_SK : TClientDataSet | 008472BE 8BB398030000 mov esi, [ebx+$0398] 008472C4 8BC6 mov eax, esi * Reference to: DB.TDataSet.First(TDataSet); | 008472C6 E8650DC8FF call 004C8030 008472CB EB37 jmp 00847304 * Possible String Reference to: 'RMBMoney' | 008472CD BAEC808400 mov edx, $008480EC 008472D2 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008472D4 E8DBF8C7FF call 004C6BB4 008472D9 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 008472DB FF5254 call dword ptr [edx+$54] 008472DE DC4590 fadd qword ptr [ebp-$70] 008472E1 DD5D90 fstp qword ptr [ebp-$70] 008472E4 9B wait * Possible String Reference to: 'USDMoney' | 008472E5 BAC4828400 mov edx, $008482C4 008472EA 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008472EC E8C3F8C7FF call 004C6BB4 008472F1 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_54 | 008472F3 FF5254 call dword ptr [edx+$54] 008472F6 DC4588 fadd qword ptr [ebp-$78] 008472F9 DD5D88 fstp qword ptr [ebp-$78] 008472FC 9B wait 008472FD 8BC6 mov eax, esi * Reference to: DB.TDataSet.Next(TDataSet); | 008472FF E84810C8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 00847304 80BEA100000000 cmp byte ptr [esi+$00A1], $00 0084730B 74C0 jz 008472CD * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 0084730D 8BB3AC030000 mov esi, [ebx+$03AC] 00847313 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00847315 E8BAE5C7FF call 004C58D4 0084731A 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084731C E88B6CC9FF call 004DDFAC 00847321 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00847323 FF5244 call dword ptr [edx+$44] 00847326 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847328 E87F6CC9FF call 004DDFAC * Possible String Reference to: 'select A.CRTime,A.YFName,A.BZType,A | .Note ' | 0084732D BAD8828400 mov edx, $008482D8 00847332 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847334 FF5138 call dword ptr [ecx+$38] 00847337 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00847339 E86E6CC9FF call 004DDFAC * Possible String Reference to: ',RMBMoney=Sum(A.Money*A.Huilv)' | 0084733E BA0C838400 mov edx, $0084830C 00847343 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847345 FF5138 call dword ptr [ecx+$38] 00847348 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084734A E85D6CC9FF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A ' | 0084734F BAF47F8400 mov edx, $00847FF4 00847354 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00847356 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where A.Mainid='' | 00847359 6814808400 push $00848014 * Possible String Reference to: 'Mainid' | 0084735E BAEC7A8400 mov edx, $00847AEC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00847363 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00847369 E846F8C7FF call 004C6BB4 0084736E 8D9534FFFFFF lea edx, [ebp+$FFFFFF34] 00847374 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00847376 FF5160 call dword ptr [ecx+$60] 00847379 8B8534FFFFFF mov eax, [ebp+$FFFFFF34] 0084737F 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00847385 E86235BCFF call 0040A8EC 0084738A FFB538FFFFFF push dword ptr [ebp+$FFFFFF38] * Possible String Reference to: '' ' | 00847390 6834838400 push $00848334 00847395 8D853CFFFFFF lea eax, [ebp+$FFFFFF3C] 0084739B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008473A0 E80FE3BBFF call 004056B4 008473A5 8B853CFFFFFF mov eax, [ebp+$FFFFFF3C] 008473AB 50 push eax 008473AC 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473AE E8F96BC9FF call 004DDFAC 008473B3 5A pop edx 008473B4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008473B6 FF5138 call dword ptr [ecx+$38] 008473B9 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473BB E8EC6BC9FF call 004DDFAC * Possible String Reference to: ' and A.CRType in ('Ó¦¸¶¿îµÇ¼Ç','¸¶¿ | îÔÓ·Ñ') and isnull(A.FYType,'')<>'¼ | Ó¹¤·Ñ' ' | 008473C0 BA40838400 mov edx, $00848340 008473C5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008473C7 FF5138 call dword ptr [ecx+$38] 008473CA 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473CC E8DB6BC9FF call 004DDFAC * Possible String Reference to: ' and isnull(A.FYType,'')<>'Å÷²¼·Ñ' | and isnull(A.YFName,'')<>'¸¨ÁÏ·Ñ'' | 008473D1 BA98838400 mov edx, $00848398 008473D6 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008473D8 FF5138 call dword ptr [ecx+$38] 008473DB 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473DD E8CA6BC9FF call 004DDFAC * Possible String Reference to: ' and isnull(A.YFName,'')<>'²Ã¼ôÈ˹¤ | ·Ñ' and isnull(A.YFName,'')<>'³µ¹¤È | ˹¤·Ñ' and isnull(A.YFName,'')<>'°ü | ×°È˹¤·Ñ' ' | 008473E2 BAE8838400 mov edx, $008483E8 008473E7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008473E9 FF5138 call dword ptr [ecx+$38] 008473EC 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473EE E8B96BC9FF call 004DDFAC * Possible String Reference to: ' and A.status<>'0'' | 008473F3 BA6C828400 mov edx, $0084826C 008473F8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008473FA FF5138 call dword ptr [ecx+$38] 008473FD 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008473FF E8A86BC9FF call 004DDFAC * Possible String Reference to: ' group by A.CRTime,A.YFName,A.BZTyp | e,A.Note' | 00847404 BA64848400 mov edx, $00848464 00847409 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0084740B FF5138 call dword ptr [ecx+$38] 0084740E 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00847410 E8B3E4C7FF call 004C58C8 * Reference to control TfrmSKCR_YF.Order_FYZC : TClientDataSet | 00847415 8B938C030000 mov edx, [ebx+$038C] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 0084741B 8B83AC030000 mov eax, [ebx+$03AC] | 00847421 E86AFAF6FF call 007B6E90 * Reference to control TfrmSKCR_YF.Order_FYZC : TClientDataSet | 00847426 8B938C030000 mov edx, [ebx+$038C] * Reference to control TfrmSKCR_YF.ADOQuery1 : TADOQuery | 0084742C 8B83AC030000 mov eax, [ebx+$03AC] | 00847432 E8E1FBF6FF call 007B7018 00847437 8D952CFFFFFF lea edx, [ebp+$FFFFFF2C] *) end; procedure TfrmSKCR_YF.THTCXClick(Sender : TObject); begin (* 008486A4 55 push ebp 008486A5 8BEC mov ebp, esp 008486A7 6A00 push $00 008486A9 6A00 push $00 008486AB 53 push ebx 008486AC 8BD8 mov ebx, eax 008486AE 33C0 xor eax, eax 008486B0 55 push ebp * Possible String Reference to: 'éŠÃ»ÿëë[YY]Ã' | 008486B1 6865878400 push $00848765 ***** TRY | 008486B6 64FF30 push dword ptr fs:[eax] 008486B9 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008486BC 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 008486C2 E8F9F7C7FF call 004C7EC0 008486C7 84C0 test al, al 008486C9 757F jnz 0084874A 008486CB 8BCB mov ecx, ebx 008486CD B201 mov dl, $01 * Reference to class TfrmJYorderConCX | 008486CF A164DF7D00 mov eax, dword ptr [$007DDF64] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 008486D4 E8F796C5FF call 004A1DD0 *) end; procedure TfrmSKCR_YF.ComboBox1Change(Sender : TObject); begin (* | 00848790 E823AAFFFF call 008431B8 00848795 C3 ret *) end; procedure TfrmSKCR_YF.v2CJJGBiLVPropertiesEditValueChanged(Sender : TObject); begin (* 00848798 55 push ebp 00848799 8BEC mov ebp, esp 0084879B B905000000 mov ecx, $00000005 008487A0 6A00 push $00 008487A2 6A00 push $00 008487A4 49 dec ecx 008487A5 75F9 jnz 008487A0 008487A7 53 push ebx 008487A8 56 push esi 008487A9 8BDA mov ebx, edx 008487AB 8BF0 mov esi, eax 008487AD 33C0 xor eax, eax 008487AF 55 push ebp 008487B0 68E9888400 push $008488E9 ***** TRY | 008487B5 64FF30 push dword ptr fs:[eax] 008487B8 648920 mov fs:[eax], esp 008487BB 8D55FC lea edx, [ebp-$04] 008487BE 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; | 008487C0 E8F76ED4FF call 0058F6BC 008487C5 837DFC00 cmp dword ptr [ebp-$04], +$00 008487C9 750D jnz 008487D8 008487CB 8D45FC lea eax, [ebp-$04] 008487CE BA00898400 mov edx, $00848900 * Reference to: System.@LStrLAsg(void;void;void;void); | 008487D3 E8E4CBBBFF call 004053BC * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 008487D8 8B9E54030000 mov ebx, [esi+$0354] 008487DE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008487E0 E85BFCC7FF call 004C8440 * Possible String Reference to: 'CJJGBiLV' | 008487E5 BA0C898400 mov edx, $0084890C 008487EA 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008487EC E8C3E3C7FF call 004C6BB4 008487F1 50 push eax 008487F2 8D45EC lea eax, [ebp-$14] 008487F5 8B55FC mov edx, [ebp-$04] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008487F8 E8CB05BDFF call 00418DC8 008487FD 8D55EC lea edx, [ebp-$14] 00848800 58 pop eax 00848801 8B08 mov ecx, [eax] 00848803 FF91B4000000 call dword ptr [ecx+$00B4] * Reference to control TfrmSKCR_YF.ADOQueryCmd : TADOQuery | 00848809 8B9E08030000 mov ebx, [esi+$0308] 0084880F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00848811 E8BED0C7FF call 004C58D4 00848816 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00848818 E88F57C9FF call 004DDFAC 0084881D 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0084881F FF5244 call dword ptr [edx+$44] 00848822 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00848824 E88357C9FF call 004DDFAC * Possible String Reference to: 'update JYOrder_Main set ' | 00848829 BA20898400 mov edx, $00848920 0084882E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00848830 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' CJJGBiLV='' | 00848833 6844898400 push $00848944 00848838 8D55E4 lea edx, [ebp-$1C] 0084883B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084883E E8A920BCFF call 0040A8EC 00848843 FF75E4 push dword ptr [ebp-$1C] 00848846 6858898400 push $00848958 0084884B 8D45E8 lea eax, [ebp-$18] 0084884E BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00848853 E85CCEBBFF call 004056B4 00848858 8B45E8 mov eax, [ebp-$18] 0084885B 50 push eax 0084885C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0084885E E84957C9FF call 004DDFAC 00848863 5A pop edx 00848864 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00848866 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where Mainid='' | 00848869 6864898400 push $00848964 * Possible String Reference to: 'Mainid' | 0084886E BA7C898400 mov edx, $0084897C * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 00848873 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00848879 E836E3C7FF call 004C6BB4 0084887E 8D55D8 lea edx, [ebp-$28] 00848881 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00848883 FF5160 call dword ptr [ecx+$60] 00848886 8B45D8 mov eax, [ebp-$28] 00848889 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084888C E85B20BCFF call 0040A8EC 00848891 FF75DC push dword ptr [ebp-$24] 00848894 6858898400 push $00848958 00848899 8D45E0 lea eax, [ebp-$20] 0084889C BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008488A1 E80ECEBBFF call 004056B4 008488A6 8B45E0 mov eax, [ebp-$20] 008488A9 50 push eax 008488AA 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008488AC E8FB56C9FF call 004DDFAC 008488B1 5A pop edx 008488B2 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008488B4 FF5138 call dword ptr [ecx+$38] 008488B7 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008488B9 E81656C9FF call 004DDED4 008488BE 33C0 xor eax, eax 008488C0 5A pop edx 008488C1 59 pop ecx 008488C2 59 pop ecx 008488C3 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 008488C6 68F0888400 push $008488F0 008488CB 8D45D8 lea eax, [ebp-$28] 008488CE BA05000000 mov edx, $00000005 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008488D3 E870CABBFF call 00405348 008488D8 8D45EC lea eax, [ebp-$14] * Reference to: Variants.@VarClr(TVarData;TVarData); | 008488DB E894BDBCFF call 00414674 008488E0 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 008488E3 E83CCABBFF call 00405324 008488E8 C3 ret * Reference to: System.@HandleFinally; | 008488E9 E906C2BBFF jmp 00404AF4 008488EE EBDB jmp 008488CB ****** END | 008488F0 5E pop esi 008488F1 5B pop ebx 008488F2 8BE5 mov esp, ebp 008488F4 5D pop ebp 008488F5 C3 ret *) end; procedure TfrmSKCR_YF.ToolButton3Click(Sender : TObject); begin (* 00848984 55 push ebp 00848985 8BEC mov ebp, esp 00848987 6A00 push $00 00848989 6A00 push $00 0084898B 53 push ebx 0084898C 8BD8 mov ebx, eax 0084898E 33C0 xor eax, eax 00848990 55 push ebp * Possible String Reference to: 'é}À»ÿëë[YY]Ã' | 00848991 68728A8400 push $00848A72 ***** TRY | 00848996 64FF30 push dword ptr fs:[eax] 00848999 648920 mov fs:[eax], esp * Reference to control TfrmSKCR_YF.CDS_HZ : TClientDataSet | 0084899C 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 008489A2 E819F5C7FF call 004C7EC0 008489A7 84C0 test al, al 008489A9 0F85A8000000 jnz 00848A57 008489AF 33C0 xor eax, eax 008489B1 55 push ebp 008489B2 68508A8400 push $00848A50 ***** TRY | 008489B7 64FF30 push dword ptr fs:[eax] 008489BA 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00843ACD(Sender : TObject); begin (* 00843ACD 50 push eax 00843ACE 6461 popa 00843AD0 7465 jz 00843B37 00843AD2 205943 and [ecx+$43], bl 00843AD5 4C dec esp 00843AD6 5F pop edi 00843AD7 53 push ebx 00843AD8 47 inc edi 00843AD9 5F pop edi 00843ADA 48 dec eax 00843ADB 5A pop edx 00843ADC 2000 and [eax], al 00843ADE 0000 add [eax], al 00843AE0 FFFF DB $FF, $FF // 00843AE2 FFFF DB $FF, $FF // 00843AE4 0500000020 add eax, +$20000000 00843AE9 53 push ebx 00843AEA 657420 jz 00843B0D 00843AED 0000 add [eax], al 00843AEF 00FF add bh, bh 00843AF1 FFFF DB $FF, $FF // 00843AF3 FF02 inc dword ptr [edx] 00843AF5 0000 add [eax], al 00843AF7 003D270000FF add [$FF000027], bh 00843AFD FFFF DB $FF, $FF // 00843AFF FF01 inc dword ptr [ecx] 00843B01 0000 add [eax], al 00843B03 0027 add [edi], ah 00843B05 0000 add [eax], al 00843B07 00FF add bh, bh 00843B09 FFFF DB $FF, $FF // 00843B0B FF050000003D inc dword ptr [$3D000000] 00843B11 4E dec esi 00843B12 55 push ebp 00843B13 4C dec esp 00843B14 4C dec esp 00843B15 0000 add [eax], al 00843B17 00FF add bh, bh 00843B19 FFFF DB $FF, $FF // 00843B1B FF09 dec dword ptr [ecx] 00843B1D 0000 add [eax], al 00843B1F 002C4564697465 add [$65746964+eax*2], ch 00843B26 723D jb 00843B65 00843B28 27 daa 00843B29 0000 add [eax], al 00843B2B 00FF add bh, bh 00843B2D FFFF DB $FF, $FF // 00843B2F FF1400 call dword ptr [eax+eax] 00843B32 0000 add [eax], al 00843B34 2C45 sub al, $45 00843B36 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00843B3F 657464 jz 00843BA6 00843B42 61 popa 00843B43 7465 jz 00843BAA 00843B45 2829 sub [ecx], ch 00843B47 2000 and [eax], al 00843B49 0000 add [eax], al 00843B4B 00FF add bh, bh 00843B4D FFFF DB $FF, $FF // 00843B4F FF0E dec dword ptr [esi] 00843B51 0000 add [eax], al 00843B53 0020 add [eax], ah 00843B55 7768 jnbe 00843BBF 00843B57 657265 jb 00843BBF 00843B5A 205375 and [ebx+$75], dl 00843B5D 624964 bound ecx, qword ptr [ecx+$64] 00843B60 3D270000FF cmp eax, $FF000027 00843B65 FFFF DB $FF, $FF // 00843B67 FF0500000053 inc dword ptr [$53000000] 00843B6D 7562 jnz 00843BD1 00843B6F 49 dec ecx 00843B70 640000 add fs:[eax], al 00843B73 00558B add [ebp-$75], dl 00843B76 EC in al, dx 00843B77 B91C000000 mov ecx, $0000001C 00843B7C 6A00 push $00 00843B7E 6A00 push $00 00843B80 49 dec ecx 00843B81 75F9 jnz 00843B7C 00843B83 51 push ecx 00843B84 53 push ebx 00843B85 56 push esi 00843B86 8BF2 mov esi, edx 00843B88 8BD8 mov ebx, eax 00843B8A 33C0 xor eax, eax 00843B8C 55 push ebp 00843B8D 68EF418400 push $008441EF ***** TRY | 00843B92 64FF30 push dword ptr fs:[eax] 00843B95 648920 mov fs:[eax], esp 00843B98 8D55FC lea edx, [ebp-$04] 00843B9B 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; | 00843B9D E81ABBD4FF call 0058F6BC 00843BA2 8D55DC lea edx, [ebp-$24] 00843BA5 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BA8 E83F6DBCFF call 0040A8EC 00843BAD 837DDC00 cmp dword ptr [ebp-$24], +$00 00843BB1 750D jnz 00843BC0 00843BB3 8D45FC lea eax, [ebp-$04] 00843BB6 BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843BBB E8FC17BCFF call 004053BC * Reference to control v1PRTColor : N.A. | 00843BC0 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 00843BC6 E88187E1FF 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; | 00843BCB E894DFE0FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00843BD0 8B4050 mov eax, [eax+$50] 00843BD3 8D55D8 lea edx, [ebp-$28] 00843BD6 8B08 mov ecx, [eax] 00843BD8 FF5110 call dword ptr [ecx+$10] 00843BDB 8B45D8 mov eax, [ebp-$28] 00843BDE 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BE1 E8066DBCFF call 0040A8EC * Reference to control Label9 : N.A. | 00843BE6 8BB354030000 mov esi, [ebx+$0354] 00843BEC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00843BEE E84D48C8FF call 004C8440 00843BF3 8D55C4 lea edx, [ebp-$3C] 00843BF6 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843BF9 E8EE6CBCFF call 0040A8EC 00843BFE 8B55C4 mov edx, [ebp-$3C] 00843C01 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00843C04 E8BF51BDFF call 00418DC8 00843C09 8D45C8 lea eax, [ebp-$38] 00843C0C 50 push eax 00843C0D 8B55E0 mov edx, [ebp-$20] 00843C10 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C12 E89D2FC8FF call 004C6BB4 00843C17 5A pop edx 00843C18 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00843C1A FF91B4000000 call dword ptr [ecx+$00B4] 00843C20 8BC6 mov eax, esi 00843C22 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00843C24 FF924C020000 call dword ptr [edx+$024C] * Reference to control ScrollBox1 : N.A. | 00843C2A 8BB304030000 mov esi, [ebx+$0304] 00843C30 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00843C32 E89D1CC8FF call 004C58D4 00843C37 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 00843C39 E86EA3C9FF call 004DDFAC 00843C3E 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00843C40 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00843C43 6810428400 push $00844210 * Possible String Reference to: 'YFID' | 00843C48 BA58428400 mov edx, $00844258 * Reference to control Label9 : N.A. | 00843C4D 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C53 E85C2FC8FF call 004C6BB4 00843C58 8D55BC lea edx, [ebp-$44] 00843C5B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843C5D FF5160 call dword ptr [ecx+$60] 00843C60 FF75BC push dword ptr [ebp-$44] 00843C63 6868428400 push $00844268 00843C68 8D45C0 lea eax, [ebp-$40] 00843C6B BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00843C70 E83F1ABCFF call 004056B4 00843C75 8B45C0 mov eax, [ebp-$40] 00843C78 50 push eax 00843C79 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 00843C7B E82CA3C9FF call 004DDFAC 00843C80 5A pop edx 00843C81 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00843C83 FF5138 call dword ptr [ecx+$38] 00843C86 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 00843C88 E83B1CC8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00843C8D BA74428400 mov edx, $00844274 * Reference to control ScrollBox1 : N.A. | 00843C92 8B8304030000 mov eax, [ebx+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843C98 E8172FC8FF call 004C6BB4 00843C9D 8D55E4 lea edx, [ebp-$1C] 00843CA0 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843CA2 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 00843CA5 BA84428400 mov edx, $00844284 * Reference to control Label9 : N.A. | 00843CAA 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843CB0 E8FF2EC8FF call 004C6BB4 00843CB5 8D55B8 lea edx, [ebp-$48] 00843CB8 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843CBA FF5160 call dword ptr [ecx+$60] 00843CBD 8B45B8 mov eax, [ebp-$48] 00843CC0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843CC3 E8246CBCFF call 0040A8EC 00843CC8 8D55B4 lea edx, [ebp-$4C] 00843CCB 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843CCE E8196CBCFF call 0040A8EC 00843CD3 837DB400 cmp dword ptr [ebp-$4C], +$00 00843CD7 750D jnz 00843CE6 00843CD9 8D45F8 lea eax, [ebp-$08] 00843CDC BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843CE1 E8D616BCFF call 004053BC * Possible String Reference to: 'Price' | 00843CE6 BA90428400 mov edx, $00844290 * Reference to control Label9 : N.A. | 00843CEB 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843CF1 E8BE2EC8FF call 004C6BB4 00843CF6 8D55B0 lea edx, [ebp-$50] 00843CF9 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843CFB FF5160 call dword ptr [ecx+$60] 00843CFE 8B45B0 mov eax, [ebp-$50] 00843D01 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D04 E8E36BBCFF call 0040A8EC 00843D09 8D55AC lea edx, [ebp-$54] 00843D0C 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D0F E8D86BBCFF call 0040A8EC 00843D14 837DAC00 cmp dword ptr [ebp-$54], +$00 00843D18 750D jnz 00843D27 00843D1A 8D45F4 lea eax, [ebp-$0C] 00843D1D BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843D22 E89516BCFF call 004053BC * Possible String Reference to: 'Qty' | 00843D27 BA84428400 mov edx, $00844284 * Reference to control Label9 : N.A. | 00843D2C 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843D32 E87D2EC8FF call 004C6BB4 00843D37 8D55A8 lea edx, [ebp-$58] 00843D3A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843D3C FF5160 call dword ptr [ecx+$60] 00843D3F 8B45A8 mov eax, [ebp-$58] 00843D42 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D45 E8A26BBCFF call 0040A8EC 00843D4A 8D55A4 lea edx, [ebp-$5C] 00843D4D 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D50 E8976BBCFF call 0040A8EC 00843D55 837DA400 cmp dword ptr [ebp-$5C], +$00 00843D59 750D jnz 00843D68 00843D5B 8D45F8 lea eax, [ebp-$08] 00843D5E BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843D63 E85416BCFF call 004053BC * Possible String Reference to: 'Money' | 00843D68 BAA0428400 mov edx, $008442A0 * Reference to control Label9 : N.A. | 00843D6D 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843D73 E83C2EC8FF call 004C6BB4 00843D78 8D55A0 lea edx, [ebp-$60] 00843D7B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843D7D FF5160 call dword ptr [ecx+$60] 00843D80 8B45A0 mov eax, [ebp-$60] 00843D83 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D86 E8616BBCFF call 0040A8EC 00843D8B 8D559C lea edx, [ebp-$64] 00843D8E 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843D91 E8566BBCFF call 0040A8EC 00843D96 837D9C00 cmp dword ptr [ebp-$64], +$00 00843D9A 750D jnz 00843DA9 00843D9C 8D45F0 lea eax, [ebp-$10] 00843D9F BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843DA4 E81316BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 00843DA9 BAB0428400 mov edx, $008442B0 * Reference to control Label9 : N.A. | 00843DAE 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843DB4 E8FB2DC8FF call 004C6BB4 00843DB9 8D5598 lea edx, [ebp-$68] 00843DBC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00843DBE FF5160 call dword ptr [ecx+$60] 00843DC1 8B4598 mov eax, [ebp-$68] 00843DC4 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DC7 E8206BBCFF call 0040A8EC 00843DCC 8D5594 lea edx, [ebp-$6C] 00843DCF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DD2 E8156BBCFF call 0040A8EC 00843DD7 837D9400 cmp dword ptr [ebp-$6C], +$00 00843DDB 750D jnz 00843DEA 00843DDD 8D45EC lea eax, [ebp-$14] 00843DE0 BA04428400 mov edx, $00844204 * Reference to: System.@LStrLAsg(void;void;void;void); | 00843DE5 E8D215BCFF call 004053BC 00843DEA 8D5590 lea edx, [ebp-$70] 00843DED 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843DF0 E8F76ABCFF call 0040A8EC 00843DF5 8B4590 mov eax, [ebp-$70] * Possible String Reference to: 'Money' | 00843DF8 BAA0428400 mov edx, $008442A0 * Reference to: System.@LStrCmp; | 00843DFD E83E19BCFF call 00405740 00843E02 0F84AD000000 jz 00843EB5 00843E08 8D558C lea edx, [ebp-$74] 00843E0B 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843E0E E8D96ABCFF call 0040A8EC 00843E13 8B458C mov eax, [ebp-$74] * Possible String Reference to: 'HuiLv' | 00843E16 BAB0428400 mov edx, $008442B0 * Reference to: System.@LStrCmp; | 00843E1B E82019BCFF call 00405740 00843E20 7469 jz 00843E8B 00843E22 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E25 E80299BCFF call 0040D72C 00843E2A DB7D80 fstp tbyte ptr [ebp-$80] 00843E2D 9B wait 00843E2E 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E31 E8F698BCFF call 0040D72C 00843E36 DB6D80 fld tbyte ptr [ebp-$80] 00843E39 DEC9 fmulp st(1), st(0) 00843E3B DBBD74FFFFFF fstp tbyte ptr [ebp+$FFFFFF74] 00843E41 9B wait 00843E42 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E45 E8E298BCFF call 0040D72C 00843E4A DBAD74FFFFFF fld tbyte ptr [ebp+$FFFFFF74] 00843E50 DEC9 fmulp st(1), st(0) 00843E52 83C4F4 add esp, -$0C 00843E55 DB3C24 fstp tbyte ptr [esp] 00843E58 9B wait 00843E59 8D45E8 lea eax, [ebp-$18] | 00843E5C E84B97BCFF call 0040D5AC 00843E61 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E64 E8C398BCFF call 0040D72C 00843E69 DB7D80 fstp tbyte ptr [ebp-$80] 00843E6C 9B wait 00843E6D 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E70 E8B798BCFF call 0040D72C 00843E75 DB6D80 fld tbyte ptr [ebp-$80] 00843E78 DEC9 fmulp st(1), st(0) 00843E7A 83C4F4 add esp, -$0C 00843E7D DB3C24 fstp tbyte ptr [esp] 00843E80 9B wait 00843E81 8D45F0 lea eax, [ebp-$10] | 00843E84 E82397BCFF call 0040D5AC 00843E89 EB52 jmp 00843EDD 00843E8B 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E8E E89998BCFF call 0040D72C 00843E93 DB7D80 fstp tbyte ptr [ebp-$80] 00843E96 9B wait 00843E97 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843E9A E88D98BCFF call 0040D72C 00843E9F DB6D80 fld tbyte ptr [ebp-$80] 00843EA2 DEC9 fmulp st(1), st(0) 00843EA4 83C4F4 add esp, -$0C 00843EA7 DB3C24 fstp tbyte ptr [esp] 00843EAA 9B wait 00843EAB 8D45E8 lea eax, [ebp-$18] | 00843EAE E8F996BCFF call 0040D5AC 00843EB3 EB28 jmp 00843EDD 00843EB5 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EB8 E86F98BCFF call 0040D72C 00843EBD DB7D80 fstp tbyte ptr [ebp-$80] 00843EC0 9B wait 00843EC1 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EC4 E86398BCFF call 0040D72C 00843EC9 DB6D80 fld tbyte ptr [ebp-$80] 00843ECC DEC9 fmulp st(1), st(0) 00843ECE 83C4F4 add esp, -$0C 00843ED1 DB3C24 fstp tbyte ptr [esp] 00843ED4 9B wait 00843ED5 8D45E8 lea eax, [ebp-$18] | 00843ED8 E8CF96BCFF call 0040D5AC * Reference to control Label9 : N.A. | 00843EDD 8BB354030000 mov esi, [ebx+$0354] 00843EE3 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00843EE5 E85645C8FF call 004C8440 * Possible String Reference to: 'Money' | 00843EEA BAA0428400 mov edx, $008442A0 00843EEF 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843EF1 E8BE2CC8FF call 004C6BB4 00843EF6 50 push eax 00843EF7 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843EFA E82D98BCFF call 0040D72C 00843EFF 8D8564FFFFFF lea eax, [ebp+$FFFFFF64] * Reference to: Variants.@VarFromReal; | 00843F05 E8824EBDFF call 00418D8C 00843F0A 8D9564FFFFFF lea edx, [ebp+$FFFFFF64] 00843F10 58 pop eax 00843F11 8B08 mov ecx, [eax] 00843F13 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00843F19 BA74428400 mov edx, $00844274 00843F1E 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00843F20 E88F2CC8FF call 004C6BB4 00843F25 50 push eax 00843F26 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00843F29 E8FE97BCFF call 0040D72C 00843F2E 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] * Reference to: Variants.@VarFromReal; | 00843F34 E8534EBDFF call 00418D8C 00843F39 8D9554FFFFFF lea edx, [ebp+$FFFFFF54] 00843F3F 58 pop eax 00843F40 8B08 mov ecx, [eax] 00843F42 FF91B4000000 call dword ptr [ecx+$00B4] 00843F48 8BC6 mov eax, esi 00843F4A 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00843F4C FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00843F52 8BB308030000 mov esi, [ebx+$0308] 00843F58 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00843F5A E87519C8FF call 004C58D4 00843F5F 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00843F61 E846A0C9FF call 004DDFAC 00843F66 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00843F68 FF5244 call dword ptr [edx+$44] 00843F6B 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00843F6D E83AA0C9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00843F72 BAC0428400 mov edx, $008442C0 00843F77 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00843F79 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00843F7C 68DC428400 push $008442DC 00843F81 FF75E0 push dword ptr [ebp-$20] 00843F84 68EC428400 push $008442EC 00843F89 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 00843F8F 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843F92 E85569BCFF call 0040A8EC 00843F97 FFB54CFFFFFF push dword ptr [ebp+$FFFFFF4C] 00843F9D 8D8550FFFFFF lea eax, [ebp+$FFFFFF50] 00843FA3 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00843FA8 E80717BCFF call 004056B4 00843FAD 8B8550FFFFFF mov eax, [ebp+$FFFFFF50] 00843FB3 50 push eax 00843FB4 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00843FB6 E8F19FC9FF call 004DDFAC 00843FBB 5A pop edx 00843FBC 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00843FBE FF5138 call dword ptr [ecx+$38] 00843FC1 8D9548FFFFFF lea edx, [ebp+$FFFFFF48] 00843FC7 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00843FCA E81D69BCFF call 0040A8EC 00843FCF 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] * Possible String Reference to: 'Money' | 00843FD5 BAA0428400 mov edx, $008442A0 * Reference to: System.@LStrCmp; | 00843FDA E86117BCFF call 00405740 00843FDF 7427 jz 00844008 00843FE1 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00843FE3 E8C49FC9FF call 004DDFAC 00843FE8 50 push eax 00843FE9 8D8544FFFFFF lea eax, [ebp+$FFFFFF44] 00843FEF 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 00843FF2 BAF8428400 mov edx, $008442F8 * Reference to: System.@LStrCat3; | 00843FF7 E84416BCFF call 00405640 00843FFC 8B9544FFFFFF mov edx, [ebp+$FFFFFF44] 00844002 58 pop eax 00844003 8B08 mov ecx, [eax] 00844005 FF5138 call dword ptr [ecx+$38] 00844008 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084400A E89D9FC9FF call 004DDFAC 0084400F 50 push eax 00844010 8D8540FFFFFF lea eax, [ebp+$FFFFFF40] 00844016 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 00844019 BA08438400 mov edx, $00844308 * Reference to: System.@LStrCat3; | 0084401E E81D16BCFF call 00405640 00844023 8B9540FFFFFF mov edx, [ebp+$FFFFFF40] 00844029 58 pop eax 0084402A 8B08 mov ecx, [eax] 0084402C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 0084402F 681C438400 push $0084431C 00844034 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] *) end; procedure TfrmSKCR_YF._PROC_008442C1(Sender : TObject); begin (* 008442C1 50 push eax 008442C2 6461 popa 008442C4 7465 jz 0084432B 008442C6 205946 and [ecx+$46], bl 008442C9 5F pop edi 008442CA 4D dec ebp 008442CB 6F outsd 008442CC 6E outsb 008442CD 65795F jns 0084432F 008442D0 43 inc ebx 008442D1 52 push edx 008442D2 2000 and [eax], al 008442D4 FFFF DB $FF, $FF // 008442D6 FFFF DB $FF, $FF // 008442D8 0500000020 add eax, +$20000000 008442DD 53 push ebx 008442DE 657420 jz 00844301 008442E1 0000 add [eax], al 008442E3 00FF add bh, bh 008442E5 FFFF DB $FF, $FF // 008442E7 FF01 inc dword ptr [ecx] 008442E9 0000 add [eax], al 008442EB 003D000000FF add [$FF000000], bh 008442F1 FFFF DB $FF, $FF // 008442F3 FF07 inc dword ptr [edi] 008442F5 0000 add [eax], al 008442F7 002C4D6F6E6579 add [$79656E6F+ecx*2], ch 008442FE 3D00FFFFFF cmp eax, $FFFFFF00 00844303 FF09 dec dword ptr [ecx] 00844305 0000 add [eax], al 00844307 002C42 add [edx+eax*2], ch 0084430A 42 inc edx 0084430B 4D dec ebp 0084430C 6F outsd 0084430D 6E outsb 0084430E 65793D jns 0084434E 00844311 0000 add [eax], al 00844313 00FF add bh, bh 00844315 FFFF DB $FF, $FF // 00844317 FF09 dec dword ptr [ecx] 00844319 0000 add [eax], al 0084431B 002C4564697465 add [$65746964+eax*2], ch 00844322 723D jb 00844361 00844324 27 daa 00844325 0000 add [eax], al 00844327 00FF add bh, bh 00844329 FFFF DB $FF, $FF // 0084432B FF1400 call dword ptr [eax+eax] 0084432E 0000 add [eax], al 00844330 2C45 sub al, $45 00844332 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0084433B 657464 jz 008443A2 0084433E 61 popa 0084433F 7465 jz 008443A6 00844341 2829 sub [ecx], ch 00844343 2000 and [eax], al 00844345 0000 add [eax], al 00844347 00FF add bh, bh 00844349 FFFF DB $FF, $FF // 0084434B FF0D00000020 dec dword ptr [$20000000] 00844351 7768 jnbe 008443BB 00844353 657265 jb 008443BB 00844356 205946 and [ecx+$46], bl 00844359 49 dec ecx 0084435A 643D27000000 cmp eax, $00000027 00844360 FFFF DB $FF, $FF // 00844362 FFFF DB $FF, $FF // 00844364 0400 add al, +$00 00844366 0000 add [eax], al 00844368 59 pop ecx 00844369 46 inc esi 0084436A 49 dec ecx 0084436B 640000 add fs:[eax], al 0084436E 0000 add [eax], al 00844370 FFFF DB $FF, $FF // 00844372 FFFF DB $FF, $FF // 00844374 2B00 sub eax, dword ptr [eax] 00844376 0000 add [eax], al 00844378 55 push ebp 00844379 7064 jo 008443DF 0084437B 61 popa 0084437C 7465 jz 008443E3 0084437E 205946 and [ecx+$46], bl 00844381 5F pop edi 00844382 4D dec ebp 00844383 6F outsd 00844384 6E outsb 00844385 65795F jns 008443E7 00844388 4B dec ebx 00844389 43 inc ebx 0084438A 205365 and [ebx+$65], dl 0084438D 7420 jz 008443AF 0084438F 4B dec ebx 00844390 43 inc ebx 00844391 42 inc edx 00844392 42 inc edx 00844393 4D dec ebp 00844394 6F outsd 00844395 6E outsb 00844396 65793D jns 008443D6 00844399 4B dec ebx 0084439A 43 inc ebx 0084439B 42 inc edx 0084439C 42 inc edx 0084439D 4D dec ebp 0084439E 6F outsd 0084439F 6E outsb 008443A0 65792D jns 008443D0 008443A3 00FF add bh, bh 008443A5 FFFF DB $FF, $FF // 008443A7 FF01 inc dword ptr [ecx] 008443A9 0000 add [eax], al 008443AB 002B add [ebx], ch 008443AD 0000 add [eax], al 008443AF 00FF add bh, bh 008443B1 FFFF DB $FF, $FF // 008443B3 FF0D00000020 dec dword ptr [$20000000] 008443B9 7768 jnbe 00844423 008443BB 657265 jb 00844423 008443BE 204352 and [ebx+$52], al 008443C1 49 dec ecx 008443C2 44 inc esp 008443C3 3D27000000 cmp eax, $00000027 008443C8 FFFF DB $FF, $FF // 008443CA FFFF DB $FF, $FF // 008443CC 0400 add al, +$00 008443CE 0000 add [eax], al 008443D0 43 inc ebx 008443D1 52 push edx 008443D2 49 dec ecx 008443D3 44 inc esp 008443D4 0000 add [eax], al 008443D6 0000 add [eax], al 008443D8 55 push ebp 008443D9 8BEC mov ebp, esp 008443DB B908000000 mov ecx, $00000008 008443E0 6A00 push $00 008443E2 6A00 push $00 008443E4 49 dec ecx 008443E5 75F9 jnz 008443E0 008443E7 51 push ecx 008443E8 53 push ebx 008443E9 56 push esi 008443EA 8BDA mov ebx, edx 008443EC 8BF0 mov esi, eax 008443EE 33C0 xor eax, eax 008443F0 55 push ebp 008443F1 68FE458400 push $008445FE ***** TRY | 008443F6 64FF30 push dword ptr fs:[eax] 008443F9 648920 mov fs:[eax], esp 008443FC 8D55FC lea edx, [ebp-$04] 008443FF 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; | 00844401 E8B6B2D4FF call 0058F6BC * Reference to control v1PRTColor : N.A. | 00844406 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 0084440C E83B7FE1FF 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; | 00844411 E84ED7E0FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00844416 8B4050 mov eax, [eax+$50] 00844419 8D55F4 lea edx, [ebp-$0C] 0084441C 8B08 mov ecx, [eax] 0084441E FF5110 call dword ptr [ecx+$10] 00844421 8B45F4 mov eax, [ebp-$0C] 00844424 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00844427 E8C064BCFF call 0040A8EC * Reference to control Label9 : N.A. | 0084442C 8B9E54030000 mov ebx, [esi+$0354] 00844432 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00844434 E80740C8FF call 004C8440 00844439 8D55E0 lea edx, [ebp-$20] 0084443C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084443F E8A864BCFF call 0040A8EC 00844444 8B55E0 mov edx, [ebp-$20] 00844447 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0084444A E87949BDFF call 00418DC8 0084444F 8D45E4 lea eax, [ebp-$1C] 00844452 50 push eax 00844453 8B55F8 mov edx, [ebp-$08] 00844456 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00844458 E85727C8FF call 004C6BB4 0084445D 5A pop edx 0084445E 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00844460 FF91B4000000 call dword ptr [ecx+$00B4] 00844466 8BC3 mov eax, ebx 00844468 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 0084446A FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00844470 8B9E08030000 mov ebx, [esi+$0308] 00844476 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00844478 E85714C8FF call 004C58D4 0084447D 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084447F E8289BC9FF call 004DDFAC 00844484 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00844486 FF5244 call dword ptr [edx+$44] 00844489 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084448B E81C9BC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00844490 BA14468400 mov edx, $00844614 00844495 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00844497 FF5138 call dword ptr [ecx+$38] 0084449A 8D55DC lea edx, [ebp-$24] 0084449D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008444A0 E84764BCFF call 0040A8EC 008444A5 837DDC00 cmp dword ptr [ebp-$24], +$00 008444A9 7440 jz 008444EB * Possible String Reference to: ' Set ' | 008444AB 6830468400 push $00844630 008444B0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008444B3 6840468400 push $00844640 008444B8 8D55D4 lea edx, [ebp-$2C] 008444BB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008444BE E82964BCFF call 0040A8EC 008444C3 FF75D4 push dword ptr [ebp-$2C] 008444C6 684C468400 push $0084464C 008444CB 8D45D8 lea eax, [ebp-$28] 008444CE BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008444D3 E8DC11BCFF call 004056B4 008444D8 8B45D8 mov eax, [ebp-$28] 008444DB 50 push eax 008444DC 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008444DE E8C99AC9FF call 004DDFAC 008444E3 5A pop edx 008444E4 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008444E6 FF5138 call dword ptr [ecx+$38] 008444E9 EB2B jmp 00844516 008444EB 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008444ED E8BA9AC9FF call 004DDFAC 008444F2 50 push eax * Possible String Reference to: ' Set ' | 008444F3 6830468400 push $00844630 008444F8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 008444FB 6858468400 push $00844658 00844500 8D45D0 lea eax, [ebp-$30] 00844503 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00844508 E8A711BCFF call 004056B4 0084450D 8B55D0 mov edx, [ebp-$30] 00844510 58 pop eax 00844511 8B08 mov ecx, [eax] 00844513 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00844516 6868468400 push $00844668 0084451B 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmSKCR_YF._PROC_00844615(Sender : TObject); begin (* 00844615 50 push eax 00844616 6461 popa 00844618 7465 jz 0084467F 0084461A 205946 and [ecx+$46], bl 0084461D 5F pop edi 0084461E 4D dec ebp 0084461F 6F outsd 00844620 6E outsb 00844621 65795F jns 00844683 00844624 43 inc ebx 00844625 52 push edx 00844626 2000 and [eax], al 00844628 FFFF DB $FF, $FF // 0084462A FFFF DB $FF, $FF // 0084462C 0500000020 add eax, +$20000000 00844631 53 push ebx 00844632 657420 jz 00844655 00844635 0000 add [eax], al 00844637 00FF add bh, bh 00844639 FFFF DB $FF, $FF // 0084463B FF02 inc dword ptr [edx] 0084463D 0000 add [eax], al 0084463F 003D270000FF add [$FF000027], bh 00844645 FFFF DB $FF, $FF // 00844647 FF01 inc dword ptr [ecx] 00844649 0000 add [eax], al 0084464B 0027 add [edi], ah 0084464D 0000 add [eax], al 0084464F 00FF add bh, bh 00844651 FFFF DB $FF, $FF // 00844653 FF050000003D inc dword ptr [$3D000000] 00844659 4E dec esi 0084465A 55 push ebp 0084465B 4C dec esp 0084465C 4C dec esp 0084465D 0000 add [eax], al 0084465F 00FF add bh, bh 00844661 FFFF DB $FF, $FF // 00844663 FF09 dec dword ptr [ecx] 00844665 0000 add [eax], al 00844667 002C4564697465 add [$65746964+eax*2], ch 0084466E 723D jb 008446AD 00844670 27 daa 00844671 0000 add [eax], al 00844673 00FF add bh, bh 00844675 FFFF DB $FF, $FF // 00844677 FF1400 call dword ptr [eax+eax] 0084467A 0000 add [eax], al 0084467C 2C45 sub al, $45 0084467E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00844687 657464 jz 008446EE 0084468A 61 popa 0084468B 7465 jz 008446F2 0084468D 2829 sub [ecx], ch 0084468F 2000 and [eax], al 00844691 0000 add [eax], al 00844693 00FF add bh, bh 00844695 FFFF DB $FF, $FF // 00844697 FF0D00000020 dec dword ptr [$20000000] 0084469D 7768 jnbe 00844707 0084469F 657265 jb 00844707 008446A2 205946 and [ecx+$46], bl 008446A5 49 dec ecx 008446A6 643D27000000 cmp eax, $00000027 008446AC FFFF DB $FF, $FF // 008446AE FFFF DB $FF, $FF // 008446B0 0400 add al, +$00 008446B2 0000 add [eax], al 008446B4 59 pop ecx 008446B5 46 inc esi 008446B6 49 dec ecx 008446B7 640000 add fs:[eax], al 008446BA 0000 add [eax], al 008446BC 55 push ebp 008446BD 8BEC mov ebp, esp 008446BF 51 push ecx 008446C0 B90B000000 mov ecx, $0000000B 008446C5 6A00 push $00 008446C7 6A00 push $00 008446C9 49 dec ecx 008446CA 75F9 jnz 008446C5 008446CC 51 push ecx 008446CD 874DFC xchg [ebp-$04], ecx 008446D0 53 push ebx 008446D1 56 push esi 008446D2 8BF0 mov esi, eax 008446D4 33C0 xor eax, eax 008446D6 55 push ebp * Possible String Reference to: 'éè' | 008446D7 68074A8400 push $00844A07 ***** TRY | 008446DC 64FF30 push dword ptr fs:[eax] 008446DF 648920 mov fs:[eax], esp 008446E2 33C0 xor eax, eax 008446E4 55 push ebp 008446E5 68C0498400 push $008449C0 ***** TRY | 008446EA 64FF30 push dword ptr fs:[eax] 008446ED 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00844A95(Sender : TObject); begin (* 00844A95 50 push eax 00844A96 6461 popa 00844A98 7465 jz 00844AFF 00844A9A 205946 and [ecx+$46], bl 00844A9D 5F pop edi 00844A9E 4D dec ebp 00844A9F 6F outsd 00844AA0 6E outsb 00844AA1 65795F jns 00844B03 00844AA4 43 inc ebx 00844AA5 52 push edx 00844AA6 2000 and [eax], al 00844AA8 FFFF DB $FF, $FF // 00844AAA FFFF DB $FF, $FF // 00844AAC 0D00000020 or eax, $20000000 00844AB1 53 push ebx 00844AB2 657420 jz 00844AD5 00844AB5 59 pop ecx 00844AB6 46 inc esi 00844AB7 43 inc ebx 00844AB8 6F outsd 00844AB9 64653D27000000 cmp eax, $00000027 00844AC0 FFFF DB $FF, $FF // 00844AC2 FFFF DB $FF, $FF // 00844AC4 0100 add [eax], eax 00844AC6 0000 add [eax], al 00844AC8 27 daa 00844AC9 0000 add [eax], al 00844ACB 00FF add bh, bh 00844ACD FFFF DB $FF, $FF // 00844ACF FF0A dec dword ptr [edx] 00844AD1 0000 add [eax], al 00844AD3 0020 add [eax], ah 00844AD5 2C59 sub al, $59 00844AD7 46 inc esi 00844AD8 4E dec esi 00844AD9 61 popa 00844ADA 6D insd 00844ADB 653D270000FF cmp eax, $FF000027 00844AE1 FFFF DB $FF, $FF // 00844AE3 FF09 dec dword ptr [ecx] 00844AE5 0000 add [eax], al 00844AE7 002C4564697465 add [$65746964+eax*2], ch 00844AEE 723D jb 00844B2D 00844AF0 27 daa 00844AF1 0000 add [eax], al 00844AF3 00FF add bh, bh 00844AF5 FFFF DB $FF, $FF // 00844AF7 FF1400 call dword ptr [eax+eax] 00844AFA 0000 add [eax], al 00844AFC 2C45 sub al, $45 00844AFE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00844B07 657464 jz 00844B6E 00844B0A 61 popa 00844B0B 7465 jz 00844B72 00844B0D 2829 sub [ecx], ch 00844B0F 2000 and [eax], al 00844B11 0000 add [eax], al 00844B13 00FF add bh, bh 00844B15 FFFF DB $FF, $FF // 00844B17 FF0D00000020 dec dword ptr [$20000000] 00844B1D 7768 jnbe 00844B87 00844B1F 657265 jb 00844B87 00844B22 205946 and [ecx+$46], bl 00844B25 49 dec ecx 00844B26 643D27000000 cmp eax, $00000027 00844B2C FFFF DB $FF, $FF // 00844B2E FFFF DB $FF, $FF // 00844B30 0400 add al, +$00 00844B32 0000 add [eax], al 00844B34 59 pop ecx 00844B35 46 inc esi 00844B36 49 dec ecx 00844B37 640000 add fs:[eax], al 00844B3A 0000 add [eax], al 00844B3C 55 push ebp 00844B3D 8BEC mov ebp, esp 00844B3F 51 push ecx 00844B40 B906000000 mov ecx, $00000006 00844B45 6A00 push $00 00844B47 6A00 push $00 00844B49 49 dec ecx 00844B4A 75F9 jnz 00844B45 00844B4C 51 push ecx 00844B4D 874DFC xchg [ebp-$04], ecx 00844B50 53 push ebx 00844B51 56 push esi 00844B52 8BF0 mov esi, eax 00844B54 33C0 xor eax, eax 00844B56 55 push ebp * Possible String Reference to: 'éZý»ÿëã^[‹å]Ã' | 00844B57 68954D8400 push $00844D95 ***** TRY | 00844B5C 64FF30 push dword ptr fs:[eax] 00844B5F 648920 mov fs:[eax], esp 00844B62 33C0 xor eax, eax 00844B64 55 push ebp 00844B65 686B4D8400 push $00844D6B ***** TRY | 00844B6A 64FF30 push dword ptr fs:[eax] 00844B6D 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00844DB2(Sender : TObject); begin (* 00844DB2 6E outsb 00844DB3 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 00844DBB FF08 dec dword ptr [eax] 00844DBD 0000 add [eax], al *) end; procedure TfrmSKCR_YF._PROC_00844DE8(Sender : TObject); begin (* 00844DE8 6E outsb 00844DE9 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 00844DF1 0000 add [eax], al *) end; procedure TfrmSKCR_YF._PROC_00844DF5(Sender : TObject); begin (* 00844DF5 50 push eax 00844DF6 6461 popa 00844DF8 7465 jz 00844E5F 00844DFA 205946 and [ecx+$46], bl 00844DFD 5F pop edi 00844DFE 4D dec ebp 00844DFF 6F outsd 00844E00 6E outsb 00844E01 65795F jns 00844E63 00844E04 43 inc ebx 00844E05 52 push edx 00844E06 2000 and [eax], al 00844E08 FFFF DB $FF, $FF // 00844E0A FFFF DB $FF, $FF // 00844E0C 0E push cs 00844E0D 0000 add [eax], al 00844E0F 0020 add [eax], ah 00844E11 53 push ebx 00844E12 657420 jz 00844E35 00844E15 51 push ecx 00844E16 7479 jz 00844E91 00844E18 55 push ebp 00844E19 6E outsb 00844E1A 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 00844E22 FFFF DB $FF, $FF // 00844E24 07 pop es 00844E25 0000 add [eax], al 00844E27 005A64 add [edx+$64], bl 00844E2A 794E jns 00844E7A 00844E2C 61 popa 00844E2D 6D insd 00844E2E 6500FF add bh, bh 00844E31 FFFF DB $FF, $FF // 00844E33 FF01 inc dword ptr [ecx] 00844E35 0000 add [eax], al 00844E37 0027 add [edi], ah 00844E39 0000 add [eax], al 00844E3B 00FF add bh, bh 00844E3D FFFF DB $FF, $FF // 00844E3F FF09 dec dword ptr [ecx] 00844E41 0000 add [eax], al 00844E43 002C4564697465 add [$65746964+eax*2], ch 00844E4A 723D jb 00844E89 00844E4C 27 daa 00844E4D 0000 add [eax], al 00844E4F 00FF add bh, bh 00844E51 FFFF DB $FF, $FF // 00844E53 FF1400 call dword ptr [eax+eax] 00844E56 0000 add [eax], al 00844E58 2C45 sub al, $45 00844E5A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00844E63 657464 jz 00844ECA 00844E66 61 popa 00844E67 7465 jz 00844ECE 00844E69 2829 sub [ecx], ch 00844E6B 2000 and [eax], al 00844E6D 0000 add [eax], al 00844E6F 00FF add bh, bh 00844E71 FFFF DB $FF, $FF // 00844E73 FF0D00000020 dec dword ptr [$20000000] 00844E79 7768 jnbe 00844EE3 00844E7B 657265 jb 00844EE3 00844E7E 205946 and [ecx+$46], bl 00844E81 49 dec ecx 00844E82 643D27000000 cmp eax, $00000027 00844E88 FFFF DB $FF, $FF // 00844E8A FFFF DB $FF, $FF // 00844E8C 0400 add al, +$00 00844E8E 0000 add [eax], al 00844E90 59 pop ecx 00844E91 46 inc esi 00844E92 49 dec ecx 00844E93 640000 add fs:[eax], al 00844E96 0000 add [eax], al 00844E98 55 push ebp 00844E99 8BEC mov ebp, esp 00844E9B 51 push ecx 00844E9C B906000000 mov ecx, $00000006 00844EA1 6A00 push $00 00844EA3 6A00 push $00 00844EA5 49 dec ecx 00844EA6 75F9 jnz 00844EA1 00844EA8 51 push ecx 00844EA9 874DFC xchg [ebp-$04], ecx 00844EAC 53 push ebx 00844EAD 56 push esi 00844EAE 8BF0 mov esi, eax 00844EB0 33C0 xor eax, eax 00844EB2 55 push ebp * Possible String Reference to: 'éþù»ÿëã^[‹å]Ã' | 00844EB3 68F1508400 push $008450F1 ***** TRY | 00844EB8 64FF30 push dword ptr fs:[eax] 00844EBB 648920 mov fs:[eax], esp 00844EBE 33C0 xor eax, eax 00844EC0 55 push ebp 00844EC1 68C7508400 push $008450C7 ***** TRY | 00844EC6 64FF30 push dword ptr fs:[eax] 00844EC9 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00845139(Sender : TObject); begin (* 00845139 50 push eax 0084513A 6461 popa 0084513C 7465 jz 008451A3 0084513E 205946 and [ecx+$46], bl 00845141 5F pop edi 00845142 4D dec ebp 00845143 6F outsd 00845144 6E outsb 00845145 65795F jns 008451A7 00845148 43 inc ebx 00845149 52 push edx 0084514A 2000 and [eax], al 0084514C FFFF DB $FF, $FF // 0084514E FFFF DB $FF, $FF // 00845150 0D00000020 or eax, $20000000 00845155 53 push ebx 00845156 657420 jz 00845179 00845159 42 inc edx 0084515A 5A pop edx 0084515B 54 push esp 0084515C 7970 jns 008451CE 0084515E 653D27000000 cmp eax, $00000027 00845164 FFFF DB $FF, $FF // 00845166 FFFF DB $FF, $FF // 00845168 07 pop es 00845169 0000 add [eax], al 0084516B 005A64 add [edx+$64], bl 0084516E 794E jns 008451BE 00845170 61 popa 00845171 6D insd 00845172 6500FF add bh, bh 00845175 FFFF DB $FF, $FF // 00845177 FF01 inc dword ptr [ecx] 00845179 0000 add [eax], al 0084517B 0027 add [edi], ah 0084517D 0000 add [eax], al 0084517F 00FF add bh, bh 00845181 FFFF DB $FF, $FF // 00845183 FF09 dec dword ptr [ecx] 00845185 0000 add [eax], al 00845187 002C4564697465 add [$65746964+eax*2], ch 0084518E 723D jb 008451CD 00845190 27 daa 00845191 0000 add [eax], al 00845193 00FF add bh, bh 00845195 FFFF DB $FF, $FF // 00845197 FF1400 call dword ptr [eax+eax] 0084519A 0000 add [eax], al 0084519C 2C45 sub al, $45 0084519E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008451A7 657464 jz 0084520E 008451AA 61 popa 008451AB 7465 jz 00845212 008451AD 2829 sub [ecx], ch 008451AF 2000 and [eax], al 008451B1 0000 add [eax], al 008451B3 00FF add bh, bh 008451B5 FFFF DB $FF, $FF // 008451B7 FF0D00000020 dec dword ptr [$20000000] 008451BD 7768 jnbe 00845227 008451BF 657265 jb 00845227 008451C2 205946 and [ecx+$46], bl 008451C5 49 dec ecx 008451C6 643D27000000 cmp eax, $00000027 008451CC FFFF DB $FF, $FF // 008451CE FFFF DB $FF, $FF // 008451D0 0400 add al, +$00 008451D2 0000 add [eax], al 008451D4 59 pop ecx 008451D5 46 inc esi 008451D6 49 dec ecx 008451D7 640000 add fs:[eax], al 008451DA 0000 add [eax], al 008451DC 53 push ebx 008451DD 8BD8 mov ebx, eax * Reference to control ToolBar2 : N.A. | 008451DF 8B831C030000 mov eax, [ebx+$031C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 008451E5 E8D62CC8FF call 004C7EC0 008451EA 84C0 test al, al 008451EC 7516 jnz 00845204 * Possible String Reference to: '¶©µ¥ÀûÈó±í' | 008451EE B910528400 mov ecx, $00845210 * Reference to control ToolBar2 : N.A. | 008451F3 8B931C030000 mov edx, [ebx+$031C] * Reference to control v1PRTColor : N.A. | 008451F9 8B8334030000 mov eax, [ebx+$0334] | 008451FF E82C30F7FF call 007B8230 00845204 5B pop ebx 00845205 C3 ret 00845206 0000 add [eax], al 00845208 FFFF DB $FF, $FF // 0084520A FFFF DB $FF, $FF // 0084520C 0A00 or al, byte ptr [eax] 0084520E 0000 add [eax], al 00845210 B6A9 mov dh, $A9 00845212 B5A5 mov ch, $A5 00845214 C0FBC8 sar bl, $C8 00845217 F3 rep 00845218 B1ED mov cl, $ED 0084521A 0000 add [eax], al 0084521C 55 push ebp 0084521D 8BEC mov ebp, esp 0084521F B915000000 mov ecx, $00000015 00845224 6A00 push $00 00845226 6A00 push $00 00845228 49 dec ecx 00845229 75F9 jnz 00845224 0084522B 53 push ebx 0084522C 56 push esi 0084522D 8BF2 mov esi, edx 0084522F 8BD8 mov ebx, eax 00845231 33C0 xor eax, eax 00845233 55 push ebp * Possible String Reference to: 'éIô»ÿë³^[‹å]Ã' | 00845234 68A6568400 push $008456A6 ***** TRY | 00845239 64FF30 push dword ptr fs:[eax] 0084523C 648920 mov fs:[eax], esp 0084523F 8D55FC lea edx, [ebp-$04] 00845242 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; | 00845244 E873A4D4FF call 0058F6BC 00845249 8D55E4 lea edx, [ebp-$1C] 0084524C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084524F E89856BCFF call 0040A8EC 00845254 837DE400 cmp dword ptr [ebp-$1C], +$00 00845258 750D jnz 00845267 0084525A 8D45FC lea eax, [ebp-$04] 0084525D BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 00845262 E85501BCFF call 004053BC * Reference to control v1PRTColor : N.A. | 00845267 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 0084526D E8DA70E1FF 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; | 00845272 E8EDC8E0FF call 00651B64 * Reference to field N.A..OFFS_0050 | 00845277 8B4050 mov eax, [eax+$50] 0084527A 8D55E0 lea edx, [ebp-$20] 0084527D 8B08 mov ecx, [eax] 0084527F FF5110 call dword ptr [ecx+$10] 00845282 8B45E0 mov eax, [ebp-$20] 00845285 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845288 E85F56BCFF call 0040A8EC * Reference to control Label9 : N.A. | 0084528D 8BB354030000 mov esi, [ebx+$0354] 00845293 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00845295 E8A631C8FF call 004C8440 0084529A 8D55CC lea edx, [ebp-$34] 0084529D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008452A0 E84756BCFF call 0040A8EC 008452A5 8B55CC mov edx, [ebp-$34] 008452A8 8D45D0 lea eax, [ebp-$30] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008452AB E8183BBDFF call 00418DC8 008452B0 8D45D0 lea eax, [ebp-$30] 008452B3 50 push eax 008452B4 8B55E8 mov edx, [ebp-$18] 008452B7 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008452B9 E8F618C8FF call 004C6BB4 008452BE 5A pop edx 008452BF 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 008452C1 FF91B4000000 call dword ptr [ecx+$00B4] 008452C7 8BC6 mov eax, esi 008452C9 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 008452CB FF924C020000 call dword ptr [edx+$024C] * Reference to control ScrollBox1 : N.A. | 008452D1 8BB304030000 mov esi, [ebx+$0304] 008452D7 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 008452D9 E8F605C8FF call 004C58D4 008452DE 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 008452E0 E8C78CC9FF call 004DDFAC 008452E5 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 008452E7 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 008452EA 68C8568400 push $008456C8 * Possible String Reference to: 'YFID' | 008452EF BA10578400 mov edx, $00845710 * Reference to control Label9 : N.A. | 008452F4 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008452FA E8B518C8FF call 004C6BB4 008452FF 8D55C4 lea edx, [ebp-$3C] 00845302 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00845304 FF5160 call dword ptr [ecx+$60] 00845307 FF75C4 push dword ptr [ebp-$3C] 0084530A 6820578400 push $00845720 0084530F 8D45C8 lea eax, [ebp-$38] 00845312 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00845317 E89803BCFF call 004056B4 0084531C 8B45C8 mov eax, [ebp-$38] 0084531F 50 push eax 00845320 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 00845322 E8858CC9FF call 004DDFAC 00845327 5A pop edx 00845328 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0084532A FF5138 call dword ptr [ecx+$38] 0084532D 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 0084532F E89405C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00845334 BA2C578400 mov edx, $0084572C * Reference to control ScrollBox1 : N.A. | 00845339 8B8304030000 mov eax, [ebx+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0084533F E87018C8FF call 004C6BB4 00845344 8D55EC lea edx, [ebp-$14] 00845347 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00845349 FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Money' | 0084534C BA3C578400 mov edx, $0084573C * Reference to control Label9 : N.A. | 00845351 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845357 E85818C8FF call 004C6BB4 0084535C 8D55C0 lea edx, [ebp-$40] 0084535F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00845361 FF5160 call dword ptr [ecx+$60] 00845364 8B45C0 mov eax, [ebp-$40] 00845367 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084536A E87D55BCFF call 0040A8EC 0084536F 8D55BC lea edx, [ebp-$44] 00845372 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845375 E87255BCFF call 0040A8EC 0084537A 837DBC00 cmp dword ptr [ebp-$44], +$00 0084537E 750D jnz 0084538D 00845380 8D45F8 lea eax, [ebp-$08] 00845383 BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 00845388 E82F00BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 0084538D BA4C578400 mov edx, $0084574C * Reference to control Label9 : N.A. | 00845392 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845398 E81718C8FF call 004C6BB4 0084539D 8D55B8 lea edx, [ebp-$48] 008453A0 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008453A2 FF5160 call dword ptr [ecx+$60] 008453A5 8B45B8 mov eax, [ebp-$48] 008453A8 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008453AB E83C55BCFF call 0040A8EC 008453B0 8D55B4 lea edx, [ebp-$4C] 008453B3 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008453B6 E83155BCFF call 0040A8EC 008453BB 837DB400 cmp dword ptr [ebp-$4C], +$00 008453BF 750D jnz 008453CE 008453C1 8D45F4 lea eax, [ebp-$0C] 008453C4 BABC568400 mov edx, $008456BC * Reference to: System.@LStrLAsg(void;void;void;void); | 008453C9 E8EEFFBBFF call 004053BC 008453CE 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008453D1 E85683BCFF call 0040D72C 008453D6 DB7DA8 fstp tbyte ptr [ebp-$58] 008453D9 9B wait 008453DA 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008453DD E84A83BCFF call 0040D72C 008453E2 DB6DA8 fld tbyte ptr [ebp-$58] 008453E5 DEC9 fmulp st(1), st(0) 008453E7 83C4F4 add esp, -$0C 008453EA DB3C24 fstp tbyte ptr [esp] 008453ED 9B wait 008453EE 8D45F0 lea eax, [ebp-$10] | 008453F1 E8B681BCFF call 0040D5AC * Reference to control Label9 : N.A. | 008453F6 8BB354030000 mov esi, [ebx+$0354] 008453FC 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 008453FE E83D30C8FF call 004C8440 * Possible String Reference to: 'Money' | 00845403 BA3C578400 mov edx, $0084573C 00845408 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0084540A E8A517C8FF call 004C6BB4 0084540F 50 push eax 00845410 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00845413 E81483BCFF call 0040D72C 00845418 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 0084541B E86C39BDFF call 00418D8C 00845420 8D5598 lea edx, [ebp-$68] 00845423 58 pop eax 00845424 8B08 mov ecx, [eax] 00845426 FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 0084542C BA2C578400 mov edx, $0084572C 00845431 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845433 E87C17C8FF call 004C6BB4 00845438 50 push eax 00845439 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0084543C E8EB82BCFF call 0040D72C 00845441 8D4588 lea eax, [ebp-$78] * Reference to: Variants.@VarFromReal; | 00845444 E84339BDFF call 00418D8C 00845449 8D5588 lea edx, [ebp-$78] 0084544C 58 pop eax 0084544D 8B08 mov ecx, [eax] 0084544F FF91B4000000 call dword ptr [ecx+$00B4] 00845455 8BC6 mov eax, esi 00845457 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00845459 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 0084545F 8BB308030000 mov esi, [ebx+$0308] 00845465 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00845467 E86804C8FF call 004C58D4 0084546C 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084546E E8398BC9FF call 004DDFAC 00845473 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00845475 FF5244 call dword ptr [edx+$44] 00845478 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084547A E82D8BC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084547F BA5C578400 mov edx, $0084575C 00845484 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00845486 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00845489 6878578400 push $00845778 0084548E FF75E8 push dword ptr [ebp-$18] 00845491 6888578400 push $00845788 00845496 8D5580 lea edx, [ebp-$80] 00845499 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084549C E84B54BCFF call 0040A8EC 008454A1 FF7580 push dword ptr [ebp-$80] 008454A4 8D4584 lea eax, [ebp-$7C] 008454A7 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008454AC E80302BCFF call 004056B4 008454B1 8B4584 mov eax, [ebp-$7C] 008454B4 50 push eax 008454B5 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008454B7 E8F08AC9FF call 004DDFAC 008454BC 5A pop edx 008454BD 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008454BF FF5138 call dword ptr [ecx+$38] 008454C2 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008454C4 E8E38AC9FF call 004DDFAC 008454C9 50 push eax 008454CA 8D857CFFFFFF lea eax, [ebp+$FFFFFF7C] 008454D0 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',BBMoney=' | 008454D3 BA94578400 mov edx, $00845794 * Reference to: System.@LStrCat3; | 008454D8 E86301BCFF call 00405640 008454DD 8B957CFFFFFF mov edx, [ebp+$FFFFFF7C] 008454E3 58 pop eax 008454E4 8B08 mov ecx, [eax] 008454E6 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008454E9 68A8578400 push $008457A8 008454EE 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmSKCR_YF._PROC_0084575D(Sender : TObject); begin (* 0084575D 50 push eax 0084575E 6461 popa 00845760 7465 jz 008457C7 00845762 205946 and [ecx+$46], bl 00845765 5F pop edi 00845766 4D dec ebp 00845767 6F outsd 00845768 6E outsb 00845769 65795F jns 008457CB 0084576C 43 inc ebx 0084576D 52 push edx 0084576E 2000 and [eax], al 00845770 FFFF DB $FF, $FF // 00845772 FFFF DB $FF, $FF // 00845774 0500000020 add eax, +$20000000 00845779 53 push ebx 0084577A 657420 jz 0084579D 0084577D 0000 add [eax], al 0084577F 00FF add bh, bh 00845781 FFFF DB $FF, $FF // 00845783 FF01 inc dword ptr [ecx] 00845785 0000 add [eax], al 00845787 003D000000FF add [$FF000000], bh 0084578D FFFF DB $FF, $FF // 0084578F FF09 dec dword ptr [ecx] 00845791 0000 add [eax], al 00845793 002C42 add [edx+eax*2], ch 00845796 42 inc edx 00845797 4D dec ebp 00845798 6F outsd 00845799 6E outsb 0084579A 65793D jns 008457DA 0084579D 0000 add [eax], al 0084579F 00FF add bh, bh 008457A1 FFFF DB $FF, $FF // 008457A3 FF09 dec dword ptr [ecx] 008457A5 0000 add [eax], al 008457A7 002C4564697465 add [$65746964+eax*2], ch 008457AE 723D jb 008457ED 008457B0 27 daa 008457B1 0000 add [eax], al 008457B3 00FF add bh, bh 008457B5 FFFF DB $FF, $FF // 008457B7 FF1400 call dword ptr [eax+eax] 008457BA 0000 add [eax], al 008457BC 2C45 sub al, $45 008457BE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008457C7 657464 jz 0084582E 008457CA 61 popa 008457CB 7465 jz 00845832 008457CD 2829 sub [ecx], ch 008457CF 2000 and [eax], al 008457D1 0000 add [eax], al 008457D3 00FF add bh, bh 008457D5 FFFF DB $FF, $FF // 008457D7 FF0D00000020 dec dword ptr [$20000000] 008457DD 7768 jnbe 00845847 008457DF 657265 jb 00845847 008457E2 205946 and [ecx+$46], bl 008457E5 49 dec ecx 008457E6 643D27000000 cmp eax, $00000027 008457EC FFFF DB $FF, $FF // 008457EE FFFF DB $FF, $FF // 008457F0 0400 add al, +$00 008457F2 0000 add [eax], al 008457F4 59 pop ecx 008457F5 46 inc esi 008457F6 49 dec ecx 008457F7 640000 add fs:[eax], al 008457FA 0000 add [eax], al 008457FC FFFF DB $FF, $FF // 008457FE FFFF DB $FF, $FF // 00845800 2B00 sub eax, dword ptr [eax] 00845802 0000 add [eax], al 00845804 55 push ebp 00845805 7064 jo 0084586B 00845807 61 popa 00845808 7465 jz 0084586F 0084580A 205946 and [ecx+$46], bl 0084580D 5F pop edi 0084580E 4D dec ebp 0084580F 6F outsd 00845810 6E outsb 00845811 65795F jns 00845873 00845814 4B dec ebx 00845815 43 inc ebx 00845816 205365 and [ebx+$65], dl 00845819 7420 jz 0084583B 0084581B 4B dec ebx 0084581C 43 inc ebx 0084581D 42 inc edx 0084581E 42 inc edx 0084581F 4D dec ebp 00845820 6F outsd 00845821 6E outsb 00845822 65793D jns 00845862 00845825 4B dec ebx 00845826 43 inc ebx 00845827 42 inc edx 00845828 42 inc edx 00845829 4D dec ebp 0084582A 6F outsd 0084582B 6E outsb 0084582C 65792B jns 0084585A 0084582F 00FF add bh, bh 00845831 FFFF DB $FF, $FF // 00845833 FF01 inc dword ptr [ecx] 00845835 0000 add [eax], al 00845837 002D000000FF add [$FF000000], ch 0084583D FFFF DB $FF, $FF // 0084583F FF0D00000020 dec dword ptr [$20000000] 00845845 7768 jnbe 008458AF 00845847 657265 jb 008458AF 0084584A 204352 and [ebx+$52], al 0084584D 49 dec ecx 0084584E 44 inc esp 0084584F 3D27000000 cmp eax, $00000027 00845854 FFFF DB $FF, $FF // 00845856 FFFF DB $FF, $FF // 00845858 0400 add al, +$00 0084585A 0000 add [eax], al 0084585C 43 inc ebx 0084585D 52 push edx 0084585E 49 dec ecx 0084585F 44 inc esp 00845860 0000 add [eax], al 00845862 0000 add [eax], al 00845864 55 push ebp 00845865 8BEC mov ebp, esp 00845867 51 push ecx 00845868 B90B000000 mov ecx, $0000000B 0084586D 6A00 push $00 0084586F 6A00 push $00 00845871 49 dec ecx 00845872 75F9 jnz 0084586D 00845874 874DFC xchg [ebp-$04], ecx 00845877 53 push ebx 00845878 56 push esi 00845879 8BF0 mov esi, eax 0084587B 33C0 xor eax, eax 0084587D 55 push ebp 0084587E 68575B8400 push $00845B57 ***** TRY | 00845883 64FF30 push dword ptr fs:[eax] 00845886 648920 mov fs:[eax], esp 00845889 33C0 xor eax, eax 0084588B 55 push ebp 0084588C 68185B8400 push $00845B18 ***** TRY | 00845891 64FF30 push dword ptr fs:[eax] 00845894 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00845B8D(Sender : TObject); begin (* 00845B8D 50 push eax 00845B8E 6461 popa 00845B90 7465 jz 00845BF7 00845B92 205946 and [ecx+$46], bl 00845B95 5F pop edi 00845B96 4D dec ebp 00845B97 6F outsd 00845B98 6E outsb 00845B99 65795F jns 00845BFB 00845B9C 43 inc ebx 00845B9D 52 push edx 00845B9E 2000 and [eax], al 00845BA0 FFFF DB $FF, $FF // 00845BA2 FFFF DB $FF, $FF // 00845BA4 0D00000020 or eax, $20000000 00845BA9 53 push ebx 00845BAA 657420 jz 00845BCD 00845BAD 4D dec ebp 00845BAE 61 popa 00845BAF 696E49643D2700 imul ebp, [esi+$49], $00273D64 00845BB6 0000 add [eax], al 00845BB8 FFFF DB $FF, $FF // 00845BBA FFFF DB $FF, $FF // 00845BBC 0100 add [eax], eax 00845BBE 0000 add [eax], al 00845BC0 27 daa 00845BC1 0000 add [eax], al 00845BC3 00FF add bh, bh 00845BC5 FFFF DB $FF, $FF // 00845BC7 FF0B dec dword ptr [ebx] 00845BC9 0000 add [eax], al 00845BCB 0020 add [eax], ah 00845BCD 2C4F sub al, $4F 00845BCF 7264 jb 00845C35 00845BD1 65724E jb 00845C22 00845BD4 6F outsd 00845BD5 3D2700FFFF cmp eax, $FFFF0027 00845BDA FFFF DB $FF, $FF // 00845BDC 0900 or [eax], eax 00845BDE 0000 add [eax], al 00845BE0 2C45 sub al, $45 00845BE2 64697465723D270000 imul esi, fs:[ebp+$72], $0000273D 00845BEB 00FF add bh, bh 00845BED FFFF DB $FF, $FF // 00845BEF FF1400 call dword ptr [eax+eax] 00845BF2 0000 add [eax], al 00845BF4 2C45 sub al, $45 00845BF6 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00845BFF 657464 jz 00845C66 00845C02 61 popa 00845C03 7465 jz 00845C6A 00845C05 2829 sub [ecx], ch 00845C07 2000 and [eax], al 00845C09 0000 add [eax], al 00845C0B 00FF add bh, bh 00845C0D FFFF DB $FF, $FF // 00845C0F FF0D00000020 dec dword ptr [$20000000] 00845C15 7768 jnbe 00845C7F 00845C17 657265 jb 00845C7F 00845C1A 205946 and [ecx+$46], bl 00845C1D 49 dec ecx 00845C1E 643D27000000 cmp eax, $00000027 00845C24 FFFF DB $FF, $FF // 00845C26 FFFF DB $FF, $FF // 00845C28 0400 add al, +$00 00845C2A 0000 add [eax], al 00845C2C 59 pop ecx 00845C2D 46 inc esi 00845C2E 49 dec ecx 00845C2F 640000 add fs:[eax], al 00845C32 0000 add [eax], al 00845C34 55 push ebp 00845C35 8BEC mov ebp, esp 00845C37 B909000000 mov ecx, $00000009 00845C3C 6A00 push $00 00845C3E 6A00 push $00 00845C40 49 dec ecx 00845C41 75F9 jnz 00845C3C 00845C43 51 push ecx 00845C44 53 push ebx 00845C45 56 push esi 00845C46 8BDA mov ebx, edx 00845C48 8BF0 mov esi, eax 00845C4A 33C0 xor eax, eax 00845C4C 55 push ebp 00845C4D 68EA5E8400 push $00845EEA ***** TRY | 00845C52 64FF30 push dword ptr fs:[eax] 00845C55 648920 mov fs:[eax], esp 00845C58 8D55FC lea edx, [ebp-$04] 00845C5B 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; | 00845C5D E85A9AD4FF call 0058F6BC * Reference to control ScrollBox1 : N.A. | 00845C62 8B9E04030000 mov ebx, [esi+$0304] 00845C68 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00845C6A E865FCC7FF call 004C58D4 00845C6F 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; | 00845C71 E83683C9FF call 004DDFAC 00845C76 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00845C78 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00845C7B 68005F8400 push $00845F00 * Possible String Reference to: 'YFID' | 00845C80 BA485F8400 mov edx, $00845F48 * Reference to control Label9 : N.A. | 00845C85 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845C8B E8240FC8FF call 004C6BB4 00845C90 8D55F0 lea edx, [ebp-$10] 00845C93 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00845C95 FF5160 call dword ptr [ecx+$60] 00845C98 FF75F0 push dword ptr [ebp-$10] 00845C9B 68585F8400 push $00845F58 00845CA0 8D45F4 lea eax, [ebp-$0C] 00845CA3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00845CA8 E807FABBFF call 004056B4 00845CAD 8B45F4 mov eax, [ebp-$0C] 00845CB0 50 push eax 00845CB1 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; | 00845CB3 E8F482C9FF call 004DDFAC 00845CB8 5A pop edx 00845CB9 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00845CBB FF5138 call dword ptr [ecx+$38] 00845CBE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00845CC0 E803FCC7FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 00845CC5 BA645F8400 mov edx, $00845F64 * Reference to control ScrollBox1 : N.A. | 00845CCA 8B8604030000 mov eax, [esi+$0304] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845CD0 E8DF0EC8FF call 004C6BB4 00845CD5 8D55F8 lea edx, [ebp-$08] 00845CD8 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00845CDA FF5160 call dword ptr [ecx+$60] 00845CDD 8D55EC lea edx, [ebp-$14] 00845CE0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00845CE3 E8044CBCFF call 0040A8EC 00845CE8 837DEC00 cmp dword ptr [ebp-$14], +$00 00845CEC 750D jnz 00845CFB 00845CEE 8D45FC lea eax, [ebp-$04] 00845CF1 BA745F8400 mov edx, $00845F74 * Reference to: System.@LStrLAsg(void;void;void;void); | 00845CF6 E8C1F6BBFF call 004053BC * Reference to control Label9 : N.A. | 00845CFB 8B9E54030000 mov ebx, [esi+$0354] 00845D01 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00845D03 E83827C8FF call 004C8440 * Possible String Reference to: 'BBMoney' | 00845D08 BA645F8400 mov edx, $00845F64 00845D0D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00845D0F E8A00EC8FF call 004C6BB4 00845D14 50 push eax 00845D15 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00845D18 E80F7ABCFF call 0040D72C 00845D1D 8D45DC lea eax, [ebp-$24] * Reference to: Variants.@VarFromReal; | 00845D20 E86730BDFF call 00418D8C 00845D25 8D55DC lea edx, [ebp-$24] 00845D28 58 pop eax 00845D29 8B08 mov ecx, [eax] 00845D2B FF91B4000000 call dword ptr [ecx+$00B4] 00845D31 8BC3 mov eax, ebx 00845D33 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00845D35 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00845D3B 8B9E08030000 mov ebx, [esi+$0308] 00845D41 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00845D43 E88CFBC7FF call 004C58D4 00845D48 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00845D4A E85D82C9FF call 004DDFAC 00845D4F 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00845D51 FF5244 call dword ptr [edx+$44] 00845D54 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00845D56 E85182C9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00845D5B BA805F8400 mov edx, $00845F80 00845D60 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00845D62 FF5138 call dword ptr [ecx+$38] 00845D65 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00845D67 E84082C9FF call 004DDFAC 00845D6C 50 push eax 00845D6D 8D45D8 lea eax, [ebp-$28] 00845D70 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set BBMoney=' | 00845D73 BA9C5F8400 mov edx, $00845F9C * Reference to: System.@LStrCat3; | 00845D78 E8C3F8BBFF call 00405640 00845D7D 8B55D8 mov edx, [ebp-$28] 00845D80 58 pop eax 00845D81 8B08 mov ecx, [eax] 00845D83 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00845D86 68B45F8400 push $00845FB4 00845D8B 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmSKCR_YF._PROC_00845F81(Sender : TObject); begin (* 00845F81 50 push eax 00845F82 6461 popa 00845F84 7465 jz 00845FEB 00845F86 205946 and [ecx+$46], bl 00845F89 5F pop edi 00845F8A 4D dec ebp 00845F8B 6F outsd 00845F8C 6E outsb 00845F8D 65795F jns 00845FEF 00845F90 43 inc ebx 00845F91 52 push edx 00845F92 2000 and [eax], al 00845F94 FFFF DB $FF, $FF // 00845F96 FFFF DB $FF, $FF // 00845F98 0D00000020 or eax, $20000000 00845F9D 7365 jnb 00846004 00845F9F 7420 jz 00845FC1 00845FA1 42 inc edx 00845FA2 42 inc edx 00845FA3 4D dec ebp 00845FA4 6F outsd 00845FA5 6E outsb 00845FA6 65793D jns 00845FE6 00845FA9 0000 add [eax], al 00845FAB 00FF add bh, bh 00845FAD FFFF DB $FF, $FF // 00845FAF FF09 dec dword ptr [ecx] 00845FB1 0000 add [eax], al 00845FB3 002C4564697465 add [$65746964+eax*2], ch 00845FBA 723D jb 00845FF9 00845FBC 27 daa 00845FBD 0000 add [eax], al 00845FBF 00FF add bh, bh 00845FC1 FFFF DB $FF, $FF // 00845FC3 FF1400 call dword ptr [eax+eax] 00845FC6 0000 add [eax], al 00845FC8 2C45 sub al, $45 00845FCA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00845FD3 657464 jz 0084603A 00845FD6 61 popa 00845FD7 7465 jz 0084603E 00845FD9 2829 sub [ecx], ch 00845FDB 2000 and [eax], al 00845FDD 0000 add [eax], al 00845FDF 00FF add bh, bh 00845FE1 FFFF DB $FF, $FF // 00845FE3 FF0D00000020 dec dword ptr [$20000000] 00845FE9 7768 jnbe 00846053 00845FEB 657265 jb 00846053 00845FEE 205946 and [ecx+$46], bl 00845FF1 49 dec ecx 00845FF2 643D27000000 cmp eax, $00000027 00845FF8 FFFF DB $FF, $FF // 00845FFA FFFF DB $FF, $FF // 00845FFC 0400 add al, +$00 00845FFE 0000 add [eax], al 00846000 59 pop ecx 00846001 46 inc esi 00846002 49 dec ecx 00846003 640000 add fs:[eax], al 00846006 0000 add [eax], al 00846008 FFFF DB $FF, $FF // 0084600A FFFF DB $FF, $FF // 0084600C 2B00 sub eax, dword ptr [eax] 0084600E 0000 add [eax], al 00846010 55 push ebp 00846011 7064 jo 00846077 00846013 61 popa 00846014 7465 jz 0084607B 00846016 205946 and [ecx+$46], bl 00846019 5F pop edi 0084601A 4D dec ebp 0084601B 6F outsd 0084601C 6E outsb 0084601D 65795F jns 0084607F 00846020 4B dec ebx 00846021 43 inc ebx 00846022 205365 and [ebx+$65], dl 00846025 7420 jz 00846047 00846027 4B dec ebx 00846028 43 inc ebx 00846029 42 inc edx 0084602A 42 inc edx 0084602B 4D dec ebp 0084602C 6F outsd 0084602D 6E outsb 0084602E 65793D jns 0084606E 00846031 4B dec ebx 00846032 43 inc ebx 00846033 42 inc edx 00846034 42 inc edx 00846035 4D dec ebp 00846036 6F outsd 00846037 6E outsb 00846038 65792B jns 00846066 0084603B 00FF add bh, bh 0084603D FFFF DB $FF, $FF // 0084603F FF01 inc dword ptr [ecx] 00846041 0000 add [eax], al 00846043 002D000000FF add [$FF000000], ch 00846049 FFFF DB $FF, $FF // 0084604B FF0D00000020 dec dword ptr [$20000000] 00846051 7768 jnbe 008460BB 00846053 657265 jb 008460BB 00846056 204352 and [ebx+$52], al 00846059 49 dec ecx 0084605A 44 inc esp 0084605B 3D27000000 cmp eax, $00000027 00846060 FFFF DB $FF, $FF // 00846062 FFFF DB $FF, $FF // 00846064 0400 add al, +$00 00846066 0000 add [eax], al 00846068 43 inc ebx 00846069 52 push edx 0084606A 49 dec ecx 0084606B 44 inc esp 0084606C 0000 add [eax], al 0084606E 0000 add [eax], al 00846070 56 push esi * Reference to control Label4 : TLabel | 00846071 8B8010030000 mov eax, [eax+$0310] 00846077 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 0084607B E8D4E4BBFF call 00404554 00846080 5E pop esi 00846081 C3 ret 00846082 8BC0 mov eax, eax 00846084 55 push ebp 00846085 8BEC mov ebp, esp 00846087 B906000000 mov ecx, $00000006 0084608C 6A00 push $00 0084608E 6A00 push $00 00846090 49 dec ecx 00846091 75F9 jnz 0084608C 00846093 51 push ecx 00846094 53 push ebx 00846095 56 push esi 00846096 8BDA mov ebx, edx 00846098 8BF0 mov esi, eax 0084609A 33C0 xor eax, eax 0084609C 55 push ebp * Possible String Reference to: 'éÎè»ÿëÖ^[‹å]Ã' | 0084609D 6821628400 push $00846221 ***** TRY | 008460A2 64FF30 push dword ptr fs:[eax] 008460A5 648920 mov fs:[eax], esp 008460A8 8D55FC lea edx, [ebp-$04] 008460AB 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; | 008460AD E80A96D4FF call 0058F6BC * Reference to control v1PRTColor : N.A. | 008460B2 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008460B8 E88F62E1FF 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; | 008460BD E8A2BAE0FF call 00651B64 * Reference to field N.A..OFFS_0050 | 008460C2 8B4050 mov eax, [eax+$50] 008460C5 8D55F4 lea edx, [ebp-$0C] 008460C8 8B08 mov ecx, [eax] 008460CA FF5110 call dword ptr [ecx+$10] 008460CD 8B45F4 mov eax, [ebp-$0C] 008460D0 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008460D3 E81448BCFF call 0040A8EC * Reference to control Label9 : N.A. | 008460D8 8B9E54030000 mov ebx, [esi+$0354] 008460DE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008460E0 E85B23C8FF call 004C8440 008460E5 8D55E0 lea edx, [ebp-$20] 008460E8 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008460EB E8FC47BCFF call 0040A8EC 008460F0 8B55E0 mov edx, [ebp-$20] 008460F3 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008460F6 E8CD2CBDFF call 00418DC8 008460FB 8D45E4 lea eax, [ebp-$1C] 008460FE 50 push eax 008460FF 8B55F8 mov edx, [ebp-$08] 00846102 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846104 E8AB0AC8FF call 004C6BB4 00846109 5A pop edx 0084610A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 0084610C FF91B4000000 call dword ptr [ecx+$00B4] 00846112 8BC3 mov eax, ebx 00846114 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00846116 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 0084611C 8B9E08030000 mov ebx, [esi+$0308] 00846122 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00846124 E8ABF7C7FF call 004C58D4 00846129 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084612B E87C7EC9FF call 004DDFAC 00846130 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00846132 FF5244 call dword ptr [edx+$44] 00846135 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00846137 E8707EC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084613C BA38628400 mov edx, $00846238 00846141 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00846143 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00846146 6854628400 push $00846254 0084614B FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 0084614E 6864628400 push $00846264 00846153 8D55D8 lea edx, [ebp-$28] 00846156 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00846159 E88E47BCFF call 0040A8EC 0084615E FF75D8 push dword ptr [ebp-$28] 00846161 6870628400 push $00846270 00846166 8D45DC lea eax, [ebp-$24] 00846169 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 0084616E E841F5BBFF call 004056B4 00846173 8B45DC mov eax, [ebp-$24] 00846176 50 push eax 00846177 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00846179 E82E7EC9FF call 004DDFAC 0084617E 5A pop edx 0084617F 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00846181 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00846184 687C628400 push $0084627C * Possible String Reference to: 'YFId' | 00846189 BA94628400 mov edx, $00846294 * Reference to control Label9 : N.A. | 0084618E 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846194 E81B0AC8FF call 004C6BB4 00846199 8D55CC lea edx, [ebp-$34] 0084619C 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 0084619E FF5160 call dword ptr [ecx+$60] 008461A1 8B45CC mov eax, [ebp-$34] 008461A4 8D55D0 lea edx, [ebp-$30] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008461A7 E84047BCFF call 0040A8EC 008461AC FF75D0 push dword ptr [ebp-$30] 008461AF 6870628400 push $00846270 008461B4 8D45D4 lea eax, [ebp-$2C] 008461B7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008461BC E8F3F4BBFF call 004056B4 008461C1 8B45D4 mov eax, [ebp-$2C] 008461C4 50 push eax 008461C5 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008461C7 E8E07DC9FF call 004DDFAC 008461CC 5A pop edx 008461CD 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008461CF FF5138 call dword ptr [ecx+$38] 008461D2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008461D4 E8FB7CC9FF call 004DDED4 * Reference to control v1PRTColor : N.A. | 008461D9 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008461DF E86861E1FF call 0065C34C * Reference to field N.A..OFFS_0080 | 008461E4 8B8080000000 mov eax, [eax+$0080] 008461EA 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_0062075C() | 008461EC E86BA5DDFF call 0062075C 008461F1 33C0 xor eax, eax 008461F3 5A pop edx 008461F4 59 pop ecx 008461F5 59 pop ecx 008461F6 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 008461F9 6828628400 push $00846228 008461FE 8D45CC lea eax, [ebp-$34] 00846201 BA06000000 mov edx, $00000006 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00846206 E83DF1BBFF call 00405348 0084620B 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarClr(TVarData;TVarData); | 0084620E E861E4BCFF call 00414674 00846213 8D45F4 lea eax, [ebp-$0C] 00846216 BA03000000 mov edx, $00000003 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0084621B E828F1BBFF call 00405348 00846220 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00846239(Sender : TObject); begin (* 00846239 50 push eax 0084623A 6461 popa 0084623C 7465 jz 008462A3 0084623E 205946 and [ecx+$46], bl 00846241 5F pop edi 00846242 4D dec ebp 00846243 6F outsd 00846244 6E outsb 00846245 65795F jns 008462A7 00846248 43 inc ebx 00846249 52 push edx 0084624A 2000 and [eax], al 0084624C FFFF DB $FF, $FF // 0084624E FFFF DB $FF, $FF // 00846250 0500000020 add eax, +$20000000 00846255 53 push ebx 00846256 657420 jz 00846279 00846259 0000 add [eax], al 0084625B 00FF add bh, bh 0084625D FFFF DB $FF, $FF // 0084625F FF02 inc dword ptr [edx] 00846261 0000 add [eax], al 00846263 003D270000FF add [$FF000027], bh 00846269 FFFF DB $FF, $FF // 0084626B FF01 inc dword ptr [ecx] 0084626D 0000 add [eax], al 0084626F 0027 add [edi], ah 00846271 0000 add [eax], al 00846273 00FF add bh, bh 00846275 FFFF DB $FF, $FF // 00846277 FF0D00000020 dec dword ptr [$20000000] 0084627D 7768 jnbe 008462E7 0084627F 657265 jb 008462E7 00846282 205946 and [ecx+$46], bl 00846285 49 dec ecx 00846286 643D27000000 cmp eax, $00000027 0084628C FFFF DB $FF, $FF // 0084628E FFFF DB $FF, $FF // 00846290 0400 add al, +$00 00846292 0000 add [eax], al 00846294 59 pop ecx 00846295 46 inc esi 00846296 49 dec ecx 00846297 640000 add fs:[eax], al 0084629A 0000 add [eax], al 0084629C 55 push ebp 0084629D 8BEC mov ebp, esp 0084629F B905000000 mov ecx, $00000005 008462A4 6A00 push $00 008462A6 6A00 push $00 008462A8 49 dec ecx 008462A9 75F9 jnz 008462A4 008462AB 53 push ebx 008462AC 56 push esi 008462AD 8BDA mov ebx, edx 008462AF 8BF0 mov esi, eax 008462B1 33C0 xor eax, eax 008462B3 55 push ebp * Possible String Reference to: 'éÚæ»ÿëÖ^[‹å]Ã' | 008462B4 6815648400 push $00846415 ***** TRY | 008462B9 64FF30 push dword ptr fs:[eax] 008462BC 648920 mov fs:[eax], esp 008462BF 8D55FC lea edx, [ebp-$04] 008462C2 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; | 008462C4 E8F393D4FF call 0058F6BC 008462C9 8D55F8 lea edx, [ebp-$08] 008462CC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008462CF E81846BCFF call 0040A8EC 008462D4 837DF800 cmp dword ptr [ebp-$08], +$00 008462D8 750D jnz 008462E7 008462DA 8D45FC lea eax, [ebp-$04] 008462DD BA2C648400 mov edx, $0084642C * Reference to: System.@LStrLAsg(void;void;void;void); | 008462E2 E8D5F0BBFF call 004053BC * Reference to control Label9 : N.A. | 008462E7 8B9E54030000 mov ebx, [esi+$0354] 008462ED 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008462EF E84C21C8FF call 004C8440 008462F4 6A00 push $00 008462F6 6A00 push $00 008462F8 6A00 push $00 008462FA 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloatDef(AnsiString;Extended):Extended;overload; | 008462FD E86674BCFF call 0040D768 00846302 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarFromReal; | 00846305 E8822ABDFF call 00418D8C 0084630A 8D45E8 lea eax, [ebp-$18] 0084630D 50 push eax * Possible String Reference to: 'DerateMoney' | 0084630E BA38648400 mov edx, $00846438 00846313 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846315 E89A08C8FF call 004C6BB4 0084631A 5A pop edx 0084631B 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 0084631D FF91B4000000 call dword ptr [ecx+$00B4] 00846323 8BC3 mov eax, ebx 00846325 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00846327 FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 0084632D 8B9E08030000 mov ebx, [esi+$0308] 00846333 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00846335 E89AF5C7FF call 004C58D4 0084633A 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0084633C E86B7CC9FF call 004DDFAC 00846341 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00846343 FF5244 call dword ptr [edx+$44] 00846346 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00846348 E85F7CC9FF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0084634D BA4C648400 mov edx, $0084644C 00846352 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 00846354 FF5138 call dword ptr [ecx+$38] 00846357 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00846359 E84E7CC9FF call 004DDFAC 0084635E 50 push eax 0084635F 8D45E4 lea eax, [ebp-$1C] 00846362 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set DerateMoney=' | 00846365 BA68648400 mov edx, $00846468 * Reference to: System.@LStrCat3; | 0084636A E8D1F2BBFF call 00405640 0084636F 8B55E4 mov edx, [ebp-$1C] 00846372 58 pop eax 00846373 8B08 mov ecx, [eax] 00846375 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00846378 6884648400 push $00846484 * Possible String Reference to: 'YFId' | 0084637D BA9C648400 mov edx, $0084649C * Reference to control Label9 : N.A. | 00846382 8B8654030000 mov eax, [esi+$0354] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00846388 E82708C8FF call 004C6BB4 0084638D 8D55D8 lea edx, [ebp-$28] 00846390 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00846392 FF5160 call dword ptr [ecx+$60] 00846395 8B45D8 mov eax, [ebp-$28] 00846398 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0084639B E84C45BCFF call 0040A8EC 008463A0 FF75DC push dword ptr [ebp-$24] 008463A3 68AC648400 push $008464AC 008463A8 8D45E0 lea eax, [ebp-$20] 008463AB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008463B0 E8FFF2BBFF call 004056B4 008463B5 8B45E0 mov eax, [ebp-$20] 008463B8 50 push eax 008463B9 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008463BB E8EC7BC9FF call 004DDFAC 008463C0 5A pop edx 008463C1 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008463C3 FF5138 call dword ptr [ecx+$38] 008463C6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 008463C8 E8077BC9FF call 004DDED4 * Reference to control v1PRTColor : N.A. | 008463CD 8B8634030000 mov eax, [esi+$0334] * Reference to: ActnMan.TActionListCollection.GetActionManager(TActionListCollection):TCustomActionManager; | or: ActnMan.TActionBars.Add(TActionBars):TActionBarItem; | or: ActnMan.TActionClients.Add(TActionClients):TActionClientItem; | or: ActnMenus.TMenuStack.Peek(TMenuStack):TCustomActionMenuBar; | or: ComCtrls.TStatusPanels.Add(TStatusPanels):TStatusPanel; | or: ComCtrls.TWorkAreas.Add(TWorkAreas):TWorkArea; | 008463D3 E8745FE1FF call 0065C34C * Reference to field N.A..OFFS_0080 | 008463D8 8B8080000000 mov eax, [eax+$0080] 008463DE 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_0062075C() | 008463E0 E877A3DDFF call 0062075C 008463E5 33C0 xor eax, eax 008463E7 5A pop edx 008463E8 59 pop ecx 008463E9 59 pop ecx 008463EA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 008463ED 681C648400 push $0084641C 008463F2 8D45D8 lea eax, [ebp-$28] 008463F5 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 008463FA E849EFBBFF call 00405348 008463FF 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00846402 E86DE2BCFF call 00414674 00846407 8D45F8 lea eax, [ebp-$08] 0084640A BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0084640F E834EFBBFF call 00405348 00846414 C3 ret *) end; procedure TfrmSKCR_YF._PROC_0084644D(Sender : TObject); begin (* 0084644D 50 push eax 0084644E 6461 popa 00846450 7465 jz 008464B7 00846452 205946 and [ecx+$46], bl 00846455 5F pop edi 00846456 4D dec ebp 00846457 6F outsd 00846458 6E outsb 00846459 65795F jns 008464BB 0084645C 43 inc ebx 0084645D 52 push edx 0084645E 2000 and [eax], al 00846460 FFFF DB $FF, $FF // 00846462 FFFF DB $FF, $FF // 00846464 1100 adc [eax], eax 00846466 0000 add [eax], al 00846468 207365 and [ebx+$65], dh 0084646B 7420 jz 0084648D 0084646D 44 inc esp 0084646E 657261 jb 008464D2 00846471 7465 jz 008464D8 00846473 4D dec ebp 00846474 6F outsd 00846475 6E outsb 00846476 65793D jns 008464B6 00846479 0000 add [eax], al 0084647B 00FF add bh, bh 0084647D FFFF DB $FF, $FF // 0084647F FF0D00000020 dec dword ptr [$20000000] 00846485 7768 jnbe 008464EF 00846487 657265 jb 008464EF 0084648A 205946 and [ecx+$46], bl 0084648D 49 dec ecx 0084648E 643D27000000 cmp eax, $00000027 00846494 FFFF DB $FF, $FF // 00846496 FFFF DB $FF, $FF // 00846498 0400 add al, +$00 0084649A 0000 add [eax], al 0084649C 59 pop ecx 0084649D 46 inc esi 0084649E 49 dec ecx 0084649F 640000 add fs:[eax], al 008464A2 0000 add [eax], al 008464A4 FFFF DB $FF, $FF // 008464A6 FFFF DB $FF, $FF // 008464A8 0100 add [eax], eax 008464AA 0000 add [eax], al 008464AC 27 daa 008464AD 0000 add [eax], al 008464AF 00538B add [ebx-$75], dl 008464B2 D88BC3E8FACC fmul dword ptr [ebx+$CCFAE8C3] 008464B8 FFFF DB $FF, $FF // 008464BA 8BC3 mov eax, ebx | 008464BC E8F7CCFFFF call 008431B8 008464C1 5B pop ebx 008464C2 C3 ret 008464C3 90 nop 008464C4 55 push ebp 008464C5 8BEC mov ebp, esp 008464C7 51 push ecx 008464C8 B906000000 mov ecx, $00000006 008464CD 6A00 push $00 008464CF 6A00 push $00 008464D1 49 dec ecx 008464D2 75F9 jnz 008464CD 008464D4 51 push ecx 008464D5 874DFC xchg [ebp-$04], ecx 008464D8 53 push ebx 008464D9 56 push esi 008464DA 8BF0 mov esi, eax 008464DC 33C0 xor eax, eax 008464DE 55 push ebp 008464DF 681B678400 push $0084671B ***** TRY | 008464E4 64FF30 push dword ptr fs:[eax] 008464E7 648920 mov fs:[eax], esp 008464EA 33C0 xor eax, eax 008464EC 55 push ebp 008464ED 68F1668400 push $008466F1 ***** TRY | 008464F2 64FF30 push dword ptr fs:[eax] 008464F5 648920 mov fs:[eax], esp *) end; procedure TfrmSKCR_YF._PROC_00846769(Sender : TObject); begin (* 00846769 50 push eax 0084676A 6461 popa 0084676C 7465 jz 008467D3 0084676E 205946 and [ecx+$46], bl 00846771 5F pop edi 00846772 4D dec ebp 00846773 6F outsd 00846774 6E outsb 00846775 65795F jns 008467D7 00846778 43 inc ebx 00846779 52 push edx 0084677A 2000 and [eax], al 0084677C FFFF DB $FF, $FF // 0084677E FFFF DB $FF, $FF // 00846780 1000 adc [eax], al 00846782 0000 add [eax], al 00846784 205365 and [ebx+$65], dl 00846787 7420 jz 008467A9 00846789 43 inc ebx 0084678A 6F outsd 0084678B 6D insd 0084678C 54 push esp 0084678D 61 popa 0084678E 69546F753D270000 imul edx, [edi+ebp*2+$75], $0000273D 00846796 0000 add [eax], al 00846798 FFFF DB $FF, $FF // 0084679A FFFF DB $FF, $FF // 0084679C 0100 add [eax], eax 0084679E 0000 add [eax], al 008467A0 27 daa 008467A1 0000 add [eax], al 008467A3 00FF add bh, bh 008467A5 FFFF DB $FF, $FF // 008467A7 FF09 dec dword ptr [ecx] 008467A9 0000 add [eax], al 008467AB 002C4564697465 add [$65746964+eax*2], ch 008467B2 723D jb 008467F1 008467B4 27 daa 008467B5 0000 add [eax], al 008467B7 00FF add bh, bh 008467B9 FFFF DB $FF, $FF // 008467BB FF1400 call dword ptr [eax+eax] 008467BE 0000 add [eax], al 008467C0 2C45 sub al, $45 008467C2 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008467CB 657464 jz 00846832 008467CE 61 popa 008467CF 7465 jz 00846836 008467D1 2829 sub [ecx], ch 008467D3 2000 and [eax], al 008467D5 0000 add [eax], al 008467D7 00FF add bh, bh 008467D9 FFFF DB $FF, $FF // 008467DB FF0D00000020 dec dword ptr [$20000000] 008467E1 7768 jnbe 0084684B 008467E3 657265 jb 0084684B 008467E6 205946 and [ecx+$46], bl 008467E9 49 dec ecx 008467EA 643D27000000 cmp eax, $00000027 008467F0 FFFF DB $FF, $FF // 008467F2 FFFF DB $FF, $FF // 008467F4 0400 add al, +$00 008467F6 0000 add [eax], al 008467F8 59 pop ecx 008467F9 46 inc esi 008467FA 49 dec ecx 008467FB 640000 add fs:[eax], al 008467FE 0000 add [eax], al 00846800 55 push ebp 00846801 8BEC mov ebp, esp 00846803 B907000000 mov ecx, $00000007 00846808 6A00 push $00 0084680A 6A00 push $00 0084680C 49 dec ecx 0084680D 75F9 jnz 00846808 0084680F 53 push ebx 00846810 56 push esi 00846811 8BD8 mov ebx, eax *) end; procedure TfrmSKCR_YF._PROC_00848172(Sender : TObject); begin (* 00848172 53 push ebx 00848173 44 inc esp 00848174 4D dec ebp 00848175 6F outsd 00848176 6E outsb 00848177 65793D jns 008481B7 0084817A 7375 jnb 008481F1 0084817C 6D insd 0084817D 28452E sub [ebp+$2E], al 00848180 4E dec esi 00848181 756D jnz 008481F0 00848183 2900 sub dword ptr [eax], eax 00848185 0000 add [eax], al 00848187 00FF add bh, bh 00848189 FFFF DB $FF, $FF // 0084818B FF13 call dword ptr [ebx] 0084818D 0000 add [eax], al 0084818F 006672 add [esi+$72], ah 00848192 6F outsd 00848193 6D insd 00848194 205946 and [ecx+$46], bl 00848197 5F pop edi 00848198 4D dec ebp 00848199 6F outsd 0084819A 6E outsb 0084819B 65795F jns 008481FD 0084819E 43 inc ebx 0084819F 52 push edx 008481A0 204120 and [ecx+$20], al 008481A3 00FF add bh, bh 008481A5 FFFF DB $FF, $FF // 008481A7 FF27 jmp dword ptr [edi] 008481A9 0000 add [eax], al 008481AB 00696E add [ecx+$6E], ch 008481AE 6E outsb 008481AF 657220 jb 008481D2 008481B2 6A6F push $6F 008481B4 696E2059465F6C imul ebp, [esi+$20], $6C5F4659 008481BB 6F outsd 008481BC 67204520 and [di+$20], al 008481C0 6F outsd 008481C1 6E outsb 008481C2 20452E and [ebp+$2E], al 008481C5 4C dec esp 008481C6 6973744E6F3D41 imul esi, [ebx+$74], $413D6F4E 008481CD 2E59 pop ecx 008481CF 46 inc esi 008481D0 49 dec ecx 008481D1 44 inc esp 008481D2 2000 and [eax], al 008481D4 FFFF DB $FF, $FF // 008481D6 FFFF DB $FF, $FF // 008481D8 44 inc esp 008481D9 0000 add [eax], al 008481DB 00696E add [ecx+$6E], ch 008481DE 6E outsb 008481DF 657220 jb 00848202 008481E2 6A6F push $6F 008481E4 696E2059465F4D imul ebp, [esi+$20], $4D5F4659 008481EB 6F outsd 008481EC 6E outsb 008481ED 65795F jns 0084824F 008481F0 43 inc ebx 008481F1 52 push edx 008481F2 204220 and [edx+$20], al 008481F5 6F outsd 008481F6 6E outsb 008481F7 20422E and [edx+$2E], al 008481FA 59 pop ecx 008481FB 46 inc esi 008481FC 49 dec ecx 008481FD 44 inc esp 008481FE 3D452E546F cmp eax, $6F542E45 00848203 4E dec esi 00848204 6F outsd 00848205 20616E and [ecx+$6E], ah 00848208 6420422E and fs:[edx+$2E], al 0084820C 43 inc ebx 0084820D 52 push edx 0084820E 54 push esp 0084820F 7970 jns 00848281 00848211 653D27D3A6CA cmp eax, $CAA6D327 00848217 D5 aad 00848218 BFEEB5C7BC mov edi, $BCC7B5EE 0084821D C72720000000 mov dword ptr [edi], $00000020 00848223 00FF add bh, bh 00848225 FFFF DB $FF, $FF // 00848227 FF10 call dword ptr [eax] 00848229 0000 add [eax], al 0084822B 007768 add [edi+$68], dh 0084822E 657265 jb 00848296 00848231 20422E and [edx+$2E], al 00848234 4D dec ebp 00848235 61 popa 00848236 696E69643D2700 imul ebp, [esi+$69], $00273D64 0084823D 0000 add [eax], al 0084823F 00FF add bh, bh 00848241 FFFF DB $FF, $FF // 00848243 FF1A call [edx] 00848245 0000 add [eax], al 00848247 0027 add [edi], ah 00848249 20616E and [ecx+$6E], ah 0084824C 6420412E and fs:[ecx+$2E], al 00848250 43 inc ebx 00848251 52 push edx 00848252 54 push esp 00848253 7970 jns 008482C5 00848255 653D27CAD5BF cmp eax, $BFD5CA27 0084825B EE out dx, al 0084825C B5C7 mov ch, $C7 0084825E BCC7272000 mov esp, $002027C7 00848263 00FF add bh, bh 00848265 FFFF DB $FF, $FF // 00848267 FF12 call dword ptr [edx] 00848269 0000 add [eax], al 0084826B 0020 add [eax], ah 0084826D 61 popa 0084826E 6E outsb 0084826F 6420412E and fs:[ecx+$2E], al 00848273 7374 jnb 008482E9 00848275 61 popa 00848276 7475 jz 008482ED 00848278 733C jnb 008482B6 0084827A 3E27 daa 0084827C 3027 xor [edi], ah 0084827E 0000 add [eax], al 00848280 FFFF DB $FF, $FF // 00848282 FFFF DB $FF, $FF // 00848284 3200 xor al, byte ptr [eax] 00848286 0000 add [eax], al 00848288 206772 and [edi+$72], ah 0084828B 6F outsd 0084828C 7570 jnz 008482FE 0084828E 206279 and [edx+$79], ah 00848291 20422E and [edx+$2E], al 00848294 43 inc ebx 00848295 6F outsd 00848296 6E outsb 00848297 4E dec esi 00848298 6F outsd 00848299 2C41 sub al, $41 0084829B 2E43 inc ebx 0084829D 52 push edx 0084829E 54 push esp 0084829F 696D652C412E42 imul ebp, [ebp+$65], $422E412C 008482A6 5A pop edx 008482A7 54 push esp 008482A8 7970 jns 0084831A 008482AA 652C41 sub al, $41 008482AD 2E48 dec eax 008482AF 7569 jnz 0084831A 008482B1 6C insb 008482B2 762C jbe 008482E0 008482B4 41 inc ecx 008482B5 2E4E dec esi 008482B7 6F outsd 008482B8 7465 jz 0084831F 008482BA 0000 add [eax], al 008482BC FFFF DB $FF, $FF // 008482BE FFFF DB $FF, $FF // 008482C0 0800 or [eax], al 008482C2 0000 add [eax], al 008482C4 55 push ebp 008482C5 53 push ebx 008482C6 44 inc esp 008482C7 4D dec ebp 008482C8 6F outsd 008482C9 6E outsb 008482CA 657900 jns 008482CD 008482CD 0000 add [eax], al 008482CF 00FF add bh, bh 008482D1 FFFF DB $FF, $FF // 008482D3 FF29 jmp [ecx] 008482D5 0000 add [eax], al 008482D7 007365 add [ebx+$65], dh 008482DA 6C insb 008482DB 6563742041 arpl gs:[eax+$41], si 008482E0 2E43 inc ebx 008482E2 52 push edx 008482E3 54 push esp 008482E4 696D652C412E59 imul ebp, [ebp+$65], $592E412C 008482EB 46 inc esi 008482EC 4E dec esi 008482ED 61 popa 008482EE 6D insd 008482EF 652C41 sub al, $41 008482F2 2E42 inc edx 008482F4 5A pop edx 008482F5 54 push esp 008482F6 7970 jns 00848368 008482F8 652C41 sub al, $41 008482FB 2E4E dec esi 008482FD 6F outsd 008482FE 7465 jz 00848365 00848300 2000 and [eax], al 00848302 0000 add [eax], al 00848304 FFFF DB $FF, $FF // 00848306 FFFF DB $FF, $FF // 00848308 1E push ds 00848309 0000 add [eax], al 0084830B 002C52 add [edx+edx*2], ch 0084830E 4D dec ebp 0084830F 42 inc edx 00848310 4D dec ebp 00848311 6F outsd 00848312 6E outsb 00848313 65793D jns 00848353 00848316 53 push ebx 00848317 756D jnz 00848386 00848319 28412E sub [ecx+$2E], al 0084831C 4D dec ebp 0084831D 6F outsd 0084831E 6E outsb 0084831F 65792A jns 0084834C 00848322 41 inc ecx 00848323 2E48 dec eax 00848325 7569 jnz 00848390 00848327 6C insb 00848328 7629 jbe 00848353 0084832A 0000 add [eax], al 0084832C FFFF DB $FF, $FF // 0084832E FFFF DB $FF, $FF // 00848330 0200 add al, byte ptr [eax] 00848332 0000 add [eax], al 00848334 27 daa 00848335 2000 and [eax], al 00848337 00FF add bh, bh 00848339 FFFF DB $FF, $FF // 0084833B FF4D00 dec dword ptr [ebp+$00] 0084833E 0000 add [eax], al 00848340 20616E and [ecx+$6E], ah 00848343 6420412E and fs:[ecx+$2E], al 00848347 43 inc ebx 00848348 52 push edx 00848349 54 push esp 0084834A 7970 jns 008483BC 0084834C 6520696E and gs:[ecx+$6E], ch 00848350 2028 and [eax], ch 00848352 27 daa 00848353 D3A6B8B6BFEE shl dword ptr [esi+$EEBFB6B8], cl 00848359 B5C7 mov ch, $C7 0084835B BCC7272C27 mov esp, $272C27C7 00848360 B8B6BFEED4 mov eax, $D4EEBFB6 00848365 D3B7D1272920 DB $D3, $B7, $D1, $27, $29, $20 // dword ptr [edi+$202927D1], cl 0084836B 61 popa 0084836C 6E outsb 0084836D 64206973 and fs:[ecx+$73], ch 00848371 6E outsb 00848372 756C jnz 008483E0 00848374 6C insb 00848375 28412E sub [ecx+$2E], al 00848378 46 inc esi 00848379 59 pop ecx 0084837A 54 push esp 0084837B 7970 jns 008483ED 0084837D 652C27 sub al, $27 00848380 27 daa 00848381 293C3E sub dword ptr [esi+edi], edi 00848384 27 daa 00848385 BCD3B9A4B7 mov esp, $B7A4B9D3 0084838A D127 shl dword ptr [edi], 1 0084838C 2000 and [eax], al 0084838E 0000 add [eax], al 00848390 FFFF DB $FF, $FF // 00848392 FFFF DB $FF, $FF // 00848394 44 inc esp 00848395 0000 add [eax], al 00848397 0020 add [eax], ah 00848399 61 popa 0084839A 6E outsb 0084839B 64206973 and fs:[ecx+$73], ch 0084839F 6E outsb 008483A0 756C jnz 0084840E 008483A2 6C insb 008483A3 28412E sub [ecx+$2E], al 008483A6 46 inc esi 008483A7 59 pop ecx 008483A8 54 push esp 008483A9 7970 jns 0084841B 008483AB 652C27 sub al, $27 008483AE 27 daa 008483AF 293C3E sub dword ptr [esi+edi], edi 008483B2 27 daa 008483B3 C5F7 lds esi, di 008483B5 B2BC mov dl, $BC 008483B7 B7D1 mov bh, $D1 008483B9 27 daa 008483BA 20616E and [ecx+$6E], ah 008483BD 64206973 and fs:[ecx+$73], ch 008483C1 6E outsb 008483C2 756C jnz 00848430 008483C4 6C insb 008483C5 28412E sub [ecx+$2E], al 008483C8 59 pop ecx 008483C9 46 inc esi 008483CA 4E dec esi 008483CB 61 popa 008483CC 6D insd 008483CD 652C27 sub al, $27 008483D0 27 daa 008483D1 293C3E sub dword ptr [esi+edi], edi 008483D4 27 daa 008483D5 B8A8C1CFB7 mov eax, $B7CFC1A8 008483DA D127 shl dword ptr [edi], 1 008483DC 0000 add [eax], al 008483DE 0000 add [eax], al 008483E0 FFFF DB $FF, $FF // 008483E2 FFFF DB $FF, $FF // 008483E4 7300 jnb 008483E6 008483E6 0000 add [eax], al 008483E8 20616E and [ecx+$6E], ah 008483EB 64206973 and fs:[ecx+$73], ch 008483EF 6E outsb 008483F0 756C jnz 0084845E 008483F2 6C insb 008483F3 28412E sub [ecx+$2E], al 008483F6 59 pop ecx 008483F7 46 inc esi 008483F8 4E dec esi 008483F9 61 popa 008483FA 6D insd 008483FB 652C27 sub al, $27 008483FE 27 daa 008483FF 293C3E sub dword ptr [esi+edi], edi 00848402 27 daa 00848403 B2C3 mov dl, $C3 00848405 BCF4C8CBB9 mov esp, $B9CBC8F4 0084840A A4 movsb 0084840B B7D1 mov bh, $D1 0084840D 27 daa 0084840E 20616E and [ecx+$6E], ah 00848411 64206973 and fs:[ecx+$73], ch 00848415 6E outsb 00848416 756C jnz 00848484 00848418 6C insb 00848419 28412E sub [ecx+$2E], al 0084841C 59 pop ecx 0084841D 46 inc esi 0084841E 4E dec esi 0084841F 61 popa 00848420 6D insd 00848421 652C27 sub al, $27 00848424 27 daa 00848425 293C3E sub dword ptr [esi+edi], edi 00848428 27 daa 00848429 B3B5 mov bl, $B5 0084842B B9A4C8CBB9 mov ecx, $B9CBC8A4 00848430 A4 movsb 00848431 B7D1 mov bh, $D1 00848433 27 daa 00848434 20616E and [ecx+$6E], ah 00848437 64206973 and fs:[ecx+$73], ch 0084843B 6E outsb 0084843C 756C jnz 008484AA 0084843E 6C insb 0084843F 28412E sub [ecx+$2E], al 00848442 59 pop ecx 00848443 46 inc esi 00848444 4E dec esi 00848445 61 popa 00848446 6D insd 00848447 652C27 sub al, $27 0084844A 27 daa 0084844B 293C3E sub dword ptr [esi+edi], edi 0084844E 27 daa 0084844F B0FC mov al, $FC 00848451 D7 xlat 00848452 B0C8 mov al, $C8 00848454 CB ret 00848455 B9A4B7D127 mov ecx, $27D1B7A4 0084845A 2000 and [eax], al 0084845C FFFF DB $FF, $FF // 0084845E FFFF DB $FF, $FF // 00848460 2B00 sub eax, dword ptr [eax] 00848462 0000 add [eax], al 00848464 206772 and [edi+$72], ah 00848467 6F outsd 00848468 7570 jnz 008484DA 0084846A 206279 and [edx+$79], ah 0084846D 20412E and [ecx+$2E], al 00848470 43 inc ebx 00848471 52 push edx 00848472 54 push esp 00848473 696D652C412E59 imul ebp, [ebp+$65], $592E412C 0084847A 46 inc esi 0084847B 4E dec esi 0084847C 61 popa 0084847D 6D insd 0084847E 652C41 sub al, $41 00848481 2E42 inc edx 00848483 5A pop edx 00848484 54 push esp 00848485 7970 jns 008484F7 00848487 652C41 sub al, $41 0084848A 2E4E dec esi 0084848C 6F outsd 0084848D 7465 jz 008484F4 0084848F 00FF add bh, bh 00848491 FFFF DB $FF, $FF // 00848493 FF1500000052 call dword ptr [$52000000] 00848499 65706F jo 0084850B 0084849C 7274 jb 00848512 0084849E 5C pop esp 0084849F B6A9 mov dh, $A9 008484A1 B5A5 mov ch, $A5 008484A3 C0FBC8 sar bl, $C8 008484A6 F3 rep 008484A7 B1ED mov cl, $ED 008484A9 2E726D jb 00848519 008484AC 660000 add [eax], al 008484AF 00FF add bh, bh 008484B1 FFFF DB $FF, $FF // 008484B3 FF0500000043 inc dword ptr [$43000000] 008484B9 6F outsd 008484BA 6E outsb 008484BB 4E dec esi 008484BC 4F dec edi 008484BD 0000 add [eax], al 008484BF 00FF add bh, bh 008484C1 FFFF DB $FF, $FF // 008484C3 FF06 inc dword ptr [esi] 008484C5 0000 add [eax], al 008484C7 004643 add [esi+$43], al 008484CA 6F outsd 008484CB 6E outsb 008484CC 4E dec esi 008484CD 6F outsd 008484CE 0000 add [eax], al 008484D0 FFFF DB $FF, $FF // 008484D2 FFFF DB $FF, $FF // 008484D4 07 pop es 008484D5 0000 add [eax], al 008484D7 004F72 add [edi+$72], cl 008484DA 6465724E jb 0084852C 008484DE 6F outsd 008484DF 00FF add bh, bh 008484E1 FFFF DB $FF, $FF // 008484E3 FF08 dec dword ptr [eax] 008484E5 0000 add [eax], al 008484E7 00464F add [esi+$4F], al 008484EA 7264 jb 00848550 008484EC 65724E jb 0084853D 008484EF 6F outsd 008484F0 0000 add [eax], al 008484F2 0000 add [eax], al 008484F4 FFFF DB $FF, $FF // 008484F6 FFFF DB $FF, $FF // 008484F8 0A00 or al, byte ptr [eax] 008484FA 0000 add [eax], al 008484FC 43 inc ebx 008484FD 6F outsd 008484FE 6E outsb 008484FF 50 push eax 00848500 657273 jb 00848576 00848503 6F outsd 00848504 6E outsb 00848505 3100 xor [eax], eax 00848507 00FF add bh, bh 00848509 FFFF DB $FF, $FF // 0084850B FF0B dec dword ptr [ebx] 0084850D 0000 add [eax], al 0084850F 004643 add [esi+$43], al 00848512 6F outsd 00848513 6E outsb 00848514 50 push eax 00848515 657273 jb 0084858B 00848518 6F outsd 00848519 6E outsb 0084851A 3100 xor [eax], eax 0084851C FFFF DB $FF, $FF // 0084851E FFFF DB $FF, $FF // 00848520 0E push cs 00848521 0000 add [eax], al 00848523 004375 add [ebx+$75], al 00848526 7374 jnb 0084859C 00848528 6F outsd 00848529 6D insd 0084852A 65724E jb 0084857B 0084852D 6F outsd 0084852E 4E dec esi 0084852F 61 popa 00848530 6D insd 00848531 650000 add gs:[eax], al 00848534 FFFF DB $FF, $FF // 00848536 FFFF DB $FF, $FF // 00848538 0F0000 sldt word ptr [eax] 0084853B 004643 add [esi+$43], al 0084853E 7573 jnz 008485B3 00848540 746F jz 008485B1 00848542 6D insd 00848543 65724E jb 00848594 00848546 6F outsd 00848547 4E dec esi 00848548 61 popa 00848549 6D insd 0084854A 6500FF add bh, bh 0084854D FFFF DB $FF, $FF // 0084854F FF07 inc dword ptr [edi] 00848551 0000 add [eax], al 00848553 004D4C add [ebp+$4C], cl 00848556 4D dec ebp 00848557 6F outsd 00848558 6E outsb 00848559 657900 jns 0084855C 0084855C FFFF DB $FF, $FF // 0084855E FFFF DB $FF, $FF // 00848560 07 pop es 00848561 0000 add [eax], al 00848563 005947 add [ecx+$47], bl 00848566 4D dec ebp 00848567 6F outsd 00848568 6E outsb 00848569 657900 jns 0084856C 0084856C FFFF DB $FF, $FF // 0084856E FFFF DB $FF, $FF // 00848570 0500000046 add eax, +$46000000 00848575 50 push eax 00848576 42 inc edx 00848577 50 push eax 00848578 53 push ebx 00848579 0000 add [eax], al 0084857B 00FF add bh, bh 0084857D FFFF DB $FF, $FF // 0084857F FF06 inc dword ptr [esi] 00848581 0000 add [eax], al 00848583 004650 add [esi+$50], al 00848586 42 inc edx 00848587 51 push ecx 00848588 7479 jz 00848603 0084858A 0000 add [eax], al 0084858C FFFF DB $FF, $FF // 0084858E FFFF DB $FF, $FF // 00848590 0800 or [eax], al 00848592 0000 add [eax], al 00848594 46 inc esi 00848595 50 push eax 00848596 42 inc edx 00848597 4D dec ebp 00848598 6F outsd 00848599 6E outsb 0084859A 657900 jns 0084859D 0084859D 0000 add [eax], al 0084859F 00FF add bh, bh 008485A1 FFFF DB $FF, $FF // 008485A3 FF0500000046 inc dword ptr [$46000000] 008485A9 52 push edx 008485AA 46 inc esi 008485AB 50 push eax 008485AC 53 push ebx 008485AD 0000 add [eax], al 008485AF 00FF add bh, bh 008485B1 FFFF DB $FF, $FF // 008485B3 FF06 inc dword ptr [esi] 008485B5 0000 add [eax], al 008485B7 004652 add [esi+$52], al 008485BA 46 inc esi 008485BB 51 push ecx 008485BC 7479 jz 00848637 008485BE 0000 add [eax], al 008485C0 FFFF DB $FF, $FF // 008485C2 FFFF DB $FF, $FF // 008485C4 0800 or [eax], al 008485C6 0000 add [eax], al 008485C8 46 inc esi 008485C9 52 push edx 008485CA 46 inc esi 008485CB 4D dec ebp 008485CC 6F outsd 008485CD 6E outsb 008485CE 657900 jns 008485D1 008485D1 0000 add [eax], al 008485D3 00FF add bh, bh 008485D5 FFFF DB $FF, $FF // 008485D7 FF03 inc dword ptr [ebx] 008485D9 0000 add [eax], al 008485DB 004650 add [esi+$50], al 008485DE 53 push ebx 008485DF 00FF add bh, bh 008485E1 FFFF DB $FF, $FF // 008485E3 FF0400 inc dword ptr [eax+eax] 008485E6 0000 add [eax], al 008485E8 46 inc esi 008485E9 51 push ecx 008485EA 7479 jz 00848665 008485EC 0000 add [eax], al 008485EE 0000 add [eax], al 008485F0 FFFF DB $FF, $FF // 008485F2 FFFF DB $FF, $FF // 008485F4 0900 or [eax], eax 008485F6 0000 add [eax], al 008485F8 46 inc esi 008485F9 52 push edx 008485FA 4D dec ebp 008485FB 42 inc edx 008485FC 4D dec ebp 008485FD 6F outsd 008485FE 6E outsb 008485FF 657900 jns 00848602 00848602 0000 add [eax], al 00848604 FFFF DB $FF, $FF // 00848606 FFFF DB $FF, $FF // 00848608 0900 or [eax], eax 0084860A 0000 add [eax], al 0084860C 46 inc esi 0084860D 55 push ebp 0084860E 53 push ebx 0084860F 44 inc esp 00848610 4D dec ebp 00848611 6F outsd 00848612 6E outsb 00848613 657900 jns 00848616 00848616 0000 add [eax], al 00848618 FFFF DB $FF, $FF // 0084861A FFFF DB $FF, $FF // 0084861C 0B00 or eax, [eax] 0084861E 0000 add [eax], al 00848620 46 inc esi 00848621 53 push ebx 00848622 4B dec ebx 00848623 52 push edx 00848624 4D dec ebp 00848625 42 inc edx 00848626 4D dec ebp 00848627 6F outsd 00848628 6E outsb 00848629 657900 jns 0084862C 0084862C FFFF DB $FF, $FF // 0084862E FFFF DB $FF, $FF // 00848630 0B00 or eax, [eax] 00848632 0000 add [eax], al 00848634 46 inc esi 00848635 53 push ebx 00848636 4B dec ebx 00848637 55 push ebp 00848638 53 push ebx 00848639 44 inc esp 0084863A 4D dec ebp 0084863B 6F outsd 0084863C 6E outsb 0084863D 657900 jns 00848640 00848640 FFFF DB $FF, $FF // 00848642 FFFF DB $FF, $FF // 00848644 06 push es 00848645 0000 add [eax], al 00848647 004646 add [esi+$46], al 0084864A 4C dec esp 0084864B 51 push ecx 0084864C 7479 jz 008486C7 0084864E 0000 add [eax], al 00848650 FFFF DB $FF, $FF // 00848652 FFFF DB $FF, $FF // 00848654 0800 or [eax], al 00848656 0000 add [eax], al 00848658 46 inc esi 00848659 46 inc esi 0084865A 4C dec esp 0084865B 4D dec ebp 0084865C 6F outsd 0084865D 6E outsb 0084865E 657900 jns 00848661 00848661 0000 add [eax], al 00848663 00FF add bh, bh 00848665 FFFF DB $FF, $FF // 00848667 FF09 dec dword ptr [ecx] 00848669 0000 add [eax], al 0084866B 004A46 add [edx+$46], cl 0084866E 4A dec edx 0084866F 47 inc edi 00848670 4D dec ebp 00848671 6F outsd 00848672 6E outsb 00848673 657900 jns 00848676 00848676 0000 add [eax], al 00848678 FFFF DB $FF, $FF // 0084867A FFFF DB $FF, $FF // 0084867C 0A00 or al, byte ptr [eax] 0084867E 0000 add [eax], al 00848680 46 inc esi 00848681 4A dec edx 00848682 46 inc esi 00848683 4A dec edx 00848684 47 inc edi 00848685 4D dec ebp 00848686 6F outsd 00848687 6E outsb 00848688 657900 jns 0084868B 0084868B 00FF add bh, bh 0084868D FFFF DB $FF, $FF // 0084868F FF06 inc dword ptr [esi] 00848691 0000 add [eax], al 00848693 00C3 add bl, al 00848695 BBD3D0D5D2 mov ebx, $D2D5D0D3 0084869A 0000 add [eax], al 0084869C CC int 3 0084869D E1CA loope -$36 0084869F BE00000000 mov esi, $00000000 008486A4 55 push ebp 008486A5 8BEC mov ebp, esp 008486A7 6A00 push $00 008486A9 6A00 push $00 008486AB 53 push ebx 008486AC 8BD8 mov ebx, eax 008486AE 33C0 xor eax, eax 008486B0 55 push ebp * Possible String Reference to: 'éŠÃ»ÿëë[YY]Ã' | 008486B1 6865878400 push $00848765 ***** TRY | 008486B6 64FF30 push dword ptr fs:[eax] 008486B9 648920 mov fs:[eax], esp * Reference to control Label9 : N.A. | 008486BC 8B8354030000 mov eax, [ebx+$0354] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 008486C2 E8F9F7C7FF call 004C7EC0 008486C7 84C0 test al, al 008486C9 757F jnz 0084874A 008486CB 8BCB mov ecx, ebx 008486CD B201 mov dl, $01 * Reference to class TfrmJYorderConCX | 008486CF A164DF7D00 mov eax, dword ptr [$007DDF64] * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 008486D4 E8F796C5FF call 004A1DD0 *) end; procedure TfrmSKCR_YF._PROC_00848AA5(Sender : TObject); begin (* 00848AA5 8BEC mov ebp, esp 00848AA7 33C0 xor eax, eax 00848AA9 55 push ebp * Possible String Reference to: 'é&À»ÿëø]ËÀƒ-LZ‰' | 00848AAA 68C98A8400 push $00848AC9 ***** TRY | 00848AAF 64FF30 push dword ptr fs:[eax] 00848AB2 648920 mov fs:[eax], esp 00848AB5 FF054C5A8900 inc dword ptr [$00895A4C] 00848ABB 33C0 xor eax, eax 00848ABD 5A pop edx 00848ABE 59 pop ecx 00848ABF 59 pop ecx 00848AC0 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-LZ‰' | 00848AC3 68D08A8400 push $00848AD0 00848AC8 C3 ret * Reference to: System.@HandleFinally; | 00848AC9 E926C0BBFF jmp 00404AF4 00848ACE EBF8 jmp 00848AC8 ****** END | 00848AD0 5D pop ebp 00848AD1 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848AD4(Sender : TObject); begin (* 00848AD4 832D4C5A890001 sub dword ptr [$00895A4C], +$01 00848ADB C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848ADC(Sender : TObject); begin (* 00848ADC 55 push ebp 00848ADD 8BEC mov ebp, esp 00848ADF 33C0 xor eax, eax 00848AE1 55 push ebp * Possible String Reference to: 'éî¿»ÿëø]ËÀƒ-PZ‰' | 00848AE2 68018B8400 push $00848B01 ***** TRY | 00848AE7 64FF30 push dword ptr fs:[eax] 00848AEA 648920 mov fs:[eax], esp 00848AED FF05505A8900 inc dword ptr [$00895A50] 00848AF3 33C0 xor eax, eax 00848AF5 5A pop edx 00848AF6 59 pop ecx 00848AF7 59 pop ecx 00848AF8 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-PZ‰' | 00848AFB 68088B8400 push $00848B08 00848B00 C3 ret * Reference to: System.@HandleFinally; | 00848B01 E9EEBFBBFF jmp 00404AF4 00848B06 EBF8 jmp 00848B00 ****** END | 00848B08 5D pop ebp 00848B09 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B0C(Sender : TObject); begin (* 00848B0C 832D505A890001 sub dword ptr [$00895A50], +$01 00848B13 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B14(Sender : TObject); begin (* 00848B14 55 push ebp 00848B15 8BEC mov ebp, esp 00848B17 33C0 xor eax, eax 00848B19 55 push ebp * Possible String Reference to: '鶿»ÿëø]ËÀƒ-TZ‰' | 00848B1A 68398B8400 push $00848B39 ***** TRY | 00848B1F 64FF30 push dword ptr fs:[eax] 00848B22 648920 mov fs:[eax], esp 00848B25 FF05545A8900 inc dword ptr [$00895A54] 00848B2B 33C0 xor eax, eax 00848B2D 5A pop edx 00848B2E 59 pop ecx 00848B2F 59 pop ecx 00848B30 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-TZ‰' | 00848B33 68408B8400 push $00848B40 00848B38 C3 ret * Reference to: System.@HandleFinally; | 00848B39 E9B6BFBBFF jmp 00404AF4 00848B3E EBF8 jmp 00848B38 ****** END | 00848B40 5D pop ebp 00848B41 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B44(Sender : TObject); begin (* 00848B44 832D545A890001 sub dword ptr [$00895A54], +$01 00848B4B C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B4C(Sender : TObject); begin (* 00848B4C 55 push ebp 00848B4D 8BEC mov ebp, esp 00848B4F 33C0 xor eax, eax 00848B51 55 push ebp * Possible String Reference to: 'é~¿»ÿëø]ËÀƒ-XZ‰' | 00848B52 68718B8400 push $00848B71 ***** TRY | 00848B57 64FF30 push dword ptr fs:[eax] 00848B5A 648920 mov fs:[eax], esp 00848B5D FF05585A8900 inc dword ptr [$00895A58] 00848B63 33C0 xor eax, eax 00848B65 5A pop edx 00848B66 59 pop ecx 00848B67 59 pop ecx 00848B68 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-XZ‰' | 00848B6B 68788B8400 push $00848B78 00848B70 C3 ret * Reference to: System.@HandleFinally; | 00848B71 E97EBFBBFF jmp 00404AF4 00848B76 EBF8 jmp 00848B70 ****** END | 00848B78 5D pop ebp 00848B79 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B7C(Sender : TObject); begin (* 00848B7C 832D585A890001 sub dword ptr [$00895A58], +$01 00848B83 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848B84(Sender : TObject); begin (* 00848B84 55 push ebp 00848B85 8BEC mov ebp, esp 00848B87 33C0 xor eax, eax 00848B89 55 push ebp * Possible String Reference to: 'éF¿»ÿëø]ËÀƒ-\Z‰' | 00848B8A 68A98B8400 push $00848BA9 ***** TRY | 00848B8F 64FF30 push dword ptr fs:[eax] 00848B92 648920 mov fs:[eax], esp 00848B95 FF055C5A8900 inc dword ptr [$00895A5C] 00848B9B 33C0 xor eax, eax 00848B9D 5A pop edx 00848B9E 59 pop ecx 00848B9F 59 pop ecx 00848BA0 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-\Z‰' | 00848BA3 68B08B8400 push $00848BB0 00848BA8 C3 ret * Reference to: System.@HandleFinally; | 00848BA9 E946BFBBFF jmp 00404AF4 00848BAE EBF8 jmp 00848BA8 ****** END | 00848BB0 5D pop ebp 00848BB1 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848BB4(Sender : TObject); begin (* 00848BB4 832D5C5A890001 sub dword ptr [$00895A5C], +$01 00848BBB C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848BBC(Sender : TObject); begin (* 00848BBC 55 push ebp 00848BBD 8BEC mov ebp, esp 00848BBF 33C0 xor eax, eax 00848BC1 55 push ebp 00848BC2 68E18B8400 push $00848BE1 ***** TRY | 00848BC7 64FF30 push dword ptr fs:[eax] 00848BCA 648920 mov fs:[eax], esp 00848BCD FF05605A8900 inc dword ptr [$00895A60] 00848BD3 33C0 xor eax, eax 00848BD5 5A pop edx 00848BD6 59 pop ecx 00848BD7 59 pop ecx 00848BD8 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-`Z‰' | 00848BDB 68E88B8400 push $00848BE8 00848BE0 C3 ret * Reference to: System.@HandleFinally; | 00848BE1 E90EBFBBFF jmp 00404AF4 00848BE6 EBF8 jmp 00848BE0 ****** END | 00848BE8 5D pop ebp 00848BE9 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848BEC(Sender : TObject); begin (* 00848BEC 832D605A890001 sub dword ptr [$00895A60], +$01 00848BF3 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848BF4(Sender : TObject); begin (* 00848BF4 55 push ebp 00848BF5 8BEC mov ebp, esp 00848BF7 33C0 xor eax, eax 00848BF9 55 push ebp * Possible String Reference to: 'éÖ¾»ÿëø]ËÀƒ-dZ‰' | 00848BFA 68198C8400 push $00848C19 ***** TRY | 00848BFF 64FF30 push dword ptr fs:[eax] 00848C02 648920 mov fs:[eax], esp 00848C05 FF05645A8900 inc dword ptr [$00895A64] 00848C0B 33C0 xor eax, eax 00848C0D 5A pop edx 00848C0E 59 pop ecx 00848C0F 59 pop ecx 00848C10 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-dZ‰' | 00848C13 68208C8400 push $00848C20 00848C18 C3 ret * Reference to: System.@HandleFinally; | 00848C19 E9D6BEBBFF jmp 00404AF4 00848C1E EBF8 jmp 00848C18 ****** END | 00848C20 5D pop ebp 00848C21 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848C24(Sender : TObject); begin (* 00848C24 832D645A890001 sub dword ptr [$00895A64], +$01 00848C2B C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848C2C(Sender : TObject); begin (* 00848C2C 55 push ebp 00848C2D 8BEC mov ebp, esp 00848C2F 33C0 xor eax, eax 00848C31 55 push ebp * Possible String Reference to: 'éž¾»ÿëø]ËÀƒ-hZ‰' | 00848C32 68518C8400 push $00848C51 ***** TRY | 00848C37 64FF30 push dword ptr fs:[eax] 00848C3A 648920 mov fs:[eax], esp 00848C3D FF05685A8900 inc dword ptr [$00895A68] 00848C43 33C0 xor eax, eax 00848C45 5A pop edx 00848C46 59 pop ecx 00848C47 59 pop ecx 00848C48 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-hZ‰' | 00848C4B 68588C8400 push $00848C58 00848C50 C3 ret * Reference to: System.@HandleFinally; | 00848C51 E99EBEBBFF jmp 00404AF4 00848C56 EBF8 jmp 00848C50 ****** END | 00848C58 5D pop ebp 00848C59 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848C5C(Sender : TObject); begin (* 00848C5C 832D685A890001 sub dword ptr [$00895A68], +$01 00848C63 C3 ret *) end; procedure TfrmSKCR_YF._PROC_00848C64(Sender : TObject); begin (* 00848C64 B08C mov al, $8C 00848C66 8400 test [eax], al 00848C68 0000 add [eax], al *) end; procedure TfrmSKCR_YF._PROC_00848CCA(Sender : TObject); begin (* 00848CCA 48 dec eax 00848CCB 0050D4 add [eax-$2C], dl 00848CCE 42 inc edx 00848CCF 0008 add [eax], cl 00848CD1 2D4A007CD0 sub eax, $D07C004A 00848CD6 42 inc edx 00848CD7 00F4 add ah, dh 00848CD9 6B4A00D0 imul ecx, [edx+$00], $D0 00848CDD 1D4A0030F6 sbb eax, $F630004A 00848CE2 48 dec eax 00848CE3 004CFB48 add [ebx+edi*8+$48], cl 00848CE7 0098FA48000C add [eax+$C0048FA], bl 00848CED 7948 jns 00848D37 00848CEF 00ACF04800E829 add [eax+esi*8+$29E80048], ch 00848CF6 4A dec edx 00848CF7 00E4 add ah, ah 00848CF9 ED in eax, dx 00848CFA 48 dec eax 00848CFB 00547848 add [eax+edi*2+$48], dl 00848CFF 005878 add [eax+$78], bl 00848D02 48 dec eax 00848D03 00DC add ah, bl 00848D05 2A4A00 sub cl, byte ptr [edx+$00] 00848D08 3CA9 cmp al, $A9 00848D0A 48 dec eax 00848D0B 00C0 add al, al 00848D0D 834800D0 or dword ptr [eax+$00], -$30 00848D11 7948 jns 00848D5B 00848D13 004C8548 add [ebp+eax*4+$48], cl 00848D17 00D0 add al, dl 00848D19 2C4A sub al, $4A 00848D1B 009C2B4A008486 add [ebx+ebp+$8684004A], bl 00848D22 48 dec eax 00848D23 00482D add [eax+$2D], cl 00848D26 4A dec edx 00848D27 00C0 add al, al 00848D29 A9480038EE test eax, $EE380048 00848D2E 48 dec eax 00848D2F 00F4 add ah, dh 00848D31 EE out dx, al 00848D32 48 dec eax 00848D33 00F0 add al, dh 00848D35 E94800D8EE jmp EF5C8D82 00848D3A 48 dec eax 00848D3B 00D8 add al, bl 00848D3D 1B4A00 sbb ecx, [edx+$00] 00848D40 EC in al, dx 00848D41 334A00 xor ecx, [edx+$00] 00848D44 20C4 and ah, al 00848D46 48 dec eax 00848D47 00B0404A0010 add [eax+$10004A40], dh 00848D4D 44 inc esp 00848D4E 4A dec edx 00848D4F 00CC add ah, cl 00848D51 42 inc edx 00848D52 4A dec edx 00848D53 00B8C44800BC add [eax+$BC0048C4], bh 00848D59 C44800 les ecx, [eax+$00] 00848D5C 48 dec eax 00848D5D 45 inc ebp 00848D5E 4A dec edx 00848D5F 001CC3 add [ebx+eax*8], bl 00848D62 48 dec eax 00848D63 0018 add [eax], bl 00848D65 F0 lock 00848D66 48 dec eax 00848D67 00444C4A add [esp+ecx*2+$4A], al 00848D6B 000C02 add [edx+eax], cl 00848D6E 49 dec ecx 00848D6F 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 00848D76 4A dec edx 00848D77 008C154A003C18 add [ebp+edx+$183C004A], cl 00848D7E 4A dec edx 00848D7F 0038 add [eax], bh 00848D81 52 push edx 00848D82 4A dec edx 00848D83 005C224A add [edx+$4A], bl 00848D87 00D8 add al, bl 00848D89 224A00 and cl, byte ptr [edx+$00] 00848D8C 7C68 jl 00848DF6 00848D8E 4A dec edx 00848D8F 00941F4A003C60 add [edi+ebx+$603C004A], dl 00848D96 4A dec edx 00848D97 001447 add [edi+eax*2], dl 00848D9A 4A dec edx 00848D9B 0034654A00CC2C add [$2CCC004A], dh 00848DA2 4A dec edx 00848DA3 000E add [esi], cl 00848DA5 0000 add [eax], al 00848DA7 0000 add [eax], al 00848DA9 0002 add [edx], al 00848DAB 0000 add [eax], al 00848DAD 0020 add [eax], ah 00848DAF 114000 adc [eax+$00], eax 00848DB2 D003 rol byte ptr [ebx], 1 00848DB4 0000 add [eax], al 00848DB6 2011 and [ecx], dl 00848DB8 40 inc eax 00848DB9 00D4 add ah, dl 00848DBB 0300 add eax, [eax] 00848DBD 0036 add [esi], dh 00848DBF 00B3918400F8 add [ebx+$F8008491], dh 00848DC5 0200 add al, byte ptr [eax] 00848DC7 0000 add [eax], al 00848DC9 0008 add [eax], cl 00848DCB 54 push esp 00848DCC 6F outsd 00848DCD 6F outsd 00848DCE 6C insb 00848DCF 42 inc edx 00848DD0 61 popa 00848DD1 7231 jb 00848E04 00848DD3 FC cld 00848DD4 0200 add al, byte ptr [eax] 00848DD6 0001 add [ecx], al 00848DD8 0009 add [ecx], cl 00848DDA 54 push esp 00848DDB 42 inc edx 00848DDC 52 push edx 00848DDD 61 popa 00848DDE 667265 jb 00848E46 00848DE1 7368 jnb 00848E4B 00848DE3 0003 add [ebx], al 00848DE5 0000 add [eax], al 00848DE7 0100 add [eax], eax 00848DE9 07 pop es 00848DEA 54 push esp 00848DEB 42 inc edx 00848DEC 43 inc ebx 00848DED 6C insb 00848DEE 6F outsd 00848DEF 7365 jnb 00848E56 00848DF1 0403 add al, +$03 00848DF3 0000 add [eax], al 00848DF5 0200 add al, byte ptr [eax] 00848DF7 0C41 or al, $41 00848DF9 44 inc esp 00848DFA 4F dec edi 00848DFB 51 push ecx 00848DFC 7565 jnz 00848E63 00848DFE 7279 jb 00848E79 00848E00 54 push esp 00848E01 656D insd 00848E03 7008 jo 00848E0D 00848E05 0300 add eax, [eax] 00848E07 0002 add [edx], al 00848E09 000B add [ebx], cl 00848E0B 41 inc ecx 00848E0C 44 inc esp 00848E0D 4F dec edi 00848E0E 51 push ecx 00848E0F 7565 jnz 00848E76 00848E11 7279 jb 00848E8C 00848E13 43 inc ebx 00848E14 6D insd 00848E15 640C03 or al, $03 00848E18 0000 add [eax], al 00848E1A 0300 add eax, [eax] 00848E1C 06 push es 00848E1D 50 push eax 00848E1E 61 popa 00848E1F 6E outsb 00848E20 656C insb 00848E22 3110 xor [eax], edx 00848E24 0300 add eax, [eax] 00848E26 0001 add [ecx], al 00848E28 000B add [ebx], cl 00848E2A 54 push esp 00848E2B 6F outsd 00848E2C 6F outsd 00848E2D 6C insb 00848E2E 42 inc edx 00848E2F 7574 jnz 00848EA5 00848E31 746F jz 00848EA2 00848E33 6E outsb 00848E34 321403 xor dl, byte ptr [ebx+eax] 00848E37 0000 add [eax], al 00848E39 0200 add al, byte ptr [eax] 00848E3B 0C41 or al, $41 00848E3D 44 inc esp 00848E3E 4F dec edi 00848E3F 51 push ecx 00848E40 7565 jnz 00848EA7 00848E42 7279 jb 00848EBD 00848E44 4D dec ebp 00848E45 61 popa 00848E46 696E1803000001 imul ebp, [esi+$18], $01000003 00848E4D 000B add [ebx], cl 00848E4F 54 push esp 00848E50 6F outsd 00848E51 6F outsd 00848E52 6C insb 00848E53 42 inc edx 00848E54 7574 jnz 00848ECA 00848E56 746F jz 00848EC7 00848E58 6E outsb 00848E59 311C03 xor [ebx+eax], ebx 00848E5C 0000 add [eax], al 00848E5E 0400 add al, +$00 00848E60 03524D add edx, [edx+$4D] 00848E63 3120 xor [eax], esp 00848E65 0300 add eax, [eax] 00848E67 00050009524D add [$4D520900], al 00848E6D 44 inc esp 00848E6E 42 inc edx 00848E6F 5F pop edi 00848E70 4D dec ebp 00848E71 61 popa 00848E72 696E2403000006 imul ebp, [esi+$24], $06000003 00848E79 0006 add [esi], al 00848E7B 4C dec esp 00848E7C 61 popa 00848E7D 62656C bound esp, qword ptr [ebp+$6C] 00848E80 3328 xor ebp, [eax] 00848E82 0300 add eax, [eax] 00848E84 0007 add [edi], al 00848E86 0007 add [edi], al 00848E88 637847 arpl [eax+$47], di 00848E8B 7269 jb 00848EF6 00848E8D 64322C03 xor ch, byte ptr fs:[ebx+eax] 00848E91 0000 add [eax], al 00848E93 0800 or [eax], al 00848E95 03547632 add edx, [esi+esi*2+$32] 00848E99 3003 xor [ebx], al 00848E9B 0000 add [eax], al 00848E9D 0900 or [eax], eax 00848E9F 0C63 or al, $63 00848EA1 7847 js 00848EEA 00848EA3 7269 jb 00848F0E 00848EA5 644C dec esp 00848EA7 657665 jbe 00848F0F 00848EAA 6C insb 00848EAB 313403 xor [ebx+eax], esi 00848EAE 0000 add [eax], al 00848EB0 06 push es 00848EB1 0006 add [esi], al 00848EB3 4C dec esp 00848EB4 61 popa 00848EB5 62656C bound esp, qword ptr [ebp+$6C] 00848EB8 3238 xor bh, byte ptr [eax] 00848EBA 0300 add eax, [eax] 00848EBC 000A add [edx], cl 00848EBE 0007 add [edi], al 00848EC0 626567 bound esp, qword ptr [ebp+$67] 00848EC3 6461 popa 00848EC5 7465 jz 00848F2C 00848EC7 3C03 cmp al, $03 00848EC9 0000 add [eax], al 00848ECB 0A00 or al, byte ptr [eax] 00848ECD 07 pop es 00848ECE 45 inc ebp 00848ECF 6E outsb 00848ED0 646461 popa 00848ED3 7465 jz 00848F3A 00848ED5 40 inc eax 00848ED6 0300 add eax, [eax] 00848ED8 000B add [ebx], cl 00848EDA 0010 add [eax], dl 00848EDC 637847 arpl [eax+$47], di 00848EDF 7269 jb 00848F4A 00848EE1 6450 push eax 00848EE3 6F outsd 00848EE4 7075 jo 00848F5B 00848EE6 704D jo 00848F35 00848EE8 656E outsb 00848EEA 7532 jnz 00848F1E 00848EEC 44 inc esp 00848EED 0300 add eax, [eax] 00848EEF 000C00 add [eax+eax], cl 00848EF2 0544535F48 add eax, +$485F5344 00848EF7 5A pop edx 00848EF8 48 dec eax 00848EF9 0300 add eax, [eax] 00848EFB 000D00064344 add [$44430600], cl 00848F01 53 push ebx 00848F02 5F pop edi 00848F03 48 dec eax 00848F04 5A pop edx 00848F05 4C dec esp 00848F06 0300 add eax, [eax] 00848F08 0006 add [esi], al 00848F0A 0006 add [esi], al 00848F0C 4C dec esp 00848F0D 61 popa 00848F0E 62656C bound esp, qword ptr [ebp+$6C] 00848F11 315003 xor [eax+$03], edx 00848F14 0000 add [eax], al 00848F16 0E push cs 00848F17 0009 add [ecx], cl 00848F19 7632 jbe 00848F4D 00848F1B 43 inc ebx 00848F1C 6F outsd 00848F1D 6C insb 00848F1E 756D jnz 00848F8D 00848F20 6E outsb 00848F21 31540300 xor [ebx+eax+$00], edx 00848F25 000E add [esi], cl 00848F27 0009 add [ecx], cl 00848F29 7632 jbe 00848F5D 00848F2B 43 inc ebx 00848F2C 6F outsd 00848F2D 6C insb 00848F2E 756D jnz 00848F9D 00848F30 6E outsb 00848F31 325803 xor bl, byte ptr [eax+$03] 00848F34 0000 add [eax], al 00848F36 0E push cs 00848F37 0009 add [ecx], cl 00848F39 7632 jbe 00848F6D 00848F3B 43 inc ebx 00848F3C 6F outsd 00848F3D 6C insb 00848F3E 756D jnz 00848FAD 00848F40 6E outsb 00848F41 355C030000 xor eax, $0000035C 00848F46 0E push cs 00848F47 0009 add [ecx], cl 00848F49 7632 jbe 00848F7D 00848F4B 43 inc ebx 00848F4C 6F outsd 00848F4D 6C insb 00848F4E 756D jnz 00848FBD 00848F50 6E outsb 00848F51 3660 pusha 00848F53 0300 add eax, [eax] 00848F55 000E add [esi], cl 00848F57 0009 add [ecx], cl 00848F59 7632 jbe 00848F8D 00848F5B 43 inc ebx 00848F5C 6F outsd 00848F5D 6C insb 00848F5E 756D jnz 00848FCD 00848F60 6E outsb 00848F61 37 aaa 00848F62 640300 add eax, fs:[eax] 00848F65 000E add [esi], cl 00848F67 0009 add [ecx], cl 00848F69 7632 jbe 00848F9D 00848F6B 43 inc ebx 00848F6C 6F outsd 00848F6D 6C insb 00848F6E 756D jnz 00848FDD 00848F70 6E outsb 00848F71 386803 cmp [eax+$03], ch 00848F74 0000 add [eax], al 00848F76 0E push cs 00848F77 0009 add [ecx], cl 00848F79 7632 jbe 00848FAD 00848F7B 43 inc ebx 00848F7C 6F outsd 00848F7D 6C insb 00848F7E 756D jnz 00848FED 00848F80 6E outsb 00848F81 396C0300 cmp [ebx+eax+$00], ebp 00848F85 000E add [esi], cl 00848F87 000A add [edx], cl 00848F89 7632 jbe 00848FBD 00848F8B 43 inc ebx 00848F8C 6F outsd 00848F8D 6C insb 00848F8E 756D jnz 00848FFD 00848F90 6E outsb 00848F91 3130 xor [eax], esi 00848F93 7003 jo 00848F98 00848F95 0000 add [eax], al 00848F97 0E push cs 00848F98 0009 add [ecx], cl 00848F9A 7632 jbe 00848FCE 00848F9C 43 inc ebx 00848F9D 6F outsd 00848F9E 6C insb 00848F9F 756D jnz 0084900E 00848FA1 6E outsb 00848FA2 3474 xor al, $74 00848FA4 0300 add eax, [eax] 00848FA6 000E add [esi], cl 00848FA8 000476 add [esi+esi*2], al 00848FAB 327073 xor dh, byte ptr [eax+$73] 00848FAE 7803 js 00848FB3 00848FB0 0000 add [eax], al 00848FB2 0E push cs 00848FB3 0009 add [ecx], cl 00848FB5 7632 jbe 00848FE9 00848FB7 43 inc ebx 00848FB8 6F outsd 00848FB9 6C insb 00848FBA 756D jnz 00849029 00848FBC 6E outsb 00848FBD 337C0300 xor edi, [ebx+eax+$00] 00848FC1 000E add [esi], cl 00848FC3 0008 add [eax], cl 00848FC5 7632 jbe 00848FF9 00848FC7 59 pop ecx 00848FC8 46 inc esi 00848FC9 4E dec esi 00848FCA 61 popa 00848FCB 6D insd 00848FCC 65800300 add byte ptr gs:[ebx], $00 00848FD0 000E add [esi], cl 00848FD2 0008 add [eax], cl 00848FD4 7632 jbe 00849008 00848FD6 50 push eax 00848FD7 5F pop edi 00848FD8 53 push ebx 00848FD9 7065 jo 00849040 00848FDB 63840300000E00 arpl [ebx+eax+$E0000], ax 00848FE2 0B7632 or esi, [esi+$32] 00848FE5 43 inc ebx 00848FE6 6F outsd 00848FE7 6D insd 00848FE8 54 push esp 00848FE9 61 popa 00848FEA 69546F7588030000 imul edx, [edi+ebp*2+$75], $00000388 00848FF2 06 push es 00848FF3 0006 add [esi], al 00848FF5 4C dec esp 00848FF6 61 popa 00848FF7 62656C bound esp, qword ptr [ebp+$6C] 00848FFA 348C xor al, $8C 00848FFC 0300 add eax, [eax] 00848FFE 000F add [edi], cl 00849000 0009 add [ecx], cl 00849002 43 inc ebx 00849003 6F outsd 00849004 6D insd 00849005 54 push esp 00849006 61 popa 00849007 69546F7590030000 imul edx, [edi+ebp*2+$75], $00000390 0084900F 06 push es 00849010 0006 add [esi], al 00849012 4C dec esp 00849013 61 popa 00849014 62656C bound esp, qword ptr [ebp+$6C] 00849017 3594030000 xor eax, $00000394 0084901C 0F000A str word ptr [edx] 0084901F 50 push eax 00849020 5F pop edi 00849021 43 inc ebx 00849022 6F outsd 00849023 64654E dec esi 00849026 61 popa 00849027 6D insd 00849028 6598 cwde 0084902A 0300 add eax, [eax] 0084902C 0006 add [esi], al 0084902E 0006 add [esi], al 00849030 4C dec esp 00849031 61 popa 00849032 62656C bound esp, qword ptr [ebp+$6C] 00849035 37 aaa 00849036 9C pushf 00849037 0300 add eax, [eax] 00849039 000F add [edi], cl 0084903B 0008 add [eax], cl 0084903D 46 inc esi 0084903E 4B dec ebx 0084903F 54 push esp 00849040 61 popa 00849041 69746F75A0030000 imul esi, [edi+ebp*2+$75], $000003A0 00849049 06 push es 0084904A 0006 add [esi], al 0084904C 4C dec esp 0084904D 61 popa 0084904E 62656C bound esp, qword ptr [ebp+$6C] 00849051 38A40300001000 cmp [ebx+eax+$100000], ah 00849058 06 push es 00849059 4B dec ebx 0084905A 48 dec eax 0084905B 54 push esp 0084905C 7970 jns 008490CE 0084905E 65A803 test al, $03 00849061 0000 add [eax], al 00849063 0E push cs 00849064 0008 add [eax], cl 00849066 7632 jbe 0084909A 00849068 4B dec ebx 00849069 48 dec eax 0084906A 54 push esp 0084906B 7970 jns 008490DD 0084906D 65AC lodsb 0084906F 0300 add eax, [eax] 00849071 0010 add [eax], dl 00849073 000B add [ebx], cl 00849075 46 inc esi 00849076 61 popa 00849077 63746F72 arpl [edi+ebp*2+$72], si 0084907B 794E jns 008490CB 0084907D 61 popa 0084907E 6D insd 0084907F 65B003 mov al, $03 00849082 0000 add [eax], al 00849084 0E push cs 00849085 0009 add [ecx], cl 00849087 7632 jbe 008490BB 00849089 46 inc esi 0084908A 58 pop eax 0084908B 4D dec ebp 0084908C 6F outsd 0084908D 6E outsb 0084908E 6579B4 jns 00849045 00849091 0300 add eax, [eax] 00849093 000E add [esi], cl 00849095 0008 add [eax], cl 00849097 7653 jbe 008490EC 00849099 58 pop eax 0084909A 4D dec ebp 0084909B 6F outsd 0084909C 6E outsb 0084909D 6579B8 jns 00849058 008490A0 0300 add eax, [eax] 008490A2 0006 add [esi], al 008490A4 0006 add [esi], al 008490A6 4C dec esp 008490A7 61 popa 008490A8 62656C bound esp, qword ptr [ebp+$6C] 008490AB 36BC0300000F mov esp, $0F000003 008490B1 0005436F6E4E add [$4E6E6F43], al 008490B7 4F dec edi 008490B8 C00300 rol byte ptr [ebx], $00 008490BB 0006 add [esi], al 008490BD 0006 add [esi], al 008490BF 4C dec esp 008490C0 61 popa 008490C1 62656C bound esp, qword ptr [ebp+$6C] 008490C4 39C4 cmp esp, eax 008490C6 0300 add eax, [eax] 008490C8 000F add [edi], cl 008490CA 0007 add [edi], al 008490CC 4F dec edi 008490CD 7264 jb 00849133 008490CF 65724E jb 00849120 008490D2 6F outsd 008490D3 C803 enter , $03 008490D5 0000 add [eax], al 008490D7 0E push cs 008490D8 0007 add [edi], al 008490DA 7632 jbe 0084910E 008490DC 43 inc ebx 008490DD 6F outsd 008490DE 6E outsb 008490DF 4E dec esi 008490E0 4F dec edi 008490E1 CC int 3 008490E2 0300 add eax, [eax] 008490E4 000E add [esi], cl 008490E6 0009 add [ecx], cl 008490E8 7632 jbe 0084911C 008490EA 4F dec edi 008490EB 7264 jb 00849151 008490ED 65724E jb 0084913E 008490F0 6F outsd 008490F1 0900 or [eax], eax 008490F3 1200 adc al, byte ptr [eax] 008490F5 A4 movsb 008490F6 AB stosd 008490F7 8400 test [eax], al 008490F9 0B466F or eax, [esi+$6F] 008490FC 726D jb 0084916B 008490FE 44 inc esp 008490FF 657374 jnb 00849176 00849102 726F jb 00849173 00849104 7910 jns 00849116 00849106 00ACAB84000946 add [ebx+ebp*4+$46090084], ch 0084910D 6F outsd 0084910E 726D jb 0084917D 00849110 43 inc ebx 00849111 6C insb 00849112 6F outsd 00849113 7365 jnb 0084917A 00849115 1300 adc eax, [eax] 00849117 B0AB mov al, $AB 00849119 8400 test [eax], al 0084911B 0C54 or al, $54 0084911D 42 inc edx 0084911E 43 inc ebx 0084911F 6C insb 00849120 6F outsd 00849121 7365 jnb 00849188 00849123 43 inc ebx 00849124 6C insb 00849125 69636B0F0020AC imul esp, [ebx+$6B], $AC20000F 0084912C 8400 test [eax], al 0084912E 08466F or [esi+$6F], al 00849131 726D jb 008491A0 00849133 53 push ebx 00849134 686F771500 push $0015776F 00849139 5C pop esp 0084913A AD lodsd 0084913B 8400 test [eax], al 0084913D 0E push cs 0084913E 54 push esp 0084913F 42 inc edx 00849140 52 push edx 00849141 61 popa 00849142 667265 jb 008491AA 00849145 7368 jnb 008491AF 00849147 43 inc ebx 00849148 6C insb 00849149 69636B170064AD imul esp, [ebx+$6B], $AD640017 00849150 8400 test [eax], al 00849152 10546F6F adc [edi+ebp*2+$6F], dl 00849156 6C insb 00849157 42 inc edx 00849158 7574 jnz 008491CE 0084915A 746F jz 008491CB 0084915C 6E outsb 0084915D 32436C xor al, byte ptr [ebx+$6C] 00849160 69636B18006CAD imul esp, [ebx+$6B], $AD6C0018 00849167 8400 test [eax], al 00849169 114661 adc [esi+$61], eax 0084916C 63746F72 arpl [edi+ebp*2+$72], si 00849170 794E jns 008491C0 00849172 61 popa 00849173 6D insd 00849174 6543 inc ebx 00849176 68616E6765 push $65676E61 0084917B 17 pop ss 0084917C 0080AD840010 add [eax+$100084AD], al 00849182 54 push esp 00849183 6F outsd 00849184 6F outsd 00849185 6C insb 00849186 42 inc edx 00849187 7574 jnz 008491FD 00849189 746F jz 008491FA 0084918B 6E outsb 0084918C 31436C xor [ebx+$6C], eax 0084918F 69636B1100E0AD imul esp, [ebx+$6B], $ADE00011 00849196 8400 test [eax], al 00849198 0A466F or al, byte ptr [esi+$6F] 0084919B 726D jb 0084920A 0084919D 43 inc ebx 0084919E 7265 jb 00849205 008491A0 61 popa 008491A1 7465 jz 00849208 008491A3 0F54 DB $0F, $54 // 008491A5 66726D jb 00849215 008491A8 59 pop ecx 008491A9 46 inc esi 008491AA 5A pop edx 008491AB 44 inc esp 008491AC 4C dec esp 008491AD 6973745F4D5811 imul esi, [ebx+$74], $11584D5F 008491B4 0028 add [eax], ch 008491B6 94 xchg eax, esp 008491B7 45 inc ebp 008491B8 00648A45 add [edx+ecx*4+$45], ah 008491BC 00B8124D0020 add [eax+$20004D12], bh 008491C2 42 inc edx 008491C3 44 inc esp 008491C4 0064D378 add [ebx+edx*8+$78], ah 008491C8 00A80A78001C add [eax+$1C00780A], ch 008491CE 5F pop edi 008491CF 47 inc edi 008491D0 0000 add [eax], al 008491D2 16 push ss 008491D3 6300 arpl [eax], ax 008491D5 F4 hlt 008491D6 B466 mov ah, $66 008491D8 00A40E6400E0A5 add [esi+ecx+$A5E00064], ah 008491DF 45 inc ebp 008491E0 005876 add [eax+$76], bl 008491E3 7C00 jl 008491E5 008491E5 087F4B or [edi+$4B], bh 008491E8 0088996A0034 add [eax+$34006A99], cl 008491EE B166 mov cl, $66 008491F0 00B8674700F4 add [eax+$F4004767], bh 008491F6 8147008D400000 add dword ptr [edi+$00], $0000408D 008491FD 92 xchg eax, edx 008491FE 8400 test [eax], al 00849200 07 pop es 00849201 0F54 DB $0F, $54 // 00849203 66726D jb 00849273 00849206 59 pop ecx 00849207 46 inc esi 00849208 5A pop edx 00849209 44 inc esp 0084920A 4C dec esp 0084920B 6973745F4D58B0 imul esi, [ebx+$74], $B0584D5F 00849212 8C8400D0F24900 mov word ptr [eax+eax+$49F2D0], es 00849219 5E pop esi 0084921A 000D555F5946 add [$46595F55], cl 00849220 5A pop edx 00849221 44 inc esp 00849222 4C dec esp 00849223 6973745F4D5800 imul esi, [ebx+$74], $00584D5F 0084922A 0090558BECB9 add [eax+$B9EC8B55], dl 00849230 54 push esp 00849231 0000 add [eax], al *) end; end.