Group_99/D7myChuangpin
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
ece69a5ac1
D7myChuangpin/YSYF/U_YFFP_HX.pas

10755 lines
409 KiB
ObjectPascal
Raw Normal View History

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