unit U_FKCR_SH; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmFKCR_SH=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBDel: TToolButton; TBClose: TToolButton; ADOQueryTemp: TADOQuery; ADOQueryCmd: TADOQuery; Panel1: TPanel; ToolButton2: TToolButton; Label1: TLabel; YFName: TEdit; ADOQueryMain: TADOQuery; ToolButton1: TToolButton; RM1: TRMGridReport; RMDB_Main: TRMDBDataSet; Label3: TLabel; FactoryName: TEdit; Label2: TLabel; begdate: TDateTimePicker; Enddate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; ToolButton3: TToolButton; Label4: TLabel; ComTaitou: TEdit; cxTabControl1: TcxTabControl; Tchk: TToolButton; TNochk: TToolButton; Label5: TLabel; conNo: TEdit; Nochk: TToolButton; PopupMenu1: TPopupMenu; N1: TMenuItem; N2: TMenuItem; ChkNote: TEdit; Label17: TLabel; CheckBox1: TCheckBox; Label10: TLabel; Label12: TLabel; Label7: TLabel; FKType: TEdit; Label6: TLabel; Note: TEdit; cxGrid2: TcxGrid; Tv2: TcxGridDBTableView; v2Ssel: TcxGridDBColumn; cxGridDBColumn1: TcxGridDBColumn; v2Column6: TcxGridDBColumn; cxGridDBColumn3: TcxGridDBColumn; VBZ: TcxGridDBColumn; VYB: TcxGridDBColumn; VHL: TcxGridDBColumn; v2FXMoney: TcxGridDBColumn; v2SXMoney: TcxGridDBColumn; v2BankName: TcxGridDBColumn; v2BankNo: TcxGridDBColumn; VBB: TcxGridDBColumn; v2ComTaiTou: TcxGridDBColumn; v2Chkstatus: TcxGridDBColumn; v2FKType: TcxGridDBColumn; v2chknote: TcxGridDBColumn; v2Column1: TcxGridDBColumn; cxGridLevel1: TcxGridLevel; v2Huilv: TcxGridDBColumn; v2KPStatus: TcxGridDBColumn; v2COrderNo: TcxGridDBColumn; Label9: TLabel; OrderNO: TEdit; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure TBDelClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure FactoryNameChange(Sender : TObject); procedure Button2Click(Sender : TObject); procedure cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); procedure cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); procedure ToolButton3Click(Sender : TObject); procedure cxGridDBColumn3PropertiesButtonClick(Sender : TObject); procedure cxGridDBColumn6PropertiesButtonClick(Sender : TObject); procedure v2Column3PropertiesButtonClick(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure v2Column4PropertiesEditValueChanged(Sender : TObject); procedure v2Column1PropertiesButtonClick(Sender : TObject); procedure VBBPropertiesEditValueChanged(Sender : TObject); procedure ComTaitouChange(Sender : TObject); procedure v2Column1PropertiesEditValueChanged(Sender : TObject); procedure v2DerateMoneyPropertiesEditValueChanged(Sender : TObject); procedure v2fstr1PropertiesEditValueChanged(Sender : TObject); procedure TchkClick(Sender : TObject); procedure TNochkClick(Sender : TObject); procedure cxTabControl1Change(Sender : TObject); procedure NochkClick(Sender : TObject); procedure N1Click(Sender : TObject); procedure N2Click(Sender : TObject); procedure CheckBox1Click(Sender : TObject); procedure v2SselPropertiesChange(Sender : TObject); procedure _PROC_00834889(Sender : TObject); procedure _PROC_008352A5(Sender : TObject); procedure _PROC_00835B25(Sender : TObject); procedure _PROC_00835EF5(Sender : TObject); procedure _PROC_008366D1(Sender : TObject); procedure _PROC_00836A0D(Sender : TObject); procedure _PROC_00837129(Sender : TObject); procedure _PROC_00837446(Sender : TObject); procedure _PROC_0083747C(Sender : TObject); procedure _PROC_00837489(Sender : TObject); procedure _PROC_008377CD(Sender : TObject); procedure _PROC_00837DD9(Sender : TObject); procedure _PROC_00838299(Sender : TObject); procedure _PROC_00838685(Sender : TObject); procedure _PROC_00838971(Sender : TObject); procedure _PROC_00838BA1(Sender : TObject); procedure _PROC_00838D15(Sender : TObject); procedure _PROC_008398A9(Sender : TObject); procedure _PROC_008398D8(Sender : TObject); procedure _PROC_008398E0(Sender : TObject); procedure _PROC_00839910(Sender : TObject); procedure _PROC_00839918(Sender : TObject); procedure _PROC_00839948(Sender : TObject); procedure _PROC_00839950(Sender : TObject); procedure _PROC_00839980(Sender : TObject); procedure _PROC_00839988(Sender : TObject); procedure _PROC_008399B8(Sender : TObject); procedure _PROC_008399C0(Sender : TObject); procedure _PROC_008399F0(Sender : TObject); procedure _PROC_008399F8(Sender : TObject); procedure _PROC_00839A28(Sender : TObject); procedure _PROC_00839A30(Sender : TObject); procedure _PROC_00839A60(Sender : TObject); procedure _PROC_00839A68(Sender : TObject); procedure _PROC_00839A98(Sender : TObject); procedure _PROC_00839AA0(Sender : TObject); procedure _PROC_00839AD0(Sender : TObject); procedure _PROC_00839AD8(Sender : TObject); procedure _PROC_00839B08(Sender : TObject); procedure _PROC_00839B10(Sender : TObject); procedure _PROC_00839B40(Sender : TObject); procedure _PROC_00839B48(Sender : TObject); procedure _PROC_00839B78(Sender : TObject); procedure _PROC_00839B80(Sender : TObject); procedure _PROC_00839BB0(Sender : TObject); procedure _PROC_00839BB8(Sender : TObject); procedure _PROC_00839BE8(Sender : TObject); procedure _PROC_00839BF0(Sender : TObject); procedure _PROC_00839C20(Sender : TObject); procedure _PROC_00839C28(Sender : TObject); procedure _PROC_00839C58(Sender : TObject); procedure _PROC_00839C60(Sender : TObject); procedure _PROC_00839C90(Sender : TObject); procedure _PROC_00839C98(Sender : TObject); procedure _PROC_00839CC8(Sender : TObject); procedure _PROC_00839CD0(Sender : TObject); procedure _PROC_00839D00(Sender : TObject); procedure _PROC_00839D08(Sender : TObject); procedure _PROC_00839D38(Sender : TObject); procedure _PROC_00839D40(Sender : TObject); procedure _PROC_00839D70(Sender : TObject); procedure _PROC_00839D78(Sender : TObject); procedure _PROC_00839D87(Sender : TObject); procedure _PROC_00839D9B(Sender : TObject); procedure _PROC_00839DDE(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmFKCR_SH: TfrmFKCR_SH; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmFKCR_SH.FormDestroy(Sender : TObject); begin (* 00834CA4 33C0 xor eax, eax * Reference to GlobalVar_008959D4 | 00834CA6 A3D4598900 mov dword ptr [$008959D4], eax 00834CAB C3 ret *) end; procedure TfrmFKCR_SH.FormClose(Sender : TObject); begin (* 00834CAC C60102 mov byte ptr [ecx], $02 00834CAF C3 ret *) end; procedure TfrmFKCR_SH.TBCloseClick(Sender : TObject); begin (* 00834CB0 53 push ebx 00834CB1 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00834CB3 B9DC4C8300 mov ecx, $00834CDC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 00834CB8 8B93A8030000 mov edx, [ebx+$03A8] * Possible String Reference to: '¸¶¿îµÇ¼Ç' | 00834CBE B8F04C8300 mov eax, $00834CF0 | 00834CC3 E8D82EF8FF call 007B7BA0 00834CC8 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 00834CCA E8C912C7FF call 004A5F98 00834CCF 5B pop ebx 00834CD0 C3 ret *) end; procedure TfrmFKCR_SH.TBDelClick(Sender : TObject); begin (* 00834CFC 55 push ebp 00834CFD 8BEC mov ebp, esp 00834CFF 33C9 xor ecx, ecx 00834D01 51 push ecx 00834D02 51 push ecx 00834D03 51 push ecx 00834D04 51 push ecx 00834D05 51 push ecx 00834D06 51 push ecx 00834D07 51 push ecx 00834D08 51 push ecx 00834D09 53 push ebx 00834D0A 56 push esi 00834D0B 57 push edi 00834D0C 8945FC mov [ebp-$04], eax 00834D0F 33C0 xor eax, eax 00834D11 55 push ebp * Possible String Reference to: 'éìû¼ÿëã_^[‹å]Ã' | 00834D12 68034F8300 push $00834F03 ***** TRY | 00834D17 64FF30 push dword ptr fs:[eax] 00834D1A 648920 mov fs:[eax], esp 00834D1D 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00834D20 8B804C030000 mov eax, [eax+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00834D26 E89531C9FF call 004C7EC0 00834D2B 84C0 test al, al 00834D2D 0F85AD010000 jnz 00834EE0 00834D33 A0144F8300 mov al, byte ptr [$00834F14] 00834D38 50 push eax 00834D39 8D45EC lea eax, [ebp-$14] 00834D3C B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00834D3E E82140BEFF call 00418D64 00834D43 8D4DEC lea ecx, [ebp-$14] 00834D46 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00834D49 8B804C030000 mov eax, [eax+$034C] * Possible String Reference to: 'ssel' | 00834D4F BA204F8300 mov edx, $00834F20 00834D54 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 00834D56 FF9344020000 call dword ptr [ebx+$0244] 00834D5C 84C0 test al, al 00834D5E 751D jnz 00834D7D 00834D60 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00834D62 B9284F8300 mov ecx, $00834F28 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00834D67 BA304F8300 mov edx, $00834F30 *) end; procedure TfrmFKCR_SH.FormShow(Sender : TObject); begin (* 00834FB0 53 push ebx 00834FB1 8BD8 mov ebx, eax 00834FB3 33C0 xor eax, eax * Reference to field TfrmFKCR_SH.OFFS_0408 | 00834FB5 898308040000 mov [ebx+$0408], eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00834FBB B938508300 mov ecx, $00835038 * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 00834FC0 8B93A8030000 mov edx, [ebx+$03A8] * Possible String Reference to: '¸¶¿îµÇ¼Ç' | 00834FC6 B84C508300 mov eax, $0083504C | 00834FCB E8D429F8FF call 007B79A4 * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 00834FD0 8B8308030000 mov eax, [ebx+$0308] | 00834FD6 E8ADF9F7FF call 007B4988 00834FDB 83C4F8 add esp, -$08 00834FDE DD1C24 fstp qword ptr [esp] 00834FE1 9B wait * Reference to control TfrmFKCR_SH.Enddate : TDateTimePicker | 00834FE2 8B8340030000 mov eax, [ebx+$0340] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00834FE8 E83FD2C3FF call 0047222C * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 00834FED 8B8308030000 mov eax, [ebx+$0308] | 00834FF3 E890F9F7FF call 007B4988 00834FF8 D82558508300 fsub dword ptr [$00835058] 00834FFE 83C4F8 add esp, -$08 00835001 DD1C24 fstp qword ptr [esp] 00835004 9B wait * Reference to control TfrmFKCR_SH.begdate : TDateTimePicker | 00835005 8B833C030000 mov eax, [ebx+$033C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 0083500B E81CD2C3FF call 0047222C 00835010 B201 mov dl, $01 * Reference to control TfrmFKCR_SH.VBZ : TcxGridDBColumn | 00835012 8B83BC030000 mov eax, [ebx+$03BC] * Reference to : TcxCustomGridTableView._PROC_00629BC4() | 00835018 E8A74BDFFF call 00629BC4 0083501D 8BC3 mov eax, ebx | 0083501F E84CF7FFFF call 00834770 00835024 8BC3 mov eax, ebx | 00835026 E85DF8FFFF call 00834888 0083502B 5B pop ebx 0083502C C3 ret *) end; procedure TfrmFKCR_SH.TBRafreshClick(Sender : TObject); begin (* 0083505C 53 push ebx 0083505D 8BD8 mov ebx, eax * Reference to control TfrmFKCR_SH.ToolBar1 : TToolBar | 0083505F 8B83F8020000 mov eax, [ebx+$02F8] 00835065 8B10 mov edx, [eax] * Reference to method TToolBar.SetFocus() | 00835067 FF92C4000000 call dword ptr [edx+$00C4] 0083506D 8BC3 mov eax, ebx | 0083506F E814F8FFFF call 00834888 00835074 5B pop ebx 00835075 C3 ret *) end; procedure TfrmFKCR_SH.ToolButton2Click(Sender : TObject); begin (* 00835078 55 push ebp 00835079 8BEC mov ebp, esp 0083507B 6A00 push $00 0083507D 53 push ebx 0083507E 8BD8 mov ebx, eax 00835080 33C0 xor eax, eax 00835082 55 push ebp 00835083 68FD508300 push $008350FD ***** TRY | 00835088 64FF30 push dword ptr fs:[eax] 0083508B 648920 mov fs:[eax], esp 0083508E BA10518300 mov edx, $00835110 * Reference to control TfrmFKCR_SH.Label12 : TLabel | 00835093 8B8390030000 mov eax, [ebx+$0390] * Reference to: Controls.TControl.SetText(TControl;TCaption); | 00835099 E88235C5FF call 00488620 0083509E 8D45FC lea eax, [ebp-$04] 008350A1 50 push eax 008350A2 B902000000 mov ecx, $00000002 008350A7 BA01000000 mov edx, $00000001 * Reference to control TfrmFKCR_SH.Panel1 : TPanel | 008350AC 8B8310030000 mov eax, [ebx+$0310] | 008350B2 E8F90FF8FF call 007B60B0 008350B7 8B55FC mov edx, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 008350BA 8B8320030000 mov eax, [ebx+$0320] | 008350C0 E8031CF8FF call 007B6CC8 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008350C5 8B934C030000 mov edx, [ebx+$034C] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 008350CB 8B8320030000 mov eax, [ebx+$0320] | 008350D1 E8BA1DF8FF call 007B6E90 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008350D6 8B934C030000 mov edx, [ebx+$034C] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 008350DC 8B8320030000 mov eax, [ebx+$0320] | 008350E2 E8311FF8FF call 007B7018 008350E7 33C0 xor eax, eax 008350E9 5A pop edx 008350EA 59 pop ecx 008350EB 59 pop ecx 008350EC 648910 mov fs:[eax], edx ****** FINALLY | 008350EF 6804518300 push $00835104 008350F4 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 008350F7 E82802BDFF call 00405324 008350FC C3 ret * Reference to: System.@HandleFinally; | 008350FD E9F2F9BCFF jmp 00404AF4 00835102 EBF0 jmp 008350F4 ****** END | 00835104 5B pop ebx 00835105 59 pop ecx 00835106 5D pop ebp 00835107 C3 ret *) end; procedure TfrmFKCR_SH.FactoryNameChange(Sender : TObject); begin (* 00835114 56 push esi * Reference to control TfrmFKCR_SH.ToolButton2 : TToolButton | 00835115 8B8014030000 mov eax, [eax+$0314] 0083511B 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 0083511F E830F4BCFF call 00404554 00835124 5E pop esi 00835125 C3 ret *) end; procedure TfrmFKCR_SH.Button2Click(Sender : TObject); begin (* 00835128 55 push ebp 00835129 8BEC mov ebp, esp 0083512B 33C9 xor ecx, ecx 0083512D 51 push ecx 0083512E 51 push ecx 0083512F 51 push ecx 00835130 51 push ecx 00835131 51 push ecx 00835132 53 push ebx 00835133 56 push esi 00835134 8BD8 mov ebx, eax 00835136 33C0 xor eax, eax 00835138 55 push ebp * Possible String Reference to: 'éºø¼ÿëë^[‹å]Ã' | 00835139 6835528300 push $00835235 ***** TRY | 0083513E 64FF30 push dword ptr fs:[eax] 00835141 648920 mov fs:[eax], esp * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00835144 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 0083514A E8712DC9FF call 004C7EC0 0083514F 84C0 test al, al 00835151 0F85C3000000 jnz 0083521A 00835157 6A24 push $24 * Possible String Reference to: 'Ìáʾ' | 00835159 B944528300 mov ecx, $00835244 * Possible String Reference to: 'È·¶¨ÒªÉ¾³ýÊý¾ÝÂð£¿' | 0083515E BA4C528300 mov edx, $0083524C *) end; procedure TfrmFKCR_SH.cxGridDBColumn8PropertiesEditValueChanged(Sender : TObject); begin (* 00835CD0 55 push ebp 00835CD1 8BEC mov ebp, esp 00835CD3 B908000000 mov ecx, $00000008 00835CD8 6A00 push $00 00835CDA 6A00 push $00 00835CDC 49 dec ecx 00835CDD 75F9 jnz 00835CD8 00835CDF 51 push ecx 00835CE0 53 push ebx 00835CE1 56 push esi 00835CE2 8BDA mov ebx, edx 00835CE4 8BF0 mov esi, eax 00835CE6 33C0 xor eax, eax 00835CE8 55 push ebp 00835CE9 68DE5E8300 push $00835EDE ***** TRY | 00835CEE 64FF30 push dword ptr fs:[eax] 00835CF1 648920 mov fs:[eax], esp 00835CF4 8D55FC lea edx, [ebp-$04] 00835CF7 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; | 00835CF9 E8BE99D5FF call 0058F6BC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 00835CFE 8B86A8030000 mov eax, [esi+$03A8] * 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; | 00835D04 E84366E2FF 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; | 00835D09 E856BEE1FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00835D0E 8B4050 mov eax, [eax+$50] 00835D11 8D55F4 lea edx, [ebp-$0C] 00835D14 8B08 mov ecx, [eax] 00835D16 FF5110 call dword ptr [ecx+$10] 00835D19 8B45F4 mov eax, [ebp-$0C] 00835D1C 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D1F E8C84BBDFF call 0040A8EC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00835D24 8B9E4C030000 mov ebx, [esi+$034C] 00835D2A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00835D2C E80F27C9FF call 004C8440 00835D31 8D55E0 lea edx, [ebp-$20] 00835D34 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D37 E8B04BBDFF call 0040A8EC 00835D3C 8B55E0 mov edx, [ebp-$20] 00835D3F 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00835D42 E88130BEFF call 00418DC8 00835D47 8D45E4 lea eax, [ebp-$1C] 00835D4A 50 push eax 00835D4B 8B55F8 mov edx, [ebp-$08] 00835D4E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00835D50 E85F0EC9FF call 004C6BB4 00835D55 5A pop edx 00835D56 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00835D58 FF91B4000000 call dword ptr [ecx+$00B4] 00835D5E 8BC3 mov eax, ebx 00835D60 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00835D62 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00835D68 8B9E0C030000 mov ebx, [esi+$030C] 00835D6E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00835D70 E85FFBC8FF call 004C58D4 00835D75 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00835D77 E83082CAFF call 004DDFAC 00835D7C 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00835D7E FF5244 call dword ptr [edx+$44] 00835D81 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00835D83 E82482CAFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 00835D88 BAF45E8300 mov edx, $00835EF4 00835D8D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00835D8F FF5138 call dword ptr [ecx+$38] 00835D92 8D55DC lea edx, [ebp-$24] 00835D95 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D98 E84F4BBDFF call 0040A8EC 00835D9D 837DDC00 cmp dword ptr [ebp-$24], +$00 00835DA1 7440 jz 00835DE3 * Possible String Reference to: ' Set ' | 00835DA3 68105F8300 push $00835F10 00835DA8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00835DAB 68205F8300 push $00835F20 00835DB0 8D55D4 lea edx, [ebp-$2C] 00835DB3 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835DB6 E8314BBDFF call 0040A8EC 00835DBB FF75D4 push dword ptr [ebp-$2C] 00835DBE 682C5F8300 push $00835F2C 00835DC3 8D45D8 lea eax, [ebp-$28] 00835DC6 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00835DCB E8E4F8BCFF call 004056B4 00835DD0 8B45D8 mov eax, [ebp-$28] 00835DD3 50 push eax 00835DD4 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00835DD6 E8D181CAFF call 004DDFAC 00835DDB 5A pop edx 00835DDC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00835DDE FF5138 call dword ptr [ecx+$38] 00835DE1 EB2B jmp 00835E0E 00835DE3 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00835DE5 E8C281CAFF call 004DDFAC 00835DEA 50 push eax * Possible String Reference to: ' Set ' | 00835DEB 68105F8300 push $00835F10 00835DF0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 00835DF3 68385F8300 push $00835F38 00835DF8 8D45D0 lea eax, [ebp-$30] 00835DFB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00835E00 E8AFF8BCFF call 004056B4 00835E05 8B55D0 mov edx, [ebp-$30] 00835E08 58 pop eax 00835E09 8B08 mov ecx, [eax] 00835E0B FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00835E0E 68485F8300 push $00835F48 00835E13 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmFKCR_SH.cxGridDBColumn5PropertiesEditValueChanged(Sender : TObject); begin (* 00835F9C 55 push ebp 00835F9D 8BEC mov ebp, esp 00835F9F B91C000000 mov ecx, $0000001C 00835FA4 6A00 push $00 00835FA6 6A00 push $00 00835FA8 49 dec ecx 00835FA9 75F9 jnz 00835FA4 00835FAB 51 push ecx 00835FAC 53 push ebx 00835FAD 56 push esi 00835FAE 8BF2 mov esi, edx 00835FB0 8BD8 mov ebx, eax 00835FB2 33C0 xor eax, eax 00835FB4 55 push ebp 00835FB5 68FF658300 push $008365FF ***** TRY | 00835FBA 64FF30 push dword ptr fs:[eax] 00835FBD 648920 mov fs:[eax], esp 00835FC0 8D55FC lea edx, [ebp-$04] 00835FC3 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; | 00835FC5 E8F296D5FF call 0058F6BC 00835FCA 8D55DC lea edx, [ebp-$24] 00835FCD 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835FD0 E81749BDFF call 0040A8EC 00835FD5 837DDC00 cmp dword ptr [ebp-$24], +$00 00835FD9 750D jnz 00835FE8 00835FDB 8D45FC lea eax, [ebp-$04] 00835FDE BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 00835FE3 E8D4F3BCFF call 004053BC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 00835FE8 8B83A8030000 mov eax, [ebx+$03A8] * 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; | 00835FEE E85963E2FF 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; | 00835FF3 E86CBBE1FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00835FF8 8B4050 mov eax, [eax+$50] 00835FFB 8D55D8 lea edx, [ebp-$28] 00835FFE 8B08 mov ecx, [eax] 00836000 FF5110 call dword ptr [ecx+$10] 00836003 8B45D8 mov eax, [ebp-$28] 00836006 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836009 E8DE48BDFF call 0040A8EC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 0083600E 8BB34C030000 mov esi, [ebx+$034C] 00836014 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00836016 E82524C9FF call 004C8440 0083601B 8D55C4 lea edx, [ebp-$3C] 0083601E 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836021 E8C648BDFF call 0040A8EC 00836026 8B55C4 mov edx, [ebp-$3C] 00836029 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083602C E8972DBEFF call 00418DC8 00836031 8D45C8 lea eax, [ebp-$38] 00836034 50 push eax 00836035 8B55E0 mov edx, [ebp-$20] 00836038 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083603A E8750BC9FF call 004C6BB4 0083603F 5A pop edx 00836040 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00836042 FF91B4000000 call dword ptr [ecx+$00B4] 00836048 8BC6 mov eax, esi 0083604A 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0083604C FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 00836052 8BB308030000 mov esi, [ebx+$0308] 00836058 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 0083605A E875F8C8FF call 004C58D4 0083605F 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00836061 E8467FCAFF call 004DDFAC 00836066 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00836068 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 0083606B 6820668300 push $00836620 * Possible String Reference to: 'YFID' | 00836070 BA68668300 mov edx, $00836668 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00836075 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083607B E8340BC9FF call 004C6BB4 00836080 8D55BC lea edx, [ebp-$44] 00836083 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00836085 FF5160 call dword ptr [ecx+$60] 00836088 FF75BC push dword ptr [ebp-$44] 0083608B 6878668300 push $00836678 00836090 8D45C0 lea eax, [ebp-$40] 00836093 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00836098 E817F6BCFF call 004056B4 0083609D 8B45C0 mov eax, [ebp-$40] 008360A0 50 push eax 008360A1 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008360A3 E8047FCAFF call 004DDFAC 008360A8 5A pop edx 008360A9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008360AB FF5138 call dword ptr [ecx+$38] 008360AE 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 008360B0 E813F8C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008360B5 BA84668300 mov edx, $00836684 * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 008360BA 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008360C0 E8EF0AC9FF call 004C6BB4 008360C5 8D55E4 lea edx, [ebp-$1C] 008360C8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 008360CA FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 008360CD BA94668300 mov edx, $00836694 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008360D2 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008360D8 E8D70AC9FF call 004C6BB4 008360DD 8D55B8 lea edx, [ebp-$48] 008360E0 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008360E2 FF5160 call dword ptr [ecx+$60] 008360E5 8B45B8 mov eax, [ebp-$48] 008360E8 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008360EB E8FC47BDFF call 0040A8EC 008360F0 8D55B4 lea edx, [ebp-$4C] 008360F3 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008360F6 E8F147BDFF call 0040A8EC 008360FB 837DB400 cmp dword ptr [ebp-$4C], +$00 008360FF 750D jnz 0083610E 00836101 8D45F8 lea eax, [ebp-$08] 00836104 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 00836109 E8AEF2BCFF call 004053BC * Possible String Reference to: 'Price' | 0083610E BAA0668300 mov edx, $008366A0 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00836113 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836119 E8960AC9FF call 004C6BB4 0083611E 8D55B0 lea edx, [ebp-$50] 00836121 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00836123 FF5160 call dword ptr [ecx+$60] 00836126 8B45B0 mov eax, [ebp-$50] 00836129 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083612C E8BB47BDFF call 0040A8EC 00836131 8D55AC lea edx, [ebp-$54] 00836134 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836137 E8B047BDFF call 0040A8EC 0083613C 837DAC00 cmp dword ptr [ebp-$54], +$00 00836140 750D jnz 0083614F 00836142 8D45F4 lea eax, [ebp-$0C] 00836145 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083614A E86DF2BCFF call 004053BC * Possible String Reference to: 'Qty' | 0083614F BA94668300 mov edx, $00836694 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00836154 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083615A E8550AC9FF call 004C6BB4 0083615F 8D55A8 lea edx, [ebp-$58] 00836162 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00836164 FF5160 call dword ptr [ecx+$60] 00836167 8B45A8 mov eax, [ebp-$58] 0083616A 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083616D E87A47BDFF call 0040A8EC 00836172 8D55A4 lea edx, [ebp-$5C] 00836175 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836178 E86F47BDFF call 0040A8EC 0083617D 837DA400 cmp dword ptr [ebp-$5C], +$00 00836181 750D jnz 00836190 00836183 8D45F8 lea eax, [ebp-$08] 00836186 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083618B E82CF2BCFF call 004053BC * Possible String Reference to: 'Money' | 00836190 BAB0668300 mov edx, $008366B0 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00836195 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083619B E8140AC9FF call 004C6BB4 008361A0 8D55A0 lea edx, [ebp-$60] 008361A3 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008361A5 FF5160 call dword ptr [ecx+$60] 008361A8 8B45A0 mov eax, [ebp-$60] 008361AB 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361AE E83947BDFF call 0040A8EC 008361B3 8D559C lea edx, [ebp-$64] 008361B6 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361B9 E82E47BDFF call 0040A8EC 008361BE 837D9C00 cmp dword ptr [ebp-$64], +$00 008361C2 750D jnz 008361D1 008361C4 8D45F0 lea eax, [ebp-$10] 008361C7 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 008361CC E8EBF1BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 008361D1 BAC0668300 mov edx, $008366C0 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008361D6 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008361DC E8D309C9FF call 004C6BB4 008361E1 8D5598 lea edx, [ebp-$68] 008361E4 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008361E6 FF5160 call dword ptr [ecx+$60] 008361E9 8B4598 mov eax, [ebp-$68] 008361EC 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361EF E8F846BDFF call 0040A8EC 008361F4 8D5594 lea edx, [ebp-$6C] 008361F7 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361FA E8ED46BDFF call 0040A8EC 008361FF 837D9400 cmp dword ptr [ebp-$6C], +$00 00836203 750D jnz 00836212 00836205 8D45EC lea eax, [ebp-$14] 00836208 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083620D E8AAF1BCFF call 004053BC 00836212 8D5590 lea edx, [ebp-$70] 00836215 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836218 E8CF46BDFF call 0040A8EC 0083621D 8B4590 mov eax, [ebp-$70] * Possible String Reference to: 'Money' | 00836220 BAB0668300 mov edx, $008366B0 * Reference to: System.@LStrCmp; | 00836225 E816F5BCFF call 00405740 0083622A 0F84AD000000 jz 008362DD 00836230 8D558C lea edx, [ebp-$74] 00836233 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836236 E8B146BDFF call 0040A8EC 0083623B 8B458C mov eax, [ebp-$74] * Possible String Reference to: 'HuiLv' | 0083623E BAC0668300 mov edx, $008366C0 * Reference to: System.@LStrCmp; | 00836243 E8F8F4BCFF call 00405740 00836248 7469 jz 008362B3 0083624A 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083624D E8DA74BDFF call 0040D72C 00836252 DB7D80 fstp tbyte ptr [ebp-$80] 00836255 9B wait 00836256 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836259 E8CE74BDFF call 0040D72C 0083625E DB6D80 fld tbyte ptr [ebp-$80] 00836261 DEC9 fmulp st(1), st(0) 00836263 DBBD74FFFFFF fstp tbyte ptr [ebp+$FFFFFF74] 00836269 9B wait 0083626A 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083626D E8BA74BDFF call 0040D72C 00836272 DBAD74FFFFFF fld tbyte ptr [ebp+$FFFFFF74] 00836278 DEC9 fmulp st(1), st(0) 0083627A 83C4F4 add esp, -$0C 0083627D DB3C24 fstp tbyte ptr [esp] 00836280 9B wait 00836281 8D45E8 lea eax, [ebp-$18] | 00836284 E82373BDFF call 0040D5AC 00836289 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083628C E89B74BDFF call 0040D72C 00836291 DB7D80 fstp tbyte ptr [ebp-$80] 00836294 9B wait 00836295 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836298 E88F74BDFF call 0040D72C 0083629D DB6D80 fld tbyte ptr [ebp-$80] 008362A0 DEC9 fmulp st(1), st(0) 008362A2 83C4F4 add esp, -$0C 008362A5 DB3C24 fstp tbyte ptr [esp] 008362A8 9B wait 008362A9 8D45F0 lea eax, [ebp-$10] | 008362AC E8FB72BDFF call 0040D5AC 008362B1 EB52 jmp 00836305 008362B3 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362B6 E87174BDFF call 0040D72C 008362BB DB7D80 fstp tbyte ptr [ebp-$80] 008362BE 9B wait 008362BF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362C2 E86574BDFF call 0040D72C 008362C7 DB6D80 fld tbyte ptr [ebp-$80] 008362CA DEC9 fmulp st(1), st(0) 008362CC 83C4F4 add esp, -$0C 008362CF DB3C24 fstp tbyte ptr [esp] 008362D2 9B wait 008362D3 8D45E8 lea eax, [ebp-$18] | 008362D6 E8D172BDFF call 0040D5AC 008362DB EB28 jmp 00836305 008362DD 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362E0 E84774BDFF call 0040D72C 008362E5 DB7D80 fstp tbyte ptr [ebp-$80] 008362E8 9B wait 008362E9 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362EC E83B74BDFF call 0040D72C 008362F1 DB6D80 fld tbyte ptr [ebp-$80] 008362F4 DEC9 fmulp st(1), st(0) 008362F6 83C4F4 add esp, -$0C 008362F9 DB3C24 fstp tbyte ptr [esp] 008362FC 9B wait 008362FD 8D45E8 lea eax, [ebp-$18] | 00836300 E8A772BDFF call 0040D5AC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00836305 8BB34C030000 mov esi, [ebx+$034C] 0083630B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 0083630D E82E21C9FF call 004C8440 * Possible String Reference to: 'Money' | 00836312 BAB0668300 mov edx, $008366B0 00836317 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836319 E89608C9FF call 004C6BB4 0083631E 50 push eax 0083631F 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836322 E80574BDFF call 0040D72C 00836327 8D8564FFFFFF lea eax, [ebp+$FFFFFF64] * Reference to: Variants.@VarFromReal; | 0083632D E85A2ABEFF call 00418D8C 00836332 8D9564FFFFFF lea edx, [ebp+$FFFFFF64] 00836338 58 pop eax 00836339 8B08 mov ecx, [eax] 0083633B FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00836341 BA84668300 mov edx, $00836684 00836346 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836348 E86708C9FF call 004C6BB4 0083634D 50 push eax 0083634E 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836351 E8D673BDFF call 0040D72C 00836356 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] * Reference to: Variants.@VarFromReal; | 0083635C E82B2ABEFF call 00418D8C 00836361 8D9554FFFFFF lea edx, [ebp+$FFFFFF54] 00836367 58 pop eax 00836368 8B08 mov ecx, [eax] 0083636A FF91B4000000 call dword ptr [ecx+$00B4] 00836370 8BC6 mov eax, esi 00836372 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00836374 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 0083637A 8BB30C030000 mov esi, [ebx+$030C] 00836380 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00836382 E84DF5C8FF call 004C58D4 00836387 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00836389 E81E7CCAFF call 004DDFAC 0083638E 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00836390 FF5244 call dword ptr [edx+$44] 00836393 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00836395 E8127CCAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0083639A BAD0668300 mov edx, $008366D0 0083639F 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008363A1 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008363A4 68EC668300 push $008366EC 008363A9 FF75E0 push dword ptr [ebp-$20] 008363AC 68FC668300 push $008366FC 008363B1 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 008363B7 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008363BA E82D45BDFF call 0040A8EC 008363BF FFB54CFFFFFF push dword ptr [ebp+$FFFFFF4C] 008363C5 8D8550FFFFFF lea eax, [ebp+$FFFFFF50] 008363CB BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008363D0 E8DFF2BCFF call 004056B4 008363D5 8B8550FFFFFF mov eax, [ebp+$FFFFFF50] 008363DB 50 push eax 008363DC 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008363DE E8C97BCAFF call 004DDFAC 008363E3 5A pop edx 008363E4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008363E6 FF5138 call dword ptr [ecx+$38] 008363E9 8D9548FFFFFF lea edx, [ebp+$FFFFFF48] 008363EF 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008363F2 E8F544BDFF call 0040A8EC 008363F7 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] * Possible String Reference to: 'Money' | 008363FD BAB0668300 mov edx, $008366B0 * Reference to: System.@LStrCmp; | 00836402 E839F3BCFF call 00405740 00836407 7427 jz 00836430 00836409 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083640B E89C7BCAFF call 004DDFAC 00836410 50 push eax 00836411 8D8544FFFFFF lea eax, [ebp+$FFFFFF44] 00836417 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 0083641A BA08678300 mov edx, $00836708 * Reference to: System.@LStrCat3; | 0083641F E81CF2BCFF call 00405640 00836424 8B9544FFFFFF mov edx, [ebp+$FFFFFF44] 0083642A 58 pop eax 0083642B 8B08 mov ecx, [eax] 0083642D FF5138 call dword ptr [ecx+$38] 00836430 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00836432 E8757BCAFF call 004DDFAC 00836437 50 push eax 00836438 8D8540FFFFFF lea eax, [ebp+$FFFFFF40] 0083643E 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 00836441 BA18678300 mov edx, $00836718 * Reference to: System.@LStrCat3; | 00836446 E8F5F1BCFF call 00405640 0083644B 8B9540FFFFFF mov edx, [ebp+$FFFFFF40] 00836451 58 pop eax 00836452 8B08 mov ecx, [eax] 00836454 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00836457 682C678300 push $0083672C 0083645C 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] *) end; procedure TfrmFKCR_SH.cxGridDBColumn1PropertiesEditValueChanged(Sender : TObject); begin (* 008367E8 55 push ebp 008367E9 8BEC mov ebp, esp 008367EB B908000000 mov ecx, $00000008 008367F0 6A00 push $00 008367F2 6A00 push $00 008367F4 49 dec ecx 008367F5 75F9 jnz 008367F0 008367F7 51 push ecx 008367F8 53 push ebx 008367F9 56 push esi 008367FA 8BDA mov ebx, edx 008367FC 8BF0 mov esi, eax 008367FE 33C0 xor eax, eax 00836800 55 push ebp * Possible String Reference to: 'éùà¼ÿëÖ^[‹å]Ã' | 00836801 68F6698300 push $008369F6 ***** TRY | 00836806 64FF30 push dword ptr fs:[eax] 00836809 648920 mov fs:[eax], esp 0083680C 8D55FC lea edx, [ebp-$04] 0083680F 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; | 00836811 E8A68ED5FF call 0058F6BC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 00836816 8B86A8030000 mov eax, [esi+$03A8] * 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; | 0083681C E82B5BE2FF 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; | 00836821 E83EB3E1FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 00836826 8B4050 mov eax, [eax+$50] 00836829 8D55F4 lea edx, [ebp-$0C] 0083682C 8B08 mov ecx, [eax] 0083682E FF5110 call dword ptr [ecx+$10] 00836831 8B45F4 mov eax, [ebp-$0C] 00836834 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836837 E8B040BDFF call 0040A8EC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 0083683C 8B9E4C030000 mov ebx, [esi+$034C] 00836842 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00836844 E8F71BC9FF call 004C8440 00836849 8D55E0 lea edx, [ebp-$20] 0083684C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083684F E89840BDFF call 0040A8EC 00836854 8B55E0 mov edx, [ebp-$20] 00836857 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083685A E86925BEFF call 00418DC8 0083685F 8D45E4 lea eax, [ebp-$1C] 00836862 50 push eax 00836863 8B55F8 mov edx, [ebp-$08] 00836866 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836868 E84703C9FF call 004C6BB4 0083686D 5A pop edx 0083686E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00836870 FF91B4000000 call dword ptr [ecx+$00B4] 00836876 8BC3 mov eax, ebx 00836878 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0083687A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00836880 8B9E0C030000 mov ebx, [esi+$030C] 00836886 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00836888 E847F0C8FF call 004C58D4 0083688D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083688F E81877CAFF call 004DDFAC 00836894 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00836896 FF5244 call dword ptr [edx+$44] 00836899 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083689B E80C77CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008368A0 BA0C6A8300 mov edx, $00836A0C 008368A5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008368A7 FF5138 call dword ptr [ecx+$38] 008368AA 8D55DC lea edx, [ebp-$24] 008368AD 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008368B0 E83740BDFF call 0040A8EC 008368B5 837DDC00 cmp dword ptr [ebp-$24], +$00 008368B9 7440 jz 008368FB * Possible String Reference to: ' Set ' | 008368BB 68286A8300 push $00836A28 008368C0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008368C3 68386A8300 push $00836A38 008368C8 8D55D4 lea edx, [ebp-$2C] 008368CB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008368CE E81940BDFF call 0040A8EC 008368D3 FF75D4 push dword ptr [ebp-$2C] 008368D6 68446A8300 push $00836A44 008368DB 8D45D8 lea eax, [ebp-$28] 008368DE BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008368E3 E8CCEDBCFF call 004056B4 008368E8 8B45D8 mov eax, [ebp-$28] 008368EB 50 push eax 008368EC 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008368EE E8B976CAFF call 004DDFAC 008368F3 5A pop edx 008368F4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008368F6 FF5138 call dword ptr [ecx+$38] 008368F9 EB2B jmp 00836926 008368FB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008368FD E8AA76CAFF call 004DDFAC 00836902 50 push eax * Possible String Reference to: ' Set ' | 00836903 68286A8300 push $00836A28 00836908 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 0083690B 68506A8300 push $00836A50 00836910 8D45D0 lea eax, [ebp-$30] 00836913 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00836918 E897EDBCFF call 004056B4 0083691D 8B55D0 mov edx, [ebp-$30] 00836920 58 pop eax 00836921 8B08 mov ecx, [eax] 00836923 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00836926 68606A8300 push $00836A60 0083692B 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmFKCR_SH.ToolButton3Click(Sender : TObject); begin (* 00836AB4 55 push ebp 00836AB5 8BEC mov ebp, esp 00836AB7 B90C000000 mov ecx, $0000000C 00836ABC 6A00 push $00 00836ABE 6A00 push $00 00836AC0 49 dec ecx 00836AC1 75F9 jnz 00836ABC 00836AC3 53 push ebx 00836AC4 56 push esi 00836AC5 8BF0 mov esi, eax 00836AC7 33C0 xor eax, eax 00836AC9 55 push ebp * Possible String Reference to: 'é3Þ¼ÿë»^[‹å]Ã' | 00836ACA 68BC6C8300 push $00836CBC ***** TRY | 00836ACF 64FF30 push dword ptr fs:[eax] 00836AD2 648920 mov fs:[eax], esp 00836AD5 33C0 xor eax, eax 00836AD7 55 push ebp 00836AD8 686A6C8300 push $00836C6A ***** TRY | 00836ADD 64FF30 push dword ptr fs:[eax] 00836AE0 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH.cxGridDBColumn3PropertiesButtonClick(Sender : TObject); begin (* 00836D50 55 push ebp 00836D51 8BEC mov ebp, esp 00836D53 51 push ecx 00836D54 B90B000000 mov ecx, $0000000B 00836D59 6A00 push $00 00836D5B 6A00 push $00 00836D5D 49 dec ecx 00836D5E 75F9 jnz 00836D59 00836D60 51 push ecx 00836D61 874DFC xchg [ebp-$04], ecx 00836D64 53 push ebx 00836D65 56 push esi 00836D66 8BF0 mov esi, eax 00836D68 33C0 xor eax, eax 00836D6A 55 push ebp 00836D6B 689B708300 push $0083709B ***** TRY | 00836D70 64FF30 push dword ptr fs:[eax] 00836D73 648920 mov fs:[eax], esp 00836D76 33C0 xor eax, eax 00836D78 55 push ebp 00836D79 6854708300 push $00837054 ***** TRY | 00836D7E 64FF30 push dword ptr fs:[eax] 00836D81 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH.cxGridDBColumn6PropertiesButtonClick(Sender : TObject); begin (* 008371D0 55 push ebp 008371D1 8BEC mov ebp, esp 008371D3 51 push ecx 008371D4 B906000000 mov ecx, $00000006 008371D9 6A00 push $00 008371DB 6A00 push $00 008371DD 49 dec ecx 008371DE 75F9 jnz 008371D9 008371E0 51 push ecx 008371E1 874DFC xchg [ebp-$04], ecx 008371E4 53 push ebx 008371E5 56 push esi 008371E6 8BF0 mov esi, eax 008371E8 33C0 xor eax, eax 008371EA 55 push ebp * Possible String Reference to: 'éÆÖ¼ÿëã^[‹å]Ã' | 008371EB 6829748300 push $00837429 ***** TRY | 008371F0 64FF30 push dword ptr fs:[eax] 008371F3 648920 mov fs:[eax], esp 008371F6 33C0 xor eax, eax 008371F8 55 push ebp 008371F9 68FF738300 push $008373FF ***** TRY | 008371FE 64FF30 push dword ptr fs:[eax] 00837201 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH.v2Column3PropertiesButtonClick(Sender : TObject); begin (* 0083752C 55 push ebp 0083752D 8BEC mov ebp, esp 0083752F 51 push ecx 00837530 B906000000 mov ecx, $00000006 00837535 6A00 push $00 00837537 6A00 push $00 00837539 49 dec ecx 0083753A 75F9 jnz 00837535 0083753C 51 push ecx 0083753D 874DFC xchg [ebp-$04], ecx 00837540 53 push ebx 00837541 56 push esi 00837542 8BF0 mov esi, eax 00837544 33C0 xor eax, eax 00837546 55 push ebp * Possible String Reference to: 'éjÓ¼ÿëã^[‹å]Ã' | 00837547 6885778300 push $00837785 ***** TRY | 0083754C 64FF30 push dword ptr fs:[eax] 0083754F 648920 mov fs:[eax], esp 00837552 33C0 xor eax, eax 00837554 55 push ebp 00837555 685B778300 push $0083775B ***** TRY | 0083755A 64FF30 push dword ptr fs:[eax] 0083755D 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH.ToolButton1Click(Sender : TObject); begin (* 00837870 53 push ebx 00837871 8BD8 mov ebx, eax * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 00837873 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00837879 E84206C9FF call 004C7EC0 0083787E 84C0 test al, al 00837880 7516 jnz 00837898 * Possible String Reference to: '¸¶¿îÁбí' | 00837882 B9A4788300 mov ecx, $008378A4 * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 00837887 8B9320030000 mov edx, [ebx+$0320] * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 0083788D 8B83A8030000 mov eax, [ebx+$03A8] | 00837893 E89809F8FF call 007B8230 00837898 5B pop ebx 00837899 C3 ret *) end; procedure TfrmFKCR_SH.v2Column4PropertiesEditValueChanged(Sender : TObject); begin (* 008378B0 55 push ebp 008378B1 8BEC mov ebp, esp 008378B3 B915000000 mov ecx, $00000015 008378B8 6A00 push $00 008378BA 6A00 push $00 008378BC 49 dec ecx 008378BD 75F9 jnz 008378B8 008378BF 53 push ebx 008378C0 56 push esi 008378C1 8BF2 mov esi, edx 008378C3 8BD8 mov ebx, eax 008378C5 33C0 xor eax, eax 008378C7 55 push ebp * Possible String Reference to: 'éÍͼÿë³^[‹å]Ã' | 008378C8 68227D8300 push $00837D22 ***** TRY | 008378CD 64FF30 push dword ptr fs:[eax] 008378D0 648920 mov fs:[eax], esp 008378D3 8D55FC lea edx, [ebp-$04] 008378D6 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; | 008378D8 E8DF7DD5FF call 0058F6BC 008378DD 8D55E4 lea edx, [ebp-$1C] 008378E0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008378E3 E80430BDFF call 0040A8EC 008378E8 837DE400 cmp dword ptr [ebp-$1C], +$00 008378EC 750D jnz 008378FB 008378EE 8D45FC lea eax, [ebp-$04] 008378F1 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 008378F6 E8C1DABCFF call 004053BC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 008378FB 8B83A8030000 mov eax, [ebx+$03A8] * 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; | 00837901 E8464AE2FF 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; | 00837906 E859A2E1FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 0083790B 8B4050 mov eax, [eax+$50] 0083790E 8D55E0 lea edx, [ebp-$20] 00837911 8B08 mov ecx, [eax] 00837913 FF5110 call dword ptr [ecx+$10] 00837916 8B45E0 mov eax, [ebp-$20] 00837919 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083791C E8CB2FBDFF call 0040A8EC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00837921 8BB34C030000 mov esi, [ebx+$034C] 00837927 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00837929 E8120BC9FF call 004C8440 0083792E 8D55CC lea edx, [ebp-$34] 00837931 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837934 E8B32FBDFF call 0040A8EC 00837939 8B55CC mov edx, [ebp-$34] 0083793C 8D45D0 lea eax, [ebp-$30] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083793F E88414BEFF call 00418DC8 00837944 8D45D0 lea eax, [ebp-$30] 00837947 50 push eax 00837948 8B55E8 mov edx, [ebp-$18] 0083794B 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083794D E862F2C8FF call 004C6BB4 00837952 5A pop edx 00837953 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00837955 FF91B4000000 call dword ptr [ecx+$00B4] 0083795B 8BC6 mov eax, esi 0083795D 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0083795F FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 00837965 8BB308030000 mov esi, [ebx+$0308] 0083796B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 0083796D E862DFC8FF call 004C58D4 00837972 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00837974 E83366CAFF call 004DDFAC 00837979 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0083797B FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 0083797E 68447D8300 push $00837D44 * Possible String Reference to: 'YFID' | 00837983 BA8C7D8300 mov edx, $00837D8C * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00837988 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083798E E821F2C8FF call 004C6BB4 00837993 8D55C4 lea edx, [ebp-$3C] 00837996 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00837998 FF5160 call dword ptr [ecx+$60] 0083799B FF75C4 push dword ptr [ebp-$3C] 0083799E 689C7D8300 push $00837D9C 008379A3 8D45C8 lea eax, [ebp-$38] 008379A6 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008379AB E804DDBCFF call 004056B4 008379B0 8B45C8 mov eax, [ebp-$38] 008379B3 50 push eax 008379B4 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008379B6 E8F165CAFF call 004DDFAC 008379BB 5A pop edx 008379BC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008379BE FF5138 call dword ptr [ecx+$38] 008379C1 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 008379C3 E800DFC8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008379C8 BAA87D8300 mov edx, $00837DA8 * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 008379CD 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008379D3 E8DCF1C8FF call 004C6BB4 008379D8 8D55EC lea edx, [ebp-$14] 008379DB 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 008379DD FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Money' | 008379E0 BAB87D8300 mov edx, $00837DB8 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008379E5 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008379EB E8C4F1C8FF call 004C6BB4 008379F0 8D55C0 lea edx, [ebp-$40] 008379F3 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008379F5 FF5160 call dword ptr [ecx+$60] 008379F8 8B45C0 mov eax, [ebp-$40] 008379FB 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008379FE E8E92EBDFF call 0040A8EC 00837A03 8D55BC lea edx, [ebp-$44] 00837A06 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A09 E8DE2EBDFF call 0040A8EC 00837A0E 837DBC00 cmp dword ptr [ebp-$44], +$00 00837A12 750D jnz 00837A21 00837A14 8D45F8 lea eax, [ebp-$08] 00837A17 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 00837A1C E89BD9BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 00837A21 BAC87D8300 mov edx, $00837DC8 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00837A26 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837A2C E883F1C8FF call 004C6BB4 00837A31 8D55B8 lea edx, [ebp-$48] 00837A34 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00837A36 FF5160 call dword ptr [ecx+$60] 00837A39 8B45B8 mov eax, [ebp-$48] 00837A3C 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A3F E8A82EBDFF call 0040A8EC 00837A44 8D55B4 lea edx, [ebp-$4C] 00837A47 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A4A E89D2EBDFF call 0040A8EC 00837A4F 837DB400 cmp dword ptr [ebp-$4C], +$00 00837A53 750D jnz 00837A62 00837A55 8D45F4 lea eax, [ebp-$0C] 00837A58 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 00837A5D E85AD9BCFF call 004053BC 00837A62 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837A65 E8C25CBDFF call 0040D72C 00837A6A DB7DA8 fstp tbyte ptr [ebp-$58] 00837A6D 9B wait 00837A6E 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837A71 E8B65CBDFF call 0040D72C 00837A76 DB6DA8 fld tbyte ptr [ebp-$58] 00837A79 DEC9 fmulp st(1), st(0) 00837A7B 83C4F4 add esp, -$0C 00837A7E DB3C24 fstp tbyte ptr [esp] 00837A81 9B wait 00837A82 8D45F0 lea eax, [ebp-$10] | 00837A85 E8225BBDFF call 0040D5AC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00837A8A 8BB34C030000 mov esi, [ebx+$034C] 00837A90 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00837A92 E8A909C9FF call 004C8440 * Possible String Reference to: 'Money' | 00837A97 BAB87D8300 mov edx, $00837DB8 00837A9C 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837A9E E811F1C8FF call 004C6BB4 00837AA3 50 push eax 00837AA4 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837AA7 E8805CBDFF call 0040D72C 00837AAC 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 00837AAF E8D812BEFF call 00418D8C 00837AB4 8D5598 lea edx, [ebp-$68] 00837AB7 58 pop eax 00837AB8 8B08 mov ecx, [eax] 00837ABA FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00837AC0 BAA87D8300 mov edx, $00837DA8 00837AC5 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837AC7 E8E8F0C8FF call 004C6BB4 00837ACC 50 push eax 00837ACD 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837AD0 E8575CBDFF call 0040D72C 00837AD5 8D4588 lea eax, [ebp-$78] * Reference to: Variants.@VarFromReal; | 00837AD8 E8AF12BEFF call 00418D8C 00837ADD 8D5588 lea edx, [ebp-$78] 00837AE0 58 pop eax 00837AE1 8B08 mov ecx, [eax] 00837AE3 FF91B4000000 call dword ptr [ecx+$00B4] 00837AE9 8BC6 mov eax, esi 00837AEB 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00837AED FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00837AF3 8BB30C030000 mov esi, [ebx+$030C] 00837AF9 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00837AFB E8D4DDC8FF call 004C58D4 00837B00 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00837B02 E8A564CAFF call 004DDFAC 00837B07 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00837B09 FF5244 call dword ptr [edx+$44] 00837B0C 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00837B0E E89964CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00837B13 BAD87D8300 mov edx, $00837DD8 00837B18 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00837B1A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00837B1D 68F47D8300 push $00837DF4 00837B22 FF75E8 push dword ptr [ebp-$18] 00837B25 68047E8300 push $00837E04 00837B2A 8D5580 lea edx, [ebp-$80] 00837B2D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837B30 E8B72DBDFF call 0040A8EC 00837B35 FF7580 push dword ptr [ebp-$80] 00837B38 8D4584 lea eax, [ebp-$7C] 00837B3B BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00837B40 E86FDBBCFF call 004056B4 00837B45 8B4584 mov eax, [ebp-$7C] 00837B48 50 push eax 00837B49 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00837B4B E85C64CAFF call 004DDFAC 00837B50 5A pop edx 00837B51 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00837B53 FF5138 call dword ptr [ecx+$38] 00837B56 8BC6 mov eax, esi * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00837B58 E84F64CAFF call 004DDFAC 00837B5D 50 push eax 00837B5E 8D857CFFFFFF lea eax, [ebp+$FFFFFF7C] 00837B64 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',BBMoney=' | 00837B67 BA107E8300 mov edx, $00837E10 * Reference to: System.@LStrCat3; | 00837B6C E8CFDABCFF call 00405640 00837B71 8B957CFFFFFF mov edx, [ebp+$FFFFFF7C] 00837B77 58 pop eax 00837B78 8B08 mov ecx, [eax] 00837B7A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00837B7D 68247E8300 push $00837E24 00837B82 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmFKCR_SH.v2Column1PropertiesButtonClick(Sender : TObject); begin (* 00837EE0 55 push ebp 00837EE1 8BEC mov ebp, esp 00837EE3 51 push ecx 00837EE4 B90E000000 mov ecx, $0000000E 00837EE9 6A00 push $00 00837EEB 6A00 push $00 00837EED 49 dec ecx 00837EEE 75F9 jnz 00837EE9 00837EF0 51 push ecx 00837EF1 874DFC xchg [ebp-$04], ecx 00837EF4 53 push ebx 00837EF5 8945FC mov [ebp-$04], eax 00837EF8 33C0 xor eax, eax 00837EFA 55 push ebp * Possible String Reference to: 'éžÈ¼ÿë¹[‹å]Ã' | 00837EFB 6851828300 push $00838251 ***** TRY | 00837F00 64FF30 push dword ptr fs:[eax] 00837F03 648920 mov fs:[eax], esp 00837F06 33C0 xor eax, eax 00837F08 55 push ebp 00837F09 68FD818300 push $008381FD ***** TRY | 00837F0E 64FF30 push dword ptr fs:[eax] 00837F11 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH.VBBPropertiesEditValueChanged(Sender : TObject); begin (* 00838350 55 push ebp 00838351 8BEC mov ebp, esp 00838353 B909000000 mov ecx, $00000009 00838358 6A00 push $00 0083835A 6A00 push $00 0083835C 49 dec ecx 0083835D 75F9 jnz 00838358 0083835F 51 push ecx 00838360 53 push ebx 00838361 56 push esi 00838362 8BDA mov ebx, edx 00838364 8BF0 mov esi, eax 00838366 33C0 xor eax, eax 00838368 55 push ebp 00838369 68EE858300 push $008385EE ***** TRY | 0083836E 64FF30 push dword ptr fs:[eax] 00838371 648920 mov fs:[eax], esp 00838374 8D55FC lea edx, [ebp-$04] 00838377 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; | 00838379 E83E73D5FF call 0058F6BC * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 0083837E 8B9E08030000 mov ebx, [esi+$0308] 00838384 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838386 E849D5C8FF call 004C58D4 0083838B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083838D E81A5CCAFF call 004DDFAC 00838392 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00838394 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00838397 6804868300 push $00838604 * Possible String Reference to: 'YFID' | 0083839C BA4C868300 mov edx, $0083864C * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008383A1 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008383A7 E808E8C8FF call 004C6BB4 008383AC 8D55F0 lea edx, [ebp-$10] 008383AF 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 008383B1 FF5160 call dword ptr [ecx+$60] 008383B4 FF75F0 push dword ptr [ebp-$10] 008383B7 685C868300 push $0083865C 008383BC 8D45F4 lea eax, [ebp-$0C] 008383BF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008383C4 E8EBD2BCFF call 004056B4 008383C9 8B45F4 mov eax, [ebp-$0C] 008383CC 50 push eax 008383CD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008383CF E8D85BCAFF call 004DDFAC 008383D4 5A pop edx 008383D5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008383D7 FF5138 call dword ptr [ecx+$38] 008383DA 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 008383DC E8E7D4C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008383E1 BA68868300 mov edx, $00838668 * Reference to control TfrmFKCR_SH.ADOQueryTemp : TADOQuery | 008383E6 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008383EC E8C3E7C8FF call 004C6BB4 008383F1 8D55F8 lea edx, [ebp-$08] 008383F4 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_60 | 008383F6 FF5160 call dword ptr [ecx+$60] 008383F9 8D55EC lea edx, [ebp-$14] 008383FC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008383FF E8E824BDFF call 0040A8EC 00838404 837DEC00 cmp dword ptr [ebp-$14], +$00 00838408 750D jnz 00838417 0083840A 8D45FC lea eax, [ebp-$04] 0083840D BA78868300 mov edx, $00838678 * Reference to: System.@LStrLAsg(void;void;void;void); | 00838412 E8A5CFBCFF call 004053BC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838417 8B9E4C030000 mov ebx, [esi+$034C] 0083841D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0083841F E81C00C9FF call 004C8440 * Possible String Reference to: 'BBMoney' | 00838424 BA68868300 mov edx, $00838668 00838429 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083842B E884E7C8FF call 004C6BB4 00838430 50 push eax 00838431 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00838434 E8F352BDFF call 0040D72C 00838439 8D45DC lea eax, [ebp-$24] * Reference to: Variants.@VarFromReal; | 0083843C E84B09BEFF call 00418D8C 00838441 8D55DC lea edx, [ebp-$24] 00838444 58 pop eax 00838445 8B08 mov ecx, [eax] 00838447 FF91B4000000 call dword ptr [ecx+$00B4] 0083844D 8BC3 mov eax, ebx 0083844F 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00838451 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00838457 8B9E0C030000 mov ebx, [esi+$030C] 0083845D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0083845F E870D4C8FF call 004C58D4 00838464 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838466 E8415BCAFF call 004DDFAC 0083846B 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 0083846D FF5244 call dword ptr [edx+$44] 00838470 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838472 E8355BCAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838477 BA84868300 mov edx, $00838684 0083847C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0083847E FF5138 call dword ptr [ecx+$38] 00838481 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838483 E8245BCAFF call 004DDFAC 00838488 50 push eax 00838489 8D45D8 lea eax, [ebp-$28] 0083848C 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set BBMoney=' | 0083848F BAA0868300 mov edx, $008386A0 * Reference to: System.@LStrCat3; | 00838494 E8A7D1BCFF call 00405640 00838499 8B55D8 mov edx, [ebp-$28] 0083849C 58 pop eax 0083849D 8B08 mov ecx, [eax] 0083849F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008384A2 68B8868300 push $008386B8 008384A7 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmFKCR_SH.ComTaitouChange(Sender : TObject); begin (* 00838774 56 push esi * Reference to control TfrmFKCR_SH.ToolButton2 : TToolButton | 00838775 8B8014030000 mov eax, [eax+$0314] 0083877B 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 0083877F E8D0BDBCFF call 00404554 00838784 5E pop esi 00838785 C3 ret *) end; procedure TfrmFKCR_SH.v2Column1PropertiesEditValueChanged(Sender : TObject); begin (* 00838788 55 push ebp 00838789 8BEC mov ebp, esp 0083878B B907000000 mov ecx, $00000007 00838790 6A00 push $00 00838792 6A00 push $00 00838794 49 dec ecx 00838795 75F9 jnz 00838790 00838797 51 push ecx 00838798 53 push ebx 00838799 56 push esi 0083879A 8BDA mov ebx, edx 0083879C 8BF0 mov esi, eax 0083879E 33C0 xor eax, eax 008387A0 55 push ebp * Possible String Reference to: 'é—Á¼ÿëÖ^[‹å]Ã' | 008387A1 6858898300 push $00838958 ***** TRY | 008387A6 64FF30 push dword ptr fs:[eax] 008387A9 648920 mov fs:[eax], esp 008387AC 8D55FC lea edx, [ebp-$04] 008387AF 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; | 008387B1 E8066FD5FF call 0058F6BC * Reference to control TfrmFKCR_SH.Tv2 : TcxGridDBTableView | 008387B6 8B86A8030000 mov eax, [esi+$03A8] * 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; | 008387BC E88B3BE2FF 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; | 008387C1 E89E93E1FF call 00651B64 * Reference to field TcxGridDBTableView.OFFS_0050 | 008387C6 8B4050 mov eax, [eax+$50] 008387C9 8D55F4 lea edx, [ebp-$0C] 008387CC 8B08 mov ecx, [eax] 008387CE FF5110 call dword ptr [ecx+$10] 008387D1 8B45F4 mov eax, [ebp-$0C] 008387D4 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008387D7 E81021BDFF call 0040A8EC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008387DC 8B9E4C030000 mov ebx, [esi+$034C] 008387E2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008387E4 E857FCC8FF call 004C8440 008387E9 8D55E0 lea edx, [ebp-$20] 008387EC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008387EF E8F820BDFF call 0040A8EC 008387F4 8B55E0 mov edx, [ebp-$20] 008387F7 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008387FA E8C905BEFF call 00418DC8 008387FF 8D45E4 lea eax, [ebp-$1C] 00838802 50 push eax 00838803 8B55F8 mov edx, [ebp-$08] 00838806 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838808 E8A7E3C8FF call 004C6BB4 0083880D 5A pop edx 0083880E 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00838810 FF91B4000000 call dword ptr [ecx+$00B4] 00838816 8BC3 mov eax, ebx 00838818 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 0083881A FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00838820 8B9E0C030000 mov ebx, [esi+$030C] 00838826 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838828 E8A7D0C8FF call 004C58D4 0083882D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083882F E87857CAFF call 004DDFAC 00838834 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00838836 FF5244 call dword ptr [edx+$44] 00838839 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083883B E86C57CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838840 BA70898300 mov edx, $00838970 00838845 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838847 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 0083884A 688C898300 push $0083898C 0083884F FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00838852 689C898300 push $0083899C 00838857 8D55D8 lea edx, [ebp-$28] 0083885A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083885D E88A20BDFF call 0040A8EC 00838862 FF75D8 push dword ptr [ebp-$28] 00838865 68A8898300 push $008389A8 0083886A 8D45DC lea eax, [ebp-$24] 0083886D BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00838872 E83DCEBCFF call 004056B4 00838877 8B45DC mov eax, [ebp-$24] 0083887A 50 push eax 0083887B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083887D E82A57CAFF call 004DDFAC 00838882 5A pop edx 00838883 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838885 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00838888 68B4898300 push $008389B4 0083888D 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmFKCR_SH.v2DerateMoneyPropertiesEditValueChanged(Sender : TObject); begin (* 00838A08 55 push ebp 00838A09 8BEC mov ebp, esp 00838A0B B905000000 mov ecx, $00000005 00838A10 6A00 push $00 00838A12 6A00 push $00 00838A14 49 dec ecx 00838A15 75F9 jnz 00838A10 00838A17 53 push ebx 00838A18 56 push esi 00838A19 8BDA mov ebx, edx 00838A1B 8BF0 mov esi, eax 00838A1D 33C0 xor eax, eax 00838A1F 55 push ebp * Possible String Reference to: '醿¼ÿëÖ^[‹å]Ã' | 00838A20 68698B8300 push $00838B69 ***** TRY | 00838A25 64FF30 push dword ptr fs:[eax] 00838A28 648920 mov fs:[eax], esp 00838A2B 8D55FC lea edx, [ebp-$04] 00838A2E 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; | 00838A30 E8876CD5FF call 0058F6BC 00838A35 8D55F8 lea edx, [ebp-$08] 00838A38 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838A3B E8AC1EBDFF call 0040A8EC 00838A40 837DF800 cmp dword ptr [ebp-$08], +$00 00838A44 750D jnz 00838A53 00838A46 8D45FC lea eax, [ebp-$04] 00838A49 BA808B8300 mov edx, $00838B80 * Reference to: System.@LStrLAsg(void;void;void;void); | 00838A4E E869C9BCFF call 004053BC * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838A53 8B9E4C030000 mov ebx, [esi+$034C] 00838A59 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00838A5B E8E0F9C8FF call 004C8440 00838A60 6A00 push $00 00838A62 6A00 push $00 00838A64 6A00 push $00 00838A66 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloatDef(AnsiString;Extended):Extended;overload; | 00838A69 E8FA4CBDFF call 0040D768 00838A6E 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarFromReal; | 00838A71 E81603BEFF call 00418D8C 00838A76 8D45E8 lea eax, [ebp-$18] 00838A79 50 push eax * Possible String Reference to: 'DerateMoney' | 00838A7A BA8C8B8300 mov edx, $00838B8C 00838A7F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838A81 E82EE1C8FF call 004C6BB4 00838A86 5A pop edx 00838A87 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 00838A89 FF91B4000000 call dword ptr [ecx+$00B4] 00838A8F 8BC3 mov eax, ebx 00838A91 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 00838A93 FF924C020000 call dword ptr [edx+$024C] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00838A99 8B9E0C030000 mov ebx, [esi+$030C] 00838A9F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838AA1 E82ECEC8FF call 004C58D4 00838AA6 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838AA8 E8FF54CAFF call 004DDFAC 00838AAD 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00838AAF FF5244 call dword ptr [edx+$44] 00838AB2 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838AB4 E8F354CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838AB9 BAA08B8300 mov edx, $00838BA0 00838ABE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838AC0 FF5138 call dword ptr [ecx+$38] 00838AC3 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838AC5 E8E254CAFF call 004DDFAC 00838ACA 50 push eax 00838ACB 8D45E4 lea eax, [ebp-$1C] 00838ACE 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set DerateMoney=' | 00838AD1 BABC8B8300 mov edx, $00838BBC * Reference to: System.@LStrCat3; | 00838AD6 E865CBBCFF call 00405640 00838ADB 8B55E4 mov edx, [ebp-$1C] 00838ADE 58 pop eax 00838ADF 8B08 mov ecx, [eax] 00838AE1 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00838AE4 68D88B8300 push $00838BD8 * Possible String Reference to: 'YFId' | 00838AE9 BAF08B8300 mov edx, $00838BF0 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838AEE 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838AF4 E8BBE0C8FF call 004C6BB4 00838AF9 8D55D8 lea edx, [ebp-$28] 00838AFC 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00838AFE FF5160 call dword ptr [ecx+$60] 00838B01 8B45D8 mov eax, [ebp-$28] 00838B04 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838B07 E8E01DBDFF call 0040A8EC 00838B0C FF75DC push dword ptr [ebp-$24] 00838B0F 68008C8300 push $00838C00 00838B14 8D45E0 lea eax, [ebp-$20] 00838B17 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00838B1C E893CBBCFF call 004056B4 00838B21 8B45E0 mov eax, [ebp-$20] 00838B24 50 push eax 00838B25 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838B27 E88054CAFF call 004DDFAC 00838B2C 5A pop edx 00838B2D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838B2F FF5138 call dword ptr [ecx+$38] 00838B32 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00838B34 E89B53CAFF call 004DDED4 00838B39 33C0 xor eax, eax 00838B3B 5A pop edx 00838B3C 59 pop ecx 00838B3D 59 pop ecx 00838B3E 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 00838B41 68708B8300 push $00838B70 00838B46 8D45D8 lea eax, [ebp-$28] 00838B49 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838B4E E8F5C7BCFF call 00405348 00838B53 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00838B56 E819BBBDFF call 00414674 00838B5B 8D45F8 lea eax, [ebp-$08] 00838B5E BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838B63 E8E0C7BCFF call 00405348 00838B68 C3 ret * Reference to: System.@HandleFinally; | 00838B69 E986BFBCFF jmp 00404AF4 00838B6E EBD6 jmp 00838B46 ****** END | 00838B70 5E pop esi 00838B71 5B pop ebx 00838B72 8BE5 mov esp, ebp 00838B74 5D pop ebp 00838B75 C3 ret *) end; procedure TfrmFKCR_SH.v2fstr1PropertiesEditValueChanged(Sender : TObject); begin (* 00838C04 55 push ebp 00838C05 8BEC mov ebp, esp 00838C07 33C9 xor ecx, ecx 00838C09 51 push ecx 00838C0A 51 push ecx 00838C0B 51 push ecx 00838C0C 51 push ecx 00838C0D 51 push ecx 00838C0E 51 push ecx 00838C0F 51 push ecx 00838C10 53 push ebx 00838C11 56 push esi 00838C12 8BDA mov ebx, edx 00838C14 8BF0 mov esi, eax 00838C16 33C0 xor eax, eax 00838C18 55 push ebp 00838C19 68FF8C8300 push $00838CFF ***** TRY | 00838C1E 64FF30 push dword ptr fs:[eax] 00838C21 648920 mov fs:[eax], esp 00838C24 8D55FC lea edx, [ebp-$04] 00838C27 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; | 00838C29 E88E6AD5FF call 0058F6BC * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00838C2E 8B9E0C030000 mov ebx, [esi+$030C] 00838C34 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838C36 E899CCC8FF call 004C58D4 00838C3B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838C3D E86A53CAFF call 004DDFAC 00838C42 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 00838C44 FF5244 call dword ptr [edx+$44] 00838C47 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838C49 E85E53CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838C4E BA148D8300 mov edx, $00838D14 00838C53 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838C55 FF5138 call dword ptr [ecx+$38] 00838C58 8D55F0 lea edx, [ebp-$10] 00838C5B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838C5E E8891CBDFF call 0040A8EC 00838C63 8B45F0 mov eax, [ebp-$10] 00838C66 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.QuotedStr(AnsiString):AnsiString; | 00838C69 E8861DBDFF call 0040A9F4 00838C6E 8B4DF4 mov ecx, [ebp-$0C] 00838C71 8D45F8 lea eax, [ebp-$08] * Possible String Reference to: ' set fstr1=' | 00838C74 BA308D8300 mov edx, $00838D30 * Reference to: System.@LStrCat3; | 00838C79 E8C2C9BCFF call 00405640 00838C7E 8B45F8 mov eax, [ebp-$08] 00838C81 50 push eax 00838C82 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838C84 E82353CAFF call 004DDFAC 00838C89 5A pop edx 00838C8A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838C8C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00838C8F 68448D8300 push $00838D44 * Possible String Reference to: 'YFId' | 00838C94 BA5C8D8300 mov edx, $00838D5C * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838C99 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838C9F E810DFC8FF call 004C6BB4 00838CA4 8D55E4 lea edx, [ebp-$1C] 00838CA7 8B08 mov ecx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_60 | 00838CA9 FF5160 call dword ptr [ecx+$60] 00838CAC 8B45E4 mov eax, [ebp-$1C] 00838CAF 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838CB2 E8351CBDFF call 0040A8EC 00838CB7 FF75E8 push dword ptr [ebp-$18] 00838CBA 686C8D8300 push $00838D6C 00838CBF 8D45EC lea eax, [ebp-$14] 00838CC2 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00838CC7 E8E8C9BCFF call 004056B4 00838CCC 8B45EC mov eax, [ebp-$14] 00838CCF 50 push eax 00838CD0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00838CD2 E8D552CAFF call 004DDFAC 00838CD7 5A pop edx 00838CD8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00838CDA FF5138 call dword ptr [ecx+$38] 00838CDD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00838CDF E8F051CAFF call 004DDED4 00838CE4 33C0 xor eax, eax 00838CE6 5A pop edx 00838CE7 59 pop ecx 00838CE8 59 pop ecx 00838CE9 648910 mov fs:[eax], edx ****** FINALLY | 00838CEC 68068D8300 push $00838D06 00838CF1 8D45E4 lea eax, [ebp-$1C] 00838CF4 BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838CF9 E84AC6BCFF call 00405348 00838CFE C3 ret * Reference to: System.@HandleFinally; | 00838CFF E9F0BDBCFF jmp 00404AF4 00838D04 EBEB jmp 00838CF1 ****** END | 00838D06 5E pop esi 00838D07 5B pop ebx 00838D08 8BE5 mov esp, ebp 00838D0A 5D pop ebp 00838D0B C3 ret *) end; procedure TfrmFKCR_SH.TchkClick(Sender : TObject); begin (* 00838D70 55 push ebp 00838D71 8BEC mov ebp, esp 00838D73 B905000000 mov ecx, $00000005 00838D78 6A00 push $00 00838D7A 6A00 push $00 00838D7C 49 dec ecx 00838D7D 75F9 jnz 00838D78 00838D7F 51 push ecx 00838D80 53 push ebx 00838D81 56 push esi 00838D82 57 push edi 00838D83 8945FC mov [ebp-$04], eax 00838D86 33C0 xor eax, eax 00838D88 55 push ebp * Possible String Reference to: 'éW»¼ÿëã_^[‹å]Ã' | 00838D89 68988F8300 push $00838F98 ***** TRY | 00838D8E 64FF30 push dword ptr fs:[eax] 00838D91 648920 mov fs:[eax], esp 00838D94 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838D97 8B804C030000 mov eax, [eax+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00838D9D E81EF1C8FF call 004C7EC0 00838DA2 84C0 test al, al 00838DA4 0F85CB010000 jnz 00838F75 00838DAA A0A88F8300 mov al, byte ptr [$00838FA8] 00838DAF 50 push eax 00838DB0 8D45EC lea eax, [ebp-$14] 00838DB3 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00838DB5 E8AAFFBDFF call 00418D64 00838DBA 8D4DEC lea ecx, [ebp-$14] 00838DBD 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00838DC0 8B804C030000 mov eax, [eax+$034C] * Possible String Reference to: 'ssel' | 00838DC6 BAB48F8300 mov edx, $00838FB4 00838DCB 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 00838DCD FF9344020000 call dword ptr [ebx+$0244] 00838DD3 84C0 test al, al 00838DD5 751D jnz 00838DF4 00838DD7 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00838DD9 B9BC8F8300 mov ecx, $00838FBC * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00838DDE BAC48F8300 mov edx, $00838FC4 *) end; procedure TfrmFKCR_SH.TNochkClick(Sender : TObject); begin (* 00839054 55 push ebp 00839055 8BEC mov ebp, esp 00839057 B904000000 mov ecx, $00000004 0083905C 6A00 push $00 0083905E 6A00 push $00 00839060 49 dec ecx 00839061 75F9 jnz 0083905C 00839063 51 push ecx 00839064 53 push ebx 00839065 56 push esi 00839066 57 push edi 00839067 8945FC mov [ebp-$04], eax 0083906A 33C0 xor eax, eax 0083906C 55 push ebp * Possible String Reference to: '霸¼ÿëã_^[‹å]Ã' | 0083906D 6853928300 push $00839253 ***** TRY | 00839072 64FF30 push dword ptr fs:[eax] 00839075 648920 mov fs:[eax], esp 00839078 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 0083907B 8B804C030000 mov eax, [eax+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00839081 E83AEEC8FF call 004C7EC0 00839086 84C0 test al, al 00839088 0F85A2010000 jnz 00839230 0083908E A064928300 mov al, byte ptr [$00839264] 00839093 50 push eax 00839094 8D45EC lea eax, [ebp-$14] 00839097 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00839099 E8C6FCBDFF call 00418D64 0083909E 8D4DEC lea ecx, [ebp-$14] 008390A1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008390A4 8B804C030000 mov eax, [eax+$034C] * Possible String Reference to: 'ssel' | 008390AA BA70928300 mov edx, $00839270 008390AF 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 008390B1 FF9344020000 call dword ptr [ebx+$0244] 008390B7 84C0 test al, al 008390B9 751D jnz 008390D8 008390BB 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 008390BD B978928300 mov ecx, $00839278 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 008390C2 BA80928300 mov edx, $00839280 *) end; procedure TfrmFKCR_SH.cxTabControl1Change(Sender : TObject); begin (* 00839304 53 push ebx 00839305 8BD8 mov ebx, eax 00839307 8BC3 mov eax, ebx | 00839309 E862B4FFFF call 00834770 0083930E 8BC3 mov eax, ebx | 00839310 E873B5FFFF call 00834888 00839315 5B pop ebx 00839316 C3 ret *) end; procedure TfrmFKCR_SH.NochkClick(Sender : TObject); begin (* 00839318 55 push ebp 00839319 8BEC mov ebp, esp 0083931B B906000000 mov ecx, $00000006 00839320 6A00 push $00 00839322 6A00 push $00 00839324 49 dec ecx 00839325 75F9 jnz 00839320 00839327 51 push ecx 00839328 53 push ebx 00839329 56 push esi 0083932A 57 push edi 0083932B 8945FC mov [ebp-$04], eax 0083932E 33C0 xor eax, eax 00839330 55 push ebp * Possible String Reference to: 'é<µ¼ÿëÆ_^[‹å]Ã' | 00839331 68B3958300 push $008395B3 ***** TRY | 00839336 64FF30 push dword ptr fs:[eax] 00839339 648920 mov fs:[eax], esp 0083933C 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 0083933F 8B804C030000 mov eax, [eax+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00839345 E876EBC8FF call 004C7EC0 0083934A 84C0 test al, al 0083934C 0F8521020000 jnz 00839573 00839352 A0C4958300 mov al, byte ptr [$008395C4] 00839357 50 push eax 00839358 8D45EC lea eax, [ebp-$14] 0083935B B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 0083935D E802FABDFF call 00418D64 00839362 8D4DEC lea ecx, [ebp-$14] 00839365 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00839368 8B804C030000 mov eax, [eax+$034C] * Possible String Reference to: 'ssel' | 0083936E BAD0958300 mov edx, $008395D0 00839373 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 00839375 FF9344020000 call dword ptr [ebx+$0244] 0083937B 84C0 test al, al 0083937D 751D jnz 0083939C 0083937F 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00839381 B9D8958300 mov ecx, $008395D8 * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00839386 BAE0958300 mov edx, $008395E0 *) end; procedure TfrmFKCR_SH.N1Click(Sender : TObject); begin (* 008396AC B201 mov dl, $01 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008396AE 8B804C030000 mov eax, [eax+$034C] * Reference to : TfrmSelExportField._PROC_007B84A4() | 008396B4 E8EBEDF7FF call 007B84A4 008396B9 C3 ret *) end; procedure TfrmFKCR_SH.N2Click(Sender : TObject); begin (* 008396BC 33D2 xor edx, edx * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008396BE 8B804C030000 mov eax, [eax+$034C] * Reference to : TfrmSelExportField._PROC_007B84A4() | 008396C4 E8DBEDF7FF call 007B84A4 008396C9 C3 ret *) end; procedure TfrmFKCR_SH.CheckBox1Click(Sender : TObject); begin (* 008396CC 55 push ebp 008396CD 8BEC mov ebp, esp 008396CF 33C9 xor ecx, ecx 008396D1 51 push ecx 008396D2 51 push ecx 008396D3 51 push ecx 008396D4 51 push ecx 008396D5 51 push ecx 008396D6 51 push ecx 008396D7 51 push ecx 008396D8 51 push ecx 008396D9 53 push ebx 008396DA 56 push esi 008396DB 57 push edi 008396DC 8BF0 mov esi, eax 008396DE 33C0 xor eax, eax 008396E0 55 push ebp * Possible String Reference to: 'éÔ²¼ÿëà_^[‹å]Ã' | 008396E1 681B988300 push $0083981B ***** TRY | 008396E6 64FF30 push dword ptr fs:[eax] 008396E9 648920 mov fs:[eax], esp 008396EC BA34988300 mov edx, $00839834 * Reference to control TfrmFKCR_SH.Label12 : TLabel | 008396F1 8B8690030000 mov eax, [esi+$0390] * Reference to: Controls.TControl.SetText(TControl;TCaption); | 008396F7 E824EFC4FF call 00488620 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 008396FC 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00839702 E8B9E7C8FF call 004C7EC0 00839707 84C0 test al, al 00839709 0F85E6000000 jnz 008397F5 * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 0083970F 8B9E4C030000 mov ebx, [esi+$034C] 00839715 8BC3 mov eax, ebx * Reference to: DB.TDataSet.DisableControls(TDataSet); | 00839717 E838DEC8FF call 004C7554 0083971C 8BC3 mov eax, ebx * Reference to: DB.TDataSet.First(TDataSet); | 0083971E E80DE9C8FF call 004C8030 00839723 E9B2000000 jmp 008397DA 00839728 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0083972A E811EDC8FF call 004C8440 * Reference to control TfrmFKCR_SH.CheckBox1 : TCheckBox | 0083972F 8B8688030000 mov eax, [esi+$0388] 00839735 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 00839737 FF92C8000000 call dword ptr [edx+$00C8] 0083973D 8BD0 mov edx, eax 0083973F 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00839742 E81DF6BDFF call 00418D64 00839747 8D45F0 lea eax, [ebp-$10] 0083974A 50 push eax * Possible String Reference to: 'ssel' | 0083974B BA40988300 mov edx, $00839840 00839750 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00839752 E85DD4C8FF call 004C6BB4 00839757 5A pop edx 00839758 8B08 mov ecx, [eax] * Reference to method TClientDataSet.DestroyFields() | 0083975A FF91B4000000 call dword ptr [ecx+$00B4] * Reference to control TfrmFKCR_SH.CheckBox1 : TCheckBox | 00839760 8B8688030000 mov eax, [esi+$0388] 00839766 8B10 mov edx, [eax] * Reference to method TCheckBox.GetChecked() | 00839768 FF92C8000000 call dword ptr [edx+$00C8] 0083976E 3C01 cmp al, $01 00839770 7557 jnz 008397C9 * Possible String Reference to: 'Money' | 00839772 BA50988300 mov edx, $00839850 00839777 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00839779 E836D4C8FF call 004C6BB4 0083977E 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_4C | 00839780 FF524C call dword ptr [edx+$4C] 00839783 DF7DE4 fistp qword ptr [ebp-$1C] 00839786 9B wait 00839787 8D55E0 lea edx, [ebp-$20] * Reference to control TfrmFKCR_SH.Label12 : TLabel | 0083978A 8BBE90030000 mov edi, [esi+$0390] 00839790 8BC7 mov eax, edi * Reference to: Controls.TControl.GetText(TControl):TCaption; | 00839792 E859EEC4FF call 004885F0 00839797 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083979A E88D3FBDFF call 0040D72C 0083979F D80D58988300 fmul dword ptr [$00839858] 008397A5 DF6DE4 fild qword ptr [ebp-$1C] 008397A8 DEC1 faddp st(1), st(0) 008397AA D83558988300 fdiv dword ptr [$00839858] 008397B0 83C4F4 add esp, -$0C 008397B3 DB3C24 fstp tbyte ptr [esp] 008397B6 9B wait 008397B7 8D45EC lea eax, [ebp-$14] | 008397BA E8ED3DBDFF call 0040D5AC 008397BF 8B55EC mov edx, [ebp-$14] 008397C2 8BC7 mov eax, edi * Reference to: Controls.TControl.SetText(TControl;TCaption); | 008397C4 E857EEC4FF call 00488620 008397C9 8BC3 mov eax, ebx 008397CB 8B10 mov edx, [eax] * Reference to method TClientDataSet.Post() | 008397CD FF924C020000 call dword ptr [edx+$024C] 008397D3 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Next(TDataSet); | 008397D5 E872EBC8FF call 004C834C * Reference to field TClientDataSet.Eof : Boolean | 008397DA 80BBA100000000 cmp byte ptr [ebx+$00A1], $00 008397E1 0F8441FFFFFF jz 00839728 008397E7 8BC3 mov eax, ebx * Reference to: DB.TDataSet.First(TDataSet); | 008397E9 E842E8C8FF call 004C8030 008397EE 8BC3 mov eax, ebx * Reference to: DB.TDataSet.EnableControls(TDataSet); | 008397F0 E87FDDC8FF call 004C7574 008397F5 33C0 xor eax, eax 008397F7 5A pop edx 008397F8 59 pop ecx 008397F9 59 pop ecx 008397FA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[‹å]Ã' | 008397FD 6822988300 push $00839822 00839802 8D45E0 lea eax, [ebp-$20] * Reference to: System.@LStrClr(void;void); | 00839805 E81ABBBCFF call 00405324 0083980A 8D45EC lea eax, [ebp-$14] * Reference to: System.@LStrClr(void;void); | 0083980D E812BBBCFF call 00405324 00839812 8D45F0 lea eax, [ebp-$10] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00839815 E85AAEBDFF call 00414674 0083981A C3 ret * Reference to: System.@HandleFinally; | 0083981B E9D4B2BCFF jmp 00404AF4 00839820 EBE0 jmp 00839802 ****** END | 00839822 5F pop edi 00839823 5E pop esi 00839824 5B pop ebx 00839825 8BE5 mov esp, ebp 00839827 5D pop ebp 00839828 C3 ret *) end; procedure TfrmFKCR_SH.v2SselPropertiesChange(Sender : TObject); begin (* 0083985C 53 push ebx 0083985D 56 push esi 0083985E 8BD8 mov ebx, eax * Possible String Reference to: 'Money' | 00839860 BA9C988300 mov edx, $0083989C * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00839865 8BB34C030000 mov esi, [ebx+$034C] 0083986B 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083986D E842D3C8FF call 004C6BB4 00839872 8B10 mov edx, [eax] * Possible reference to virtual method TClientDataSet.OFFS_4C | 00839874 FF524C call dword ptr [edx+$4C] 00839877 D835A4988300 fdiv dword ptr [$008398A4] 0083987D 83C4F8 add esp, -$08 00839880 DD1C24 fstp qword ptr [esp] 00839883 9B wait * Reference to control TfrmFKCR_SH.Label12 : TLabel | 00839884 8B9390030000 mov edx, [ebx+$0390] 0083988A 8BC6 mov eax, esi * Reference to : TfrmSelExportField._PROC_007B6D90() | 0083988C E8FFD4F7FF call 007B6D90 00839891 5E pop esi 00839892 5B pop ebx 00839893 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00834889(Sender : TObject); begin (* 00834889 8BEC mov ebp, esp 0083488B 33C9 xor ecx, ecx 0083488D 51 push ecx 0083488E 51 push ecx 0083488F 51 push ecx 00834890 51 push ecx 00834891 51 push ecx 00834892 53 push ebx 00834893 56 push esi 00834894 8945FC mov [ebp-$04], eax 00834897 33C0 xor eax, eax 00834899 55 push ebp 0083489A 68E04A8300 push $00834AE0 ***** TRY | 0083489F 64FF30 push dword ptr fs:[eax] 008348A2 648920 mov fs:[eax], esp 008348A5 33C0 xor eax, eax 008348A7 55 push ebp * Possible String Reference to: 'é1' | 008348A8 68BE4A8300 push $00834ABE ***** TRY | 008348AD 64FF30 push dword ptr fs:[eax] 008348B0 648920 mov fs:[eax], esp 008348B3 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 008348B6 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 008348BC E8932CC9FF call 004C7554 008348C1 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 008348C4 8B9820030000 mov ebx, [eax+$0320] 008348CA 33D2 xor edx, edx 008348CC 8BC3 mov eax, ebx 008348CE 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 008348D0 FF9190010000 call dword ptr [ecx+$0190] 008348D6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 008348D8 E8F70FC9FF call 004C58D4 008348DD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008348DF E8C896CAFF call 004DDFAC 008348E4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 008348E6 FF5244 call dword ptr [edx+$44] 008348E9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008348EB E8BC96CAFF call 004DDFAC * Possible String Reference to: ' select A.*,C.conNo,KHZJM=dbo.getPi | nYin(A.FactoryName)' | 008348F0 BAF84A8300 mov edx, $00834AF8 008348F5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008348F7 FF5138 call dword ptr [ecx+$38] 008348FA 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008348FC E8AB96CAFF call 004DDFAC * Possible String Reference to: ' from YF_Money_CR A' | 00834901 BA384B8300 mov edx, $00834B38 00834906 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00834908 FF5138 call dword ptr [ecx+$38] 0083490B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083490D E89A96CAFF call 004DDFAC * Possible String Reference to: ' inner join YF_Money_KC B on A.CRID | =B.CRID' | 00834912 BA584B8300 mov edx, $00834B58 00834917 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00834919 FF5138 call dword ptr [ecx+$38] 0083491C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083491E E88996CAFF call 004DDFAC * Possible String Reference to: ' left join conTract_main C on A.Mai | nId=C.MainId' | 00834923 BA8C4B8300 mov edx, $00834B8C 00834928 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 0083492A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: 'where A.CRTime>='' | 0083492D 68C44B8300 push $00834BC4 00834932 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.begdate : TDateTimePicker | 00834935 8B803C030000 mov eax, [eax+$033C] 0083493B FFB014020000 push dword ptr [eax+$0214] 00834941 FFB010020000 push dword ptr [eax+$0210] 00834947 8D55F4 lea edx, [ebp-$0C] * Possible String Reference to: 'yyyy-MM-dd' | 0083494A B8E04B8300 mov eax, $00834BE0 | 0083494F E868A2BDFF call 0040EBBC 00834954 FF75F4 push dword ptr [ebp-$0C] * Possible String Reference to: '' ' | 00834957 68F44B8300 push $00834BF4 0083495C 8D45F8 lea eax, [ebp-$08] 0083495F BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00834964 E84B0DBDFF call 004056B4 00834969 8B45F8 mov eax, [ebp-$08] 0083496C 50 push eax 0083496D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 0083496F E83896CAFF call 004DDFAC 00834974 5A pop edx 00834975 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00834977 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' and CRTime<'' | 0083497A 68004C8300 push $00834C00 0083497F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.Enddate : TDateTimePicker | 00834982 8B8040030000 mov eax, [eax+$0340] 00834988 DD8010020000 fld qword ptr [eax+$0210] 0083498E D805104C8300 fadd dword ptr [$00834C10] 00834994 83C4F8 add esp, -$08 00834997 DD1C24 fstp qword ptr [esp] 0083499A 9B wait 0083499B 8D55EC lea edx, [ebp-$14] * Possible String Reference to: 'yyyy-MM-dd' | 0083499E B8E04B8300 mov eax, $00834BE0 | 008349A3 E814A2BDFF call 0040EBBC 008349A8 FF75EC push dword ptr [ebp-$14] * Possible String Reference to: '' ' | 008349AB 68F44B8300 push $00834BF4 008349B0 8D45F0 lea eax, [ebp-$10] 008349B3 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008349B8 E8F70CBDFF call 004056B4 008349BD 8B45F0 mov eax, [ebp-$10] 008349C0 50 push eax 008349C1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008349C3 E8E495CAFF call 004DDFAC 008349C8 5A pop edx 008349C9 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008349CB FF5138 call dword ptr [ecx+$38] 008349CE 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008349D0 E8D795CAFF call 004DDFAC * Possible String Reference to: ' and A.CRType='¸¶¿îµÇ¼Ç' ' | 008349D5 BA1C4C8300 mov edx, $00834C1C 008349DA 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008349DC FF5138 call dword ptr [ecx+$38] 008349DF 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.cxTabControl1 : TcxTabControl | 008349E2 8B805C030000 mov eax, [eax+$035C] * Reference to control ADOTemp : N.A. | 008349E8 83B83C03000000 cmp dword ptr [eax+$033C], +$00 008349EF 7511 jnz 00834A02 008349F1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 008349F3 E8B495CAFF call 004DDFAC * Possible String Reference to: ' and A.status='1' ' | 008349F8 BA404C8300 mov edx, $00834C40 008349FD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 008349FF FF5138 call dword ptr [ecx+$38] 00834A02 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.cxTabControl1 : TcxTabControl | 00834A05 8B805C030000 mov eax, [eax+$035C] * Reference to control ADOTemp : N.A. | 00834A0B 83B83C03000001 cmp dword ptr [eax+$033C], +$01 00834A12 7511 jnz 00834A25 00834A14 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00834A16 E89195CAFF call 004DDFAC * Possible String Reference to: ' and A.status='2' ' | 00834A1B BA5C4C8300 mov edx, $00834C5C 00834A20 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00834A22 FF5138 call dword ptr [ecx+$38] 00834A25 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.cxTabControl1 : TcxTabControl | 00834A28 8B805C030000 mov eax, [eax+$035C] * Reference to control ADOTemp : N.A. | 00834A2E 83B83C03000002 cmp dword ptr [eax+$033C], +$02 00834A35 7511 jnz 00834A48 00834A37 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 00834A39 E86E95CAFF call 004DDFAC * Possible String Reference to: ' and isnull(A.Status,'0')<>'0' ' | 00834A3E BA784C8300 mov edx, $00834C78 00834A43 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 00834A45 FF5138 call dword ptr [ecx+$38] 00834A48 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 00834A4A E8790EC9FF call 004C58C8 00834A4F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00834A52 8B904C030000 mov edx, [eax+$034C] 00834A58 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 00834A5B 8B8020030000 mov eax, [eax+$0320] | 00834A61 E82A24F8FF call 007B6E90 00834A66 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.CDS_HZ : TClientDataSet | 00834A69 8B904C030000 mov edx, [eax+$034C] 00834A6F 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 00834A72 8B8020030000 mov eax, [eax+$0320] | 00834A78 E89B25F8FF call 007B7018 00834A7D 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.Label12 : TLabel | 00834A80 8B8090030000 mov eax, [eax+$0390] 00834A86 BAA04C8300 mov edx, $00834CA0 * Reference to: Controls.TControl.SetText(TControl;TCaption); | 00834A8B E8903BC5FF call 00488620 00834A90 33C0 xor eax, eax 00834A92 5A pop edx 00834A93 59 pop ecx 00834A94 59 pop ecx 00834A95 648910 mov fs:[eax], edx ****** FINALLY | 00834A98 68C54A8300 push $00834AC5 00834A9D 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryMain : TADOQuery | 00834AA0 8B8020030000 mov eax, [eax+$0320] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 00834AA6 E8C92AC9FF call 004C7574 00834AAB 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ToolButton2 : TToolButton | 00834AAE 8B8014030000 mov eax, [eax+$0314] 00834AB4 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00834AB8 E897FABCFF call 00404554 00834ABD C3 ret * Reference to: System.@HandleFinally; | 00834ABE E93100BDFF jmp 00404AF4 00834AC3 EBD8 jmp 00834A9D ****** END | 00834AC5 33C0 xor eax, eax 00834AC7 5A pop edx 00834AC8 59 pop ecx 00834AC9 59 pop ecx 00834ACA 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 00834ACD 68E74A8300 push $00834AE7 00834AD2 8D45EC lea eax, [ebp-$14] 00834AD5 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00834ADA E86908BDFF call 00405348 00834ADF C3 ret * Reference to: System.@HandleFinally; | 00834AE0 E90F00BDFF jmp 00404AF4 00834AE5 EBEB jmp 00834AD2 ****** END | 00834AE7 5E pop esi 00834AE8 5B pop ebx 00834AE9 8BE5 mov esp, ebp 00834AEB 5D pop ebp 00834AEC C3 ret *) end; procedure TfrmFKCR_SH._PROC_008352A5(Sender : TObject); begin (* 008352A5 8BEC mov ebp, esp 008352A7 B92B000000 mov ecx, $0000002B 008352AC 6A00 push $00 008352AE 6A00 push $00 008352B0 49 dec ecx 008352B1 75F9 jnz 008352AC 008352B3 51 push ecx 008352B4 53 push ebx 008352B5 56 push esi 008352B6 57 push edi 008352B7 8945FC mov [ebp-$04], eax 008352BA 33C0 xor eax, eax 008352BC 55 push ebp * Possible String Reference to: 'é‰ð¼ÿééþÿÿ‹Ã_^[‹å]Ã' | 008352BD 68665A8300 push $00835A66 ***** TRY | 008352C2 64FF30 push dword ptr fs:[eax] 008352C5 648920 mov fs:[eax], esp 008352C8 33C0 xor eax, eax 008352CA 55 push ebp 008352CB 6815598300 push $00835915 ***** TRY | 008352D0 64FF30 push dword ptr fs:[eax] 008352D3 648920 mov fs:[eax], esp 008352D6 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 008352D9 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 008352DF E8486BCAFF call 004DBE2C * Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer; | 008352E4 E8ABCFC9FF call 004D2294 * Possible String Reference to: 'YF_Money_CR' | 008352E9 68845A8300 push $00835A84 008352EE 6A04 push $04 008352F0 6A01 push $01 008352F2 8D55F8 lea edx, [ebp-$08] 008352F5 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 008352F8 8B800C030000 mov eax, [eax+$030C] * Possible String Reference to: 'FK' | 008352FE B9985A8300 mov ecx, $00835A98 * Reference to : TfrmSelExportField._PROC_007B7708() | 00835303 E80024F8FF call 007B7708 00835308 84C0 test al, al 0083530A 753A jnz 00835346 0083530C 33DB xor ebx, ebx 0083530E 8B45FC mov eax, [ebp-$04] * Reference to control TfrmFKCR_SH.ADOQueryCmd : TADOQuery | 00835311 8B800C030000 mov eax, [eax+$030C] * Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection; | 00835317 E8106BCAFF call 004DBE2C * Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection); | 0083531C E8BFCFC9FF call 004D22E0 00835321 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00835323 B99C5A8300 mov ecx, $00835A9C * Possible String Reference to: 'È¡×î´óºÅʧ°Ü£¡' | 00835328 BAA45A8300 mov edx, $00835AA4 *) end; procedure TfrmFKCR_SH._PROC_00835B25(Sender : TObject); begin (* 00835B25 7064 jo 00835B8B 00835B27 61 popa 00835B28 7465 jz 00835B8F 00835B2A 205946 and [ecx+$46], bl 00835B2D 5F pop edi 00835B2E 4D dec ebp 00835B2F 6F outsd 00835B30 6E outsb 00835B31 65795F jns 00835B93 00835B34 43 inc ebx 00835B35 52 push edx 00835B36 49 dec ecx 00835B37 44 inc esp 00835B38 207365 and [ebx+$65], dh 00835B3B 7420 jz 00835B5D 00835B3D 43 inc ebx 00835B3E 52 push edx 00835B3F 49 dec ecx 00835B40 44 inc esp 00835B41 3D43524944 cmp eax, $44495243 00835B46 2B31 sub esi, dword ptr [ecx] 00835B48 0000 add [eax], al 00835B4A 0000 add [eax], al 00835B4C FFFF DB $FF, $FF // 00835B4E FFFF DB $FF, $FF // 00835B50 1C00 sbb al, $00 00835B52 0000 add [eax], al 00835B54 7365 jnb 00835BBB 00835B56 6C insb 00835B57 656374202A arpl gs:[eax+$2A], si 00835B5C 206672 and [esi+$72], ah 00835B5F 6F outsd 00835B60 6D insd 00835B61 205946 and [ecx+$46], bl 00835B64 5F pop edi 00835B65 4D dec ebp 00835B66 6F outsd 00835B67 6E outsb 00835B68 65795F jns 00835BCA 00835B6B 43 inc ebx 00835B6C 52 push edx 00835B6D 49 dec ecx 00835B6E 44 inc esp 00835B6F 2000 and [eax], al 00835B71 0000 add [eax], al 00835B73 00FF add bh, bh 00835B75 FFFF DB $FF, $FF // 00835B77 FF2400 jmp dword ptr [eax+eax] 00835B7A 0000 add [eax], al 00835B7C 7365 jnb 00835BE3 00835B7E 6C insb 00835B7F 656374202A arpl gs:[eax+$2A], si 00835B84 206672 and [esi+$72], ah 00835B87 6F outsd 00835B88 6D insd 00835B89 205946 and [ecx+$46], bl 00835B8C 5F pop edi 00835B8D 4D dec ebp 00835B8E 6F outsd 00835B8F 6E outsb 00835B90 65795F jns 00835BF2 00835B93 4B dec ebx 00835B94 43 inc ebx 00835B95 207768 and [edi+$68], dh 00835B98 657265 jb 00835C00 00835B9B 2031 and [ecx], dh 00835B9D 3C3E cmp al, $3E 00835B9F 3100 xor [eax], eax 00835BA1 0000 add [eax], al 00835BA3 00FF add bh, bh 00835BA5 FFFF DB $FF, $FF // 00835BA7 FF09 dec dword ptr [ecx] 00835BA9 0000 add [eax], al 00835BAB 004661 add [esi+$61], al 00835BAE 63746F72 arpl [edi+ebp*2+$72], si 00835BB2 794E jns 00835C02 00835BB4 6F outsd 00835BB5 0000 add [eax], al 00835BB7 00FF add bh, bh 00835BB9 FFFF DB $FF, $FF // 00835BBB FF07 inc dword ptr [edi] 00835BBD 0000 add [eax], al 00835BBF 005A64 add [edx+$64], bl 00835BC2 7953 jns 00835C17 00835BC4 7472 jz 00835C38 00835BC6 3100 xor [eax], eax 00835BC8 FFFF DB $FF, $FF // 00835BCA FFFF DB $FF, $FF // 00835BCC 06 push es 00835BCD 0000 add [eax], al 00835BCF 00D3 add bl, dl 00835BD1 A6 cmpsb 00835BD2 B8B6B8B600 mov eax, $00B6B8B6 00835BD7 00FF add bh, bh 00835BD9 FFFF DB $FF, $FF // 00835BDB FF2400 jmp dword ptr [eax+eax] 00835BDE 0000 add [eax], al 00835BE0 7365 jnb 00835C47 00835BE2 6C insb 00835BE3 656374202A arpl gs:[eax+$2A], si 00835BE8 206672 and [esi+$72], ah 00835BEB 6F outsd 00835BEC 6D insd 00835BED 205946 and [ecx+$46], bl 00835BF0 5F pop edi 00835BF1 4D dec ebp 00835BF2 6F outsd 00835BF3 6E outsb 00835BF4 65795F jns 00835C56 00835BF7 43 inc ebx 00835BF8 52 push edx 00835BF9 207768 and [edi+$68], dh 00835BFC 657265 jb 00835C64 00835BFF 2031 and [ecx], dh 00835C01 3C3E cmp al, $3E 00835C03 3100 xor [eax], eax 00835C05 0000 add [eax], al 00835C07 00FF add bh, bh 00835C09 FFFF DB $FF, $FF // 00835C0B FF0400 inc dword ptr [eax+eax] 00835C0E 0000 add [eax], al 00835C10 59 pop ecx 00835C11 46 inc esi 00835C12 49 dec ecx 00835C13 44 inc esp 00835C14 0000 add [eax], al 00835C16 0000 add [eax], al 00835C18 FFFF DB $FF, $FF // 00835C1A FFFF DB $FF, $FF // 00835C1C 06 push es 00835C1D 0000 add [eax], al 00835C1F 004669 add [esi+$69], al 00835C22 6C insb 00835C23 6C insb 00835C24 657200 jb 00835C27 00835C27 00FF add bh, bh 00835C29 FFFF DB $FF, $FF // 00835C2B FF06 inc dword ptr [esi] 00835C2D 0000 add [eax], al 00835C2F 004352 add [ebx+$52], al 00835C32 54 push esp 00835C33 7970 jns 00835CA5 00835C35 650000 add gs:[eax], al 00835C38 FFFF DB $FF, $FF // 00835C3A FFFF DB $FF, $FF // 00835C3C 0800 or [eax], al 00835C3E 0000 add [eax], al 00835C40 B8B6BFEEB5 mov eax, $B5EEBFB6 00835C45 C7BCC700000000FFFFFFFF mov dword ptr [edi+eax*8+$0000], $FFFFFFFF 00835C50 06 push es 00835C51 0000 add [eax], al 00835C53 004352 add [ebx+$52], al 00835C56 46 inc esi 00835C57 6C insb 00835C58 61 popa 00835C59 670000 add [bx+si], al 00835C5C FFFF DB $FF, $FF // 00835C5E FFFF DB $FF, $FF // 00835C60 07 pop es 00835C61 0000 add [eax], al 00835C63 005174 add [ecx+$74], dl 00835C66 7946 jns 00835CAE 00835C68 6C insb 00835C69 61 popa 00835C6A 6700FF add bh, bh 00835C6D FFFF DB $FF, $FF // 00835C6F FF06 inc dword ptr [esi] 00835C71 0000 add [eax], al 00835C73 004352 add [ebx+$52], al 00835C76 54 push esp 00835C77 696D650000FFFF imul ebp, [ebp+$65], $FFFF0000 00835C7E FFFF DB $FF, $FF // 00835C80 0A00 or al, byte ptr [eax] 00835C82 0000 add [eax], al 00835C84 7979 jns 00835CFF 00835C86 7979 jns 00835D01 00835C88 2D4D4D2D64 sub eax, $642D4D4D 00835C8D 640000 add fs:[eax], al 00835C90 FFFF DB $FF, $FF // 00835C92 FFFF DB $FF, $FF // 00835C94 0A00 or al, byte ptr [eax] 00835C96 0000 add [eax], al 00835C98 59 pop ecx 00835C99 46 inc esi 00835C9A 44 inc esp 00835C9B 656646 inc si 00835C9E 6C insb 00835C9F 61 popa 00835CA0 673100 xor [bx+si], eax 00835CA3 00FF add bh, bh 00835CA5 FFFF DB $FF, $FF // 00835CA7 FF06 inc dword ptr [esi] 00835CA9 0000 add [eax], al 00835CAB 007374 add [ebx+$74], dh 00835CAE 61 popa 00835CAF 7475 jz 00835D26 00835CB1 7300 jnb 00835CB3 00835CB3 00FF add bh, bh 00835CB5 FFFF DB $FF, $FF // 00835CB7 FF0400 inc dword ptr [eax+eax] 00835CBA 0000 add [eax], al 00835CBC 59 pop ecx 00835CBD 46 inc esi 00835CBE 49 dec ecx 00835CBF 640000 add fs:[eax], al 00835CC2 0000 add [eax], al 00835CC4 D4 aam 00835CC5 F6D0 not al 00835CC7 D0CA ror dl, 1 00835CC9 A7 cmpsd 00835CCA B0DC mov al, $DC 00835CCC 2100 and [eax], eax 00835CCE 0000 add [eax], al 00835CD0 55 push ebp 00835CD1 8BEC mov ebp, esp 00835CD3 B908000000 mov ecx, $00000008 00835CD8 6A00 push $00 00835CDA 6A00 push $00 00835CDC 49 dec ecx 00835CDD 75F9 jnz 00835CD8 00835CDF 51 push ecx 00835CE0 53 push ebx 00835CE1 56 push esi 00835CE2 8BDA mov ebx, edx 00835CE4 8BF0 mov esi, eax 00835CE6 33C0 xor eax, eax 00835CE8 55 push ebp 00835CE9 68DE5E8300 push $00835EDE ***** TRY | 00835CEE 64FF30 push dword ptr fs:[eax] 00835CF1 648920 mov fs:[eax], esp 00835CF4 8D55FC lea edx, [ebp-$04] 00835CF7 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; | 00835CF9 E8BE99D5FF call 0058F6BC * Reference to control Label17 : TLabel | 00835CFE 8B86A8030000 mov eax, [esi+$03A8] * Reference to: Contnrs.TComponentList.First(TComponentList):TComponent; | or: Contnrs.TComponentList.Last(TComponentList):TComponent; | 00835D04 E84366E2FF call 0065C34C * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00835D09 E856BEE1FF call 00651B64 * Reference to field TLabel.ControlStyle : TControlStyle | 00835D0E 8B4050 mov eax, [eax+$50] 00835D11 8D55F4 lea edx, [ebp-$0C] 00835D14 8B08 mov ecx, [eax] * Possible reference to virtual method TControlStyle.OFFS_10 | 00835D16 FF5110 call dword ptr [ecx+$10] 00835D19 8B45F4 mov eax, [ebp-$0C] 00835D1C 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D1F E8C84BBDFF call 0040A8EC * Reference to control ADOQuery1 : N.A. | 00835D24 8B9E4C030000 mov ebx, [esi+$034C] 00835D2A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00835D2C E80F27C9FF call 004C8440 00835D31 8D55E0 lea edx, [ebp-$20] 00835D34 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D37 E8B04BBDFF call 0040A8EC 00835D3C 8B55E0 mov edx, [ebp-$20] 00835D3F 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 00835D42 E88130BEFF call 00418DC8 00835D47 8D45E4 lea eax, [ebp-$1C] 00835D4A 50 push eax 00835D4B 8B55F8 mov edx, [ebp-$08] 00835D4E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00835D50 E85F0EC9FF call 004C6BB4 00835D55 5A pop edx 00835D56 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00835D58 FF91B4000000 call dword ptr [ecx+$00B4] 00835D5E 8BC3 mov eax, ebx 00835D60 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00835D62 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00835D68 8B9E0C030000 mov ebx, [esi+$030C] 00835D6E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00835D70 E85FFBC8FF call 004C58D4 00835D75 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; | 00835D77 E83082CAFF call 004DDFAC 00835D7C 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00835D7E FF5244 call dword ptr [edx+$44] 00835D81 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; | 00835D83 E82482CAFF call 004DDFAC * Possible String Reference to: 'UPdate YCL_SG_HZ ' | 00835D88 BAF45E8300 mov edx, $00835EF4 00835D8D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00835D8F FF5138 call dword ptr [ecx+$38] 00835D92 8D55DC lea edx, [ebp-$24] 00835D95 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835D98 E84F4BBDFF call 0040A8EC 00835D9D 837DDC00 cmp dword ptr [ebp-$24], +$00 00835DA1 7440 jz 00835DE3 * Possible String Reference to: ' Set ' | 00835DA3 68105F8300 push $00835F10 00835DA8 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00835DAB 68205F8300 push $00835F20 00835DB0 8D55D4 lea edx, [ebp-$2C] 00835DB3 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835DB6 E8314BBDFF call 0040A8EC 00835DBB FF75D4 push dword ptr [ebp-$2C] 00835DBE 682C5F8300 push $00835F2C 00835DC3 8D45D8 lea eax, [ebp-$28] 00835DC6 BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00835DCB E8E4F8BCFF call 004056B4 00835DD0 8B45D8 mov eax, [ebp-$28] 00835DD3 50 push eax 00835DD4 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; | 00835DD6 E8D181CAFF call 004DDFAC 00835DDB 5A pop edx 00835DDC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00835DDE FF5138 call dword ptr [ecx+$38] 00835DE1 EB2B jmp 00835E0E 00835DE3 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; | 00835DE5 E8C281CAFF call 004DDFAC 00835DEA 50 push eax * Possible String Reference to: ' Set ' | 00835DEB 68105F8300 push $00835F10 00835DF0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 00835DF3 68385F8300 push $00835F38 00835DF8 8D45D0 lea eax, [ebp-$30] 00835DFB BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00835E00 E8AFF8BCFF call 004056B4 00835E05 8B55D0 mov edx, [ebp-$30] 00835E08 58 pop eax 00835E09 8B08 mov ecx, [eax] 00835E0B FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00835E0E 68485F8300 push $00835F48 00835E13 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmFKCR_SH._PROC_00835EF5(Sender : TObject); begin (* 00835EF5 50 push eax 00835EF6 6461 popa 00835EF8 7465 jz 00835F5F 00835EFA 205943 and [ecx+$43], bl 00835EFD 4C dec esp 00835EFE 5F pop edi 00835EFF 53 push ebx 00835F00 47 inc edi 00835F01 5F pop edi 00835F02 48 dec eax 00835F03 5A pop edx 00835F04 2000 and [eax], al 00835F06 0000 add [eax], al 00835F08 FFFF DB $FF, $FF // 00835F0A FFFF DB $FF, $FF // 00835F0C 0500000020 add eax, +$20000000 00835F11 53 push ebx 00835F12 657420 jz 00835F35 00835F15 0000 add [eax], al 00835F17 00FF add bh, bh 00835F19 FFFF DB $FF, $FF // 00835F1B FF02 inc dword ptr [edx] 00835F1D 0000 add [eax], al 00835F1F 003D270000FF add [$FF000027], bh 00835F25 FFFF DB $FF, $FF // 00835F27 FF01 inc dword ptr [ecx] 00835F29 0000 add [eax], al 00835F2B 0027 add [edi], ah 00835F2D 0000 add [eax], al 00835F2F 00FF add bh, bh 00835F31 FFFF DB $FF, $FF // 00835F33 FF050000003D inc dword ptr [$3D000000] 00835F39 4E dec esi 00835F3A 55 push ebp 00835F3B 4C dec esp 00835F3C 4C dec esp 00835F3D 0000 add [eax], al 00835F3F 00FF add bh, bh 00835F41 FFFF DB $FF, $FF // 00835F43 FF09 dec dword ptr [ecx] 00835F45 0000 add [eax], al 00835F47 002C4564697465 add [$65746964+eax*2], ch 00835F4E 723D jb 00835F8D 00835F50 27 daa 00835F51 0000 add [eax], al 00835F53 00FF add bh, bh 00835F55 FFFF DB $FF, $FF // 00835F57 FF1400 call dword ptr [eax+eax] 00835F5A 0000 add [eax], al 00835F5C 2C45 sub al, $45 00835F5E 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00835F67 657464 jz 00835FCE 00835F6A 61 popa 00835F6B 7465 jz 00835FD2 00835F6D 2829 sub [ecx], ch 00835F6F 2000 and [eax], al 00835F71 0000 add [eax], al 00835F73 00FF add bh, bh 00835F75 FFFF DB $FF, $FF // 00835F77 FF0E dec dword ptr [esi] 00835F79 0000 add [eax], al 00835F7B 0020 add [eax], ah 00835F7D 7768 jnbe 00835FE7 00835F7F 657265 jb 00835FE7 00835F82 205375 and [ebx+$75], dl 00835F85 624964 bound ecx, qword ptr [ecx+$64] 00835F88 3D270000FF cmp eax, $FF000027 00835F8D FFFF DB $FF, $FF // 00835F8F FF0500000053 inc dword ptr [$53000000] 00835F95 7562 jnz 00835FF9 00835F97 49 dec ecx 00835F98 640000 add fs:[eax], al 00835F9B 00558B add [ebp-$75], dl 00835F9E EC in al, dx 00835F9F B91C000000 mov ecx, $0000001C 00835FA4 6A00 push $00 00835FA6 6A00 push $00 00835FA8 49 dec ecx 00835FA9 75F9 jnz 00835FA4 00835FAB 51 push ecx 00835FAC 53 push ebx 00835FAD 56 push esi 00835FAE 8BF2 mov esi, edx 00835FB0 8BD8 mov ebx, eax 00835FB2 33C0 xor eax, eax 00835FB4 55 push ebp 00835FB5 68FF658300 push $008365FF ***** TRY | 00835FBA 64FF30 push dword ptr fs:[eax] 00835FBD 648920 mov fs:[eax], esp 00835FC0 8D55FC lea edx, [ebp-$04] 00835FC3 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; | 00835FC5 E8F296D5FF call 0058F6BC 00835FCA 8D55DC lea edx, [ebp-$24] 00835FCD 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00835FD0 E81749BDFF call 0040A8EC 00835FD5 837DDC00 cmp dword ptr [ebp-$24], +$00 00835FD9 750D jnz 00835FE8 00835FDB 8D45FC lea eax, [ebp-$04] 00835FDE BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 00835FE3 E8D4F3BCFF call 004053BC * Reference to control Label17 : TLabel | 00835FE8 8B83A8030000 mov eax, [ebx+$03A8] * Reference to: Contnrs.TComponentList.First(TComponentList):TComponent; | or: Contnrs.TComponentList.Last(TComponentList):TComponent; | 00835FEE E85963E2FF call 0065C34C * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00835FF3 E86CBBE1FF call 00651B64 * Reference to field TLabel.ControlStyle : TControlStyle | 00835FF8 8B4050 mov eax, [eax+$50] 00835FFB 8D55D8 lea edx, [ebp-$28] 00835FFE 8B08 mov ecx, [eax] * Possible reference to virtual method TControlStyle.OFFS_10 | 00836000 FF5110 call dword ptr [ecx+$10] 00836003 8B45D8 mov eax, [ebp-$28] 00836006 8D55E0 lea edx, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836009 E8DE48BDFF call 0040A8EC * Reference to control ADOQuery1 : N.A. | 0083600E 8BB34C030000 mov esi, [ebx+$034C] 00836014 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00836016 E82524C9FF call 004C8440 0083601B 8D55C4 lea edx, [ebp-$3C] 0083601E 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836021 E8C648BDFF call 0040A8EC 00836026 8B55C4 mov edx, [ebp-$3C] 00836029 8D45C8 lea eax, [ebp-$38] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083602C E8972DBEFF call 00418DC8 00836031 8D45C8 lea eax, [ebp-$38] 00836034 50 push eax 00836035 8B55E0 mov edx, [ebp-$20] 00836038 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083603A E8750BC9FF call 004C6BB4 0083603F 5A pop edx 00836040 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00836042 FF91B4000000 call dword ptr [ecx+$00B4] 00836048 8BC6 mov eax, esi 0083604A 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 0083604C FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00836052 8BB308030000 mov esi, [ebx+$0308] 00836058 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 0083605A E875F8C8FF call 004C58D4 0083605F 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00836061 E8467FCAFF call 004DDFAC 00836066 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00836068 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 0083606B 6820668300 push $00836620 * Possible String Reference to: 'YFID' | 00836070 BA68668300 mov edx, $00836668 * Reference to control ADOQuery1 : N.A. | 00836075 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083607B E8340BC9FF call 004C6BB4 00836080 8D55BC lea edx, [ebp-$44] 00836083 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00836085 FF5160 call dword ptr [ecx+$60] 00836088 FF75BC push dword ptr [ebp-$44] 0083608B 6878668300 push $00836678 00836090 8D45C0 lea eax, [ebp-$40] 00836093 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00836098 E817F6BCFF call 004056B4 0083609D 8B45C0 mov eax, [ebp-$40] 008360A0 50 push eax 008360A1 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008360A3 E8047FCAFF call 004DDFAC 008360A8 5A pop edx 008360A9 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008360AB FF5138 call dword ptr [ecx+$38] 008360AE 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 008360B0 E813F8C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008360B5 BA84668300 mov edx, $00836684 * Reference to control Label3 : TLabel | 008360BA 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008360C0 E8EF0AC9FF call 004C6BB4 008360C5 8D55E4 lea edx, [ebp-$1C] 008360C8 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008360CA FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Qty' | 008360CD BA94668300 mov edx, $00836694 * Reference to control ADOQuery1 : N.A. | 008360D2 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008360D8 E8D70AC9FF call 004C6BB4 008360DD 8D55B8 lea edx, [ebp-$48] 008360E0 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008360E2 FF5160 call dword ptr [ecx+$60] 008360E5 8B45B8 mov eax, [ebp-$48] 008360E8 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008360EB E8FC47BDFF call 0040A8EC 008360F0 8D55B4 lea edx, [ebp-$4C] 008360F3 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008360F6 E8F147BDFF call 0040A8EC 008360FB 837DB400 cmp dword ptr [ebp-$4C], +$00 008360FF 750D jnz 0083610E 00836101 8D45F8 lea eax, [ebp-$08] 00836104 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 00836109 E8AEF2BCFF call 004053BC * Possible String Reference to: 'Price' | 0083610E BAA0668300 mov edx, $008366A0 * Reference to control ADOQuery1 : N.A. | 00836113 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836119 E8960AC9FF call 004C6BB4 0083611E 8D55B0 lea edx, [ebp-$50] 00836121 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00836123 FF5160 call dword ptr [ecx+$60] 00836126 8B45B0 mov eax, [ebp-$50] 00836129 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083612C E8BB47BDFF call 0040A8EC 00836131 8D55AC lea edx, [ebp-$54] 00836134 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836137 E8B047BDFF call 0040A8EC 0083613C 837DAC00 cmp dword ptr [ebp-$54], +$00 00836140 750D jnz 0083614F 00836142 8D45F4 lea eax, [ebp-$0C] 00836145 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083614A E86DF2BCFF call 004053BC * Possible String Reference to: 'Qty' | 0083614F BA94668300 mov edx, $00836694 * Reference to control ADOQuery1 : N.A. | 00836154 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083615A E8550AC9FF call 004C6BB4 0083615F 8D55A8 lea edx, [ebp-$58] 00836162 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00836164 FF5160 call dword ptr [ecx+$60] 00836167 8B45A8 mov eax, [ebp-$58] 0083616A 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083616D E87A47BDFF call 0040A8EC 00836172 8D55A4 lea edx, [ebp-$5C] 00836175 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836178 E86F47BDFF call 0040A8EC 0083617D 837DA400 cmp dword ptr [ebp-$5C], +$00 00836181 750D jnz 00836190 00836183 8D45F8 lea eax, [ebp-$08] 00836186 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083618B E82CF2BCFF call 004053BC * Possible String Reference to: 'Money' | 00836190 BAB0668300 mov edx, $008366B0 * Reference to control ADOQuery1 : N.A. | 00836195 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083619B E8140AC9FF call 004C6BB4 008361A0 8D55A0 lea edx, [ebp-$60] 008361A3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008361A5 FF5160 call dword ptr [ecx+$60] 008361A8 8B45A0 mov eax, [ebp-$60] 008361AB 8D55F0 lea edx, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361AE E83947BDFF call 0040A8EC 008361B3 8D559C lea edx, [ebp-$64] 008361B6 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361B9 E82E47BDFF call 0040A8EC 008361BE 837D9C00 cmp dword ptr [ebp-$64], +$00 008361C2 750D jnz 008361D1 008361C4 8D45F0 lea eax, [ebp-$10] 008361C7 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 008361CC E8EBF1BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 008361D1 BAC0668300 mov edx, $008366C0 * Reference to control ADOQuery1 : N.A. | 008361D6 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008361DC E8D309C9FF call 004C6BB4 008361E1 8D5598 lea edx, [ebp-$68] 008361E4 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008361E6 FF5160 call dword ptr [ecx+$60] 008361E9 8B4598 mov eax, [ebp-$68] 008361EC 8D55EC lea edx, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361EF E8F846BDFF call 0040A8EC 008361F4 8D5594 lea edx, [ebp-$6C] 008361F7 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008361FA E8ED46BDFF call 0040A8EC 008361FF 837D9400 cmp dword ptr [ebp-$6C], +$00 00836203 750D jnz 00836212 00836205 8D45EC lea eax, [ebp-$14] 00836208 BA14668300 mov edx, $00836614 * Reference to: System.@LStrLAsg(void;void;void;void); | 0083620D E8AAF1BCFF call 004053BC 00836212 8D5590 lea edx, [ebp-$70] 00836215 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836218 E8CF46BDFF call 0040A8EC 0083621D 8B4590 mov eax, [ebp-$70] * Possible String Reference to: 'Money' | 00836220 BAB0668300 mov edx, $008366B0 * Reference to: System.@LStrCmp; | 00836225 E816F5BCFF call 00405740 0083622A 0F84AD000000 jz 008362DD 00836230 8D558C lea edx, [ebp-$74] 00836233 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836236 E8B146BDFF call 0040A8EC 0083623B 8B458C mov eax, [ebp-$74] * Possible String Reference to: 'HuiLv' | 0083623E BAC0668300 mov edx, $008366C0 * Reference to: System.@LStrCmp; | 00836243 E8F8F4BCFF call 00405740 00836248 7469 jz 008362B3 0083624A 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083624D E8DA74BDFF call 0040D72C 00836252 DB7D80 fstp tbyte ptr [ebp-$80] 00836255 9B wait 00836256 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836259 E8CE74BDFF call 0040D72C 0083625E DB6D80 fld tbyte ptr [ebp-$80] 00836261 DEC9 fmulp st(1), st(0) 00836263 DBBD74FFFFFF fstp tbyte ptr [ebp+$FFFFFF74] 00836269 9B wait 0083626A 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083626D E8BA74BDFF call 0040D72C 00836272 DBAD74FFFFFF fld tbyte ptr [ebp+$FFFFFF74] 00836278 DEC9 fmulp st(1), st(0) 0083627A 83C4F4 add esp, -$0C 0083627D DB3C24 fstp tbyte ptr [esp] 00836280 9B wait 00836281 8D45E8 lea eax, [ebp-$18] | 00836284 E82373BDFF call 0040D5AC 00836289 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 0083628C E89B74BDFF call 0040D72C 00836291 DB7D80 fstp tbyte ptr [ebp-$80] 00836294 9B wait 00836295 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836298 E88F74BDFF call 0040D72C 0083629D DB6D80 fld tbyte ptr [ebp-$80] 008362A0 DEC9 fmulp st(1), st(0) 008362A2 83C4F4 add esp, -$0C 008362A5 DB3C24 fstp tbyte ptr [esp] 008362A8 9B wait 008362A9 8D45F0 lea eax, [ebp-$10] | 008362AC E8FB72BDFF call 0040D5AC 008362B1 EB52 jmp 00836305 008362B3 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362B6 E87174BDFF call 0040D72C 008362BB DB7D80 fstp tbyte ptr [ebp-$80] 008362BE 9B wait 008362BF 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362C2 E86574BDFF call 0040D72C 008362C7 DB6D80 fld tbyte ptr [ebp-$80] 008362CA DEC9 fmulp st(1), st(0) 008362CC 83C4F4 add esp, -$0C 008362CF DB3C24 fstp tbyte ptr [esp] 008362D2 9B wait 008362D3 8D45E8 lea eax, [ebp-$18] | 008362D6 E8D172BDFF call 0040D5AC 008362DB EB28 jmp 00836305 008362DD 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362E0 E84774BDFF call 0040D72C 008362E5 DB7D80 fstp tbyte ptr [ebp-$80] 008362E8 9B wait 008362E9 8B45EC mov eax, [ebp-$14] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 008362EC E83B74BDFF call 0040D72C 008362F1 DB6D80 fld tbyte ptr [ebp-$80] 008362F4 DEC9 fmulp st(1), st(0) 008362F6 83C4F4 add esp, -$0C 008362F9 DB3C24 fstp tbyte ptr [esp] 008362FC 9B wait 008362FD 8D45E8 lea eax, [ebp-$18] | 00836300 E8A772BDFF call 0040D5AC * Reference to control ADOQuery1 : N.A. | 00836305 8BB34C030000 mov esi, [ebx+$034C] 0083630B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 0083630D E82E21C9FF call 004C8440 * Possible String Reference to: 'Money' | 00836312 BAB0668300 mov edx, $008366B0 00836317 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836319 E89608C9FF call 004C6BB4 0083631E 50 push eax 0083631F 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836322 E80574BDFF call 0040D72C 00836327 8D8564FFFFFF lea eax, [ebp+$FFFFFF64] * Reference to: Variants.@VarFromReal; | 0083632D E85A2ABEFF call 00418D8C 00836332 8D9564FFFFFF lea edx, [ebp+$FFFFFF64] 00836338 58 pop eax 00836339 8B08 mov ecx, [eax] 0083633B FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00836341 BA84668300 mov edx, $00836684 00836346 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836348 E86708C9FF call 004C6BB4 0083634D 50 push eax 0083634E 8B45E8 mov eax, [ebp-$18] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00836351 E8D673BDFF call 0040D72C 00836356 8D8554FFFFFF lea eax, [ebp+$FFFFFF54] * Reference to: Variants.@VarFromReal; | 0083635C E82B2ABEFF call 00418D8C 00836361 8D9554FFFFFF lea edx, [ebp+$FFFFFF54] 00836367 58 pop eax 00836368 8B08 mov ecx, [eax] 0083636A FF91B4000000 call dword ptr [ecx+$00B4] 00836370 8BC6 mov eax, esi 00836372 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00836374 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 0083637A 8BB30C030000 mov esi, [ebx+$030C] 00836380 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00836382 E84DF5C8FF call 004C58D4 00836387 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; | 00836389 E81E7CCAFF call 004DDFAC 0083638E 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00836390 FF5244 call dword ptr [edx+$44] 00836393 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; | 00836395 E8127CCAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 0083639A BAD0668300 mov edx, $008366D0 0083639F 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008363A1 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 008363A4 68EC668300 push $008366EC 008363A9 FF75E0 push dword ptr [ebp-$20] 008363AC 68FC668300 push $008366FC 008363B1 8D954CFFFFFF lea edx, [ebp+$FFFFFF4C] 008363B7 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008363BA E82D45BDFF call 0040A8EC 008363BF FFB54CFFFFFF push dword ptr [ebp+$FFFFFF4C] 008363C5 8D8550FFFFFF lea eax, [ebp+$FFFFFF50] 008363CB BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 008363D0 E8DFF2BCFF call 004056B4 008363D5 8B8550FFFFFF mov eax, [ebp+$FFFFFF50] 008363DB 50 push eax 008363DC 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; | 008363DE E8C97BCAFF call 004DDFAC 008363E3 5A pop edx 008363E4 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008363E6 FF5138 call dword ptr [ecx+$38] 008363E9 8D9548FFFFFF lea edx, [ebp+$FFFFFF48] 008363EF 8B45E0 mov eax, [ebp-$20] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008363F2 E8F544BDFF call 0040A8EC 008363F7 8B8548FFFFFF mov eax, [ebp+$FFFFFF48] * Possible String Reference to: 'Money' | 008363FD BAB0668300 mov edx, $008366B0 * Reference to: System.@LStrCmp; | 00836402 E839F3BCFF call 00405740 00836407 7427 jz 00836430 00836409 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; | 0083640B E89C7BCAFF call 004DDFAC 00836410 50 push eax 00836411 8D8544FFFFFF lea eax, [ebp+$FFFFFF44] 00836417 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',Money=' | 0083641A BA08678300 mov edx, $00836708 * Reference to: System.@LStrCat3; | 0083641F E81CF2BCFF call 00405640 00836424 8B9544FFFFFF mov edx, [ebp+$FFFFFF44] 0083642A 58 pop eax 0083642B 8B08 mov ecx, [eax] 0083642D FF5138 call dword ptr [ecx+$38] 00836430 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; | 00836432 E8757BCAFF call 004DDFAC 00836437 50 push eax 00836438 8D8540FFFFFF lea eax, [ebp+$FFFFFF40] 0083643E 8B4DE8 mov ecx, [ebp-$18] * Possible String Reference to: ',BBMoney=' | 00836441 BA18678300 mov edx, $00836718 * Reference to: System.@LStrCat3; | 00836446 E8F5F1BCFF call 00405640 0083644B 8B9540FFFFFF mov edx, [ebp+$FFFFFF40] 00836451 58 pop eax 00836452 8B08 mov ecx, [eax] 00836454 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00836457 682C678300 push $0083672C 0083645C 8D9538FFFFFF lea edx, [ebp+$FFFFFF38] *) end; procedure TfrmFKCR_SH._PROC_008366D1(Sender : TObject); begin (* 008366D1 50 push eax 008366D2 6461 popa 008366D4 7465 jz 0083673B 008366D6 205946 and [ecx+$46], bl 008366D9 5F pop edi 008366DA 4D dec ebp 008366DB 6F outsd 008366DC 6E outsb 008366DD 65795F jns 0083673F 008366E0 43 inc ebx 008366E1 52 push edx 008366E2 2000 and [eax], al 008366E4 FFFF DB $FF, $FF // 008366E6 FFFF DB $FF, $FF // 008366E8 0500000020 add eax, +$20000000 008366ED 53 push ebx 008366EE 657420 jz 00836711 008366F1 0000 add [eax], al 008366F3 00FF add bh, bh 008366F5 FFFF DB $FF, $FF // 008366F7 FF01 inc dword ptr [ecx] 008366F9 0000 add [eax], al 008366FB 003D000000FF add [$FF000000], bh 00836701 FFFF DB $FF, $FF // 00836703 FF07 inc dword ptr [edi] 00836705 0000 add [eax], al 00836707 002C4D6F6E6579 add [$79656E6F+ecx*2], ch 0083670E 3D00FFFFFF cmp eax, $FFFFFF00 00836713 FF09 dec dword ptr [ecx] 00836715 0000 add [eax], al 00836717 002C42 add [edx+eax*2], ch 0083671A 42 inc edx 0083671B 4D dec ebp 0083671C 6F outsd 0083671D 6E outsb 0083671E 65793D jns 0083675E 00836721 0000 add [eax], al 00836723 00FF add bh, bh 00836725 FFFF DB $FF, $FF // 00836727 FF09 dec dword ptr [ecx] 00836729 0000 add [eax], al 0083672B 002C4564697465 add [$65746964+eax*2], ch 00836732 723D jb 00836771 00836734 27 daa 00836735 0000 add [eax], al 00836737 00FF add bh, bh 00836739 FFFF DB $FF, $FF // 0083673B FF1400 call dword ptr [eax+eax] 0083673E 0000 add [eax], al 00836740 2C45 sub al, $45 00836742 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0083674B 657464 jz 008367B2 0083674E 61 popa 0083674F 7465 jz 008367B6 00836751 2829 sub [ecx], ch 00836753 2000 and [eax], al 00836755 0000 add [eax], al 00836757 00FF add bh, bh 00836759 FFFF DB $FF, $FF // 0083675B FF0D00000020 dec dword ptr [$20000000] 00836761 7768 jnbe 008367CB 00836763 657265 jb 008367CB 00836766 205946 and [ecx+$46], bl 00836769 49 dec ecx 0083676A 643D27000000 cmp eax, $00000027 00836770 FFFF DB $FF, $FF // 00836772 FFFF DB $FF, $FF // 00836774 0400 add al, +$00 00836776 0000 add [eax], al 00836778 59 pop ecx 00836779 46 inc esi 0083677A 49 dec ecx 0083677B 640000 add fs:[eax], al 0083677E 0000 add [eax], al 00836780 FFFF DB $FF, $FF // 00836782 FFFF DB $FF, $FF // 00836784 2B00 sub eax, dword ptr [eax] 00836786 0000 add [eax], al 00836788 55 push ebp 00836789 7064 jo 008367EF 0083678B 61 popa 0083678C 7465 jz 008367F3 0083678E 205946 and [ecx+$46], bl 00836791 5F pop edi 00836792 4D dec ebp 00836793 6F outsd 00836794 6E outsb 00836795 65795F jns 008367F7 00836798 4B dec ebx 00836799 43 inc ebx 0083679A 205365 and [ebx+$65], dl 0083679D 7420 jz 008367BF 0083679F 4B dec ebx 008367A0 43 inc ebx 008367A1 42 inc edx 008367A2 42 inc edx 008367A3 4D dec ebp 008367A4 6F outsd 008367A5 6E outsb 008367A6 65793D jns 008367E6 008367A9 4B dec ebx 008367AA 43 inc ebx 008367AB 42 inc edx 008367AC 42 inc edx 008367AD 4D dec ebp 008367AE 6F outsd 008367AF 6E outsb 008367B0 65792D jns 008367E0 008367B3 00FF add bh, bh 008367B5 FFFF DB $FF, $FF // 008367B7 FF01 inc dword ptr [ecx] 008367B9 0000 add [eax], al 008367BB 002B add [ebx], ch 008367BD 0000 add [eax], al 008367BF 00FF add bh, bh 008367C1 FFFF DB $FF, $FF // 008367C3 FF0D00000020 dec dword ptr [$20000000] 008367C9 7768 jnbe 00836833 008367CB 657265 jb 00836833 008367CE 204352 and [ebx+$52], al 008367D1 49 dec ecx 008367D2 44 inc esp 008367D3 3D27000000 cmp eax, $00000027 008367D8 FFFF DB $FF, $FF // 008367DA FFFF DB $FF, $FF // 008367DC 0400 add al, +$00 008367DE 0000 add [eax], al 008367E0 43 inc ebx 008367E1 52 push edx 008367E2 49 dec ecx 008367E3 44 inc esp 008367E4 0000 add [eax], al 008367E6 0000 add [eax], al 008367E8 55 push ebp 008367E9 8BEC mov ebp, esp 008367EB B908000000 mov ecx, $00000008 008367F0 6A00 push $00 008367F2 6A00 push $00 008367F4 49 dec ecx 008367F5 75F9 jnz 008367F0 008367F7 51 push ecx 008367F8 53 push ebx 008367F9 56 push esi 008367FA 8BDA mov ebx, edx 008367FC 8BF0 mov esi, eax 008367FE 33C0 xor eax, eax 00836800 55 push ebp * Possible String Reference to: 'éùà¼ÿëÖ^[‹å]Ã' | 00836801 68F6698300 push $008369F6 ***** TRY | 00836806 64FF30 push dword ptr fs:[eax] 00836809 648920 mov fs:[eax], esp 0083680C 8D55FC lea edx, [ebp-$04] 0083680F 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; | 00836811 E8A68ED5FF call 0058F6BC * Reference to control Label17 : TLabel | 00836816 8B86A8030000 mov eax, [esi+$03A8] * Reference to: Contnrs.TComponentList.First(TComponentList):TComponent; | or: Contnrs.TComponentList.Last(TComponentList):TComponent; | 0083681C E82B5BE2FF call 0065C34C * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00836821 E83EB3E1FF call 00651B64 * Reference to field TLabel.ControlStyle : TControlStyle | 00836826 8B4050 mov eax, [eax+$50] 00836829 8D55F4 lea edx, [ebp-$0C] 0083682C 8B08 mov ecx, [eax] * Possible reference to virtual method TControlStyle.OFFS_10 | 0083682E FF5110 call dword ptr [ecx+$10] 00836831 8B45F4 mov eax, [ebp-$0C] 00836834 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00836837 E8B040BDFF call 0040A8EC * Reference to control ADOQuery1 : N.A. | 0083683C 8B9E4C030000 mov ebx, [esi+$034C] 00836842 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00836844 E8F71BC9FF call 004C8440 00836849 8D55E0 lea edx, [ebp-$20] 0083684C 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083684F E89840BDFF call 0040A8EC 00836854 8B55E0 mov edx, [ebp-$20] 00836857 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083685A E86925BEFF call 00418DC8 0083685F 8D45E4 lea eax, [ebp-$1C] 00836862 50 push eax 00836863 8B55F8 mov edx, [ebp-$08] 00836866 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00836868 E84703C9FF call 004C6BB4 0083686D 5A pop edx 0083686E 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00836870 FF91B4000000 call dword ptr [ecx+$00B4] 00836876 8BC3 mov eax, ebx 00836878 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 0083687A FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00836880 8B9E0C030000 mov ebx, [esi+$030C] 00836886 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00836888 E847F0C8FF call 004C58D4 0083688D 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; | 0083688F E81877CAFF call 004DDFAC 00836894 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00836896 FF5244 call dword ptr [edx+$44] 00836899 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; | 0083689B E80C77CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 008368A0 BA0C6A8300 mov edx, $00836A0C 008368A5 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008368A7 FF5138 call dword ptr [ecx+$38] 008368AA 8D55DC lea edx, [ebp-$24] 008368AD 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008368B0 E83740BDFF call 0040A8EC 008368B5 837DDC00 cmp dword ptr [ebp-$24], +$00 008368B9 7440 jz 008368FB * Possible String Reference to: ' Set ' | 008368BB 68286A8300 push $00836A28 008368C0 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 008368C3 68386A8300 push $00836A38 008368C8 8D55D4 lea edx, [ebp-$2C] 008368CB 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008368CE E81940BDFF call 0040A8EC 008368D3 FF75D4 push dword ptr [ebp-$2C] 008368D6 68446A8300 push $00836A44 008368DB 8D45D8 lea eax, [ebp-$28] 008368DE BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 008368E3 E8CCEDBCFF call 004056B4 008368E8 8B45D8 mov eax, [ebp-$28] 008368EB 50 push eax 008368EC 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; | 008368EE E8B976CAFF call 004DDFAC 008368F3 5A pop edx 008368F4 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 008368F6 FF5138 call dword ptr [ecx+$38] 008368F9 EB2B jmp 00836926 008368FB 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; | 008368FD E8AA76CAFF call 004DDFAC 00836902 50 push eax * Possible String Reference to: ' Set ' | 00836903 68286A8300 push $00836A28 00836908 FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '=NULL' | 0083690B 68506A8300 push $00836A50 00836910 8D45D0 lea eax, [ebp-$30] 00836913 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00836918 E897EDBCFF call 004056B4 0083691D 8B55D0 mov edx, [ebp-$30] 00836920 58 pop eax 00836921 8B08 mov ecx, [eax] 00836923 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00836926 68606A8300 push $00836A60 0083692B 8D55C8 lea edx, [ebp-$38] *) end; procedure TfrmFKCR_SH._PROC_00836A0D(Sender : TObject); begin (* 00836A0D 50 push eax 00836A0E 6461 popa 00836A10 7465 jz 00836A77 00836A12 205946 and [ecx+$46], bl 00836A15 5F pop edi 00836A16 4D dec ebp 00836A17 6F outsd 00836A18 6E outsb 00836A19 65795F jns 00836A7B 00836A1C 43 inc ebx 00836A1D 52 push edx 00836A1E 2000 and [eax], al 00836A20 FFFF DB $FF, $FF // 00836A22 FFFF DB $FF, $FF // 00836A24 0500000020 add eax, +$20000000 00836A29 53 push ebx 00836A2A 657420 jz 00836A4D 00836A2D 0000 add [eax], al 00836A2F 00FF add bh, bh 00836A31 FFFF DB $FF, $FF // 00836A33 FF02 inc dword ptr [edx] 00836A35 0000 add [eax], al 00836A37 003D270000FF add [$FF000027], bh 00836A3D FFFF DB $FF, $FF // 00836A3F FF01 inc dword ptr [ecx] 00836A41 0000 add [eax], al 00836A43 0027 add [edi], ah 00836A45 0000 add [eax], al 00836A47 00FF add bh, bh 00836A49 FFFF DB $FF, $FF // 00836A4B FF050000003D inc dword ptr [$3D000000] 00836A51 4E dec esi 00836A52 55 push ebp 00836A53 4C dec esp 00836A54 4C dec esp 00836A55 0000 add [eax], al 00836A57 00FF add bh, bh 00836A59 FFFF DB $FF, $FF // 00836A5B FF09 dec dword ptr [ecx] 00836A5D 0000 add [eax], al 00836A5F 002C4564697465 add [$65746964+eax*2], ch 00836A66 723D jb 00836AA5 00836A68 27 daa 00836A69 0000 add [eax], al 00836A6B 00FF add bh, bh 00836A6D FFFF DB $FF, $FF // 00836A6F FF1400 call dword ptr [eax+eax] 00836A72 0000 add [eax], al 00836A74 2C45 sub al, $45 00836A76 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00836A7F 657464 jz 00836AE6 00836A82 61 popa 00836A83 7465 jz 00836AEA 00836A85 2829 sub [ecx], ch 00836A87 2000 and [eax], al 00836A89 0000 add [eax], al 00836A8B 00FF add bh, bh 00836A8D FFFF DB $FF, $FF // 00836A8F FF0D00000020 dec dword ptr [$20000000] 00836A95 7768 jnbe 00836AFF 00836A97 657265 jb 00836AFF 00836A9A 205946 and [ecx+$46], bl 00836A9D 49 dec ecx 00836A9E 643D27000000 cmp eax, $00000027 00836AA4 FFFF DB $FF, $FF // 00836AA6 FFFF DB $FF, $FF // 00836AA8 0400 add al, +$00 00836AAA 0000 add [eax], al 00836AAC 59 pop ecx 00836AAD 46 inc esi 00836AAE 49 dec ecx 00836AAF 640000 add fs:[eax], al 00836AB2 0000 add [eax], al 00836AB4 55 push ebp 00836AB5 8BEC mov ebp, esp 00836AB7 B90C000000 mov ecx, $0000000C 00836ABC 6A00 push $00 00836ABE 6A00 push $00 00836AC0 49 dec ecx 00836AC1 75F9 jnz 00836ABC 00836AC3 53 push ebx 00836AC4 56 push esi 00836AC5 8BF0 mov esi, eax 00836AC7 33C0 xor eax, eax 00836AC9 55 push ebp * Possible String Reference to: 'é3Þ¼ÿë»^[‹å]Ã' | 00836ACA 68BC6C8300 push $00836CBC ***** TRY | 00836ACF 64FF30 push dword ptr fs:[eax] 00836AD2 648920 mov fs:[eax], esp 00836AD5 33C0 xor eax, eax 00836AD7 55 push ebp 00836AD8 686A6C8300 push $00836C6A ***** TRY | 00836ADD 64FF30 push dword ptr fs:[eax] 00836AE0 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH._PROC_00837129(Sender : TObject); begin (* 00837129 50 push eax 0083712A 6461 popa 0083712C 7465 jz 00837193 0083712E 205946 and [ecx+$46], bl 00837131 5F pop edi 00837132 4D dec ebp 00837133 6F outsd 00837134 6E outsb 00837135 65795F jns 00837197 00837138 43 inc ebx 00837139 52 push edx 0083713A 2000 and [eax], al 0083713C FFFF DB $FF, $FF // 0083713E FFFF DB $FF, $FF // 00837140 0D00000020 or eax, $20000000 00837145 53 push ebx 00837146 657420 jz 00837169 00837149 59 pop ecx 0083714A 46 inc esi 0083714B 43 inc ebx 0083714C 6F outsd 0083714D 64653D27000000 cmp eax, $00000027 00837154 FFFF DB $FF, $FF // 00837156 FFFF DB $FF, $FF // 00837158 0100 add [eax], eax 0083715A 0000 add [eax], al 0083715C 27 daa 0083715D 0000 add [eax], al 0083715F 00FF add bh, bh 00837161 FFFF DB $FF, $FF // 00837163 FF0A dec dword ptr [edx] 00837165 0000 add [eax], al 00837167 0020 add [eax], ah 00837169 2C59 sub al, $59 0083716B 46 inc esi 0083716C 4E dec esi 0083716D 61 popa 0083716E 6D insd 0083716F 653D270000FF cmp eax, $FF000027 00837175 FFFF DB $FF, $FF // 00837177 FF09 dec dword ptr [ecx] 00837179 0000 add [eax], al 0083717B 002C4564697465 add [$65746964+eax*2], ch 00837182 723D jb 008371C1 00837184 27 daa 00837185 0000 add [eax], al 00837187 00FF add bh, bh 00837189 FFFF DB $FF, $FF // 0083718B FF1400 call dword ptr [eax+eax] 0083718E 0000 add [eax], al 00837190 2C45 sub al, $45 00837192 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0083719B 657464 jz 00837202 0083719E 61 popa 0083719F 7465 jz 00837206 008371A1 2829 sub [ecx], ch 008371A3 2000 and [eax], al 008371A5 0000 add [eax], al 008371A7 00FF add bh, bh 008371A9 FFFF DB $FF, $FF // 008371AB FF0D00000020 dec dword ptr [$20000000] 008371B1 7768 jnbe 0083721B 008371B3 657265 jb 0083721B 008371B6 205946 and [ecx+$46], bl 008371B9 49 dec ecx 008371BA 643D27000000 cmp eax, $00000027 008371C0 FFFF DB $FF, $FF // 008371C2 FFFF DB $FF, $FF // 008371C4 0400 add al, +$00 008371C6 0000 add [eax], al 008371C8 59 pop ecx 008371C9 46 inc esi 008371CA 49 dec ecx 008371CB 640000 add fs:[eax], al 008371CE 0000 add [eax], al 008371D0 55 push ebp 008371D1 8BEC mov ebp, esp 008371D3 51 push ecx 008371D4 B906000000 mov ecx, $00000006 008371D9 6A00 push $00 008371DB 6A00 push $00 008371DD 49 dec ecx 008371DE 75F9 jnz 008371D9 008371E0 51 push ecx 008371E1 874DFC xchg [ebp-$04], ecx 008371E4 53 push ebx 008371E5 56 push esi 008371E6 8BF0 mov esi, eax 008371E8 33C0 xor eax, eax 008371EA 55 push ebp * Possible String Reference to: 'éÆÖ¼ÿëã^[‹å]Ã' | 008371EB 6829748300 push $00837429 ***** TRY | 008371F0 64FF30 push dword ptr fs:[eax] 008371F3 648920 mov fs:[eax], esp 008371F6 33C0 xor eax, eax 008371F8 55 push ebp 008371F9 68FF738300 push $008373FF ***** TRY | 008371FE 64FF30 push dword ptr fs:[eax] 00837201 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH._PROC_00837446(Sender : TObject); begin (* 00837446 6E outsb 00837447 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00 0083744F FF08 dec dword ptr [eax] 00837451 0000 add [eax], al *) end; procedure TfrmFKCR_SH._PROC_0083747C(Sender : TObject); begin (* 0083747C 6E outsb 0083747D 697400FFFFFFFF13 imul esi, [eax+eax-$01], $13FFFFFF 00837485 0000 add [eax], al *) end; procedure TfrmFKCR_SH._PROC_00837489(Sender : TObject); begin (* 00837489 50 push eax 0083748A 6461 popa 0083748C 7465 jz 008374F3 0083748E 205946 and [ecx+$46], bl 00837491 5F pop edi 00837492 4D dec ebp 00837493 6F outsd 00837494 6E outsb 00837495 65795F jns 008374F7 00837498 43 inc ebx 00837499 52 push edx 0083749A 2000 and [eax], al 0083749C FFFF DB $FF, $FF // 0083749E FFFF DB $FF, $FF // 008374A0 0E push cs 008374A1 0000 add [eax], al 008374A3 0020 add [eax], ah 008374A5 53 push ebx 008374A6 657420 jz 008374C9 008374A9 51 push ecx 008374AA 7479 jz 00837525 008374AC 55 push ebp 008374AD 6E outsb 008374AE 69743D270000FFFF imul esi, [ebp+edi+$27], $FFFF0000 008374B6 FFFF DB $FF, $FF // 008374B8 07 pop es 008374B9 0000 add [eax], al 008374BB 005A64 add [edx+$64], bl 008374BE 794E jns 0083750E 008374C0 61 popa 008374C1 6D insd 008374C2 6500FF add bh, bh 008374C5 FFFF DB $FF, $FF // 008374C7 FF01 inc dword ptr [ecx] 008374C9 0000 add [eax], al 008374CB 0027 add [edi], ah 008374CD 0000 add [eax], al 008374CF 00FF add bh, bh 008374D1 FFFF DB $FF, $FF // 008374D3 FF09 dec dword ptr [ecx] 008374D5 0000 add [eax], al 008374D7 002C4564697465 add [$65746964+eax*2], ch 008374DE 723D jb 0083751D 008374E0 27 daa 008374E1 0000 add [eax], al 008374E3 00FF add bh, bh 008374E5 FFFF DB $FF, $FF // 008374E7 FF1400 call dword ptr [eax+eax] 008374EA 0000 add [eax], al 008374EC 2C45 sub al, $45 008374EE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008374F7 657464 jz 0083755E 008374FA 61 popa 008374FB 7465 jz 00837562 008374FD 2829 sub [ecx], ch 008374FF 2000 and [eax], al 00837501 0000 add [eax], al 00837503 00FF add bh, bh 00837505 FFFF DB $FF, $FF // 00837507 FF0D00000020 dec dword ptr [$20000000] 0083750D 7768 jnbe 00837577 0083750F 657265 jb 00837577 00837512 205946 and [ecx+$46], bl 00837515 49 dec ecx 00837516 643D27000000 cmp eax, $00000027 0083751C FFFF DB $FF, $FF // 0083751E FFFF DB $FF, $FF // 00837520 0400 add al, +$00 00837522 0000 add [eax], al 00837524 59 pop ecx 00837525 46 inc esi 00837526 49 dec ecx 00837527 640000 add fs:[eax], al 0083752A 0000 add [eax], al 0083752C 55 push ebp 0083752D 8BEC mov ebp, esp 0083752F 51 push ecx 00837530 B906000000 mov ecx, $00000006 00837535 6A00 push $00 00837537 6A00 push $00 00837539 49 dec ecx 0083753A 75F9 jnz 00837535 0083753C 51 push ecx 0083753D 874DFC xchg [ebp-$04], ecx 00837540 53 push ebx 00837541 56 push esi 00837542 8BF0 mov esi, eax 00837544 33C0 xor eax, eax 00837546 55 push ebp * Possible String Reference to: 'éjÓ¼ÿëã^[‹å]Ã' | 00837547 6885778300 push $00837785 ***** TRY | 0083754C 64FF30 push dword ptr fs:[eax] 0083754F 648920 mov fs:[eax], esp 00837552 33C0 xor eax, eax 00837554 55 push ebp 00837555 685B778300 push $0083775B ***** TRY | 0083755A 64FF30 push dword ptr fs:[eax] 0083755D 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH._PROC_008377CD(Sender : TObject); begin (* 008377CD 50 push eax 008377CE 6461 popa 008377D0 7465 jz 00837837 008377D2 205946 and [ecx+$46], bl 008377D5 5F pop edi 008377D6 4D dec ebp 008377D7 6F outsd 008377D8 6E outsb 008377D9 65795F jns 0083783B 008377DC 43 inc ebx 008377DD 52 push edx 008377DE 2000 and [eax], al 008377E0 FFFF DB $FF, $FF // 008377E2 FFFF DB $FF, $FF // 008377E4 0D00000020 or eax, $20000000 008377E9 53 push ebx 008377EA 657420 jz 0083780D 008377ED 42 inc edx 008377EE 5A pop edx 008377EF 54 push esp 008377F0 7970 jns 00837862 008377F2 653D27000000 cmp eax, $00000027 008377F8 FFFF DB $FF, $FF // 008377FA FFFF DB $FF, $FF // 008377FC 07 pop es 008377FD 0000 add [eax], al 008377FF 005A64 add [edx+$64], bl 00837802 794E jns 00837852 00837804 61 popa 00837805 6D insd 00837806 6500FF add bh, bh 00837809 FFFF DB $FF, $FF // 0083780B FF01 inc dword ptr [ecx] 0083780D 0000 add [eax], al 0083780F 0027 add [edi], ah 00837811 0000 add [eax], al 00837813 00FF add bh, bh 00837815 FFFF DB $FF, $FF // 00837817 FF09 dec dword ptr [ecx] 00837819 0000 add [eax], al 0083781B 002C4564697465 add [$65746964+eax*2], ch 00837822 723D jb 00837861 00837824 27 daa 00837825 0000 add [eax], al 00837827 00FF add bh, bh 00837829 FFFF DB $FF, $FF // 0083782B FF1400 call dword ptr [eax+eax] 0083782E 0000 add [eax], al 00837830 2C45 sub al, $45 00837832 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0083783B 657464 jz 008378A2 0083783E 61 popa 0083783F 7465 jz 008378A6 00837841 2829 sub [ecx], ch 00837843 2000 and [eax], al 00837845 0000 add [eax], al 00837847 00FF add bh, bh 00837849 FFFF DB $FF, $FF // 0083784B FF0D00000020 dec dword ptr [$20000000] 00837851 7768 jnbe 008378BB 00837853 657265 jb 008378BB 00837856 205946 and [ecx+$46], bl 00837859 49 dec ecx 0083785A 643D27000000 cmp eax, $00000027 00837860 FFFF DB $FF, $FF // 00837862 FFFF DB $FF, $FF // 00837864 0400 add al, +$00 00837866 0000 add [eax], al 00837868 59 pop ecx 00837869 46 inc esi 0083786A 49 dec ecx 0083786B 640000 add fs:[eax], al 0083786E 0000 add [eax], al 00837870 53 push ebx 00837871 8BD8 mov ebx, eax * Reference to control ToolButton1 : TToolButton | 00837873 8B8320030000 mov eax, [ebx+$0320] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00837879 E84206C9FF call 004C7EC0 0083787E 84C0 test al, al 00837880 7516 jnz 00837898 * Possible String Reference to: '¸¶¿îÁбí' | 00837882 B9A4788300 mov ecx, $008378A4 * Reference to control ToolButton1 : TToolButton | 00837887 8B9320030000 mov edx, [ebx+$0320] * Reference to control Label17 : TLabel | 0083788D 8B83A8030000 mov eax, [ebx+$03A8] | 00837893 E89809F8FF call 007B8230 00837898 5B pop ebx 00837899 C3 ret 0083789A 0000 add [eax], al 0083789C FFFF DB $FF, $FF // 0083789E FFFF DB $FF, $FF // 008378A0 0800 or [eax], al 008378A2 0000 add [eax], al 008378A4 B8B6BFEEC1 mov eax, $C1EEBFB6 008378A9 D0B1ED000000 DB $D0, $B1, $ED, $00, $00, $00 // byte ptr [ecx+$00ED], 1 008378AF 00558B add [ebp-$75], dl 008378B2 EC in al, dx 008378B3 B915000000 mov ecx, $00000015 008378B8 6A00 push $00 008378BA 6A00 push $00 008378BC 49 dec ecx 008378BD 75F9 jnz 008378B8 008378BF 53 push ebx 008378C0 56 push esi 008378C1 8BF2 mov esi, edx 008378C3 8BD8 mov ebx, eax 008378C5 33C0 xor eax, eax 008378C7 55 push ebp * Possible String Reference to: 'éÍͼÿë³^[‹å]Ã' | 008378C8 68227D8300 push $00837D22 ***** TRY | 008378CD 64FF30 push dword ptr fs:[eax] 008378D0 648920 mov fs:[eax], esp 008378D3 8D55FC lea edx, [ebp-$04] 008378D6 8BC6 mov eax, esi * Reference to: Contnrs.TComponentList.Extract(TComponentList;TComponent):TComponent; | or: Contnrs.TComponentList.GetItems(TComponentList;Integer):TComponent; | 008378D8 E8DF7DD5FF call 0058F6BC 008378DD 8D55E4 lea edx, [ebp-$1C] 008378E0 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008378E3 E80430BDFF call 0040A8EC 008378E8 837DE400 cmp dword ptr [ebp-$1C], +$00 008378EC 750D jnz 008378FB 008378EE 8D45FC lea eax, [ebp-$04] 008378F1 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 008378F6 E8C1DABCFF call 004053BC * Reference to control Label17 : TLabel | 008378FB 8B83A8030000 mov eax, [ebx+$03A8] * Reference to: Contnrs.TComponentList.First(TComponentList):TComponent; | or: Contnrs.TComponentList.Last(TComponentList):TComponent; | 00837901 E8464AE2FF call 0065C34C * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00837906 E859A2E1FF call 00651B64 * Reference to field TLabel.ControlStyle : TControlStyle | 0083790B 8B4050 mov eax, [eax+$50] 0083790E 8D55E0 lea edx, [ebp-$20] 00837911 8B08 mov ecx, [eax] * Possible reference to virtual method TControlStyle.OFFS_10 | 00837913 FF5110 call dword ptr [ecx+$10] 00837916 8B45E0 mov eax, [ebp-$20] 00837919 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083791C E8CB2FBDFF call 0040A8EC * Reference to control ADOQuery1 : N.A. | 00837921 8BB34C030000 mov esi, [ebx+$034C] 00837927 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00837929 E8120BC9FF call 004C8440 0083792E 8D55CC lea edx, [ebp-$34] 00837931 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837934 E8B32FBDFF call 0040A8EC 00837939 8B55CC mov edx, [ebp-$34] 0083793C 8D45D0 lea eax, [ebp-$30] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 0083793F E88414BEFF call 00418DC8 00837944 8D45D0 lea eax, [ebp-$30] 00837947 50 push eax 00837948 8B55E8 mov edx, [ebp-$18] 0083794B 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083794D E862F2C8FF call 004C6BB4 00837952 5A pop edx 00837953 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00837955 FF91B4000000 call dword ptr [ecx+$00B4] 0083795B 8BC6 mov eax, esi 0083795D 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 0083795F FF924C020000 call dword ptr [edx+$024C] * Reference to control Label3 : TLabel | 00837965 8BB308030000 mov esi, [ebx+$0308] 0083796B 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 0083796D E862DFC8FF call 004C58D4 00837972 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 00837974 E83366CAFF call 004DDFAC 00837979 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 0083797B FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 0083797E 68447D8300 push $00837D44 * Possible String Reference to: 'YFID' | 00837983 BA8C7D8300 mov edx, $00837D8C * Reference to control ADOQuery1 : N.A. | 00837988 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083798E E821F2C8FF call 004C6BB4 00837993 8D55C4 lea edx, [ebp-$3C] 00837996 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00837998 FF5160 call dword ptr [ecx+$60] 0083799B FF75C4 push dword ptr [ebp-$3C] 0083799E 689C7D8300 push $00837D9C 008379A3 8D45C8 lea eax, [ebp-$38] 008379A6 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008379AB E804DDBCFF call 004056B4 008379B0 8B45C8 mov eax, [ebp-$38] 008379B3 50 push eax 008379B4 8BC6 mov eax, esi * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008379B6 E8F165CAFF call 004DDFAC 008379BB 5A pop edx 008379BC 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008379BE FF5138 call dword ptr [ecx+$38] 008379C1 8BC6 mov eax, esi * Reference to: DB.TDataSet.Open(TDataSet); | 008379C3 E800DFC8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008379C8 BAA87D8300 mov edx, $00837DA8 * Reference to control Label3 : TLabel | 008379CD 8B8308030000 mov eax, [ebx+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008379D3 E8DCF1C8FF call 004C6BB4 008379D8 8D55EC lea edx, [ebp-$14] 008379DB 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008379DD FF5160 call dword ptr [ecx+$60] * Possible String Reference to: 'Money' | 008379E0 BAB87D8300 mov edx, $00837DB8 * Reference to control ADOQuery1 : N.A. | 008379E5 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008379EB E8C4F1C8FF call 004C6BB4 008379F0 8D55C0 lea edx, [ebp-$40] 008379F3 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008379F5 FF5160 call dword ptr [ecx+$60] 008379F8 8B45C0 mov eax, [ebp-$40] 008379FB 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008379FE E8E92EBDFF call 0040A8EC 00837A03 8D55BC lea edx, [ebp-$44] 00837A06 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A09 E8DE2EBDFF call 0040A8EC 00837A0E 837DBC00 cmp dword ptr [ebp-$44], +$00 00837A12 750D jnz 00837A21 00837A14 8D45F8 lea eax, [ebp-$08] 00837A17 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 00837A1C E89BD9BCFF call 004053BC * Possible String Reference to: 'HuiLv' | 00837A21 BAC87D8300 mov edx, $00837DC8 * Reference to control ADOQuery1 : N.A. | 00837A26 8B834C030000 mov eax, [ebx+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837A2C E883F1C8FF call 004C6BB4 00837A31 8D55B8 lea edx, [ebp-$48] 00837A34 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00837A36 FF5160 call dword ptr [ecx+$60] 00837A39 8B45B8 mov eax, [ebp-$48] 00837A3C 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A3F E8A82EBDFF call 0040A8EC 00837A44 8D55B4 lea edx, [ebp-$4C] 00837A47 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837A4A E89D2EBDFF call 0040A8EC 00837A4F 837DB400 cmp dword ptr [ebp-$4C], +$00 00837A53 750D jnz 00837A62 00837A55 8D45F4 lea eax, [ebp-$0C] 00837A58 BA387D8300 mov edx, $00837D38 * Reference to: System.@LStrLAsg(void;void;void;void); | 00837A5D E85AD9BCFF call 004053BC 00837A62 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837A65 E8C25CBDFF call 0040D72C 00837A6A DB7DA8 fstp tbyte ptr [ebp-$58] 00837A6D 9B wait 00837A6E 8B45F4 mov eax, [ebp-$0C] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837A71 E8B65CBDFF call 0040D72C 00837A76 DB6DA8 fld tbyte ptr [ebp-$58] 00837A79 DEC9 fmulp st(1), st(0) 00837A7B 83C4F4 add esp, -$0C 00837A7E DB3C24 fstp tbyte ptr [esp] 00837A81 9B wait 00837A82 8D45F0 lea eax, [ebp-$10] | 00837A85 E8225BBDFF call 0040D5AC * Reference to control ADOQuery1 : N.A. | 00837A8A 8BB34C030000 mov esi, [ebx+$034C] 00837A90 8BC6 mov eax, esi * Reference to: DB.TDataSet.Edit(TDataSet); | 00837A92 E8A909C9FF call 004C8440 * Possible String Reference to: 'Money' | 00837A97 BAB87D8300 mov edx, $00837DB8 00837A9C 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837A9E E811F1C8FF call 004C6BB4 00837AA3 50 push eax 00837AA4 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837AA7 E8805CBDFF call 0040D72C 00837AAC 8D4598 lea eax, [ebp-$68] * Reference to: Variants.@VarFromReal; | 00837AAF E8D812BEFF call 00418D8C 00837AB4 8D5598 lea edx, [ebp-$68] 00837AB7 58 pop eax 00837AB8 8B08 mov ecx, [eax] 00837ABA FF91B4000000 call dword ptr [ecx+$00B4] * Possible String Reference to: 'BBMoney' | 00837AC0 BAA87D8300 mov edx, $00837DA8 00837AC5 8BC6 mov eax, esi * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00837AC7 E8E8F0C8FF call 004C6BB4 00837ACC 50 push eax 00837ACD 8B45F0 mov eax, [ebp-$10] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00837AD0 E8575CBDFF call 0040D72C 00837AD5 8D4588 lea eax, [ebp-$78] * Reference to: Variants.@VarFromReal; | 00837AD8 E8AF12BEFF call 00418D8C 00837ADD 8D5588 lea edx, [ebp-$78] 00837AE0 58 pop eax 00837AE1 8B08 mov ecx, [eax] 00837AE3 FF91B4000000 call dword ptr [ecx+$00B4] 00837AE9 8BC6 mov eax, esi 00837AEB 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00837AED FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00837AF3 8BB30C030000 mov esi, [ebx+$030C] 00837AF9 8BC6 mov eax, esi * Reference to: DB.TDataSet.Close(TDataSet); | 00837AFB E8D4DDC8FF call 004C58D4 00837B00 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; | 00837B02 E8A564CAFF call 004DDFAC 00837B07 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00837B09 FF5244 call dword ptr [edx+$44] 00837B0C 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; | 00837B0E E89964CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00837B13 BAD87D8300 mov edx, $00837DD8 00837B18 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00837B1A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 00837B1D 68F47D8300 push $00837DF4 00837B22 FF75E8 push dword ptr [ebp-$18] 00837B25 68047E8300 push $00837E04 00837B2A 8D5580 lea edx, [ebp-$80] 00837B2D 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00837B30 E8B72DBDFF call 0040A8EC 00837B35 FF7580 push dword ptr [ebp-$80] 00837B38 8D4584 lea eax, [ebp-$7C] 00837B3B BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 00837B40 E86FDBBCFF call 004056B4 00837B45 8B4584 mov eax, [ebp-$7C] 00837B48 50 push eax 00837B49 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; | 00837B4B E85C64CAFF call 004DDFAC 00837B50 5A pop edx 00837B51 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00837B53 FF5138 call dword ptr [ecx+$38] 00837B56 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; | 00837B58 E84F64CAFF call 004DDFAC 00837B5D 50 push eax 00837B5E 8D857CFFFFFF lea eax, [ebp+$FFFFFF7C] 00837B64 8B4DF0 mov ecx, [ebp-$10] * Possible String Reference to: ',BBMoney=' | 00837B67 BA107E8300 mov edx, $00837E10 * Reference to: System.@LStrCat3; | 00837B6C E8CFDABCFF call 00405640 00837B71 8B957CFFFFFF mov edx, [ebp+$FFFFFF7C] 00837B77 58 pop eax 00837B78 8B08 mov ecx, [eax] 00837B7A FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00837B7D 68247E8300 push $00837E24 00837B82 8D9574FFFFFF lea edx, [ebp+$FFFFFF74] *) end; procedure TfrmFKCR_SH._PROC_00837DD9(Sender : TObject); begin (* 00837DD9 50 push eax 00837DDA 6461 popa 00837DDC 7465 jz 00837E43 00837DDE 205946 and [ecx+$46], bl 00837DE1 5F pop edi 00837DE2 4D dec ebp 00837DE3 6F outsd 00837DE4 6E outsb 00837DE5 65795F jns 00837E47 00837DE8 43 inc ebx 00837DE9 52 push edx 00837DEA 2000 and [eax], al 00837DEC FFFF DB $FF, $FF // 00837DEE FFFF DB $FF, $FF // 00837DF0 0500000020 add eax, +$20000000 00837DF5 53 push ebx 00837DF6 657420 jz 00837E19 00837DF9 0000 add [eax], al 00837DFB 00FF add bh, bh 00837DFD FFFF DB $FF, $FF // 00837DFF FF01 inc dword ptr [ecx] 00837E01 0000 add [eax], al 00837E03 003D000000FF add [$FF000000], bh 00837E09 FFFF DB $FF, $FF // 00837E0B FF09 dec dword ptr [ecx] 00837E0D 0000 add [eax], al 00837E0F 002C42 add [edx+eax*2], ch 00837E12 42 inc edx 00837E13 4D dec ebp 00837E14 6F outsd 00837E15 6E outsb 00837E16 65793D jns 00837E56 00837E19 0000 add [eax], al 00837E1B 00FF add bh, bh 00837E1D FFFF DB $FF, $FF // 00837E1F FF09 dec dword ptr [ecx] 00837E21 0000 add [eax], al 00837E23 002C4564697465 add [$65746964+eax*2], ch 00837E2A 723D jb 00837E69 00837E2C 27 daa 00837E2D 0000 add [eax], al 00837E2F 00FF add bh, bh 00837E31 FFFF DB $FF, $FF // 00837E33 FF1400 call dword ptr [eax+eax] 00837E36 0000 add [eax], al 00837E38 2C45 sub al, $45 00837E3A 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 00837E43 657464 jz 00837EAA 00837E46 61 popa 00837E47 7465 jz 00837EAE 00837E49 2829 sub [ecx], ch 00837E4B 2000 and [eax], al 00837E4D 0000 add [eax], al 00837E4F 00FF add bh, bh 00837E51 FFFF DB $FF, $FF // 00837E53 FF0D00000020 dec dword ptr [$20000000] 00837E59 7768 jnbe 00837EC3 00837E5B 657265 jb 00837EC3 00837E5E 205946 and [ecx+$46], bl 00837E61 49 dec ecx 00837E62 643D27000000 cmp eax, $00000027 00837E68 FFFF DB $FF, $FF // 00837E6A FFFF DB $FF, $FF // 00837E6C 0400 add al, +$00 00837E6E 0000 add [eax], al 00837E70 59 pop ecx 00837E71 46 inc esi 00837E72 49 dec ecx 00837E73 640000 add fs:[eax], al 00837E76 0000 add [eax], al 00837E78 FFFF DB $FF, $FF // 00837E7A FFFF DB $FF, $FF // 00837E7C 2B00 sub eax, dword ptr [eax] 00837E7E 0000 add [eax], al 00837E80 55 push ebp 00837E81 7064 jo 00837EE7 00837E83 61 popa 00837E84 7465 jz 00837EEB 00837E86 205946 and [ecx+$46], bl 00837E89 5F pop edi 00837E8A 4D dec ebp 00837E8B 6F outsd 00837E8C 6E outsb 00837E8D 65795F jns 00837EEF 00837E90 4B dec ebx 00837E91 43 inc ebx 00837E92 205365 and [ebx+$65], dl 00837E95 7420 jz 00837EB7 00837E97 4B dec ebx 00837E98 43 inc ebx 00837E99 42 inc edx 00837E9A 42 inc edx 00837E9B 4D dec ebp 00837E9C 6F outsd 00837E9D 6E outsb 00837E9E 65793D jns 00837EDE 00837EA1 4B dec ebx 00837EA2 43 inc ebx 00837EA3 42 inc edx 00837EA4 42 inc edx 00837EA5 4D dec ebp 00837EA6 6F outsd 00837EA7 6E outsb 00837EA8 65792B jns 00837ED6 00837EAB 00FF add bh, bh 00837EAD FFFF DB $FF, $FF // 00837EAF FF01 inc dword ptr [ecx] 00837EB1 0000 add [eax], al 00837EB3 002D000000FF add [$FF000000], ch 00837EB9 FFFF DB $FF, $FF // 00837EBB FF0D00000020 dec dword ptr [$20000000] 00837EC1 7768 jnbe 00837F2B 00837EC3 657265 jb 00837F2B 00837EC6 204352 and [ebx+$52], al 00837EC9 49 dec ecx 00837ECA 44 inc esp 00837ECB 3D27000000 cmp eax, $00000027 00837ED0 FFFF DB $FF, $FF // 00837ED2 FFFF DB $FF, $FF // 00837ED4 0400 add al, +$00 00837ED6 0000 add [eax], al 00837ED8 43 inc ebx 00837ED9 52 push edx 00837EDA 49 dec ecx 00837EDB 44 inc esp 00837EDC 0000 add [eax], al 00837EDE 0000 add [eax], al 00837EE0 55 push ebp 00837EE1 8BEC mov ebp, esp 00837EE3 51 push ecx 00837EE4 B90E000000 mov ecx, $0000000E 00837EE9 6A00 push $00 00837EEB 6A00 push $00 00837EED 49 dec ecx 00837EEE 75F9 jnz 00837EE9 00837EF0 51 push ecx 00837EF1 874DFC xchg [ebp-$04], ecx 00837EF4 53 push ebx 00837EF5 8945FC mov [ebp-$04], eax 00837EF8 33C0 xor eax, eax 00837EFA 55 push ebp * Possible String Reference to: 'éžÈ¼ÿë¹[‹å]Ã' | 00837EFB 6851828300 push $00838251 ***** TRY | 00837F00 64FF30 push dword ptr fs:[eax] 00837F03 648920 mov fs:[eax], esp 00837F06 33C0 xor eax, eax 00837F08 55 push ebp 00837F09 68FD818300 push $008381FD ***** TRY | 00837F0E 64FF30 push dword ptr fs:[eax] 00837F11 648920 mov fs:[eax], esp *) end; procedure TfrmFKCR_SH._PROC_00838299(Sender : TObject); begin (* 00838299 50 push eax 0083829A 6461 popa 0083829C 7465 jz 00838303 0083829E 205946 and [ecx+$46], bl 008382A1 5F pop edi 008382A2 4D dec ebp 008382A3 6F outsd 008382A4 6E outsb 008382A5 65795F jns 00838307 008382A8 43 inc ebx 008382A9 52 push edx 008382AA 2000 and [eax], al 008382AC FFFF DB $FF, $FF // 008382AE FFFF DB $FF, $FF // 008382B0 0D00000020 or eax, $20000000 008382B5 53 push ebx 008382B6 657420 jz 008382D9 008382B9 4D dec ebp 008382BA 61 popa 008382BB 696E49643D2700 imul ebp, [esi+$49], $00273D64 008382C2 0000 add [eax], al 008382C4 FFFF DB $FF, $FF // 008382C6 FFFF DB $FF, $FF // 008382C8 0100 add [eax], eax 008382CA 0000 add [eax], al 008382CC 27 daa 008382CD 0000 add [eax], al 008382CF 00FF add bh, bh 008382D1 FFFF DB $FF, $FF // 008382D3 FF09 dec dword ptr [ecx] 008382D5 0000 add [eax], al 008382D7 0020 add [eax], ah 008382D9 2C53 sub al, $53 008382DB 7562 jnz 0083833F 008382DD 49 dec ecx 008382DE 643D27000000 cmp eax, $00000027 008382E4 FFFF DB $FF, $FF // 008382E6 FFFF DB $FF, $FF // 008382E8 0500000053 add eax, +$53000000 008382ED 7562 jnz 00838351 008382EF 49 dec ecx 008382F0 640000 add fs:[eax], al 008382F3 00FF add bh, bh 008382F5 FFFF DB $FF, $FF // 008382F7 FF09 dec dword ptr [ecx] 008382F9 0000 add [eax], al 008382FB 002C4564697465 add [$65746964+eax*2], ch 00838302 723D jb 00838341 00838304 27 daa 00838305 0000 add [eax], al 00838307 00FF add bh, bh 00838309 FFFF DB $FF, $FF // 0083830B FF1400 call dword ptr [eax+eax] 0083830E 0000 add [eax], al 00838310 2C45 sub al, $45 00838312 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 0083831B 657464 jz 00838382 0083831E 61 popa 0083831F 7465 jz 00838386 00838321 2829 sub [ecx], ch 00838323 2000 and [eax], al 00838325 0000 add [eax], al 00838327 00FF add bh, bh 00838329 FFFF DB $FF, $FF // 0083832B FF0D00000020 dec dword ptr [$20000000] 00838331 7768 jnbe 0083839B 00838333 657265 jb 0083839B 00838336 205946 and [ecx+$46], bl 00838339 49 dec ecx 0083833A 643D27000000 cmp eax, $00000027 00838340 FFFF DB $FF, $FF // 00838342 FFFF DB $FF, $FF // 00838344 0400 add al, +$00 00838346 0000 add [eax], al 00838348 59 pop ecx 00838349 46 inc esi 0083834A 49 dec ecx 0083834B 640000 add fs:[eax], al 0083834E 0000 add [eax], al 00838350 55 push ebp 00838351 8BEC mov ebp, esp 00838353 B909000000 mov ecx, $00000009 00838358 6A00 push $00 0083835A 6A00 push $00 0083835C 49 dec ecx 0083835D 75F9 jnz 00838358 0083835F 51 push ecx 00838360 53 push ebx 00838361 56 push esi 00838362 8BDA mov ebx, edx 00838364 8BF0 mov esi, eax 00838366 33C0 xor eax, eax 00838368 55 push ebp 00838369 68EE858300 push $008385EE ***** TRY | 0083836E 64FF30 push dword ptr fs:[eax] 00838371 648920 mov fs:[eax], esp 00838374 8D55FC lea edx, [ebp-$04] 00838377 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; | 00838379 E83E73D5FF call 0058F6BC * Reference to control Label3 : TLabel | 0083837E 8B9E08030000 mov ebx, [esi+$0308] 00838384 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838386 E849D5C8FF call 004C58D4 0083838B 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 0083838D E81A5CCAFF call 004DDFAC 00838392 8B10 mov edx, [eax] * Reference to method TLabel.GetClientRect() | 00838394 FF5244 call dword ptr [edx+$44] * Possible String Reference to: 'select isnull(BBMoney,0) BBMoney fr | om YF_Money_CR where YFID='' | 00838397 6804868300 push $00838604 * Possible String Reference to: 'YFID' | 0083839C BA4C868300 mov edx, $0083864C * Reference to control ADOQuery1 : N.A. | 008383A1 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008383A7 E808E8C8FF call 004C6BB4 008383AC 8D55F0 lea edx, [ebp-$10] 008383AF 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 008383B1 FF5160 call dword ptr [ecx+$60] 008383B4 FF75F0 push dword ptr [ebp-$10] 008383B7 685C868300 push $0083865C 008383BC 8D45F4 lea eax, [ebp-$0C] 008383BF BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 008383C4 E8EBD2BCFF call 004056B4 008383C9 8B45F4 mov eax, [ebp-$0C] 008383CC 50 push eax 008383CD 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008383CF E8D85BCAFF call 004DDFAC 008383D4 5A pop edx 008383D5 8B08 mov ecx, [eax] * Reference to method TLabel.ConstrainedResize(Integer,Integer,Integer,Integer) | 008383D7 FF5138 call dword ptr [ecx+$38] 008383DA 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 008383DC E8E7D4C8FF call 004C58C8 * Possible String Reference to: 'BBMoney' | 008383E1 BA68868300 mov edx, $00838668 * Reference to control Label3 : TLabel | 008383E6 8B8608030000 mov eax, [esi+$0308] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 008383EC E8C3E7C8FF call 004C6BB4 008383F1 8D55F8 lea edx, [ebp-$08] 008383F4 8B08 mov ecx, [eax] * Reference to method TLabel.SetDragMode(TDragMode) | 008383F6 FF5160 call dword ptr [ecx+$60] 008383F9 8D55EC lea edx, [ebp-$14] 008383FC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008383FF E8E824BDFF call 0040A8EC 00838404 837DEC00 cmp dword ptr [ebp-$14], +$00 00838408 750D jnz 00838417 0083840A 8D45FC lea eax, [ebp-$04] 0083840D BA78868300 mov edx, $00838678 * Reference to: System.@LStrLAsg(void;void;void;void); | 00838412 E8A5CFBCFF call 004053BC * Reference to control ADOQuery1 : N.A. | 00838417 8B9E4C030000 mov ebx, [esi+$034C] 0083841D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 0083841F E81C00C9FF call 004C8440 * Possible String Reference to: 'BBMoney' | 00838424 BA68868300 mov edx, $00838668 00838429 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 0083842B E884E7C8FF call 004C6BB4 00838430 50 push eax 00838431 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloat(AnsiString):Extended;overload; | 00838434 E8F352BDFF call 0040D72C 00838439 8D45DC lea eax, [ebp-$24] * Reference to: Variants.@VarFromReal; | 0083843C E84B09BEFF call 00418D8C 00838441 8D55DC lea edx, [ebp-$24] 00838444 58 pop eax 00838445 8B08 mov ecx, [eax] 00838447 FF91B4000000 call dword ptr [ecx+$00B4] 0083844D 8BC3 mov eax, ebx 0083844F 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00838451 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00838457 8B9E0C030000 mov ebx, [esi+$030C] 0083845D 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0083845F E870D4C8FF call 004C58D4 00838464 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; | 00838466 E8415BCAFF call 004DDFAC 0083846B 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 0083846D FF5244 call dword ptr [edx+$44] 00838470 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; | 00838472 E8355BCAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838477 BA84868300 mov edx, $00838684 0083847C 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0083847E FF5138 call dword ptr [ecx+$38] 00838481 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; | 00838483 E8245BCAFF call 004DDFAC 00838488 50 push eax 00838489 8D45D8 lea eax, [ebp-$28] 0083848C 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set BBMoney=' | 0083848F BAA0868300 mov edx, $008386A0 * Reference to: System.@LStrCat3; | 00838494 E8A7D1BCFF call 00405640 00838499 8B55D8 mov edx, [ebp-$28] 0083849C 58 pop eax 0083849D 8B08 mov ecx, [eax] 0083849F FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 008384A2 68B8868300 push $008386B8 008384A7 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmFKCR_SH._PROC_00838685(Sender : TObject); begin (* 00838685 50 push eax 00838686 6461 popa 00838688 7465 jz 008386EF 0083868A 205946 and [ecx+$46], bl 0083868D 5F pop edi 0083868E 4D dec ebp 0083868F 6F outsd 00838690 6E outsb 00838691 65795F jns 008386F3 00838694 43 inc ebx 00838695 52 push edx 00838696 2000 and [eax], al 00838698 FFFF DB $FF, $FF // 0083869A FFFF DB $FF, $FF // 0083869C 0D00000020 or eax, $20000000 008386A1 7365 jnb 00838708 008386A3 7420 jz 008386C5 008386A5 42 inc edx 008386A6 42 inc edx 008386A7 4D dec ebp 008386A8 6F outsd 008386A9 6E outsb 008386AA 65793D jns 008386EA 008386AD 0000 add [eax], al 008386AF 00FF add bh, bh 008386B1 FFFF DB $FF, $FF // 008386B3 FF09 dec dword ptr [ecx] 008386B5 0000 add [eax], al 008386B7 002C4564697465 add [$65746964+eax*2], ch 008386BE 723D jb 008386FD 008386C0 27 daa 008386C1 0000 add [eax], al 008386C3 00FF add bh, bh 008386C5 FFFF DB $FF, $FF // 008386C7 FF1400 call dword ptr [eax+eax] 008386CA 0000 add [eax], al 008386CC 2C45 sub al, $45 008386CE 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008386D7 657464 jz 0083873E 008386DA 61 popa 008386DB 7465 jz 00838742 008386DD 2829 sub [ecx], ch 008386DF 2000 and [eax], al 008386E1 0000 add [eax], al 008386E3 00FF add bh, bh 008386E5 FFFF DB $FF, $FF // 008386E7 FF0D00000020 dec dword ptr [$20000000] 008386ED 7768 jnbe 00838757 008386EF 657265 jb 00838757 008386F2 205946 and [ecx+$46], bl 008386F5 49 dec ecx 008386F6 643D27000000 cmp eax, $00000027 008386FC FFFF DB $FF, $FF // 008386FE FFFF DB $FF, $FF // 00838700 0400 add al, +$00 00838702 0000 add [eax], al 00838704 59 pop ecx 00838705 46 inc esi 00838706 49 dec ecx 00838707 640000 add fs:[eax], al 0083870A 0000 add [eax], al 0083870C FFFF DB $FF, $FF // 0083870E FFFF DB $FF, $FF // 00838710 2B00 sub eax, dword ptr [eax] 00838712 0000 add [eax], al 00838714 55 push ebp 00838715 7064 jo 0083877B 00838717 61 popa 00838718 7465 jz 0083877F 0083871A 205946 and [ecx+$46], bl 0083871D 5F pop edi 0083871E 4D dec ebp 0083871F 6F outsd 00838720 6E outsb 00838721 65795F jns 00838783 00838724 4B dec ebx 00838725 43 inc ebx 00838726 205365 and [ebx+$65], dl 00838729 7420 jz 0083874B 0083872B 4B dec ebx 0083872C 43 inc ebx 0083872D 42 inc edx 0083872E 42 inc edx 0083872F 4D dec ebp 00838730 6F outsd 00838731 6E outsb 00838732 65793D jns 00838772 00838735 4B dec ebx 00838736 43 inc ebx 00838737 42 inc edx 00838738 42 inc edx 00838739 4D dec ebp 0083873A 6F outsd 0083873B 6E outsb 0083873C 65792B jns 0083876A 0083873F 00FF add bh, bh 00838741 FFFF DB $FF, $FF // 00838743 FF01 inc dword ptr [ecx] 00838745 0000 add [eax], al 00838747 002D000000FF add [$FF000000], ch 0083874D FFFF DB $FF, $FF // 0083874F FF0D00000020 dec dword ptr [$20000000] 00838755 7768 jnbe 008387BF 00838757 657265 jb 008387BF 0083875A 204352 and [ebx+$52], al 0083875D 49 dec ecx 0083875E 44 inc esp 0083875F 3D27000000 cmp eax, $00000027 00838764 FFFF DB $FF, $FF // 00838766 FFFF DB $FF, $FF // 00838768 0400 add al, +$00 0083876A 0000 add [eax], al 0083876C 43 inc ebx 0083876D 52 push edx 0083876E 49 dec ecx 0083876F 44 inc esp 00838770 0000 add [eax], al 00838772 0000 add [eax], al 00838774 56 push esi * Reference to control DlyDate : N.A. | 00838775 8B8014030000 mov eax, [eax+$0314] 0083877B 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 0083877F E8D0BDBCFF call 00404554 00838784 5E pop esi 00838785 C3 ret 00838786 8BC0 mov eax, eax 00838788 55 push ebp 00838789 8BEC mov ebp, esp 0083878B B907000000 mov ecx, $00000007 00838790 6A00 push $00 00838792 6A00 push $00 00838794 49 dec ecx 00838795 75F9 jnz 00838790 00838797 51 push ecx 00838798 53 push ebx 00838799 56 push esi 0083879A 8BDA mov ebx, edx 0083879C 8BF0 mov esi, eax 0083879E 33C0 xor eax, eax 008387A0 55 push ebp * Possible String Reference to: 'é—Á¼ÿëÖ^[‹å]Ã' | 008387A1 6858898300 push $00838958 ***** TRY | 008387A6 64FF30 push dword ptr fs:[eax] 008387A9 648920 mov fs:[eax], esp 008387AC 8D55FC lea edx, [ebp-$04] 008387AF 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; | 008387B1 E8066FD5FF call 0058F6BC * Reference to control Label17 : TLabel | 008387B6 8B86A8030000 mov eax, [esi+$03A8] * Reference to: Contnrs.TComponentList.First(TComponentList):TComponent; | or: Contnrs.TComponentList.Last(TComponentList):TComponent; | 008387BC E88B3BE2FF call 0065C34C * Reference to: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: QControls.TControl.GetPopupMenu(TControl):TPopupMenu; | 008387C1 E89E93E1FF call 00651B64 * Reference to field TLabel.ControlStyle : TControlStyle | 008387C6 8B4050 mov eax, [eax+$50] 008387C9 8D55F4 lea edx, [ebp-$0C] 008387CC 8B08 mov ecx, [eax] * Possible reference to virtual method TControlStyle.OFFS_10 | 008387CE FF5110 call dword ptr [ecx+$10] 008387D1 8B45F4 mov eax, [ebp-$0C] 008387D4 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008387D7 E81021BDFF call 0040A8EC * Reference to control ADOQuery1 : N.A. | 008387DC 8B9E4C030000 mov ebx, [esi+$034C] 008387E2 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 008387E4 E857FCC8FF call 004C8440 008387E9 8D55E0 lea edx, [ebp-$20] 008387EC 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 008387EF E8F820BDFF call 0040A8EC 008387F4 8B55E0 mov edx, [ebp-$20] 008387F7 8D45E4 lea eax, [ebp-$1C] * Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString); | 008387FA E8C905BEFF call 00418DC8 008387FF 8D45E4 lea eax, [ebp-$1C] 00838802 50 push eax 00838803 8B55F8 mov edx, [ebp-$08] 00838806 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838808 E8A7E3C8FF call 004C6BB4 0083880D 5A pop edx 0083880E 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00838810 FF91B4000000 call dword ptr [ecx+$00B4] 00838816 8BC3 mov eax, ebx 00838818 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 0083881A FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00838820 8B9E0C030000 mov ebx, [esi+$030C] 00838826 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838828 E8A7D0C8FF call 004C58D4 0083882D 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; | 0083882F E87857CAFF call 004DDFAC 00838834 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00838836 FF5244 call dword ptr [edx+$44] 00838839 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; | 0083883B E86C57CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838840 BA70898300 mov edx, $00838970 00838845 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838847 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' Set ' | 0083884A 688C898300 push $0083898C 0083884F FF75F8 push dword ptr [ebp-$08] * Possible String Reference to: '='' | 00838852 689C898300 push $0083899C 00838857 8D55D8 lea edx, [ebp-$28] 0083885A 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 0083885D E88A20BDFF call 0040A8EC 00838862 FF75D8 push dword ptr [ebp-$28] 00838865 68A8898300 push $008389A8 0083886A 8D45DC lea eax, [ebp-$24] 0083886D BA05000000 mov edx, $00000005 * Reference to: System.@LStrCatN; | 00838872 E83DCEBCFF call 004056B4 00838877 8B45DC mov eax, [ebp-$24] 0083887A 50 push eax 0083887B 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; | 0083887D E82A57CAFF call 004DDFAC 00838882 5A pop edx 00838883 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838885 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ',Editer='' | 00838888 68B4898300 push $008389B4 0083888D 8D55D0 lea edx, [ebp-$30] *) end; procedure TfrmFKCR_SH._PROC_00838971(Sender : TObject); begin (* 00838971 50 push eax 00838972 6461 popa 00838974 7465 jz 008389DB 00838976 205946 and [ecx+$46], bl 00838979 5F pop edi 0083897A 4D dec ebp 0083897B 6F outsd 0083897C 6E outsb 0083897D 65795F jns 008389DF 00838980 43 inc ebx 00838981 52 push edx 00838982 2000 and [eax], al 00838984 FFFF DB $FF, $FF // 00838986 FFFF DB $FF, $FF // 00838988 0500000020 add eax, +$20000000 0083898D 53 push ebx 0083898E 657420 jz 008389B1 00838991 0000 add [eax], al 00838993 00FF add bh, bh 00838995 FFFF DB $FF, $FF // 00838997 FF02 inc dword ptr [edx] 00838999 0000 add [eax], al 0083899B 003D270000FF add [$FF000027], bh 008389A1 FFFF DB $FF, $FF // 008389A3 FF01 inc dword ptr [ecx] 008389A5 0000 add [eax], al 008389A7 0027 add [edi], ah 008389A9 0000 add [eax], al 008389AB 00FF add bh, bh 008389AD FFFF DB $FF, $FF // 008389AF FF09 dec dword ptr [ecx] 008389B1 0000 add [eax], al 008389B3 002C4564697465 add [$65746964+eax*2], ch 008389BA 723D jb 008389F9 008389BC 27 daa 008389BD 0000 add [eax], al 008389BF 00FF add bh, bh 008389C1 FFFF DB $FF, $FF // 008389C3 FF1400 call dword ptr [eax+eax] 008389C6 0000 add [eax], al 008389C8 2C45 sub al, $45 008389CA 64697474696D653D67 imul esi, fs:[esp+esi*2+$69], $673D656D 008389D3 657464 jz 00838A3A 008389D6 61 popa 008389D7 7465 jz 00838A3E 008389D9 2829 sub [ecx], ch 008389DB 2000 and [eax], al 008389DD 0000 add [eax], al 008389DF 00FF add bh, bh 008389E1 FFFF DB $FF, $FF // 008389E3 FF0D00000020 dec dword ptr [$20000000] 008389E9 7768 jnbe 00838A53 008389EB 657265 jb 00838A53 008389EE 205946 and [ecx+$46], bl 008389F1 49 dec ecx 008389F2 643D27000000 cmp eax, $00000027 008389F8 FFFF DB $FF, $FF // 008389FA FFFF DB $FF, $FF // 008389FC 0400 add al, +$00 008389FE 0000 add [eax], al 00838A00 59 pop ecx 00838A01 46 inc esi 00838A02 49 dec ecx 00838A03 640000 add fs:[eax], al 00838A06 0000 add [eax], al 00838A08 55 push ebp 00838A09 8BEC mov ebp, esp 00838A0B B905000000 mov ecx, $00000005 00838A10 6A00 push $00 00838A12 6A00 push $00 00838A14 49 dec ecx 00838A15 75F9 jnz 00838A10 00838A17 53 push ebx 00838A18 56 push esi 00838A19 8BDA mov ebx, edx 00838A1B 8BF0 mov esi, eax 00838A1D 33C0 xor eax, eax 00838A1F 55 push ebp * Possible String Reference to: '醿¼ÿëÖ^[‹å]Ã' | 00838A20 68698B8300 push $00838B69 ***** TRY | 00838A25 64FF30 push dword ptr fs:[eax] 00838A28 648920 mov fs:[eax], esp 00838A2B 8D55FC lea edx, [ebp-$04] 00838A2E 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; | 00838A30 E8876CD5FF call 0058F6BC 00838A35 8D55F8 lea edx, [ebp-$08] 00838A38 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838A3B E8AC1EBDFF call 0040A8EC 00838A40 837DF800 cmp dword ptr [ebp-$08], +$00 00838A44 750D jnz 00838A53 00838A46 8D45FC lea eax, [ebp-$04] 00838A49 BA808B8300 mov edx, $00838B80 * Reference to: System.@LStrLAsg(void;void;void;void); | 00838A4E E869C9BCFF call 004053BC * Reference to control ADOQuery1 : N.A. | 00838A53 8B9E4C030000 mov ebx, [esi+$034C] 00838A59 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Edit(TDataSet); | 00838A5B E8E0F9C8FF call 004C8440 00838A60 6A00 push $00 00838A62 6A00 push $00 00838A64 6A00 push $00 00838A66 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.StrToFloatDef(AnsiString;Extended):Extended;overload; | 00838A69 E8FA4CBDFF call 0040D768 00838A6E 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarFromReal; | 00838A71 E81603BEFF call 00418D8C 00838A76 8D45E8 lea eax, [ebp-$18] 00838A79 50 push eax * Possible String Reference to: 'DerateMoney' | 00838A7A BA8C8B8300 mov edx, $00838B8C 00838A7F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838A81 E82EE1C8FF call 004C6BB4 00838A86 5A pop edx 00838A87 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_00B4 | 00838A89 FF91B4000000 call dword ptr [ecx+$00B4] 00838A8F 8BC3 mov eax, ebx 00838A91 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_024C | 00838A93 FF924C020000 call dword ptr [edx+$024C] * Reference to control OrdDate : N.A. | 00838A99 8B9E0C030000 mov ebx, [esi+$030C] 00838A9F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838AA1 E82ECEC8FF call 004C58D4 00838AA6 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; | 00838AA8 E8FF54CAFF call 004DDFAC 00838AAD 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00838AAF FF5244 call dword ptr [edx+$44] 00838AB2 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; | 00838AB4 E8F354CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838AB9 BAA08B8300 mov edx, $00838BA0 00838ABE 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838AC0 FF5138 call dword ptr [ecx+$38] 00838AC3 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; | 00838AC5 E8E254CAFF call 004DDFAC 00838ACA 50 push eax 00838ACB 8D45E4 lea eax, [ebp-$1C] 00838ACE 8B4DFC mov ecx, [ebp-$04] * Possible String Reference to: ' set DerateMoney=' | 00838AD1 BABC8B8300 mov edx, $00838BBC * Reference to: System.@LStrCat3; | 00838AD6 E865CBBCFF call 00405640 00838ADB 8B55E4 mov edx, [ebp-$1C] 00838ADE 58 pop eax 00838ADF 8B08 mov ecx, [eax] 00838AE1 FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00838AE4 68D88B8300 push $00838BD8 * Possible String Reference to: 'YFId' | 00838AE9 BAF08B8300 mov edx, $00838BF0 * Reference to control ADOQuery1 : N.A. | 00838AEE 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838AF4 E8BBE0C8FF call 004C6BB4 00838AF9 8D55D8 lea edx, [ebp-$28] 00838AFC 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00838AFE FF5160 call dword ptr [ecx+$60] 00838B01 8B45D8 mov eax, [ebp-$28] 00838B04 8D55DC lea edx, [ebp-$24] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838B07 E8E01DBDFF call 0040A8EC 00838B0C FF75DC push dword ptr [ebp-$24] 00838B0F 68008C8300 push $00838C00 00838B14 8D45E0 lea eax, [ebp-$20] 00838B17 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00838B1C E893CBBCFF call 004056B4 00838B21 8B45E0 mov eax, [ebp-$20] 00838B24 50 push eax 00838B25 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; | 00838B27 E88054CAFF call 004DDFAC 00838B2C 5A pop edx 00838B2D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838B2F FF5138 call dword ptr [ecx+$38] 00838B32 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00838B34 E89B53CAFF call 004DDED4 00838B39 33C0 xor eax, eax 00838B3B 5A pop edx 00838B3C 59 pop ecx 00838B3D 59 pop ecx 00838B3E 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[‹å]Ã' | 00838B41 68708B8300 push $00838B70 00838B46 8D45D8 lea eax, [ebp-$28] 00838B49 BA04000000 mov edx, $00000004 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838B4E E8F5C7BCFF call 00405348 00838B53 8D45E8 lea eax, [ebp-$18] * Reference to: Variants.@VarClr(TVarData;TVarData); | 00838B56 E819BBBDFF call 00414674 00838B5B 8D45F8 lea eax, [ebp-$08] 00838B5E BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838B63 E8E0C7BCFF call 00405348 00838B68 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00838BA1(Sender : TObject); begin (* 00838BA1 50 push eax 00838BA2 6461 popa 00838BA4 7465 jz 00838C0B 00838BA6 205946 and [ecx+$46], bl 00838BA9 5F pop edi 00838BAA 4D dec ebp 00838BAB 6F outsd 00838BAC 6E outsb 00838BAD 65795F jns 00838C0F 00838BB0 43 inc ebx 00838BB1 52 push edx 00838BB2 2000 and [eax], al 00838BB4 FFFF DB $FF, $FF // 00838BB6 FFFF DB $FF, $FF // 00838BB8 1100 adc [eax], eax 00838BBA 0000 add [eax], al 00838BBC 207365 and [ebx+$65], dh 00838BBF 7420 jz 00838BE1 00838BC1 44 inc esp 00838BC2 657261 jb 00838C26 00838BC5 7465 jz 00838C2C 00838BC7 4D dec ebp 00838BC8 6F outsd 00838BC9 6E outsb 00838BCA 65793D jns 00838C0A 00838BCD 0000 add [eax], al 00838BCF 00FF add bh, bh 00838BD1 FFFF DB $FF, $FF // 00838BD3 FF0D00000020 dec dword ptr [$20000000] 00838BD9 7768 jnbe 00838C43 00838BDB 657265 jb 00838C43 00838BDE 205946 and [ecx+$46], bl 00838BE1 49 dec ecx 00838BE2 643D27000000 cmp eax, $00000027 00838BE8 FFFF DB $FF, $FF // 00838BEA FFFF DB $FF, $FF // 00838BEC 0400 add al, +$00 00838BEE 0000 add [eax], al 00838BF0 59 pop ecx 00838BF1 46 inc esi 00838BF2 49 dec ecx 00838BF3 640000 add fs:[eax], al 00838BF6 0000 add [eax], al 00838BF8 FFFF DB $FF, $FF // 00838BFA FFFF DB $FF, $FF // 00838BFC 0100 add [eax], eax 00838BFE 0000 add [eax], al 00838C00 27 daa 00838C01 0000 add [eax], al 00838C03 00558B add [ebp-$75], dl 00838C06 EC in al, dx 00838C07 33C9 xor ecx, ecx 00838C09 51 push ecx 00838C0A 51 push ecx 00838C0B 51 push ecx 00838C0C 51 push ecx 00838C0D 51 push ecx 00838C0E 51 push ecx 00838C0F 51 push ecx 00838C10 53 push ebx 00838C11 56 push esi 00838C12 8BDA mov ebx, edx 00838C14 8BF0 mov esi, eax 00838C16 33C0 xor eax, eax 00838C18 55 push ebp 00838C19 68FF8C8300 push $00838CFF ***** TRY | 00838C1E 64FF30 push dword ptr fs:[eax] 00838C21 648920 mov fs:[eax], esp 00838C24 8D55FC lea edx, [ebp-$04] 00838C27 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; | 00838C29 E88E6AD5FF call 0058F6BC * Reference to control OrdDate : N.A. | 00838C2E 8B9E0C030000 mov ebx, [esi+$030C] 00838C34 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 00838C36 E899CCC8FF call 004C58D4 00838C3B 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; | 00838C3D E86A53CAFF call 004DDFAC 00838C42 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00838C44 FF5244 call dword ptr [edx+$44] 00838C47 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; | 00838C49 E85E53CAFF call 004DDFAC * Possible String Reference to: 'UPdate YF_Money_CR ' | 00838C4E BA148D8300 mov edx, $00838D14 00838C53 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838C55 FF5138 call dword ptr [ecx+$38] 00838C58 8D55F0 lea edx, [ebp-$10] 00838C5B 8B45FC mov eax, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838C5E E8891CBDFF call 0040A8EC 00838C63 8B45F0 mov eax, [ebp-$10] 00838C66 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.QuotedStr(AnsiString):AnsiString; | 00838C69 E8861DBDFF call 0040A9F4 00838C6E 8B4DF4 mov ecx, [ebp-$0C] 00838C71 8D45F8 lea eax, [ebp-$08] * Possible String Reference to: ' set fstr1=' | 00838C74 BA308D8300 mov edx, $00838D30 * Reference to: System.@LStrCat3; | 00838C79 E8C2C9BCFF call 00405640 00838C7E 8B45F8 mov eax, [ebp-$08] 00838C81 50 push eax 00838C82 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; | 00838C84 E82353CAFF call 004DDFAC 00838C89 5A pop edx 00838C8A 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838C8C FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where YFId='' | 00838C8F 68448D8300 push $00838D44 * Possible String Reference to: 'YFId' | 00838C94 BA5C8D8300 mov edx, $00838D5C * Reference to control ADOQuery1 : N.A. | 00838C99 8B864C030000 mov eax, [esi+$034C] * Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField; | 00838C9F E810DFC8FF call 004C6BB4 00838CA4 8D55E4 lea edx, [ebp-$1C] 00838CA7 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_60 | 00838CA9 FF5160 call dword ptr [ecx+$60] 00838CAC 8B45E4 mov eax, [ebp-$1C] 00838CAF 8D55E8 lea edx, [ebp-$18] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00838CB2 E8351CBDFF call 0040A8EC 00838CB7 FF75E8 push dword ptr [ebp-$18] 00838CBA 686C8D8300 push $00838D6C 00838CBF 8D45EC lea eax, [ebp-$14] 00838CC2 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00838CC7 E8E8C9BCFF call 004056B4 00838CCC 8B45EC mov eax, [ebp-$14] 00838CCF 50 push eax 00838CD0 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; | 00838CD2 E8D552CAFF call 004DDFAC 00838CD7 5A pop edx 00838CD8 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 00838CDA FF5138 call dword ptr [ecx+$38] 00838CDD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer; | 00838CDF E8F051CAFF call 004DDED4 00838CE4 33C0 xor eax, eax 00838CE6 5A pop edx 00838CE7 59 pop ecx 00838CE8 59 pop ecx 00838CE9 648910 mov fs:[eax], edx ****** FINALLY | 00838CEC 68068D8300 push $00838D06 00838CF1 8D45E4 lea eax, [ebp-$1C] 00838CF4 BA07000000 mov edx, $00000007 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00838CF9 E84AC6BCFF call 00405348 00838CFE C3 ret *) end; procedure TfrmFKCR_SH._PROC_00838D15(Sender : TObject); begin (* 00838D15 50 push eax 00838D16 6461 popa 00838D18 7465 jz 00838D7F 00838D1A 205946 and [ecx+$46], bl 00838D1D 5F pop edi 00838D1E 4D dec ebp 00838D1F 6F outsd 00838D20 6E outsb 00838D21 65795F jns 00838D83 00838D24 43 inc ebx 00838D25 52 push edx 00838D26 2000 and [eax], al 00838D28 FFFF DB $FF, $FF // 00838D2A FFFF DB $FF, $FF // 00838D2C 0B00 or eax, [eax] 00838D2E 0000 add [eax], al 00838D30 207365 and [ebx+$65], dh 00838D33 7420 jz 00838D55 00838D35 667374 jnb 00838DAC 00838D38 7231 jb 00838D6B 00838D3A 3D00FFFFFF cmp eax, $FFFFFF00 00838D3F FF0D00000020 dec dword ptr [$20000000] 00838D45 7768 jnbe 00838DAF 00838D47 657265 jb 00838DAF 00838D4A 205946 and [ecx+$46], bl 00838D4D 49 dec ecx 00838D4E 643D27000000 cmp eax, $00000027 00838D54 FFFF DB $FF, $FF // 00838D56 FFFF DB $FF, $FF // 00838D58 0400 add al, +$00 00838D5A 0000 add [eax], al 00838D5C 59 pop ecx 00838D5D 46 inc esi 00838D5E 49 dec ecx 00838D5F 640000 add fs:[eax], al 00838D62 0000 add [eax], al 00838D64 FFFF DB $FF, $FF // 00838D66 FFFF DB $FF, $FF // 00838D68 0100 add [eax], eax 00838D6A 0000 add [eax], al 00838D6C 27 daa 00838D6D 0000 add [eax], al 00838D6F 00558B add [ebp-$75], dl 00838D72 EC in al, dx 00838D73 B905000000 mov ecx, $00000005 00838D78 6A00 push $00 00838D7A 6A00 push $00 00838D7C 49 dec ecx 00838D7D 75F9 jnz 00838D78 00838D7F 51 push ecx 00838D80 53 push ebx 00838D81 56 push esi 00838D82 57 push edi 00838D83 8945FC mov [ebp-$04], eax 00838D86 33C0 xor eax, eax 00838D88 55 push ebp * Possible String Reference to: 'éW»¼ÿëã_^[‹å]Ã' | 00838D89 68988F8300 push $00838F98 ***** TRY | 00838D8E 64FF30 push dword ptr fs:[eax] 00838D91 648920 mov fs:[eax], esp 00838D94 8B45FC mov eax, [ebp-$04] * Reference to control ADOQuery1 : N.A. | 00838D97 8B804C030000 mov eax, [eax+$034C] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00838D9D E81EF1C8FF call 004C7EC0 00838DA2 84C0 test al, al 00838DA4 0F85CB010000 jnz 00838F75 00838DAA A0A88F8300 mov al, byte ptr [$00838FA8] 00838DAF 50 push eax 00838DB0 8D45EC lea eax, [ebp-$14] 00838DB3 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 00838DB5 E8AAFFBDFF call 00418D64 00838DBA 8D4DEC lea ecx, [ebp-$14] 00838DBD 8B45FC mov eax, [ebp-$04] * Reference to control ADOQuery1 : N.A. | 00838DC0 8B804C030000 mov eax, [eax+$034C] * Possible String Reference to: 'ssel' | 00838DC6 BAB48F8300 mov edx, $00838FB4 00838DCB 8B18 mov ebx, [eax] * Possible reference to virtual method TN.A..OFFS_0244 | 00838DCD FF9344020000 call dword ptr [ebx+$0244] 00838DD3 84C0 test al, al 00838DD5 751D jnz 00838DF4 00838DD7 6A00 push $00 * Possible String Reference to: 'Ìáʾ' | 00838DD9 B9BC8F8300 mov ecx, $00838FBC * Possible String Reference to: 'ûÓÐÑ¡ÔñÊý¾Ý!' | 00838DDE BAC48F8300 mov edx, $00838FC4 *) end; procedure TfrmFKCR_SH._PROC_008398A9(Sender : TObject); begin (* 008398A9 8BEC mov ebp, esp 008398AB 33C0 xor eax, eax 008398AD 55 push ebp * Possible String Reference to: 'é"²¼ÿëø]ËÀƒ-ØY‰' | 008398AE 68CD988300 push $008398CD ***** TRY | 008398B3 64FF30 push dword ptr fs:[eax] 008398B6 648920 mov fs:[eax], esp 008398B9 FF05D8598900 inc dword ptr [$008959D8] 008398BF 33C0 xor eax, eax 008398C1 5A pop edx 008398C2 59 pop ecx 008398C3 59 pop ecx 008398C4 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ØY‰' | 008398C7 68D4988300 push $008398D4 008398CC C3 ret * Reference to: System.@HandleFinally; | 008398CD E922B2BCFF jmp 00404AF4 008398D2 EBF8 jmp 008398CC ****** END | 008398D4 5D pop ebp 008398D5 C3 ret *) end; procedure TfrmFKCR_SH._PROC_008398D8(Sender : TObject); begin (* 008398D8 832DD859890001 sub dword ptr [$008959D8], +$01 008398DF C3 ret *) end; procedure TfrmFKCR_SH._PROC_008398E0(Sender : TObject); begin (* 008398E0 55 push ebp 008398E1 8BEC mov ebp, esp 008398E3 33C0 xor eax, eax 008398E5 55 push ebp * Possible String Reference to: 'éê±¼ÿëø]ËÀƒ-ÜY‰' | 008398E6 6805998300 push $00839905 ***** TRY | 008398EB 64FF30 push dword ptr fs:[eax] 008398EE 648920 mov fs:[eax], esp 008398F1 FF05DC598900 inc dword ptr [$008959DC] 008398F7 33C0 xor eax, eax 008398F9 5A pop edx 008398FA 59 pop ecx 008398FB 59 pop ecx 008398FC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ÜY‰' | 008398FF 680C998300 push $0083990C 00839904 C3 ret * Reference to: System.@HandleFinally; | 00839905 E9EAB1BCFF jmp 00404AF4 0083990A EBF8 jmp 00839904 ****** END | 0083990C 5D pop ebp 0083990D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839910(Sender : TObject); begin (* 00839910 832DDC59890001 sub dword ptr [$008959DC], +$01 00839917 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839918(Sender : TObject); begin (* 00839918 55 push ebp 00839919 8BEC mov ebp, esp 0083991B 33C0 xor eax, eax 0083991D 55 push ebp * Possible String Reference to: 'é²±¼ÿëø]ËÀƒ-àY‰' | 0083991E 683D998300 push $0083993D ***** TRY | 00839923 64FF30 push dword ptr fs:[eax] 00839926 648920 mov fs:[eax], esp 00839929 FF05E0598900 inc dword ptr [$008959E0] 0083992F 33C0 xor eax, eax 00839931 5A pop edx 00839932 59 pop ecx 00839933 59 pop ecx 00839934 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-àY‰' | 00839937 6844998300 push $00839944 0083993C C3 ret * Reference to: System.@HandleFinally; | 0083993D E9B2B1BCFF jmp 00404AF4 00839942 EBF8 jmp 0083993C ****** END | 00839944 5D pop ebp 00839945 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839948(Sender : TObject); begin (* 00839948 832DE059890001 sub dword ptr [$008959E0], +$01 0083994F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839950(Sender : TObject); begin (* 00839950 55 push ebp 00839951 8BEC mov ebp, esp 00839953 33C0 xor eax, eax 00839955 55 push ebp * Possible String Reference to: 'éz±¼ÿëø]ËÀƒ-äY‰' | 00839956 6875998300 push $00839975 ***** TRY | 0083995B 64FF30 push dword ptr fs:[eax] 0083995E 648920 mov fs:[eax], esp 00839961 FF05E4598900 inc dword ptr [$008959E4] 00839967 33C0 xor eax, eax 00839969 5A pop edx 0083996A 59 pop ecx 0083996B 59 pop ecx 0083996C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-äY‰' | 0083996F 687C998300 push $0083997C 00839974 C3 ret * Reference to: System.@HandleFinally; | 00839975 E97AB1BCFF jmp 00404AF4 0083997A EBF8 jmp 00839974 ****** END | 0083997C 5D pop ebp 0083997D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839980(Sender : TObject); begin (* 00839980 832DE459890001 sub dword ptr [$008959E4], +$01 00839987 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839988(Sender : TObject); begin (* 00839988 55 push ebp 00839989 8BEC mov ebp, esp 0083998B 33C0 xor eax, eax 0083998D 55 push ebp * Possible String Reference to: 'éB±¼ÿëø]ËÀƒ-èY‰' | 0083998E 68AD998300 push $008399AD ***** TRY | 00839993 64FF30 push dword ptr fs:[eax] 00839996 648920 mov fs:[eax], esp 00839999 FF05E8598900 inc dword ptr [$008959E8] 0083999F 33C0 xor eax, eax 008399A1 5A pop edx 008399A2 59 pop ecx 008399A3 59 pop ecx 008399A4 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-èY‰' | 008399A7 68B4998300 push $008399B4 008399AC C3 ret * Reference to: System.@HandleFinally; | 008399AD E942B1BCFF jmp 00404AF4 008399B2 EBF8 jmp 008399AC ****** END | 008399B4 5D pop ebp 008399B5 C3 ret *) end; procedure TfrmFKCR_SH._PROC_008399B8(Sender : TObject); begin (* 008399B8 832DE859890001 sub dword ptr [$008959E8], +$01 008399BF C3 ret *) end; procedure TfrmFKCR_SH._PROC_008399C0(Sender : TObject); begin (* 008399C0 55 push ebp 008399C1 8BEC mov ebp, esp 008399C3 33C0 xor eax, eax 008399C5 55 push ebp * Possible String Reference to: 'é±¼ÿëø]ËÀƒ-ìY‰' | 008399C6 68E5998300 push $008399E5 ***** TRY | 008399CB 64FF30 push dword ptr fs:[eax] 008399CE 648920 mov fs:[eax], esp 008399D1 FF05EC598900 inc dword ptr [$008959EC] 008399D7 33C0 xor eax, eax 008399D9 5A pop edx 008399DA 59 pop ecx 008399DB 59 pop ecx 008399DC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ìY‰' | 008399DF 68EC998300 push $008399EC 008399E4 C3 ret * Reference to: System.@HandleFinally; | 008399E5 E90AB1BCFF jmp 00404AF4 008399EA EBF8 jmp 008399E4 ****** END | 008399EC 5D pop ebp 008399ED C3 ret *) end; procedure TfrmFKCR_SH._PROC_008399F0(Sender : TObject); begin (* 008399F0 832DEC59890001 sub dword ptr [$008959EC], +$01 008399F7 C3 ret *) end; procedure TfrmFKCR_SH._PROC_008399F8(Sender : TObject); begin (* 008399F8 55 push ebp 008399F9 8BEC mov ebp, esp 008399FB 33C0 xor eax, eax 008399FD 55 push ebp * Possible String Reference to: 'éÒ°¼ÿëø]ËÀƒ-ðY‰' | 008399FE 681D9A8300 push $00839A1D ***** TRY | 00839A03 64FF30 push dword ptr fs:[eax] 00839A06 648920 mov fs:[eax], esp 00839A09 FF05F0598900 inc dword ptr [$008959F0] 00839A0F 33C0 xor eax, eax 00839A11 5A pop edx 00839A12 59 pop ecx 00839A13 59 pop ecx 00839A14 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ðY‰' | 00839A17 68249A8300 push $00839A24 00839A1C C3 ret * Reference to: System.@HandleFinally; | 00839A1D E9D2B0BCFF jmp 00404AF4 00839A22 EBF8 jmp 00839A1C ****** END | 00839A24 5D pop ebp 00839A25 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839A28(Sender : TObject); begin (* 00839A28 832DF059890001 sub dword ptr [$008959F0], +$01 00839A2F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839A30(Sender : TObject); begin (* 00839A30 55 push ebp 00839A31 8BEC mov ebp, esp 00839A33 33C0 xor eax, eax 00839A35 55 push ebp * Possible String Reference to: 'éš°¼ÿëø]ËÀƒ-ôY‰' | 00839A36 68559A8300 push $00839A55 ***** TRY | 00839A3B 64FF30 push dword ptr fs:[eax] 00839A3E 648920 mov fs:[eax], esp 00839A41 FF05F4598900 inc dword ptr [$008959F4] 00839A47 33C0 xor eax, eax 00839A49 5A pop edx 00839A4A 59 pop ecx 00839A4B 59 pop ecx 00839A4C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ôY‰' | 00839A4F 685C9A8300 push $00839A5C 00839A54 C3 ret * Reference to: System.@HandleFinally; | 00839A55 E99AB0BCFF jmp 00404AF4 00839A5A EBF8 jmp 00839A54 ****** END | 00839A5C 5D pop ebp 00839A5D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839A60(Sender : TObject); begin (* 00839A60 832DF459890001 sub dword ptr [$008959F4], +$01 00839A67 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839A68(Sender : TObject); begin (* 00839A68 55 push ebp 00839A69 8BEC mov ebp, esp 00839A6B 33C0 xor eax, eax 00839A6D 55 push ebp * Possible String Reference to: 'éb°¼ÿëø]ËÀƒ-øY‰' | 00839A6E 688D9A8300 push $00839A8D ***** TRY | 00839A73 64FF30 push dword ptr fs:[eax] 00839A76 648920 mov fs:[eax], esp 00839A79 FF05F8598900 inc dword ptr [$008959F8] 00839A7F 33C0 xor eax, eax 00839A81 5A pop edx 00839A82 59 pop ecx 00839A83 59 pop ecx 00839A84 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-øY‰' | 00839A87 68949A8300 push $00839A94 00839A8C C3 ret * Reference to: System.@HandleFinally; | 00839A8D E962B0BCFF jmp 00404AF4 00839A92 EBF8 jmp 00839A8C ****** END | 00839A94 5D pop ebp 00839A95 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839A98(Sender : TObject); begin (* 00839A98 832DF859890001 sub dword ptr [$008959F8], +$01 00839A9F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839AA0(Sender : TObject); begin (* 00839AA0 55 push ebp 00839AA1 8BEC mov ebp, esp 00839AA3 33C0 xor eax, eax 00839AA5 55 push ebp * Possible String Reference to: 'é*°¼ÿëø]ËÀƒ-üY‰' | 00839AA6 68C59A8300 push $00839AC5 ***** TRY | 00839AAB 64FF30 push dword ptr fs:[eax] 00839AAE 648920 mov fs:[eax], esp 00839AB1 FF05FC598900 inc dword ptr [$008959FC] 00839AB7 33C0 xor eax, eax 00839AB9 5A pop edx 00839ABA 59 pop ecx 00839ABB 59 pop ecx 00839ABC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-üY‰' | 00839ABF 68CC9A8300 push $00839ACC 00839AC4 C3 ret * Reference to: System.@HandleFinally; | 00839AC5 E92AB0BCFF jmp 00404AF4 00839ACA EBF8 jmp 00839AC4 ****** END | 00839ACC 5D pop ebp 00839ACD C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839AD0(Sender : TObject); begin (* 00839AD0 832DFC59890001 sub dword ptr [$008959FC], +$01 00839AD7 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839AD8(Sender : TObject); begin (* 00839AD8 55 push ebp 00839AD9 8BEC mov ebp, esp 00839ADB 33C0 xor eax, eax 00839ADD 55 push ebp * Possible String Reference to: 'éò¯¼ÿëø]ËÀƒ-' | 00839ADE 68FD9A8300 push $00839AFD ***** TRY | 00839AE3 64FF30 push dword ptr fs:[eax] 00839AE6 648920 mov fs:[eax], esp 00839AE9 FF05005A8900 inc dword ptr [$00895A00] 00839AEF 33C0 xor eax, eax 00839AF1 5A pop edx 00839AF2 59 pop ecx 00839AF3 59 pop ecx 00839AF4 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-' | 00839AF7 68049B8300 push $00839B04 00839AFC C3 ret * Reference to: System.@HandleFinally; | 00839AFD E9F2AFBCFF jmp 00404AF4 00839B02 EBF8 jmp 00839AFC ****** END | 00839B04 5D pop ebp 00839B05 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B08(Sender : TObject); begin (* 00839B08 832D005A890001 sub dword ptr [$00895A00], +$01 00839B0F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B10(Sender : TObject); begin (* 00839B10 55 push ebp 00839B11 8BEC mov ebp, esp 00839B13 33C0 xor eax, eax 00839B15 55 push ebp 00839B16 68359B8300 push $00839B35 ***** TRY | 00839B1B 64FF30 push dword ptr fs:[eax] 00839B1E 648920 mov fs:[eax], esp 00839B21 FF05045A8900 inc dword ptr [$00895A04] 00839B27 33C0 xor eax, eax 00839B29 5A pop edx 00839B2A 59 pop ecx 00839B2B 59 pop ecx 00839B2C 648910 mov fs:[eax], edx ****** FINALLY | 00839B2F 683C9B8300 push $00839B3C 00839B34 C3 ret * Reference to: System.@HandleFinally; | 00839B35 E9BAAFBCFF jmp 00404AF4 00839B3A EBF8 jmp 00839B34 ****** END | 00839B3C 5D pop ebp 00839B3D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B40(Sender : TObject); begin (* 00839B40 832D045A890001 sub dword ptr [$00895A04], +$01 00839B47 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B48(Sender : TObject); begin (* 00839B48 55 push ebp 00839B49 8BEC mov ebp, esp 00839B4B 33C0 xor eax, eax 00839B4D 55 push ebp 00839B4E 686D9B8300 push $00839B6D ***** TRY | 00839B53 64FF30 push dword ptr fs:[eax] 00839B56 648920 mov fs:[eax], esp 00839B59 FF05085A8900 inc dword ptr [$00895A08] 00839B5F 33C0 xor eax, eax 00839B61 5A pop edx 00839B62 59 pop ecx 00839B63 59 pop ecx 00839B64 648910 mov fs:[eax], edx ****** FINALLY | 00839B67 68749B8300 push $00839B74 00839B6C C3 ret * Reference to: System.@HandleFinally; | 00839B6D E982AFBCFF jmp 00404AF4 00839B72 EBF8 jmp 00839B6C ****** END | 00839B74 5D pop ebp 00839B75 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B78(Sender : TObject); begin (* 00839B78 832D085A890001 sub dword ptr [$00895A08], +$01 00839B7F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839B80(Sender : TObject); begin (* 00839B80 55 push ebp 00839B81 8BEC mov ebp, esp 00839B83 33C0 xor eax, eax 00839B85 55 push ebp 00839B86 68A59B8300 push $00839BA5 ***** TRY | 00839B8B 64FF30 push dword ptr fs:[eax] 00839B8E 648920 mov fs:[eax], esp 00839B91 FF050C5A8900 inc dword ptr [$00895A0C] 00839B97 33C0 xor eax, eax 00839B99 5A pop edx 00839B9A 59 pop ecx 00839B9B 59 pop ecx 00839B9C 648910 mov fs:[eax], edx ****** FINALLY | 00839B9F 68AC9B8300 push $00839BAC 00839BA4 C3 ret * Reference to: System.@HandleFinally; | 00839BA5 E94AAFBCFF jmp 00404AF4 00839BAA EBF8 jmp 00839BA4 ****** END | 00839BAC 5D pop ebp 00839BAD C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839BB0(Sender : TObject); begin (* 00839BB0 832D0C5A890001 sub dword ptr [$00895A0C], +$01 00839BB7 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839BB8(Sender : TObject); begin (* 00839BB8 55 push ebp 00839BB9 8BEC mov ebp, esp 00839BBB 33C0 xor eax, eax 00839BBD 55 push ebp 00839BBE 68DD9B8300 push $00839BDD ***** TRY | 00839BC3 64FF30 push dword ptr fs:[eax] 00839BC6 648920 mov fs:[eax], esp 00839BC9 FF05105A8900 inc dword ptr [$00895A10] 00839BCF 33C0 xor eax, eax 00839BD1 5A pop edx 00839BD2 59 pop ecx 00839BD3 59 pop ecx 00839BD4 648910 mov fs:[eax], edx ****** FINALLY | 00839BD7 68E49B8300 push $00839BE4 00839BDC C3 ret * Reference to: System.@HandleFinally; | 00839BDD E912AFBCFF jmp 00404AF4 00839BE2 EBF8 jmp 00839BDC ****** END | 00839BE4 5D pop ebp 00839BE5 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839BE8(Sender : TObject); begin (* 00839BE8 832D105A890001 sub dword ptr [$00895A10], +$01 00839BEF C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839BF0(Sender : TObject); begin (* 00839BF0 55 push ebp 00839BF1 8BEC mov ebp, esp 00839BF3 33C0 xor eax, eax 00839BF5 55 push ebp 00839BF6 68159C8300 push $00839C15 ***** TRY | 00839BFB 64FF30 push dword ptr fs:[eax] 00839BFE 648920 mov fs:[eax], esp 00839C01 FF05145A8900 inc dword ptr [$00895A14] 00839C07 33C0 xor eax, eax 00839C09 5A pop edx 00839C0A 59 pop ecx 00839C0B 59 pop ecx 00839C0C 648910 mov fs:[eax], edx ****** FINALLY | 00839C0F 681C9C8300 push $00839C1C 00839C14 C3 ret * Reference to: System.@HandleFinally; | 00839C15 E9DAAEBCFF jmp 00404AF4 00839C1A EBF8 jmp 00839C14 ****** END | 00839C1C 5D pop ebp 00839C1D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C20(Sender : TObject); begin (* 00839C20 832D145A890001 sub dword ptr [$00895A14], +$01 00839C27 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C28(Sender : TObject); begin (* 00839C28 55 push ebp 00839C29 8BEC mov ebp, esp 00839C2B 33C0 xor eax, eax 00839C2D 55 push ebp 00839C2E 684D9C8300 push $00839C4D ***** TRY | 00839C33 64FF30 push dword ptr fs:[eax] 00839C36 648920 mov fs:[eax], esp 00839C39 FF05185A8900 inc dword ptr [$00895A18] 00839C3F 33C0 xor eax, eax 00839C41 5A pop edx 00839C42 59 pop ecx 00839C43 59 pop ecx 00839C44 648910 mov fs:[eax], edx ****** FINALLY | 00839C47 68549C8300 push $00839C54 00839C4C C3 ret * Reference to: System.@HandleFinally; | 00839C4D E9A2AEBCFF jmp 00404AF4 00839C52 EBF8 jmp 00839C4C ****** END | 00839C54 5D pop ebp 00839C55 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C58(Sender : TObject); begin (* 00839C58 832D185A890001 sub dword ptr [$00895A18], +$01 00839C5F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C60(Sender : TObject); begin (* 00839C60 55 push ebp 00839C61 8BEC mov ebp, esp 00839C63 33C0 xor eax, eax 00839C65 55 push ebp 00839C66 68859C8300 push $00839C85 ***** TRY | 00839C6B 64FF30 push dword ptr fs:[eax] 00839C6E 648920 mov fs:[eax], esp 00839C71 FF051C5A8900 inc dword ptr [$00895A1C] 00839C77 33C0 xor eax, eax 00839C79 5A pop edx 00839C7A 59 pop ecx 00839C7B 59 pop ecx 00839C7C 648910 mov fs:[eax], edx ****** FINALLY | 00839C7F 688C9C8300 push $00839C8C 00839C84 C3 ret * Reference to: System.@HandleFinally; | 00839C85 E96AAEBCFF jmp 00404AF4 00839C8A EBF8 jmp 00839C84 ****** END | 00839C8C 5D pop ebp 00839C8D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C90(Sender : TObject); begin (* 00839C90 832D1C5A890001 sub dword ptr [$00895A1C], +$01 00839C97 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839C98(Sender : TObject); begin (* 00839C98 55 push ebp 00839C99 8BEC mov ebp, esp 00839C9B 33C0 xor eax, eax 00839C9D 55 push ebp * Possible String Reference to: 'é2®¼ÿëø]ËÀƒ- Z‰' | 00839C9E 68BD9C8300 push $00839CBD ***** TRY | 00839CA3 64FF30 push dword ptr fs:[eax] 00839CA6 648920 mov fs:[eax], esp 00839CA9 FF05205A8900 inc dword ptr [$00895A20] 00839CAF 33C0 xor eax, eax 00839CB1 5A pop edx 00839CB2 59 pop ecx 00839CB3 59 pop ecx 00839CB4 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ- Z‰' | 00839CB7 68C49C8300 push $00839CC4 00839CBC C3 ret * Reference to: System.@HandleFinally; | 00839CBD E932AEBCFF jmp 00404AF4 00839CC2 EBF8 jmp 00839CBC ****** END | 00839CC4 5D pop ebp 00839CC5 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839CC8(Sender : TObject); begin (* 00839CC8 832D205A890001 sub dword ptr [$00895A20], +$01 00839CCF C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839CD0(Sender : TObject); begin (* 00839CD0 55 push ebp 00839CD1 8BEC mov ebp, esp 00839CD3 33C0 xor eax, eax 00839CD5 55 push ebp * Possible String Reference to: 'éú­¼ÿëø]ËÀƒ-$Z‰' | 00839CD6 68F59C8300 push $00839CF5 ***** TRY | 00839CDB 64FF30 push dword ptr fs:[eax] 00839CDE 648920 mov fs:[eax], esp 00839CE1 FF05245A8900 inc dword ptr [$00895A24] 00839CE7 33C0 xor eax, eax 00839CE9 5A pop edx 00839CEA 59 pop ecx 00839CEB 59 pop ecx 00839CEC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-$Z‰' | 00839CEF 68FC9C8300 push $00839CFC 00839CF4 C3 ret * Reference to: System.@HandleFinally; | 00839CF5 E9FAADBCFF jmp 00404AF4 00839CFA EBF8 jmp 00839CF4 ****** END | 00839CFC 5D pop ebp 00839CFD C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D00(Sender : TObject); begin (* 00839D00 832D245A890001 sub dword ptr [$00895A24], +$01 00839D07 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D08(Sender : TObject); begin (* 00839D08 55 push ebp 00839D09 8BEC mov ebp, esp 00839D0B 33C0 xor eax, eax 00839D0D 55 push ebp * Possible String Reference to: 'é­¼ÿëø]ËÀƒ-(Z‰' | 00839D0E 682D9D8300 push $00839D2D ***** TRY | 00839D13 64FF30 push dword ptr fs:[eax] 00839D16 648920 mov fs:[eax], esp 00839D19 FF05285A8900 inc dword ptr [$00895A28] 00839D1F 33C0 xor eax, eax 00839D21 5A pop edx 00839D22 59 pop ecx 00839D23 59 pop ecx 00839D24 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-(Z‰' | 00839D27 68349D8300 push $00839D34 00839D2C C3 ret * Reference to: System.@HandleFinally; | 00839D2D E9C2ADBCFF jmp 00404AF4 00839D32 EBF8 jmp 00839D2C ****** END | 00839D34 5D pop ebp 00839D35 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D38(Sender : TObject); begin (* 00839D38 832D285A890001 sub dword ptr [$00895A28], +$01 00839D3F C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D40(Sender : TObject); begin (* 00839D40 55 push ebp 00839D41 8BEC mov ebp, esp 00839D43 33C0 xor eax, eax 00839D45 55 push ebp * Possible String Reference to: '銭¼ÿëø]ËÀƒ-,Z‰' | 00839D46 68659D8300 push $00839D65 ***** TRY | 00839D4B 64FF30 push dword ptr fs:[eax] 00839D4E 648920 mov fs:[eax], esp 00839D51 FF052C5A8900 inc dword ptr [$00895A2C] 00839D57 33C0 xor eax, eax 00839D59 5A pop edx 00839D5A 59 pop ecx 00839D5B 59 pop ecx 00839D5C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-,Z‰' | 00839D5F 686C9D8300 push $00839D6C 00839D64 C3 ret * Reference to: System.@HandleFinally; | 00839D65 E98AADBCFF jmp 00404AF4 00839D6A EBF8 jmp 00839D64 ****** END | 00839D6C 5D pop ebp 00839D6D C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D70(Sender : TObject); begin (* 00839D70 832D2C5A890001 sub dword ptr [$00895A2C], +$01 00839D77 C3 ret *) end; procedure TfrmFKCR_SH._PROC_00839D78(Sender : TObject); begin (* 00839D78 C49D83000000 les ebx, [ebp+$0083] 00839D7E 0000 add [eax], al *) end; procedure TfrmFKCR_SH._PROC_00839D87(Sender : TObject); begin (* 00839D87 0064A683 add [esi-$7D], ah 00839D8B 00DA add dl, bl 00839D8D 9E sahf 00839D8E 83008C add dword ptr [eax], -$74 00839D91 A283000000 mov byte ptr [$00000083], al 00839D96 0000 add [eax], al *) end; procedure TfrmFKCR_SH._PROC_00839D9B(Sender : TObject); begin (* 00839D9B 000404 add [esp+eax], al 00839D9E 0000 add [eax], al *) end; procedure TfrmFKCR_SH._PROC_00839DDE(Sender : TObject); begin (* 00839DDE 48 dec eax 00839DDF 0050D4 add [eax-$2C], dl 00839DE2 42 inc edx 00839DE3 0008 add [eax], cl 00839DE5 2D4A007CD0 sub eax, $D07C004A 00839DEA 42 inc edx 00839DEB 00F4 add ah, dh 00839DED 6B4A00D0 imul ecx, [edx+$00], $D0 00839DF1 1D4A0030F6 sbb eax, $F630004A 00839DF6 48 dec eax 00839DF7 004CFB48 add [ebx+edi*8+$48], cl 00839DFB 0098FA48000C add [eax+$C0048FA], bl 00839E01 7948 jns 00839E4B 00839E03 00ACF04800E829 add [eax+esi*8+$29E80048], ch 00839E0A 4A dec edx 00839E0B 00E4 add ah, ah 00839E0D ED in eax, dx 00839E0E 48 dec eax 00839E0F 00547848 add [eax+edi*2+$48], dl 00839E13 005878 add [eax+$78], bl 00839E16 48 dec eax 00839E17 00DC add ah, bl 00839E19 2A4A00 sub cl, byte ptr [edx+$00] 00839E1C 3CA9 cmp al, $A9 00839E1E 48 dec eax 00839E1F 00C0 add al, al 00839E21 834800D0 or dword ptr [eax+$00], -$30 00839E25 7948 jns 00839E6F 00839E27 004C8548 add [ebp+eax*4+$48], cl 00839E2B 00D0 add al, dl 00839E2D 2C4A sub al, $4A 00839E2F 009C2B4A008486 add [ebx+ebp+$8684004A], bl 00839E36 48 dec eax 00839E37 00482D add [eax+$2D], cl 00839E3A 4A dec edx 00839E3B 00C0 add al, al 00839E3D A9480038EE test eax, $EE380048 00839E42 48 dec eax 00839E43 00F4 add ah, dh 00839E45 EE out dx, al 00839E46 48 dec eax 00839E47 00F0 add al, dh 00839E49 E94800D8EE jmp EF5B9E96 00839E4E 48 dec eax 00839E4F 00D8 add al, bl 00839E51 1B4A00 sbb ecx, [edx+$00] 00839E54 EC in al, dx 00839E55 334A00 xor ecx, [edx+$00] 00839E58 20C4 and ah, al 00839E5A 48 dec eax 00839E5B 00B0404A0010 add [eax+$10004A40], dh 00839E61 44 inc esp 00839E62 4A dec edx 00839E63 00CC add ah, cl 00839E65 42 inc edx 00839E66 4A dec edx 00839E67 00B8C44800BC add [eax+$BC0048C4], bh 00839E6D C44800 les ecx, [eax+$00] 00839E70 48 dec eax 00839E71 45 inc ebp 00839E72 4A dec edx 00839E73 001CC3 add [ebx+eax*8], bl 00839E76 48 dec eax 00839E77 0018 add [eax], bl 00839E79 F0 lock 00839E7A 48 dec eax 00839E7B 00444C4A add [esp+ecx*2+$4A], al 00839E7F 000C02 add [edx+eax], cl 00839E82 49 dec ecx 00839E83 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 00839E8A 4A dec edx 00839E8B 008C154A003C18 add [ebp+edx+$183C004A], cl 00839E92 4A dec edx 00839E93 0038 add [eax], bh 00839E95 52 push edx 00839E96 4A dec edx 00839E97 005C224A add [edx+$4A], bl 00839E9B 00D8 add al, bl 00839E9D 224A00 and cl, byte ptr [edx+$00] 00839EA0 7C68 jl 00839F0A 00839EA2 4A dec edx 00839EA3 00941F4A003C60 add [edi+ebx+$603C004A], dl 00839EAA 4A dec edx 00839EAB 001447 add [edi+eax*2], dl 00839EAE 4A dec edx 00839EAF 0034654A00CC2C add [$2CCC004A], dh 00839EB6 4A dec edx 00839EB7 000E add [esi], cl 00839EB9 0000 add [eax], al 00839EBB 0000 add [eax], al 00839EBD 0003 add [ebx], al 00839EBF 0000 add [eax], al 00839EC1 0020 add [eax], ah 00839EC3 114000 adc [eax+$00], eax 00839EC6 F8 clc 00839EC7 0300 add eax, [eax] 00839EC9 0020 add [eax], ah 00839ECB 114000 adc [eax+$00], eax 00839ECE FC cld 00839ECF 0300 add eax, [eax] 00839ED1 0020 add [eax], ah 00839ED3 114000 adc [eax+$00], eax 00839ED6 000400 add [eax+eax], al 00839ED9 003F add [edi], bh 00839EDB 0006 add [esi], al 00839EDD A6 cmpsb 00839EDE 8300F8 add dword ptr [eax], -$08 00839EE1 0200 add al, byte ptr [eax] 00839EE3 0000 add [eax], al 00839EE5 0008 add [eax], cl 00839EE7 54 push esp 00839EE8 6F outsd 00839EE9 6F outsd 00839EEA 6C insb 00839EEB 42 inc edx 00839EEC 61 popa 00839EED 7231 jb 00839F20 00839EEF FC cld 00839EF0 0200 add al, byte ptr [eax] 00839EF2 0001 add [ecx], al 00839EF4 0009 add [ecx], cl 00839EF6 54 push esp 00839EF7 42 inc edx 00839EF8 52 push edx 00839EF9 61 popa 00839EFA 667265 jb 00839F62 00839EFD 7368 jnb 00839F67 00839EFF 0003 add [ebx], al 00839F01 0000 add [eax], al 00839F03 0100 add [eax], eax 00839F05 0554424465 add eax, +$65444254 00839F0A 6C insb 00839F0B 0403 add al, +$03 00839F0D 0000 add [eax], al 00839F0F 0100 add [eax], eax 00839F11 07 pop es 00839F12 54 push esp 00839F13 42 inc edx 00839F14 43 inc ebx 00839F15 6C insb 00839F16 6F outsd 00839F17 7365 jnb 00839F7E 00839F19 0803 or [ebx], al 00839F1B 0000 add [eax], al 00839F1D 0200 add al, byte ptr [eax] 00839F1F 0C41 or al, $41 00839F21 44 inc esp 00839F22 4F dec edi 00839F23 51 push ecx 00839F24 7565 jnz 00839F8B 00839F26 7279 jb 00839FA1 00839F28 54 push esp 00839F29 656D insd 00839F2B 700C jo 00839F39 00839F2D 0300 add eax, [eax] 00839F2F 0002 add [edx], al 00839F31 000B add [ebx], cl 00839F33 41 inc ecx 00839F34 44 inc esp 00839F35 4F dec edi 00839F36 51 push ecx 00839F37 7565 jnz 00839F9E 00839F39 7279 jb 00839FB4 00839F3B 43 inc ebx 00839F3C 6D insd 00839F3D 641003 adc fs:[ebx], al 00839F40 0000 add [eax], al 00839F42 0300 add eax, [eax] 00839F44 06 push es 00839F45 50 push eax 00839F46 61 popa 00839F47 6E outsb 00839F48 656C insb 00839F4A 311403 xor [ebx+eax], edx 00839F4D 0000 add [eax], al 00839F4F 0100 add [eax], eax 00839F51 0B546F6F or edx, [edi+ebp*2+$6F] 00839F55 6C insb 00839F56 42 inc edx 00839F57 7574 jnz 00839FCD 00839F59 746F jz 00839FCA 00839F5B 6E outsb 00839F5C 3218 xor bl, byte ptr [eax] 00839F5E 0300 add eax, [eax] 00839F60 000400 add [eax+eax], al 00839F63 06 push es 00839F64 4C dec esp 00839F65 61 popa 00839F66 62656C bound esp, qword ptr [ebp+$6C] 00839F69 311C03 xor [ebx+eax], ebx 00839F6C 0000 add [eax], al 00839F6E 0500065946 add eax, +$46590600 00839F73 4E dec esi 00839F74 61 popa 00839F75 6D insd 00839F76 652003 and gs:[ebx], al 00839F79 0000 add [eax], al 00839F7B 0200 add al, byte ptr [eax] 00839F7D 0C41 or al, $41 00839F7F 44 inc esp 00839F80 4F dec edi 00839F81 51 push ecx 00839F82 7565 jnz 00839FE9 00839F84 7279 jb 00839FFF 00839F86 4D dec ebp 00839F87 61 popa 00839F88 696E2403000001 imul ebp, [esi+$24], $01000003 00839F8F 000B add [ebx], cl 00839F91 54 push esp 00839F92 6F outsd 00839F93 6F outsd 00839F94 6C insb 00839F95 42 inc edx 00839F96 7574 jnz 0083A00C 00839F98 746F jz 0083A009 00839F9A 6E outsb 00839F9B 3128 xor [eax], ebp 00839F9D 0300 add eax, [eax] 00839F9F 0006 add [esi], al 00839FA1 0003 add [ebx], al 00839FA3 52 push edx 00839FA4 4D dec ebp 00839FA5 312C03 xor [ebx+eax], ebp 00839FA8 0000 add [eax], al 00839FAA 07 pop es 00839FAB 0009 add [ecx], cl 00839FAD 52 push edx 00839FAE 4D dec ebp 00839FAF 44 inc esp 00839FB0 42 inc edx 00839FB1 5F pop edi 00839FB2 4D dec ebp 00839FB3 61 popa 00839FB4 696E3003000004 imul ebp, [esi+$30], $04000003 00839FBB 0006 add [esi], al 00839FBD 4C dec esp 00839FBE 61 popa 00839FBF 62656C bound esp, qword ptr [ebp+$6C] 00839FC2 333403 xor esi, [ebx+eax] 00839FC5 0000 add [eax], al 00839FC7 05000B4661 add eax, +$61460B00 00839FCC 63746F72 arpl [edi+ebp*2+$72], si 00839FD0 794E jns 0083A020 00839FD2 61 popa 00839FD3 6D insd 00839FD4 653803 cmp gs:[ebx], al 00839FD7 0000 add [eax], al 00839FD9 0800 or [eax], al 00839FDB 07 pop es 00839FDC 637847 arpl [eax+$47], di 00839FDF 7269 jb 0083A04A 00839FE1 64323C03 xor bh, byte ptr fs:[ebx+eax] 00839FE5 0000 add [eax], al 00839FE7 0900 or [eax], eax 00839FE9 03547632 add edx, [esi+esi*2+$32] 00839FED 40 inc eax 00839FEE 0300 add eax, [eax] 00839FF0 000A add [edx], cl 00839FF2 000F add [edi], cl 00839FF4 637847 arpl [eax+$47], di 00839FF7 7269 jb 0083A062 00839FF9 6444 inc esp 00839FFB 42 inc edx 00839FFC 43 inc ebx 00839FFD 6F outsd 00839FFE 6C insb 00839FFF 756D jnz 0083A06E 0083A001 6E outsb 0083A002 31440300 xor [ebx+eax+$00], eax 0083A006 000A add [edx], cl 0083A008 000F add [edi], cl 0083A00A 637847 arpl [eax+$47], di 0083A00D 7269 jb 0083A078 0083A00F 6444 inc esp 0083A011 42 inc edx 0083A012 43 inc ebx 0083A013 6F outsd 0083A014 6C insb 0083A015 756D jnz 0083A084 0083A017 6E outsb 0083A018 334803 xor ecx, [eax+$03] 0083A01B 0000 add [eax], al 0083A01D 0B00 or eax, [eax] 0083A01F 0C63 or al, $63 0083A021 7847 js 0083A06A 0083A023 7269 jb 0083A08E 0083A025 644C dec esp 0083A027 657665 jbe 0083A08F 0083A02A 6C insb 0083A02B 314C0300 xor [ebx+eax+$00], ecx 0083A02F 000400 add [eax+eax], al 0083A032 06 push es 0083A033 4C dec esp 0083A034 61 popa 0083A035 62656C bound esp, qword ptr [ebp+$6C] 0083A038 325003 xor dl, byte ptr [eax+$03] 0083A03B 0000 add [eax], al 0083A03D 0C00 or al, $00 0083A03F 07 pop es 0083A040 626567 bound esp, qword ptr [ebp+$67] 0083A043 6461 popa 0083A045 7465 jz 0083A0AC 0083A047 54 push esp 0083A048 0300 add eax, [eax] 0083A04A 000C00 add [eax+eax], cl 0083A04D 07 pop es 0083A04E 45 inc ebp 0083A04F 6E outsb 0083A050 646461 popa 0083A053 7465 jz 0083A0BA 0083A055 58 pop eax 0083A056 0300 add eax, [eax] 0083A058 000D00106378 add [$78631000], cl 0083A05E 47 inc edi 0083A05F 7269 jb 0083A0CA 0083A061 6450 push eax 0083A063 6F outsd 0083A064 7075 jo 0083A0DB 0083A066 704D jo 0083A0B5 0083A068 656E outsb 0083A06A 7532 jnz 0083A09E 0083A06C 5C pop esp 0083A06D 0300 add eax, [eax] 0083A06F 000E add [esi], cl 0083A071 000544535F48 add [$485F5344], al 0083A077 5A pop edx 0083A078 60 pusha 0083A079 0300 add eax, [eax] 0083A07B 000F add [edi], cl 0083A07D 0006 add [esi], al 0083A07F 43 inc ebx 0083A080 44 inc esp 0083A081 53 push ebx 0083A082 5F pop edi 0083A083 48 dec eax 0083A084 5A pop edx 0083A085 640300 add eax, fs:[eax] 0083A088 0001 add [ecx], al 0083A08A 000B add [ebx], cl 0083A08C 54 push esp 0083A08D 6F outsd 0083A08E 6F outsd 0083A08F 6C insb 0083A090 42 inc edx 0083A091 7574 jnz 0083A107 0083A093 746F jz 0083A104 0083A095 6E outsb 0083A096 336803 xor ebp, [eax+$03] 0083A099 0000 add [eax], al 0083A09B 0A00 or al, byte ptr [eax] 0083A09D 035642 add edx, [esi+$42] 0083A0A0 5A pop edx 0083A0A1 6C insb 0083A0A2 0300 add eax, [eax] 0083A0A4 000A add [edx], cl 0083A0A6 0003 add [ebx], al 0083A0A8 56 push esi 0083A0A9 59 pop ecx 0083A0AA 42 inc edx 0083A0AB 7003 jo 0083A0B0 0083A0AD 0000 add [eax], al 0083A0AF 0A00 or al, byte ptr [eax] 0083A0B1 097632 or [esi+$32], esi 0083A0B4 43 inc ebx 0083A0B5 6F outsd 0083A0B6 6C insb 0083A0B7 756D jnz 0083A126 0083A0B9 6E outsb 0083A0BA 367403 jz 0083A0C0 0083A0BD 0000 add [eax], al 0083A0BF 0400 add al, +$00 0083A0C1 06 push es 0083A0C2 4C dec esp 0083A0C3 61 popa 0083A0C4 62656C bound esp, qword ptr [ebp+$6C] 0083A0C7 3478 xor al, $78 0083A0C9 0300 add eax, [eax] 0083A0CB 000500054D6F add [$6F4D0500], al 0083A0D1 6E outsb 0083A0D2 65797C jns 0083A151 0083A0D5 0300 add eax, [eax] 0083A0D7 000A add [edx], cl 0083A0D9 0009 add [ecx], cl 0083A0DB 7632 jbe 0083A10F 0083A0DD 43 inc ebx 0083A0DE 6F outsd 0083A0DF 6C insb 0083A0E0 756D jnz 0083A14F 0083A0E2 6E outsb 0083A0E3 31800300000A xor [eax+$A000003], eax 0083A0E9 000D76324465 add [$65443276], cl 0083A0EF 7261 jb 0083A152 0083A0F1 7465 jz 0083A158 0083A0F3 4D dec ebp 0083A0F4 6F outsd 0083A0F5 6E outsb 0083A0F6 657984 jns 0083A07D 0083A0F9 0300 add eax, [eax] 0083A0FB 0001 add [ecx], al 0083A0FD 000474 add [esp+esi*2], al 0083A100 63686B arpl [eax+$6B], bp 0083A103 8803 mov [ebx], al 0083A105 0000 add [eax], al 0083A107 0100 add [eax], eax 0083A109 06 push es 0083A10A 746E jz 0083A17A 0083A10C 6F outsd 0083A10D 63686B arpl [eax+$6B], bp 0083A110 8C03 mov word ptr [ebx], es 0083A112 0000 add [eax], al 0083A114 1000 adc [eax], al 0083A116 0D63785461 or eax, $61547863 0083A11B 62436F bound eax, qword ptr [ebx+$6F] 0083A11E 6E outsb 0083A11F 7472 jz 0083A193 0083A121 6F outsd 0083A122 6C insb 0083A123 31900300000A xor [eax+$A000003], edx 0083A129 0006 add [esi], al 0083A12B 7632 jbe 0083A15F 0083A12D 53 push ebx 0083A12E 7365 jnb 0083A195 0083A130 6C insb 0083A131 94 xchg eax, esp 0083A132 0300 add eax, [eax] 0083A134 000A add [edx], cl 0083A136 000B add [ebx], cl 0083A138 7632 jbe 0083A16C 0083A13A 43 inc ebx 0083A13B 6F outsd 0083A13C 6D insd 0083A13D 54 push esp 0083A13E 61 popa 0083A13F 69746F7598030000 imul esi, [edi+ebp*2+$75], $00000398 0083A147 0100 add [eax], eax 0083A149 056E6F6368 add eax, +$68636F6E 0083A14E 6B9C030000010003 imul ebx, [ebx+eax+$10000], $03 0083A156 54 push esp 0083A157 53 push ebx 0083A158 44 inc esp 0083A159 A00300000A mov al, byte ptr [$0A000003] 0083A15E 0006 add [esi], al 0083A160 7632 jbe 0083A194 0083A162 49 dec ecx 0083A163 46 inc esi 0083A164 53 push ebx 0083A165 44 inc esp 0083A166 A4 movsb 0083A167 0300 add eax, [eax] 0083A169 0011 add [ecx], dl 0083A16B 000A add [edx], cl 0083A16D 50 push eax 0083A16E 6F outsd 0083A16F 7075 jo 0083A1E6 0083A171 704D jo 0083A1C0 0083A173 656E outsb 0083A175 7531 jnz 0083A1A8 0083A177 A803 test al, $03 0083A179 0000 add [eax], al 0083A17B 1200 adc al, byte ptr [eax] 0083A17D 024E31 add cl, byte ptr [esi+$31] 0083A180 AC lodsb 0083A181 0300 add eax, [eax] 0083A183 0012 add [edx], dl 0083A185 0002 add [edx], al 0083A187 4E dec esi 0083A188 32B003000004 xor dh, byte ptr [eax+$4000003] 0083A18E 0007 add [edi], al 0083A190 4C dec esp 0083A191 61 popa 0083A192 62656C bound esp, qword ptr [ebp+$6C] 0083A195 3130 xor [eax], esi 0083A197 B403 mov ah, $03 0083A199 0000 add [eax], al 0083A19B 0400 add al, +$00 0083A19D 07 pop es 0083A19E 4C dec esp 0083A19F 61 popa 0083A1A0 62656C bound esp, qword ptr [ebp+$6C] 0083A1A3 3132 xor [edx], esi 0083A1A5 B803000005 mov eax, $05000003 0083A1AA 0007 add [edi], al 0083A1AC 43 inc ebx 0083A1AD 686B4E6F74 push $746F4E6B 0083A1B2 65BC03000004 mov esp, $04000003 0083A1B8 0007 add [edi], al 0083A1BA 4C dec esp 0083A1BB 61 popa 0083A1BC 62656C bound esp, qword ptr [ebp+$6C] 0083A1BF 3137 xor [edi], esi 0083A1C1 C00300 rol byte ptr [ebx], $00 0083A1C4 0013 add [ebx], dl 0083A1C6 0009 add [ecx], cl 0083A1C8 43 inc ebx 0083A1C9 6865636B42 push $426B6365 0083A1CE 6F outsd 0083A1CF 7831 js 0083A202 0083A1D1 C403 les eax, [ebx] 0083A1D3 0000 add [eax], al 0083A1D5 0A00 or al, byte ptr [eax] 0083A1D7 0B7632 or esi, [esi+$32] 0083A1DA 4B dec ebx 0083A1DB 48 dec eax 0083A1DC 44 inc esp 0083A1DD 4B dec ebx 0083A1DE 4D dec ebp 0083A1DF 6F outsd 0083A1E0 6E outsb 0083A1E1 6579C8 jns 0083A1AC 0083A1E4 0300 add eax, [eax] 0083A1E6 001400 add [eax+eax], dl 0083A1E9 126378 adc ah, byte ptr [ebx+$78] 0083A1EC 53 push ebx 0083A1ED 7479 jz 0083A268 0083A1EF 6C insb 0083A1F0 6552 push edx 0083A1F2 65706F jo 0083A264 0083A1F5 7369 jnb 0083A260 0083A1F7 746F jz 0083A268 0083A1F9 7279 jb 0083A274 0083A1FB 31CC xor esp, ecx 0083A1FD 0300 add eax, [eax] 0083A1FF 001500086378 add [$78630800], dl 0083A205 53 push ebx 0083A206 7479 jz 0083A281 0083A208 6C insb 0083A209 6531D0 xor eax, edx 0083A20C 0300 add eax, [eax] 0083A20E 000400 add [eax+eax], al 0083A211 06 push es 0083A212 4C dec esp 0083A213 61 popa 0083A214 62656C bound esp, qword ptr [ebp+$6C] 0083A217 35D4030000 xor eax, $000003D4 0083A21C 0500046E6F add eax, +$6F6E0400 0083A221 7465 jz 0083A288 0083A223 D803 fadd dword ptr [ebx] 0083A225 0000 add [eax], al 0083A227 0A00 or al, byte ptr [eax] 0083A229 097632 or [esi+$32], esi 0083A22C 53 push ebx 0083A22D 58 pop eax 0083A22E 4D dec ebp 0083A22F 6F outsd 0083A230 6E outsb 0083A231 6579DC jns 0083A210 0083A234 0300 add eax, [eax] 0083A236 000A add [edx], cl 0083A238 0007 add [edi], al 0083A23A 7632 jbe 0083A26E 0083A23C 48 dec eax 0083A23D 784E js 0083A28D 0083A23F 756D jnz 0083A2AE 0083A241 E003 loopn +$03 0083A243 0000 add [eax], al 0083A245 0A00 or al, byte ptr [eax] 0083A247 07 pop es 0083A248 7632 jbe 0083A27C 0083A24A 48 dec eax 0083A24B 7569 jnz 0083A2B6 0083A24D 6C insb 0083A24E 76E4 jbe 0083A234 0083A250 0300 add eax, [eax] 0083A252 000A add [edx], cl 0083A254 000A add [edx], cl 0083A256 7632 jbe 0083A28A 0083A258 4B dec ebx 0083A259 50 push eax 0083A25A 53 push ebx 0083A25B 7461 jz 0083A2BE 0083A25D 7475 jz 0083A2D4 0083A25F 73E8 jnb 0083A249 0083A261 0300 add eax, [eax] 0083A263 000400 add [eax+eax], al 0083A266 06 push es 0083A267 4C dec esp 0083A268 61 popa 0083A269 62656C bound esp, qword ptr [ebp+$6C] 0083A26C 36EC in al, dx 0083A26E 0300 add eax, [eax] 0083A270 000500074F72 add [$724F0700], al 0083A276 6465724E jb 0083A2C8 0083A27A 6F outsd 0083A27B F0 lock 0083A27C 0300 add eax, [eax] 0083A27E 000A add [edx], cl 0083A280 000A add [edx], cl 0083A282 7632 jbe 0083A2B6 0083A284 43 inc ebx 0083A285 4F dec edi 0083A286 7264 jb 0083A2EC 0083A288 65724E jb 0083A2D9 0083A28B 6F outsd 0083A28C 2000 and [eax], al 0083A28E 1200 adc al, byte ptr [eax] 0083A290 D8AC83000B466F fsubr dword ptr [ebx+eax*4+$6F460B00] 0083A297 726D jb 0083A306 0083A299 44 inc esp 0083A29A 657374 jnb 0083A311 0083A29D 726F jb 0083A30E 0083A29F 7910 jns 0083A2B1 0083A2A1 00E0 add al, ah 0083A2A3 AC lodsb 0083A2A4 830009 add dword ptr [eax], +$09 0083A2A7 46 inc esi 0083A2A8 6F outsd 0083A2A9 726D jb 0083A318 0083A2AB 43 inc ebx 0083A2AC 6C insb 0083A2AD 6F outsd 0083A2AE 7365 jnb 0083A315 0083A2B0 1300 adc eax, [eax] 0083A2B2 E4AC in al, $AC 0083A2B4 83000C add dword ptr [eax], +$0C 0083A2B7 54 push esp 0083A2B8 42 inc edx 0083A2B9 43 inc ebx 0083A2BA 6C insb 0083A2BB 6F outsd 0083A2BC 7365 jnb 0083A323 0083A2BE 43 inc ebx 0083A2BF 6C insb 0083A2C0 69636B110030AD imul esp, [ebx+$6B], $AD300011 0083A2C7 83000A add dword ptr [eax], +$0A 0083A2CA 54 push esp 0083A2CB 42 inc edx 0083A2CC 44 inc esp 0083A2CD 656C insb 0083A2CF 43 inc ebx 0083A2D0 6C insb 0083A2D1 69636B0F00E4AF imul esp, [ebx+$6B], $AFE4000F 0083A2D8 830008 add dword ptr [eax], +$08 0083A2DB 46 inc esi 0083A2DC 6F outsd 0083A2DD 726D jb 0083A34C 0083A2DF 53 push ebx 0083A2E0 686F771500 push $0015776F 0083A2E5 80B083000E5442 xor byte ptr [eax+$540E0083], $42 0083A2EC 52 push edx 0083A2ED 61 popa 0083A2EE 667265 jb 0083A356 0083A2F1 7368 jnb 0083A35B 0083A2F3 43 inc ebx 0083A2F4 6C insb 0083A2F5 69636B170088B0 imul esp, [ebx+$6B], $B0880017 0083A2FC 830010 add dword ptr [eax], +$10 0083A2FF 54 push esp 0083A300 6F outsd 0083A301 6F outsd 0083A302 6C insb 0083A303 42 inc edx 0083A304 7574 jnz 0083A37A 0083A306 746F jz 0083A377 0083A308 6E outsb 0083A309 32436C xor al, byte ptr [ebx+$6C] 0083A30C 69636B180034B1 imul esp, [ebx+$6B], $B1340018 0083A313 830011 add dword ptr [eax], +$11 0083A316 46 inc esi 0083A317 61 popa 0083A318 63746F72 arpl [edi+ebp*2+$72], si 0083A31C 794E jns 0083A36C 0083A31E 61 popa 0083A31F 6D insd 0083A320 6543 inc ebx 0083A322 68616E6765 push $65676E61 0083A327 1300 adc eax, [eax] 0083A329 48 dec eax 0083A32A B183 mov cl, $83 0083A32C 000C42 add [edx+eax*2], cl 0083A32F 7574 jnz 0083A3A5 0083A331 746F jz 0083A3A2 0083A333 6E outsb 0083A334 32436C xor al, byte ptr [ebx+$6C] 0083A337 69636B300080BC imul esp, [ebx+$6B], $BC800030 0083A33E 830029 add dword ptr [eax], +$29 0083A341 637847 arpl [eax+$47], di 0083A344 7269 jb 0083A3AF 0083A346 6444 inc esp 0083A348 42 inc edx 0083A349 43 inc ebx 0083A34A 6F outsd 0083A34B 6C insb 0083A34C 756D jnz 0083A3BB 0083A34E 6E outsb 0083A34F 385072 cmp [eax+$72], dl 0083A352 6F outsd 0083A353 7065 jo 0083A3BA 0083A355 7274 jb 0083A3CB 0083A357 69657345646974 imul esp, [ebp+$73], $74696445 0083A35E 56 push esi 0083A35F 61 popa 0083A360 6C insb 0083A361 7565 jnz 0083A3C8 0083A363 43 inc ebx 0083A364 68616E6765 push $65676E61 0083A369 643000 xor fs:[eax], al 0083A36C 4C dec esp 0083A36D BF83002963 mov edi, $63290083 0083A372 7847 js 0083A3BB 0083A374 7269 jb 0083A3DF 0083A376 6444 inc esp 0083A378 42 inc edx 0083A379 43 inc ebx 0083A37A 6F outsd 0083A37B 6C insb 0083A37C 756D jnz 0083A3EB 0083A37E 6E outsb 0083A37F 3550726F70 xor eax, $706F7250 0083A384 657274 jb 0083A3FB 0083A387 69657345646974 imul esp, [ebp+$73], $74696445 0083A38E 56 push esi 0083A38F 61 popa 0083A390 6C insb 0083A391 7565 jnz 0083A3F8 0083A393 43 inc ebx 0083A394 68616E6765 push $65676E61 0083A399 643000 xor fs:[eax], al 0083A39C B0C7 mov al, $C7 0083A39E 830029 add dword ptr [eax], +$29 0083A3A1 637847 arpl [eax+$47], di 0083A3A4 7269 jb 0083A40F 0083A3A6 6444 inc esp 0083A3A8 42 inc edx 0083A3A9 43 inc ebx 0083A3AA 6F outsd 0083A3AB 6C insb 0083A3AC 756D jnz 0083A41B 0083A3AE 6E outsb 0083A3AF 315072 xor [eax+$72], edx 0083A3B2 6F outsd 0083A3B3 7065 jo 0083A41A 0083A3B5 7274 jb 0083A42B 0083A3B7 69657345646974 imul esp, [ebp+$73], $74696445 0083A3BE 56 push esi 0083A3BF 61 popa 0083A3C0 6C insb 0083A3C1 7565 jnz 0083A428 0083A3C3 43 inc ebx 0083A3C4 68616E6765 push $65676E61 0083A3C9 6417 pop ss 0083A3CB 0094CA83001054 add [edx+ecx*8+$54100083], dl 0083A3D2 6F outsd 0083A3D3 6F outsd 0083A3D4 6C insb 0083A3D5 42 inc edx 0083A3D6 7574 jnz 0083A44C 0083A3D8 746F jz 0083A449 0083A3DA 6E outsb 0083A3DB 33436C xor eax, [ebx+$6C] 0083A3DE 69636B2B0070CD imul esp, [ebx+$6B], $CD70002B 0083A3E5 830024 add dword ptr [eax], +$24 0083A3E8 637847 arpl [eax+$47], di 0083A3EB 7269 jb 0083A456 0083A3ED 6444 inc esp 0083A3EF 42 inc edx 0083A3F0 43 inc ebx 0083A3F1 6F outsd 0083A3F2 6C insb 0083A3F3 756D jnz 0083A462 0083A3F5 6E outsb 0083A3F6 335072 xor edx, [eax+$72] 0083A3F9 6F outsd 0083A3FA 7065 jo 0083A461 0083A3FC 7274 jb 0083A472 0083A3FE 69657342757474 imul esp, [ebp+$73], $74747542 0083A405 6F outsd 0083A406 6E outsb 0083A407 43 inc ebx 0083A408 6C insb 0083A409 69636B2B00F0D1 imul esp, [ebx+$6B], $D1F0002B 0083A410 830024 add dword ptr [eax], +$24 0083A413 637847 arpl [eax+$47], di 0083A416 7269 jb 0083A481 0083A418 6444 inc esp 0083A41A 42 inc edx 0083A41B 43 inc ebx 0083A41C 6F outsd 0083A41D 6C insb 0083A41E 756D jnz 0083A48D 0083A420 6E outsb 0083A421 3650 push eax 0083A423 726F jb 0083A494 0083A425 7065 jo 0083A48C 0083A427 7274 jb 0083A49D 0083A429 69657342757474 imul esp, [ebp+$73], $74747542 0083A430 6F outsd 0083A431 6E outsb 0083A432 43 inc ebx 0083A433 6C insb 0083A434 69636B25004CD5 imul esp, [ebx+$6B], $D54C0025 0083A43B 83001E add dword ptr [eax], +$1E 0083A43E 7632 jbe 0083A472 0083A440 43 inc ebx 0083A441 6F outsd 0083A442 6C insb 0083A443 756D jnz 0083A4B2 0083A445 6E outsb 0083A446 335072 xor edx, [eax+$72] 0083A449 6F outsd 0083A44A 7065 jo 0083A4B1 0083A44C 7274 jb 0083A4C2 0083A44E 69657342757474 imul esp, [ebp+$73], $74747542 0083A455 6F outsd 0083A456 6E outsb 0083A457 43 inc ebx 0083A458 6C insb 0083A459 69636B170090D8 imul esp, [ebx+$6B], $D8900017 0083A460 830010 add dword ptr [eax], +$10 0083A463 54 push esp 0083A464 6F outsd 0083A465 6F outsd 0083A466 6C insb 0083A467 42 inc edx 0083A468 7574 jnz 0083A4DE 0083A46A 746F jz 0083A4DB 0083A46C 6E outsb 0083A46D 31436C xor [ebx+$6C], eax 0083A470 69636B2A00D0D8 imul esp, [ebx+$6B], $D8D0002A 0083A477 830023 add dword ptr [eax], +$23 0083A47A 7632 jbe 0083A4AE 0083A47C 43 inc ebx 0083A47D 6F outsd 0083A47E 6C insb 0083A47F 756D jnz 0083A4EE 0083A481 6E outsb 0083A482 3450 xor al, $50 0083A484 726F jb 0083A4F5 0083A486 7065 jo 0083A4ED 0083A488 7274 jb 0083A4FE 0083A48A 69657345646974 imul esp, [ebp+$73], $74696445 0083A491 56 push esi 0083A492 61 popa 0083A493 6C insb 0083A494 7565 jnz 0083A4FB 0083A496 43 inc ebx 0083A497 68616E6765 push $65676E61 0083A49C 64250018DF83 and eax, $83DF1800 0083A4A2 001E add [esi], bl 0083A4A4 7632 jbe 0083A4D8 0083A4A6 43 inc ebx 0083A4A7 6F outsd 0083A4A8 6C insb 0083A4A9 756D jnz 0083A518 0083A4AB 6E outsb 0083A4AC 315072 xor [eax+$72], edx 0083A4AF 6F outsd 0083A4B0 7065 jo 0083A517 0083A4B2 7274 jb 0083A528 0083A4B4 69657342757474 imul esp, [ebp+$73], $74747542 0083A4BB 6F outsd 0083A4BC 6E outsb 0083A4BD 43 inc ebx 0083A4BE 6C insb 0083A4BF 69636B2400E8E2 imul esp, [ebx+$6B], $E2E80024 0083A4C6 83001D add dword ptr [eax], +$1D 0083A4C9 56 push esi 0083A4CA 42 inc edx 0083A4CB 42 inc edx 0083A4CC 50 push eax 0083A4CD 726F jb 0083A53E 0083A4CF 7065 jo 0083A536 0083A4D1 7274 jb 0083A547 0083A4D3 69657345646974 imul esp, [ebp+$73], $74696445 0083A4DA 56 push esi 0083A4DB 61 popa 0083A4DC 6C insb 0083A4DD 7565 jnz 0083A544 0083A4DF 43 inc ebx 0083A4E0 68616E6765 push $65676E61 0083A4E5 641200 adc al, byte ptr fs:[eax] 0083A4E8 24E7 and al, $E7 0083A4EA 83000B add dword ptr [eax], +$0B 0083A4ED 4D dec ebp 0083A4EE 6F outsd 0083A4EF 6E outsb 0083A4F0 657943 jns 0083A536 0083A4F3 68616E6765 push $65676E61 0083A4F8 2A00 sub al, byte ptr [eax] 0083A4FA 2CE7 sub al, $E7 0083A4FC 830023 add dword ptr [eax], +$23 0083A4FF 7632 jbe 0083A533 0083A501 43 inc ebx 0083A502 6F outsd 0083A503 6C insb 0083A504 756D jnz 0083A573 0083A506 6E outsb 0083A507 315072 xor [eax+$72], edx 0083A50A 6F outsd 0083A50B 7065 jo 0083A572 0083A50D 7274 jb 0083A583 0083A50F 69657345646974 imul esp, [ebp+$73], $74696445 0083A516 56 push esi 0083A517 61 popa 0083A518 6C insb 0083A519 7565 jnz 0083A580 0083A51B 43 inc ebx 0083A51C 68616E6765 push $65676E61 0083A521 642E0044E983 add cs:[ecx+ebp*8-$7D], al 0083A527 0027 add [edi], ah 0083A529 7632 jbe 0083A55D 0083A52B 44 inc esp 0083A52C 657261 jb 0083A590 0083A52F 7465 jz 0083A596 0083A531 4D dec ebp 0083A532 6F outsd 0083A533 6E outsb 0083A534 657950 jns 0083A587 0083A537 726F jb 0083A5A8 0083A539 7065 jo 0083A5A0 0083A53B 7274 jb 0083A5B1 0083A53D 69657345646974 imul esp, [ebp+$73], $74696445 0083A544 56 push esi 0083A545 61 popa 0083A546 6C insb 0083A547 7565 jnz 0083A5AE 0083A549 43 inc ebx 0083A54A 68616E6765 push $65676E61 0083A54F 641000 adc fs:[eax], al 0083A552 58 pop eax 0083A553 EB83 jmp 0083A4D8 0083A555 0009 add [ecx], cl 0083A557 7463 jz 0083A5BC 0083A559 686B436C69 push $696C436B 0083A55E 636B12 arpl [ebx+$12], bp 0083A561 0024EE add [esi+ebp*8], ah 0083A564 83000B add dword ptr [eax], +$0B 0083A567 746E jz 0083A5D7 0083A569 6F outsd 0083A56A 63686B arpl [eax+$6B], bp 0083A56D 43 inc ebx 0083A56E 6C insb 0083A56F 69636B1A00F0F0 imul esp, [ebx+$6B], $F0F0001A 0083A576 830013 add dword ptr [eax], +$13 0083A579 637854 arpl [eax+$54], di 0083A57C 61 popa 0083A57D 62436F bound eax, qword ptr [ebx+$6F] 0083A580 6E outsb 0083A581 7472 jz 0083A5F5 0083A583 6F outsd 0083A584 6C insb 0083A585 314368 xor [ebx+$68], eax 0083A588 61 popa 0083A589 6E outsb 0083A58A 67651100 adc gs:[bx+si], eax 0083A58E 04F1 add al, -$0F 0083A590 83000A add dword ptr [eax], +$0A 0083A593 6E outsb 0083A594 6F outsd 0083A595 63686B arpl [eax+$6B], bp 0083A598 43 inc ebx 0083A599 6C insb 0083A59A 69636B0F0040F4 imul esp, [ebx+$6B], $F440000F 0083A5A1 830008 add dword ptr [eax], +$08 0083A5A4 54 push esp 0083A5A5 53 push ebx 0083A5A6 44 inc esp 0083A5A7 43 inc ebx 0083A5A8 6C insb 0083A5A9 69636B0E0038F5 imul esp, [ebx+$6B], $F538000E 0083A5B0 830007 add dword ptr [eax], +$07 0083A5B3 4E dec esi 0083A5B4 31436C xor [ebx+$6C], eax 0083A5B7 69636B0E0048F5 imul esp, [ebx+$6B], $F548000E 0083A5BE 830007 add dword ptr [eax], +$07 0083A5C1 4E dec esi 0083A5C2 32436C xor al, byte ptr [ebx+$6C] 0083A5C5 69636B1D0058F5 imul esp, [ebx+$6B], $F558001D 0083A5CC 830016 add dword ptr [eax], +$16 0083A5CF 7632 jbe 0083A603 0083A5D1 53 push ebx 0083A5D2 7365 jnb 0083A639 0083A5D4 6C insb 0083A5D5 50 push eax 0083A5D6 726F jb 0083A647 0083A5D8 7065 jo 0083A63F 0083A5DA 7274 jb 0083A650 0083A5DC 6965734368616E imul esp, [ebp+$73], $6E616843 0083A5E3 67651500B4F583 adc eax, $83F5B400 0083A5EA 000E add [esi], cl 0083A5EC 43 inc ebx 0083A5ED 6865636B42 push $426B6365 0083A5F2 6F outsd 0083A5F3 7831 js 0083A626 0083A5F5 43 inc ebx 0083A5F6 6C insb 0083A5F7 69636B0B546672 imul esp, [ebx+$6B], $7266540B 0083A5FE 6D insd 0083A5FF 53 push ebx 0083A600 4B dec ebx 0083A601 43 inc ebx 0083A602 52 push edx 0083A603 5F pop edi 0083A604 53 push ebx 0083A605 48 dec eax 0083A606 16 push ss 0083A607 0028 add [eax], ch 0083A609 94 xchg eax, esp 0083A60A 45 inc ebp 0083A60B 00648A45 add [edx+ecx*4+$45], ah 0083A60F 00B8124D0020 add [eax+$20004D12], bh 0083A615 42 inc edx 0083A616 44 inc esp 0083A617 001C5F add [edi+ebx*2], bl 0083A61A 47 inc edi 0083A61B 00B867470064 add [eax+$64004767], bh 0083A621 D37800 sar dword ptr [eax+$00], cl 0083A624 A80A test al, $0A 0083A626 7800 js 0083A628 0083A628 0016 add [esi], dl 0083A62A 6300 arpl [eax], ax 0083A62C F4 hlt 0083A62D B466 mov ah, $66 0083A62F 0034B1 add [ecx+esi*4], dh 0083A632 6600A40E6400E0A5 add [esi+ecx+$A5E00064], ah 0083A63A 45 inc ebp 0083A63B 005876 add [eax+$76], bl 0083A63E 7C00 jl 0083A640 0083A640 087F4B or [edi+$4B], bh 0083A643 0088996A0064 add [eax+$64006A99], cl 0083A649 5D pop ebp 0083A64A 57 push edi 0083A64B 00887E49008C add [eax+$8C00497E], cl 0083A651 7649 jbe 0083A69C 0083A653 00C0 add al, al 0083A655 96 xchg eax, esi 0083A656 47 inc edi 0083A657 009C6D4F005070 add [ebp+ebp*2+$7050004F], bl 0083A65E 4F dec edi 0083A65F 0064A683 add [esi-$7D], ah 0083A663 0007 add [edi], al 0083A665 0B546672 or edx, [esi+$72] 0083A669 6D insd 0083A66A 53 push ebx 0083A66B 4B dec ebx 0083A66C 43 inc ebx 0083A66D 52 push edx 0083A66E 5F pop edi 0083A66F 53 push ebx 0083A670 48 dec eax 0083A671 C49D8300D0F2 les ebx, [ebp+$F2D00083] 0083A677 49 dec ecx 0083A678 005E00 add [esi+$00], bl 0083A67B 09555F or [ebp+$5F], edx 0083A67E 53 push ebx 0083A67F 4B dec ebx 0083A680 43 inc ebx 0083A681 52 push edx 0083A682 5F pop edi 0083A683 53 push ebx 0083A684 48 dec eax 0083A685 0000 add [eax], al 0083A687 90 nop 0083A688 55 push ebp 0083A689 8BEC mov ebp, esp 0083A68B 6A00 push $00 0083A68D 6A00 push $00 0083A68F 53 push ebx 0083A690 56 push esi 0083A691 57 push edi 0083A692 8BD8 mov ebx, eax 0083A694 33C0 xor eax, eax 0083A696 55 push ebp * Possible String Reference to: 'éF£¼ÿëë_^[YY]Ã' | 0083A697 68A9A78300 push $0083A7A9 ***** TRY | 0083A69C 64FF30 push dword ptr fs:[eax] 0083A69F 648920 mov fs:[eax], esp 0083A6A2 33D2 xor edx, edx * Reference to control v1PriceUnit : N.A. | 0083A6A4 8B8384030000 mov eax, [ebx+$0384] 0083A6AA 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 0083A6AC FF5164 call dword ptr [ecx+$64] 0083A6AF 33D2 xor edx, edx * Reference to control Label5 : TLabel | 0083A6B1 8B8388030000 mov eax, [ebx+$0388] 0083A6B7 8B08 mov ecx, [eax] * Reference to method TLabel.SetEnabled(Boolean) | 0083A6B9 FF5164 call dword ptr [ecx+$64] * Reference to control ADOTemp : N.A. | 0083A6BC 8B833C030000 mov eax, [ebx+$033C] * Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word; | or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte; | or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl); | or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient); | or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem); | or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter); | 0083A6C2 E87D1CE2FF call 0065C344 0083A6C7 8BF0 mov esi, eax 0083A6C9 4E dec esi 0083A6CA 85F6 test esi, esi 0083A6CC 7C54 jl 0083A722 0083A6CE 46 inc esi 0083A6CF 33FF xor edi, edi 0083A6D1 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 0083A6D3 8B833C030000 mov eax, [ebx+$033C] * Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem; | or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient; | or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem; | or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem; | or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar; | or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter; | 0083A6D9 E8F212E3FF call 0066B9D0 | 0083A6DE E83D11E3FF call 0066B820 0083A6E3 8D55F8 lea edx, [ebp-$08] | 0083A6E6 E8DD06E3FF call 0066ADC8 0083A6EB 8B45F8 mov eax, [ebp-$08] 0083A6EE 8D55FC lea edx, [ebp-$04] | 0083A6F1 E886FDBCFF call 0040A47C 0083A6F6 8B45FC mov eax, [ebp-$04] * Possible String Reference to: 'SSEL' | 0083A6F9 BAC0A78300 mov edx, $0083A7C0 * Reference to: System.@LStrCmp; | 0083A6FE E83DB0BCFF call 00405740 0083A703 7419 jz 0083A71E 0083A705 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 0083A707 8B833C030000 mov eax, [ebx+$033C] * Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem; | or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient; | or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem; | or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem; | or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar; | or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter; | 0083A70D E8BE12E3FF call 0066B9D0 | 0083A712 E8B9FAE1FF call 0065A1D0 0083A717 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 0083A719 E842E8DEFF call 00628F60 0083A71E 47 inc edi 0083A71F 4E dec esi 0083A720 75AF jnz 0083A6D1 * Reference to control PriceNote : N.A. | 0083A722 8B838C030000 mov eax, [ebx+$038C] * Reference to control ADOTemp : N.A. | 0083A728 83B83C03000000 cmp dword ptr [eax+$033C], +$00 0083A72F 7541 jnz 0083A772 0083A731 B201 mov dl, $01 * Reference to control v1PriceUnit : N.A. | 0083A733 8B8384030000 mov eax, [ebx+$0384] 0083A739 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 0083A73B FF5164 call dword ptr [ecx+$64] * Reference to control ADOTemp : N.A. | 0083A73E 8B833C030000 mov eax, [ebx+$033C] * Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word; | or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte; | or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl); | or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient); | or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem); | or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter); | 0083A744 E8FB1BE2FF call 0065C344 0083A749 8BF0 mov esi, eax 0083A74B 4E dec esi 0083A74C 85F6 test esi, esi 0083A74E 7E22 jle 0083A772 0083A750 BF01000000 mov edi, $00000001 0083A755 8BD7 mov edx, edi * Reference to control ADOTemp : N.A. | 0083A757 8B833C030000 mov eax, [ebx+$033C] * Reference to: ActnMan.TActionListCollection.GetListItem(TActionListCollection;Integer):TActionListItem; | or: ActnMan.TActionClientsCollection.GetActionClient(TActionClientsCollection;Integer):TActionClient; | or: ActnMan.TActionBars.GetActionBar(TActionBars;Integer):TActionBarItem; | or: ActnMan.TActionClients.GetActionClient(TActionClients;Integer):TActionClientItem; | or: ActnMenus.TMenuList.GetMenu(TMenuList;Integer):TCustomActionMenuBar; | or: ADODB.TParameters.GetItem(TParameters;Integer):TParameter; | 0083A75D E86E12E3FF call 0066B9D0 | 0083A762 E869FAE1FF call 0065A1D0 0083A767 B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 0083A769 E8F2E7DEFF call 00628F60 0083A76E 47 inc edi 0083A76F 4E dec esi 0083A770 75E3 jnz 0083A755 * Reference to control PriceNote : N.A. | 0083A772 8B838C030000 mov eax, [ebx+$038C] * Reference to control ADOTemp : N.A. | 0083A778 83B83C03000001 cmp dword ptr [eax+$033C], +$01 0083A77F 750D jnz 0083A78E 0083A781 B201 mov dl, $01 * Reference to control Label5 : TLabel | 0083A783 8B8388030000 mov eax, [ebx+$0388] 0083A789 8B08 mov ecx, [eax] * Reference to method TLabel.SetEnabled(Boolean) | 0083A78B FF5164 call dword ptr [ecx+$64] 0083A78E 33C0 xor eax, eax 0083A790 5A pop edx 0083A791 59 pop ecx 0083A792 59 pop ecx 0083A793 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[YY]Ã' | 0083A796 68B0A78300 push $0083A7B0 0083A79B 8D45F8 lea eax, [ebp-$08] 0083A79E BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 0083A7A3 E8A0ABBCFF call 00405348 0083A7A8 C3 ret *) end; end.