4269 lines
158 KiB
ObjectPascal
4269 lines
158 KiB
ObjectPascal
unit U_ConInPut_CX;
|
||
|
||
interface
|
||
|
||
uses
|
||
Windows, Messages, SysUtils, Classes, Graphics,
|
||
Controls, Forms, Dialogs, StdCtrls
|
||
type
|
||
TfrmConInPut=class(TForm)
|
||
ToolBar1: TToolBar;
|
||
TBSave: TToolButton;
|
||
TBClose: TToolButton;
|
||
ScrollBox1: TScrollBox;
|
||
Label3: TLabel;
|
||
OrdDate: TDateTimePicker;
|
||
Label4: TLabel;
|
||
DlyDate: TDateTimePicker;
|
||
Label7: TLabel;
|
||
ToolBar2: TToolBar;
|
||
ToolButton1: TToolButton;
|
||
ToolButton2: TToolButton;
|
||
cxGrid1: TcxGrid;
|
||
Tv1: TcxGridDBTableView;
|
||
cxGrid1Level1: TcxGridLevel;
|
||
v1PRTColor: TcxGridDBColumn;
|
||
v1PRTPrice: TcxGridDBColumn;
|
||
ADOTemp: TADOQuery;
|
||
ADOCmd: TADOQuery;
|
||
DataSource1: TDataSource;
|
||
Order_Sub: TClientDataSet;
|
||
ADOQuery1: TADOQuery;
|
||
v1PRTOrderQty: TcxGridDBColumn;
|
||
Label9: TLabel;
|
||
ConPerson1: TEdit;
|
||
Label10: TLabel;
|
||
ConNo: TEdit;
|
||
Label11: TLabel;
|
||
Label14: TLabel;
|
||
Label20: TLabel;
|
||
FromPlace: TBtnEditC;
|
||
CustomerNoName: TBtnEditC;
|
||
v1XHNo: TcxGridDBColumn;
|
||
SYRName: TBtnEditC;
|
||
v1OrderUnit: TcxGridDBColumn;
|
||
v1PriceUnit: TcxGridDBColumn;
|
||
Label5: TLabel;
|
||
PriceNote: TBtnEditC;
|
||
Label6: TLabel;
|
||
QtyNote: TBtnEditC;
|
||
Label15: TLabel;
|
||
Payment: TBtnEditC;
|
||
Label1: TLabel;
|
||
ToPlace: TBtnEditC;
|
||
Label17: TLabel;
|
||
Label18: TLabel;
|
||
BankNo: TBtnEditC;
|
||
SYRAddress: TEdit;
|
||
Label19: TLabel;
|
||
BankName: TEdit;
|
||
Label21: TLabel;
|
||
BankAddress: TEdit;
|
||
ToolButton3: TToolButton;
|
||
v1Column1: TcxGridDBColumn;
|
||
v1Column3: TcxGridDBColumn;
|
||
Label8: TLabel;
|
||
TelNo: TEdit;
|
||
Label23: TLabel;
|
||
FaxNo: TEdit;
|
||
DlyNote: TBtnEditC;
|
||
CDS_Type: TClientDataSet;
|
||
Label28: TLabel;
|
||
BankSelfFastNo: TEdit;
|
||
Label29: TLabel;
|
||
KHConNo: TEdit;
|
||
v1Column5: TcxGridDBColumn;
|
||
v1Column6: TcxGridDBColumn;
|
||
v1Column7: TcxGridDBColumn;
|
||
v1Column8: TcxGridDBColumn;
|
||
ConPerson2: TBtnEditC;
|
||
Label2: TLabel;
|
||
conDefstr1: TEdit;
|
||
Label12: TLabel;
|
||
conDefstr2: TEdit;
|
||
Label13: TLabel;
|
||
Label31: TLabel;
|
||
conDefstr3: TEdit;
|
||
Label33: TLabel;
|
||
conDefstr5: TEdit;
|
||
EmailNo: TEdit;
|
||
Label38: TLabel;
|
||
CustomerNo: TEdit;
|
||
Label40: TLabel;
|
||
Label32: TLabel;
|
||
FKPerson: TBtnEditC;
|
||
Label35: TLabel;
|
||
ConType: TBtnEditC;
|
||
Label16: TLabel;
|
||
ShippMent: TBtnEditC;
|
||
v1Column2: TcxGridDBColumn;
|
||
v1Column4: TcxGridDBColumn;
|
||
v1Column9: TcxGridDBColumn;
|
||
v1Column10: TcxGridDBColumn;
|
||
v1Column11: TcxGridDBColumn;
|
||
v1Column12: TcxGridDBColumn;
|
||
Label34: TLabel;
|
||
HuoDai: TBtnEditC;
|
||
cxGrid2: TcxGrid;
|
||
Tv2: TcxGridDBTableView;
|
||
cxGridDBColumn1: TcxGridDBColumn;
|
||
cxGridDBColumn18: TcxGridDBColumn;
|
||
cxGridLevel1: TcxGridLevel;
|
||
Button1: TButton;
|
||
Button2: TButton;
|
||
Order_Note: TClientDataSet;
|
||
DataSource2: TDataSource;
|
||
Label22: TLabel;
|
||
KeFu: TEdit;
|
||
v1Column13: TcxGridDBColumn;
|
||
v1Column14: TcxGridDBColumn;
|
||
v1Column15: TcxGridDBColumn;
|
||
Label24: TLabel;
|
||
Label25: TLabel;
|
||
CPCFBi: TcxCurrencyEdit;
|
||
procedure TBCloseClick(Sender : TObject);
|
||
procedure FormShow(Sender : TObject);
|
||
procedure TBSaveClick(Sender : TObject);
|
||
procedure v1PRTColorPropertiesButtonClick(Sender : TObject);
|
||
procedure ToolButton1Click(Sender : TObject);
|
||
procedure ToolButton2Click(Sender : TObject);
|
||
procedure CustomerNoNameBtnUpClick(Sender : TObject);
|
||
procedure CustomerNoNameBtnDnClick(Sender : TObject);
|
||
procedure v1Column1PropertiesButtonClick(Sender : TObject);
|
||
procedure v1OrderUnitPropertiesButtonClick(Sender : TObject);
|
||
procedure v1PriceUnitPropertiesButtonClick(Sender : TObject);
|
||
procedure SYRNameBtnUpClick(Sender : TObject);
|
||
procedure ToolButton3Click(Sender : TObject);
|
||
procedure CPCFNoDblClick(Sender : TObject);
|
||
procedure CPRanHouGYBtnDnClick(Sender : TObject);
|
||
procedure v1PRTOrderQtyPropertiesEditValueChanged(Sender : TObject);
|
||
procedure v1OrderUnitPropertiesEditValueChanged(Sender : TObject);
|
||
procedure v1PRTPricePropertiesEditValueChanged(Sender : TObject);
|
||
procedure v1Column5PropertiesButtonClick(Sender : TObject);
|
||
procedure v1Column7PropertiesButtonClick(Sender : TObject);
|
||
procedure v1Column8PropertiesButtonClick(Sender : TObject);
|
||
procedure FormCreate(Sender : TObject);
|
||
procedure Button1Click(Sender : TObject);
|
||
procedure Button2Click(Sender : TObject);
|
||
procedure _PROC_007D916D(Sender : TObject);
|
||
procedure _PROC_007D98E5(Sender : TObject);
|
||
procedure _PROC_007DA899(Sender : TObject);
|
||
procedure _PROC_007DB40E(Sender : TObject);
|
||
procedure _PROC_007DB45A(Sender : TObject);
|
||
procedure _PROC_007DC14F(Sender : TObject);
|
||
procedure _PROC_007DC34A(Sender : TObject);
|
||
procedure _PROC_007DC375(Sender : TObject);
|
||
procedure _PROC_007DC39C(Sender : TObject);
|
||
procedure _PROC_007DC56E(Sender : TObject);
|
||
procedure _PROC_007DD512(Sender : TObject);
|
||
procedure _PROC_007DDF2D(Sender : TObject);
|
||
procedure _PROC_007DDF5C(Sender : TObject);
|
||
procedure _PROC_007DDF64(Sender : TObject);
|
||
procedure _PROC_007DDFCA(Sender : TObject);
|
||
private
|
||
{ Private declarations }
|
||
public
|
||
{ Public declarations }
|
||
end ;
|
||
|
||
var
|
||
frmConInPut: TfrmConInPut;
|
||
|
||
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
|
||
|
||
implementation
|
||
|
||
{$R *.DFM}
|
||
|
||
procedure TfrmConInPut.TBCloseClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007D9118 53 push ebx
|
||
007D9119 8BD8 mov ebx, eax
|
||
007D911B 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
||
|
|
||
007D911D E876CECCFF call 004A5F98
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>ָʾ<D6B8><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
||
|
|
||
007D9122 B944917D00 mov ecx, $007D9144
|
||
|
||
* Reference to control TfrmConInPut.Tv1 : TcxGridDBTableView
|
||
|
|
||
007D9127 8B932C030000 mov edx, [ebx+$032C]
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͬ¼<CDAC><C2BC>1'
|
||
|
|
||
007D912D B85C917D00 mov eax, $007D915C
|
||
|
||
|
|
||
007D9132 E869EAFDFF call 007B7BA0
|
||
007D9137 5B pop ebx
|
||
007D9138 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.FormShow(Sender : TObject);
|
||
begin
|
||
(*
|
||
007D9880 53 push ebx
|
||
007D9881 8BD8 mov ebx, eax
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C0
|
||
|
|
||
007D9883 8D83C0040000 lea eax, [ebx+$04C0]
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.TBSaveClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DABB8 55 push ebp
|
||
007DABB9 8BEC mov ebp, esp
|
||
007DABBB B920000000 mov ecx, $00000020
|
||
007DABC0 6A00 push $00
|
||
007DABC2 6A00 push $00
|
||
007DABC4 49 dec ecx
|
||
007DABC5 75F9 jnz 007DABC0
|
||
007DABC7 53 push ebx
|
||
007DABC8 56 push esi
|
||
007DABC9 57 push edi
|
||
007DABCA 8BD8 mov ebx, eax
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1PRTColorPropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DB47C 55 push ebp
|
||
007DB47D 8BEC mov ebp, esp
|
||
007DB47F 51 push ecx
|
||
007DB480 B906000000 mov ecx, $00000006
|
||
007DB485 6A00 push $00
|
||
007DB487 6A00 push $00
|
||
007DB489 49 dec ecx
|
||
007DB48A 75F9 jnz 007DB485
|
||
007DB48C 874DFC xchg [ebp-$04], ecx
|
||
007DB48F 53 push ebx
|
||
007DB490 8BD8 mov ebx, eax
|
||
007DB492 33C0 xor eax, eax
|
||
007DB494 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>t<EFBFBD><74><EFBFBD><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DB495 687BB67D00 push $007DB67B
|
||
|
||
***** TRY
|
||
|
|
||
007DB49A 64FF30 push dword ptr fs:[eax]
|
||
007DB49D 648920 mov fs:[eax], esp
|
||
007DB4A0 33C0 xor eax, eax
|
||
007DB4A2 55 push ebp
|
||
007DB4A3 6834B67D00 push $007DB634
|
||
|
||
***** TRY
|
||
|
|
||
007DB4A8 64FF30 push dword ptr fs:[eax]
|
||
007DB4AB 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.ToolButton1Click(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DB71C 55 push ebp
|
||
007DB71D 8BEC mov ebp, esp
|
||
007DB71F B909000000 mov ecx, $00000009
|
||
007DB724 6A00 push $00
|
||
007DB726 6A00 push $00
|
||
007DB728 49 dec ecx
|
||
007DB729 75F9 jnz 007DB724
|
||
007DB72B 51 push ecx
|
||
007DB72C 53 push ebx
|
||
007DB72D 56 push esi
|
||
007DB72E 57 push edi
|
||
007DB72F 8BD8 mov ebx, eax
|
||
007DB731 33C0 xor eax, eax
|
||
007DB733 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>g<EFBFBD><67><EFBFBD><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
||
|
|
||
007DB734 6888B87D00 push $007DB888
|
||
|
||
***** TRY
|
||
|
|
||
007DB739 64FF30 push dword ptr fs:[eax]
|
||
007DB73C 648920 mov fs:[eax], esp
|
||
007DB73F 8D55F8 lea edx, [ebp-$08]
|
||
|
||
* Reference to control TfrmConInPut.ConNo : TEdit
|
||
|
|
||
007DB742 8B8360030000 mov eax, [ebx+$0360]
|
||
|
||
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
||
|
|
||
007DB748 E8A3CECAFF call 004885F0
|
||
007DB74D 8B45F8 mov eax, [ebp-$08]
|
||
007DB750 8D55FC lea edx, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DB753 E894F1C2FF call 0040A8EC
|
||
007DB758 837DFC00 cmp dword ptr [ebp-$04], +$00
|
||
007DB75C 751D jnz 007DB77B
|
||
007DB75E 6A00 push $00
|
||
|
||
* Possible String Reference to: '<27><>ʾ'
|
||
|
|
||
007DB760 B998B87D00 mov ecx, $007DB898
|
||
|
||
* Possible String Reference to: '<27><>ͬ<EFBFBD>Ų<EFBFBD><C5B2><EFBFBD>Ϊ<EFBFBD><CEAA>!'
|
||
|
|
||
007DB765 BAA0B87D00 mov edx, $007DB8A0
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.ToolButton2Click(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DB8FC 55 push ebp
|
||
007DB8FD 8BEC mov ebp, esp
|
||
007DB8FF 33C9 xor ecx, ecx
|
||
007DB901 51 push ecx
|
||
007DB902 51 push ecx
|
||
007DB903 51 push ecx
|
||
007DB904 51 push ecx
|
||
007DB905 51 push ecx
|
||
007DB906 53 push ebx
|
||
007DB907 56 push esi
|
||
007DB908 8BD8 mov ebx, eax
|
||
007DB90A 33C0 xor eax, eax
|
||
007DB90C 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DB90D 6809BA7D00 push $007DBA09
|
||
|
||
***** TRY
|
||
|
|
||
007DB912 64FF30 push dword ptr fs:[eax]
|
||
007DB915 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DB918 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
||
|
|
||
007DB91E E89DC5CEFF call 004C7EC0
|
||
007DB923 84C0 test al, al
|
||
007DB925 0F85C3000000 jnz 007DB9EE
|
||
|
||
* Possible String Reference to: 'SubId'
|
||
|
|
||
007DB92B BA20BA7D00 mov edx, $007DBA20
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DB930 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DB936 E879B2CEFF call 004C6BB4
|
||
007DB93B 8D55F8 lea edx, [ebp-$08]
|
||
007DB93E 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DB940 FF5160 call dword ptr [ecx+$60]
|
||
007DB943 8B45F8 mov eax, [ebp-$08]
|
||
007DB946 8D55FC lea edx, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DB949 E89EEFC2FF call 0040A8EC
|
||
007DB94E 837DFC00 cmp dword ptr [ebp-$04], +$00
|
||
007DB952 0F848B000000 jz 007DB9E3
|
||
007DB958 6A24 push $24
|
||
|
||
* Possible String Reference to: '<27><>ʾ'
|
||
|
|
||
007DB95A B928BA7D00 mov ecx, $007DBA28
|
||
|
||
* Possible String Reference to: 'ȷ<><C8B7>Ҫɾ<D2AA><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
||
|
|
||
007DB95F BA30BA7D00 mov edx, $007DBA30
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.CustomerNoNameBtnUpClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DBA7C 55 push ebp
|
||
007DBA7D 8BEC mov ebp, esp
|
||
007DBA7F B90B000000 mov ecx, $0000000B
|
||
007DBA84 6A00 push $00
|
||
007DBA86 6A00 push $00
|
||
007DBA88 49 dec ecx
|
||
007DBA89 75F9 jnz 007DBA84
|
||
007DBA8B 53 push ebx
|
||
007DBA8C 56 push esi
|
||
007DBA8D 8BD8 mov ebx, eax
|
||
007DBA8F 33C0 xor eax, eax
|
||
007DBA91 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DBA92 68A1BD7D00 push $007DBDA1
|
||
|
||
***** TRY
|
||
|
|
||
007DBA97 64FF30 push dword ptr fs:[eax]
|
||
007DBA9A 648920 mov fs:[eax], esp
|
||
007DBA9D 33C0 xor eax, eax
|
||
007DBA9F 55 push ebp
|
||
007DBAA0 686ABD7D00 push $007DBD6A
|
||
|
||
***** TRY
|
||
|
|
||
007DBAA5 64FF30 push dword ptr fs:[eax]
|
||
007DBAA8 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.CustomerNoNameBtnDnClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DBE90 53 push ebx
|
||
007DBE91 56 push esi
|
||
007DBE92 8BDA mov ebx, edx
|
||
007DBE94 33D2 xor edx, edx
|
||
007DBE96 8BF3 mov esi, ebx
|
||
007DBE98 8BC6 mov eax, esi
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
007DBE9A E881C7CAFF call 00488620
|
||
007DBE9F 8D8638020000 lea eax, [esi+$0238]
|
||
|
||
* Reference to: System.@LStrClr(void;void);
|
||
|
|
||
007DBEA5 E87A94C2FF call 00405324
|
||
007DBEAA 5E pop esi
|
||
007DBEAB 5B pop ebx
|
||
007DBEAC C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1Column1PropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DBEB0 55 push ebp
|
||
007DBEB1 8BEC mov ebp, esp
|
||
007DBEB3 51 push ecx
|
||
007DBEB4 B909000000 mov ecx, $00000009
|
||
007DBEB9 6A00 push $00
|
||
007DBEBB 6A00 push $00
|
||
007DBEBD 49 dec ecx
|
||
007DBEBE 75F9 jnz 007DBEB9
|
||
007DBEC0 874DFC xchg [ebp-$04], ecx
|
||
007DBEC3 53 push ebx
|
||
007DBEC4 56 push esi
|
||
007DBEC5 8BF0 mov esi, eax
|
||
007DBEC7 33C0 xor eax, eax
|
||
007DBEC9 55 push ebp
|
||
|
||
* Possible String Reference to: '魉<><E9AD89><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DBECA 6842C17D00 push $007DC142
|
||
|
||
***** TRY
|
||
|
|
||
007DBECF 64FF30 push dword ptr fs:[eax]
|
||
007DBED2 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1OrderUnitPropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC1EC 55 push ebp
|
||
007DC1ED 8BEC mov ebp, esp
|
||
007DC1EF 6A00 push $00
|
||
007DC1F1 6A00 push $00
|
||
007DC1F3 6A00 push $00
|
||
007DC1F5 6A00 push $00
|
||
007DC1F7 6A00 push $00
|
||
007DC1F9 6A00 push $00
|
||
007DC1FB 6A00 push $00
|
||
007DC1FD 53 push ebx
|
||
007DC1FE 8945FC mov [ebp-$04], eax
|
||
007DC201 33C0 xor eax, eax
|
||
007DC203 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DC204 682EC37D00 push $007DC32E
|
||
|
||
***** TRY
|
||
|
|
||
007DC209 64FF30 push dword ptr fs:[eax]
|
||
007DC20C 648920 mov fs:[eax], esp
|
||
007DC20F 33C0 xor eax, eax
|
||
007DC211 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>E<EFBFBD><45>q'
|
||
|
|
||
007DC212 68F4C27D00 push $007DC2F4
|
||
|
||
***** TRY
|
||
|
|
||
007DC217 64FF30 push dword ptr fs:[eax]
|
||
007DC21A 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1PriceUnitPropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC3C4 55 push ebp
|
||
007DC3C5 8BEC mov ebp, esp
|
||
007DC3C7 6A00 push $00
|
||
007DC3C9 6A00 push $00
|
||
007DC3CB 6A00 push $00
|
||
007DC3CD 6A00 push $00
|
||
007DC3CF 6A00 push $00
|
||
007DC3D1 6A00 push $00
|
||
007DC3D3 6A00 push $00
|
||
007DC3D5 53 push ebx
|
||
007DC3D6 8BD8 mov ebx, eax
|
||
007DC3D8 33C0 xor eax, eax
|
||
007DC3DA 55 push ebp
|
||
|
||
* Possible String Reference to: '鞅<><E99E85><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DC3DB 6851C57D00 push $007DC551
|
||
|
||
***** TRY
|
||
|
|
||
007DC3E0 64FF30 push dword ptr fs:[eax]
|
||
007DC3E3 648920 mov fs:[eax], esp
|
||
007DC3E6 33C0 xor eax, eax
|
||
007DC3E8 55 push ebp
|
||
007DC3E9 681FC57D00 push $007DC51F
|
||
|
||
***** TRY
|
||
|
|
||
007DC3EE 64FF30 push dword ptr fs:[eax]
|
||
007DC3F1 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.SYRNameBtnUpClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC5A8 55 push ebp
|
||
007DC5A9 8BEC mov ebp, esp
|
||
007DC5AB B91A000000 mov ecx, $0000001A
|
||
007DC5B0 6A00 push $00
|
||
007DC5B2 6A00 push $00
|
||
007DC5B4 49 dec ecx
|
||
007DC5B5 75F9 jnz 007DC5B0
|
||
007DC5B7 51 push ecx
|
||
007DC5B8 53 push ebx
|
||
007DC5B9 56 push esi
|
||
007DC5BA 8955FC mov [ebp-$04], edx
|
||
007DC5BD 8BD8 mov ebx, eax
|
||
007DC5BF 33C0 xor eax, eax
|
||
007DC5C1 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>|<7C><><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DC5C2 686CCE7D00 push $007DCE6C
|
||
|
||
***** TRY
|
||
|
|
||
007DC5C7 64FF30 push dword ptr fs:[eax]
|
||
007DC5CA 648920 mov fs:[eax], esp
|
||
007DC5CD 8D55F8 lea edx, [ebp-$08]
|
||
007DC5D0 8B45FC mov eax, [ebp-$04]
|
||
007DC5D3 8B8080000000 mov eax, [eax+$0080]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DC5D9 E80EE3C2FF call 0040A8EC
|
||
007DC5DE 8B55F8 mov edx, [ebp-$08]
|
||
007DC5E1 B884CE7D00 mov eax, $007DCE84
|
||
|
||
* Reference to: System.@LStrPos;
|
||
|
|
||
007DC5E6 E84D93C2FF call 00405938
|
||
007DC5EB 8BF0 mov esi, eax
|
||
007DC5ED 33C0 xor eax, eax
|
||
007DC5EF 55 push ebp
|
||
007DC5F0 6847CE7D00 push $007DCE47
|
||
|
||
***** TRY
|
||
|
|
||
007DC5F5 64FF30 push dword ptr fs:[eax]
|
||
007DC5F8 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.ToolButton3Click(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD15C 53 push ebx
|
||
007DD15D 8BD8 mov ebx, eax
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD15F 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
||
|
|
||
007DD165 E856ADCEFF call 004C7EC0
|
||
007DD16A 84C0 test al, al
|
||
007DD16C 7511 jnz 007DD17F
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD16E 8B9348030000 mov edx, [ebx+$0348]
|
||
|
||
* Reference to control TfrmConInPut.Tv1 : TcxGridDBTableView
|
||
|
|
||
007DD174 8B832C030000 mov eax, [ebx+$032C]
|
||
|
||
* Reference to : TfrmSelExportField._PROC_007B752C()
|
||
|
|
||
007DD17A E8ADA3FDFF call 007B752C
|
||
007DD17F 5B pop ebx
|
||
007DD180 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.CPCFNoDblClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD184 55 push ebp
|
||
007DD185 8BEC mov ebp, esp
|
||
007DD187 53 push ebx
|
||
007DD188 56 push esi
|
||
007DD189 8BD8 mov ebx, eax
|
||
007DD18B 33C0 xor eax, eax
|
||
007DD18D 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>(x<><78><EFBFBD><EFBFBD>^[]<5D>'
|
||
|
|
||
007DD18E 68C7D27D00 push $007DD2C7
|
||
|
||
***** TRY
|
||
|
|
||
007DD193 64FF30 push dword ptr fs:[eax]
|
||
007DD196 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.CPRanHouGYBtnDnClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD36C 53 push ebx
|
||
007DD36D 56 push esi
|
||
007DD36E 8BDA mov ebx, edx
|
||
007DD370 33D2 xor edx, edx
|
||
007DD372 8BF3 mov esi, ebx
|
||
007DD374 8BC6 mov eax, esi
|
||
|
||
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
||
|
|
||
007DD376 E8A5B2CAFF call 00488620
|
||
007DD37B 8D8638020000 lea eax, [esi+$0238]
|
||
|
||
* Reference to: System.@LStrClr(void;void);
|
||
|
|
||
007DD381 E89E7FC2FF call 00405324
|
||
007DD386 5E pop esi
|
||
007DD387 5B pop ebx
|
||
007DD388 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1PRTOrderQtyPropertiesEditValueChanged(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD38C 55 push ebp
|
||
007DD38D 8BEC mov ebp, esp
|
||
007DD38F 33C9 xor ecx, ecx
|
||
007DD391 51 push ecx
|
||
007DD392 51 push ecx
|
||
007DD393 51 push ecx
|
||
007DD394 51 push ecx
|
||
007DD395 51 push ecx
|
||
007DD396 51 push ecx
|
||
007DD397 53 push ebx
|
||
007DD398 56 push esi
|
||
007DD399 8BDA mov ebx, edx
|
||
007DD39B 8BF0 mov esi, eax
|
||
007DD39D 33C0 xor eax, eax
|
||
007DD39F 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>v<EFBFBD><76><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DD3A0 6838D47D00 push $007DD438
|
||
|
||
***** TRY
|
||
|
|
||
007DD3A5 64FF30 push dword ptr fs:[eax]
|
||
007DD3A8 648920 mov fs:[eax], esp
|
||
007DD3AB 8D55FC lea edx, [ebp-$04]
|
||
007DD3AE 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;
|
||
|
|
||
007DD3B0 E80723DBFF call 0058F6BC
|
||
007DD3B5 8D55F8 lea edx, [ebp-$08]
|
||
007DD3B8 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD3BB E82CD5C2FF call 0040A8EC
|
||
007DD3C0 837DF800 cmp dword ptr [ebp-$08], +$00
|
||
007DD3C4 750D jnz 007DD3D3
|
||
007DD3C6 8D45FC lea eax, [ebp-$04]
|
||
007DD3C9 BA50D47D00 mov edx, $007DD450
|
||
|
||
* Reference to: System.@LStrLAsg(void;void;void;void);
|
||
|
|
||
007DD3CE E8E97FC2FF call 004053BC
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD3D3 8B9E48030000 mov ebx, [esi+$0348]
|
||
007DD3D9 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007DD3DB E860B0CEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'PRTOrderQty'
|
||
|
|
||
007DD3E0 BA5CD47D00 mov edx, $007DD45C
|
||
007DD3E5 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD3E7 E8C897CEFF call 004C6BB4
|
||
007DD3EC 50 push eax
|
||
007DD3ED 8D45E8 lea eax, [ebp-$18]
|
||
007DD3F0 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007DD3F3 E8D0B9C3FF call 00418DC8
|
||
007DD3F8 8D55E8 lea edx, [ebp-$18]
|
||
007DD3FB 58 pop eax
|
||
007DD3FC 8B08 mov ecx, [eax]
|
||
007DD3FE FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007DD404 8BC3 mov eax, ebx
|
||
007DD406 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007DD408 FF924C020000 call dword ptr [edx+$024C]
|
||
007DD40E 8BC6 mov eax, esi
|
||
|
||
* Reference to: DBAdapt.TBaseDataSetAdapterField.ImplCheckOrigValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DBAdapt.TBaseDataSetAdapterField.ImplUpdateValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterRequest(TWebDesignContext;System.IUnknown);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterResponse(TWebDesignContext;System.IUnknown);
|
||
| or: InSSLOpenSSL.TIdSSLSocket.SetCipherList(TIdSSLSocket;AnsiString);
|
||
| or: IWDBStdCtrls.SetFieldText(TField;AnsiString);
|
||
|
|
||
007DD410 E85FEFFFFF call 007DC374
|
||
007DD415 33C0 xor eax, eax
|
||
007DD417 5A pop edx
|
||
007DD418 59 pop ecx
|
||
007DD419 59 pop ecx
|
||
007DD41A 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '^[<5B><>]<5D>'
|
||
|
|
||
007DD41D 683FD47D00 push $007DD43F
|
||
007DD422 8D45E8 lea eax, [ebp-$18]
|
||
|
||
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
||
|
|
||
007DD425 E84A72C3FF call 00414674
|
||
007DD42A 8D45F8 lea eax, [ebp-$08]
|
||
007DD42D BA02000000 mov edx, $00000002
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
007DD432 E8117FC2FF call 00405348
|
||
007DD437 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DD438 E9B776C2FF jmp 00404AF4
|
||
007DD43D EBE3 jmp 007DD422
|
||
|
||
****** END
|
||
|
|
||
007DD43F 5E pop esi
|
||
007DD440 5B pop ebx
|
||
007DD441 8BE5 mov esp, ebp
|
||
007DD443 5D pop ebp
|
||
007DD444 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1OrderUnitPropertiesEditValueChanged(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD468 55 push ebp
|
||
007DD469 8BEC mov ebp, esp
|
||
007DD46B 33C9 xor ecx, ecx
|
||
007DD46D 51 push ecx
|
||
007DD46E 51 push ecx
|
||
007DD46F 51 push ecx
|
||
007DD470 51 push ecx
|
||
007DD471 51 push ecx
|
||
007DD472 53 push ebx
|
||
007DD473 56 push esi
|
||
007DD474 8BF2 mov esi, edx
|
||
007DD476 8BD8 mov ebx, eax
|
||
007DD478 33C0 xor eax, eax
|
||
007DD47A 55 push ebp
|
||
007DD47B 68F7D47D00 push $007DD4F7
|
||
|
||
***** TRY
|
||
|
|
||
007DD480 64FF30 push dword ptr fs:[eax]
|
||
007DD483 648920 mov fs:[eax], esp
|
||
007DD486 8D55FC lea edx, [ebp-$04]
|
||
007DD489 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;
|
||
|
|
||
007DD48B E82C22DBFF call 0058F6BC
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD490 8BB348030000 mov esi, [ebx+$0348]
|
||
007DD496 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007DD498 E8A3AFCEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'OrderUnit'
|
||
|
|
||
007DD49D BA0CD57D00 mov edx, $007DD50C
|
||
007DD4A2 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD4A4 E80B97CEFF call 004C6BB4
|
||
007DD4A9 50 push eax
|
||
007DD4AA 8D45EC lea eax, [ebp-$14]
|
||
007DD4AD 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007DD4B0 E813B9C3FF call 00418DC8
|
||
007DD4B5 8D55EC lea edx, [ebp-$14]
|
||
007DD4B8 58 pop eax
|
||
007DD4B9 8B08 mov ecx, [eax]
|
||
007DD4BB FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007DD4C1 8BC6 mov eax, esi
|
||
007DD4C3 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007DD4C5 FF924C020000 call dword ptr [edx+$024C]
|
||
007DD4CB 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DBAdapt.TBaseDataSetAdapterField.ImplCheckOrigValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DBAdapt.TBaseDataSetAdapterField.ImplUpdateValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterRequest(TWebDesignContext;System.IUnknown);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterResponse(TWebDesignContext;System.IUnknown);
|
||
| or: InSSLOpenSSL.TIdSSLSocket.SetCipherList(TIdSSLSocket;AnsiString);
|
||
| or: IWDBStdCtrls.SetFieldText(TField;AnsiString);
|
||
|
|
||
007DD4CD E8A2EEFFFF call 007DC374
|
||
007DD4D2 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DBAdapt.TBaseDataSetAdapterField.ImplCheckOrigValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DBAdapt.TBaseDataSetAdapterField.ImplUpdateValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterRequest(TWebDesignContext;System.IUnknown);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterResponse(TWebDesignContext;System.IUnknown);
|
||
| or: InSSLOpenSSL.TIdSSLSocket.SetCipherList(TIdSSLSocket;AnsiString);
|
||
| or: IWDBStdCtrls.SetFieldText(TField;AnsiString);
|
||
|
|
||
007DD4D4 E8C3EEFFFF call 007DC39C
|
||
007DD4D9 33C0 xor eax, eax
|
||
007DD4DB 5A pop edx
|
||
007DD4DC 59 pop ecx
|
||
007DD4DD 59 pop ecx
|
||
007DD4DE 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
007DD4E1 68FED47D00 push $007DD4FE
|
||
007DD4E6 8D45EC lea eax, [ebp-$14]
|
||
|
||
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
||
|
|
||
007DD4E9 E88671C3FF call 00414674
|
||
007DD4EE 8D45FC lea eax, [ebp-$04]
|
||
|
||
* Reference to: System.@LStrClr(void;void);
|
||
|
|
||
007DD4F1 E82E7EC2FF call 00405324
|
||
007DD4F6 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DD4F7 E9F875C2FF jmp 00404AF4
|
||
007DD4FC EBE8 jmp 007DD4E6
|
||
|
||
****** END
|
||
|
|
||
007DD4FE 5E pop esi
|
||
007DD4FF 5B pop ebx
|
||
007DD500 8BE5 mov esp, ebp
|
||
007DD502 5D pop ebp
|
||
007DD503 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1PRTPricePropertiesEditValueChanged(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD518 55 push ebp
|
||
007DD519 8BEC mov ebp, esp
|
||
007DD51B B907000000 mov ecx, $00000007
|
||
007DD520 6A00 push $00
|
||
007DD522 6A00 push $00
|
||
007DD524 49 dec ecx
|
||
007DD525 75F9 jnz 007DD520
|
||
007DD527 53 push ebx
|
||
007DD528 56 push esi
|
||
007DD529 8BF2 mov esi, edx
|
||
007DD52B 8BD8 mov ebx, eax
|
||
007DD52D 33C0 xor eax, eax
|
||
007DD52F 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>s<EFBFBD><73><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DD530 68FAD67D00 push $007DD6FA
|
||
|
||
***** TRY
|
||
|
|
||
007DD535 64FF30 push dword ptr fs:[eax]
|
||
007DD538 648920 mov fs:[eax], esp
|
||
007DD53B 8D55FC lea edx, [ebp-$04]
|
||
007DD53E 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;
|
||
|
|
||
007DD540 E87721DBFF call 0058F6BC
|
||
007DD545 8D55F8 lea edx, [ebp-$08]
|
||
007DD548 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD54B E89CD3C2FF call 0040A8EC
|
||
007DD550 837DF800 cmp dword ptr [ebp-$08], +$00
|
||
007DD554 750D jnz 007DD563
|
||
007DD556 8D45FC lea eax, [ebp-$04]
|
||
007DD559 BA10D77D00 mov edx, $007DD710
|
||
|
||
* Reference to: System.@LStrLAsg(void;void;void;void);
|
||
|
|
||
007DD55E E8597EC2FF call 004053BC
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD563 8BB348030000 mov esi, [ebx+$0348]
|
||
007DD569 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007DD56B E8D0AECEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'PRTPrice'
|
||
|
|
||
007DD570 BA1CD77D00 mov edx, $007DD71C
|
||
007DD575 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD577 E83896CEFF call 004C6BB4
|
||
007DD57C 50 push eax
|
||
007DD57D 8D45E8 lea eax, [ebp-$18]
|
||
007DD580 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007DD583 E840B8C3FF call 00418DC8
|
||
007DD588 8D55E8 lea edx, [ebp-$18]
|
||
007DD58B 58 pop eax
|
||
007DD58C 8B08 mov ecx, [eax]
|
||
007DD58E FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007DD594 8BC6 mov eax, esi
|
||
007DD596 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007DD598 FF924C020000 call dword ptr [edx+$024C]
|
||
007DD59E 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DBAdapt.TBaseDataSetAdapterField.ImplCheckOrigValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DBAdapt.TBaseDataSetAdapterField.ImplUpdateValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterRequest(TWebDesignContext;System.IUnknown);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterResponse(TWebDesignContext;System.IUnknown);
|
||
| or: InSSLOpenSSL.TIdSSLSocket.SetCipherList(TIdSSLSocket;AnsiString);
|
||
| or: IWDBStdCtrls.SetFieldText(TField;AnsiString);
|
||
|
|
||
007DD5A0 E8F7EDFFFF call 007DC39C
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007DD5A5 8BB340030000 mov esi, [ebx+$0340]
|
||
007DD5AB 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007DD5AD E82283CEFF call 004C58D4
|
||
007DD5B2 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD5B4 E8F309D0FF call 004DDFAC
|
||
007DD5B9 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007DD5BB FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'select * from YF_Money_CR where YFT
|
||
| ypeId=''
|
||
|
|
||
007DD5BE 6830D77D00 push $007DD730
|
||
|
||
* Possible String Reference to: 'Subid'
|
||
|
|
||
007DD5C3 BA64D77D00 mov edx, $007DD764
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD5C8 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD5CE E8E195CEFF call 004C6BB4
|
||
007DD5D3 8D55DC lea edx, [ebp-$24]
|
||
007DD5D6 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DD5D8 FF5160 call dword ptr [ecx+$60]
|
||
007DD5DB 8B45DC mov eax, [ebp-$24]
|
||
007DD5DE 8D55E0 lea edx, [ebp-$20]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD5E1 E806D3C2FF call 0040A8EC
|
||
007DD5E6 FF75E0 push dword ptr [ebp-$20]
|
||
007DD5E9 6874D77D00 push $007DD774
|
||
007DD5EE 8D45E4 lea eax, [ebp-$1C]
|
||
007DD5F1 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD5F6 E8B980C2FF call 004056B4
|
||
007DD5FB 8B45E4 mov eax, [ebp-$1C]
|
||
007DD5FE 50 push eax
|
||
007DD5FF 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD601 E8A609D0FF call 004DDFAC
|
||
007DD606 5A pop edx
|
||
007DD607 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD609 FF5138 call dword ptr [ecx+$38]
|
||
007DD60C 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007DD60E E8B582CEFF call 004C58C8
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007DD613 8B8340030000 mov eax, [ebx+$0340]
|
||
|
||
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
||
|
|
||
007DD619 E8A2A8CEFF call 004C7EC0
|
||
007DD61E 84C0 test al, al
|
||
007DD620 0F85A4000000 jnz 007DD6CA
|
||
|
||
* Reference to control TfrmConInPut.ADOTemp : TADOQuery
|
||
|
|
||
007DD626 8BB33C030000 mov esi, [ebx+$033C]
|
||
007DD62C 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007DD62E E8A182CEFF call 004C58D4
|
||
007DD633 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD635 E87209D0FF call 004DDFAC
|
||
007DD63A 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007DD63C FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'update YF_Money_CR set Price=''
|
||
|
|
||
007DD63F 6880D77D00 push $007DD780
|
||
007DD644 8D55D4 lea edx, [ebp-$2C]
|
||
007DD647 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD64A E89DD2C2FF call 0040A8EC
|
||
007DD64F FF75D4 push dword ptr [ebp-$2C]
|
||
|
||
* Possible String Reference to: '' '
|
||
|
|
||
007DD652 68A8D77D00 push $007DD7A8
|
||
007DD657 8D45D8 lea eax, [ebp-$28]
|
||
007DD65A BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD65F E85080C2FF call 004056B4
|
||
007DD664 8B45D8 mov eax, [ebp-$28]
|
||
007DD667 50 push eax
|
||
007DD668 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD66A E83D09D0FF call 004DDFAC
|
||
007DD66F 5A pop edx
|
||
007DD670 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD672 FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Possible String Reference to: 'where YFTypeId=''
|
||
|
|
||
007DD675 68B4D77D00 push $007DD7B4
|
||
|
||
* Possible String Reference to: 'Subid'
|
||
|
|
||
007DD67A BA64D77D00 mov edx, $007DD764
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD67F 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD685 E82A95CEFF call 004C6BB4
|
||
007DD68A 8D55C8 lea edx, [ebp-$38]
|
||
007DD68D 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DD68F FF5160 call dword ptr [ecx+$60]
|
||
007DD692 8B45C8 mov eax, [ebp-$38]
|
||
007DD695 8D55CC lea edx, [ebp-$34]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD698 E84FD2C2FF call 0040A8EC
|
||
007DD69D FF75CC push dword ptr [ebp-$34]
|
||
007DD6A0 6874D77D00 push $007DD774
|
||
007DD6A5 8D45D0 lea eax, [ebp-$30]
|
||
007DD6A8 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD6AD E80280C2FF call 004056B4
|
||
007DD6B2 8B45D0 mov eax, [ebp-$30]
|
||
007DD6B5 50 push eax
|
||
007DD6B6 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD6B8 E8EF08D0FF call 004DDFAC
|
||
007DD6BD 5A pop edx
|
||
007DD6BE 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD6C0 FF5138 call dword ptr [ecx+$38]
|
||
007DD6C3 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer;
|
||
|
|
||
007DD6C5 E80A08D0FF call 004DDED4
|
||
007DD6CA 33C0 xor eax, eax
|
||
007DD6CC 5A pop edx
|
||
007DD6CD 59 pop ecx
|
||
007DD6CE 59 pop ecx
|
||
007DD6CF 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '^[<5B><>]<5D>'
|
||
|
|
||
007DD6D2 6801D77D00 push $007DD701
|
||
007DD6D7 8D45C8 lea eax, [ebp-$38]
|
||
007DD6DA BA08000000 mov edx, $00000008
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
007DD6DF E8647CC2FF call 00405348
|
||
007DD6E4 8D45E8 lea eax, [ebp-$18]
|
||
|
||
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
||
|
|
||
007DD6E7 E8886FC3FF call 00414674
|
||
007DD6EC 8D45F8 lea eax, [ebp-$08]
|
||
007DD6EF BA02000000 mov edx, $00000002
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
007DD6F4 E84F7CC2FF call 00405348
|
||
007DD6F9 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DD6FA E9F573C2FF jmp 00404AF4
|
||
007DD6FF EBD6 jmp 007DD6D7
|
||
|
||
****** END
|
||
|
|
||
007DD701 5E pop esi
|
||
007DD702 5B pop ebx
|
||
007DD703 8BE5 mov esp, ebp
|
||
007DD705 5D pop ebp
|
||
007DD706 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1Column5PropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD7C8 55 push ebp
|
||
007DD7C9 8BEC mov ebp, esp
|
||
007DD7CB 6A00 push $00
|
||
007DD7CD 6A00 push $00
|
||
007DD7CF 6A00 push $00
|
||
007DD7D1 6A00 push $00
|
||
007DD7D3 6A00 push $00
|
||
007DD7D5 6A00 push $00
|
||
007DD7D7 6A00 push $00
|
||
007DD7D9 53 push ebx
|
||
007DD7DA 8945FC mov [ebp-$04], eax
|
||
007DD7DD 33C0 xor eax, eax
|
||
007DD7DF 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>q<EFBFBD><71><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DD7E0 6826D97D00 push $007DD926
|
||
|
||
***** TRY
|
||
|
|
||
007DD7E5 64FF30 push dword ptr fs:[eax]
|
||
007DD7E8 648920 mov fs:[eax], esp
|
||
007DD7EB 33C0 xor eax, eax
|
||
007DD7ED 55 push ebp
|
||
007DD7EE 68E1D87D00 push $007DD8E1
|
||
|
||
***** TRY
|
||
|
|
||
007DD7F3 64FF30 push dword ptr fs:[eax]
|
||
007DD7F6 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1Column7PropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD984 55 push ebp
|
||
007DD985 8BEC mov ebp, esp
|
||
007DD987 6A00 push $00
|
||
007DD989 6A00 push $00
|
||
007DD98B 6A00 push $00
|
||
007DD98D 6A00 push $00
|
||
007DD98F 6A00 push $00
|
||
007DD991 6A00 push $00
|
||
007DD993 6A00 push $00
|
||
007DD995 53 push ebx
|
||
007DD996 8945FC mov [ebp-$04], eax
|
||
007DD999 33C0 xor eax, eax
|
||
007DD99B 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>p<EFBFBD><70><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DD99C 68E2DA7D00 push $007DDAE2
|
||
|
||
***** TRY
|
||
|
|
||
007DD9A1 64FF30 push dword ptr fs:[eax]
|
||
007DD9A4 648920 mov fs:[eax], esp
|
||
007DD9A7 33C0 xor eax, eax
|
||
007DD9A9 55 push ebp
|
||
007DD9AA 689DDA7D00 push $007DDA9D
|
||
|
||
***** TRY
|
||
|
|
||
007DD9AF 64FF30 push dword ptr fs:[eax]
|
||
007DD9B2 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.v1Column8PropertiesButtonClick(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDB34 55 push ebp
|
||
007DDB35 8BEC mov ebp, esp
|
||
007DDB37 6A00 push $00
|
||
007DDB39 6A00 push $00
|
||
007DDB3B 6A00 push $00
|
||
007DDB3D 6A00 push $00
|
||
007DDB3F 6A00 push $00
|
||
007DDB41 6A00 push $00
|
||
007DDB43 6A00 push $00
|
||
007DDB45 53 push ebx
|
||
007DDB46 8945FC mov [ebp-$04], eax
|
||
007DDB49 33C0 xor eax, eax
|
||
007DDB4B 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>]n<><6E><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DDB4C 6892DC7D00 push $007DDC92
|
||
|
||
***** TRY
|
||
|
|
||
007DDB51 64FF30 push dword ptr fs:[eax]
|
||
007DDB54 648920 mov fs:[eax], esp
|
||
007DDB57 33C0 xor eax, eax
|
||
007DDB59 55 push ebp
|
||
007DDB5A 684DDC7D00 push $007DDC4D
|
||
|
||
***** TRY
|
||
|
|
||
007DDB5F 64FF30 push dword ptr fs:[eax]
|
||
007DDB62 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.FormCreate(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDCE4 B205 mov dl, $05
|
||
|
||
* Reference to control TfrmConInPut.cxGrid1 : TcxGrid
|
||
|
|
||
007DDCE6 8B8028030000 mov eax, [eax+$0328]
|
||
|
||
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
||
|
|
||
007DDCEC E8EB9DCAFF call 00487ADC
|
||
007DDCF1 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.Button1Click(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDCF4 55 push ebp
|
||
007DDCF5 8BEC mov ebp, esp
|
||
007DDCF7 33C9 xor ecx, ecx
|
||
007DDCF9 51 push ecx
|
||
007DDCFA 51 push ecx
|
||
007DDCFB 51 push ecx
|
||
007DDCFC 51 push ecx
|
||
007DDCFD 51 push ecx
|
||
007DDCFE 53 push ebx
|
||
007DDCFF 56 push esi
|
||
007DDD00 57 push edi
|
||
007DDD01 8BD8 mov ebx, eax
|
||
007DDD03 33C0 xor eax, eax
|
||
007DDD05 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>jm<6A><6D><EFBFBD><EFBFBD>_^[<5B><>]<5D>'
|
||
|
|
||
007DDD06 6885DD7D00 push $007DDD85
|
||
|
||
***** TRY
|
||
|
|
||
007DDD0B 64FF30 push dword ptr fs:[eax]
|
||
007DDD0E 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007DDD11 8B8398040000 mov eax, [ebx+$0498]
|
||
007DDD17 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.GetRecordCount()
|
||
|
|
||
007DDD19 FF924C010000 call dword ptr [edx+$014C]
|
||
007DDD1F 8BF8 mov edi, eax
|
||
007DDD21 47 inc edi
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007DDD22 8BB398040000 mov esi, [ebx+$0498]
|
||
007DDD28 8BC6 mov eax, esi
|
||
|
||
|
|
||
007DDD2A E861A8CEFF call 004C8590
|
||
007DDD2F 8D55EC lea edx, [ebp-$14]
|
||
007DDD32 8BC7 mov eax, edi
|
||
|
||
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
||
|
|
||
007DDD34 E8D3D1C2FF call 0040AF0C
|
||
007DDD39 8B55EC mov edx, [ebp-$14]
|
||
007DDD3C 8D45F0 lea eax, [ebp-$10]
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007DDD3F E884B0C3FF call 00418DC8
|
||
007DDD44 8D45F0 lea eax, [ebp-$10]
|
||
007DDD47 50 push eax
|
||
|
||
* Possible String Reference to: 'XHNO'
|
||
|
|
||
007DDD48 BA9CDD7D00 mov edx, $007DDD9C
|
||
007DDD4D 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DDD4F E8608ECEFF call 004C6BB4
|
||
007DDD54 5A pop edx
|
||
007DDD55 8B08 mov ecx, [eax]
|
||
|
||
* Reference to method TClientDataSet.DestroyFields()
|
||
|
|
||
007DDD57 FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007DDD5D 8BC6 mov eax, esi
|
||
007DDD5F 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007DDD61 FF924C020000 call dword ptr [edx+$024C]
|
||
007DDD67 33C0 xor eax, eax
|
||
007DDD69 5A pop edx
|
||
007DDD6A 59 pop ecx
|
||
007DDD6B 59 pop ecx
|
||
007DDD6C 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '_^[<5B><>]<5D>'
|
||
|
|
||
007DDD6F 688CDD7D00 push $007DDD8C
|
||
007DDD74 8D45EC lea eax, [ebp-$14]
|
||
|
||
* Reference to: System.@LStrClr(void;void);
|
||
|
|
||
007DDD77 E8A875C2FF call 00405324
|
||
007DDD7C 8D45F0 lea eax, [ebp-$10]
|
||
|
||
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
||
|
|
||
007DDD7F E8F068C3FF call 00414674
|
||
007DDD84 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DDD85 E96A6DC2FF jmp 00404AF4
|
||
007DDD8A EBE8 jmp 007DDD74
|
||
|
||
****** END
|
||
|
|
||
007DDD8C 5F pop edi
|
||
007DDD8D 5E pop esi
|
||
007DDD8E 5B pop ebx
|
||
007DDD8F 8BE5 mov esp, ebp
|
||
007DDD91 5D pop ebp
|
||
007DDD92 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut.Button2Click(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDDA4 55 push ebp
|
||
007DDDA5 8BEC mov ebp, esp
|
||
007DDDA7 33C9 xor ecx, ecx
|
||
007DDDA9 51 push ecx
|
||
007DDDAA 51 push ecx
|
||
007DDDAB 51 push ecx
|
||
007DDDAC 51 push ecx
|
||
007DDDAD 51 push ecx
|
||
007DDDAE 53 push ebx
|
||
007DDDAF 56 push esi
|
||
007DDDB0 8BD8 mov ebx, eax
|
||
007DDDB2 33C0 xor eax, eax
|
||
007DDDB4 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>>l<><6C><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DDDB5 68B1DE7D00 push $007DDEB1
|
||
|
||
***** TRY
|
||
|
|
||
007DDDBA 64FF30 push dword ptr fs:[eax]
|
||
007DDDBD 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007DDDC0 8B8398040000 mov eax, [ebx+$0498]
|
||
|
||
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
||
|
|
||
007DDDC6 E8F5A0CEFF call 004C7EC0
|
||
007DDDCB 84C0 test al, al
|
||
007DDDCD 0F85C3000000 jnz 007DDE96
|
||
|
||
* Possible String Reference to: 'MNId'
|
||
|
|
||
007DDDD3 BAC8DE7D00 mov edx, $007DDEC8
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007DDDD8 8B8398040000 mov eax, [ebx+$0498]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DDDDE E8D18DCEFF call 004C6BB4
|
||
007DDDE3 8D55F8 lea edx, [ebp-$08]
|
||
007DDDE6 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DDDE8 FF5160 call dword ptr [ecx+$60]
|
||
007DDDEB 8B45F8 mov eax, [ebp-$08]
|
||
007DDDEE 8D55FC lea edx, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DDDF1 E8F6CAC2FF call 0040A8EC
|
||
007DDDF6 837DFC00 cmp dword ptr [ebp-$04], +$00
|
||
007DDDFA 0F848B000000 jz 007DDE8B
|
||
007DDE00 6A24 push $24
|
||
|
||
* Possible String Reference to: '<27><>ʾ'
|
||
|
|
||
007DDE02 B9D0DE7D00 mov ecx, $007DDED0
|
||
|
||
* Possible String Reference to: 'ȷ<><C8B7>Ҫɾ<D2AA><C9BE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
||
|
|
||
007DDE07 BAD8DE7D00 mov edx, $007DDED8
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007D916D(Sender : TObject);
|
||
begin
|
||
(*
|
||
007D916D 8BEC mov ebp, esp
|
||
007D916F B90F000000 mov ecx, $0000000F
|
||
007D9174 6A00 push $00
|
||
007D9176 6A00 push $00
|
||
007D9178 49 dec ecx
|
||
007D9179 75F9 jnz 007D9174
|
||
007D917B 51 push ecx
|
||
007D917C 53 push ebx
|
||
007D917D 56 push esi
|
||
007D917E 8BD8 mov ebx, eax
|
||
007D9180 33C0 xor eax, eax
|
||
007D9182 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>h<EFBFBD><68><EFBFBD><EFBFBD><EFBFBD>^[<5B><>]<5D><><EFBFBD><EFBFBD><EFBFBD>/'
|
||
|
|
||
007D9183 6887967D00 push $007D9687
|
||
|
||
***** TRY
|
||
|
|
||
007D9188 64FF30 push dword ptr fs:[eax]
|
||
007D918B 648920 mov fs:[eax], esp
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D918E 8BB34C030000 mov esi, [ebx+$034C]
|
||
007D9194 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007D9196 E839C7CEFF call 004C58D4
|
||
007D919B 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D919D E80A4ED0FF call 004DDFAC
|
||
007D91A2 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007D91A4 FF5244 call dword ptr [edx+$44]
|
||
007D91A7 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D91A9 E8FE4DD0FF call 004DDFAC
|
||
|
||
* Possible String Reference to: 'select * from KH_Zdy where Type='MP
|
||
| RTNameType' '
|
||
|
|
||
007D91AE BA9C967D00 mov edx, $007D969C
|
||
007D91B3 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D91B5 FF5138 call dword ptr [ecx+$38]
|
||
007D91B8 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007D91BA E809C7CEFF call 004C58C8
|
||
|
||
* Reference to control TfrmConInPut.CDS_Type : TClientDataSet
|
||
|
|
||
007D91BF 8B93E8030000 mov edx, [ebx+$03E8]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D91C5 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D91CB E8C0DCFDFF call 007B6E90
|
||
|
||
* Reference to control TfrmConInPut.CDS_Type : TClientDataSet
|
||
|
|
||
007D91D0 8B93E8030000 mov edx, [ebx+$03E8]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D91D6 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D91DC E837DEFDFF call 007B7018
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D91E1 8BB34C030000 mov esi, [ebx+$034C]
|
||
007D91E7 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007D91E9 E8E6C6CEFF call 004C58D4
|
||
007D91EE 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D91F0 E8B74DD0FF call 004DDFAC
|
||
007D91F5 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007D91F7 FF5244 call dword ptr [edx+$44]
|
||
007D91FA 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D91FC E8AB4DD0FF call 004DDFAC
|
||
|
||
* Possible String Reference to: ' select * from JYOrderCon_Sub '
|
||
|
|
||
007D9201 BAD4967D00 mov edx, $007D96D4
|
||
007D9206 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D9208 FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D920B 83BBC404000001 cmp dword ptr [ebx+$04C4], +$01
|
||
007D9212 7539 jnz 007D924D
|
||
|
||
* Possible String Reference to: 'where MainId=''
|
||
|
|
||
007D9214 68FC967D00 push $007D96FC
|
||
007D9219 8D55F8 lea edx, [ebp-$08]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04CC
|
||
|
|
||
007D921C 8B83CC040000 mov eax, [ebx+$04CC]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007D9222 E8C516C3FF call 0040A8EC
|
||
007D9227 FF75F8 push dword ptr [ebp-$08]
|
||
007D922A 6814977D00 push $007D9714
|
||
007D922F 8D45FC lea eax, [ebp-$04]
|
||
007D9232 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007D9237 E878C4C2FF call 004056B4
|
||
007D923C 8B45FC mov eax, [ebp-$04]
|
||
007D923F 50 push eax
|
||
007D9240 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D9242 E8654DD0FF call 004DDFAC
|
||
007D9247 5A pop edx
|
||
007D9248 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D924A FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D924D 83BBC404000000 cmp dword ptr [ebx+$04C4], +$00
|
||
007D9254 7511 jnz 007D9267
|
||
007D9256 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D9258 E84F4DD0FF call 004DDFAC
|
||
|
||
* Possible String Reference to: ' where 1<>1'
|
||
|
|
||
007D925D BA20977D00 mov edx, $007D9720
|
||
007D9262 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D9264 FF5138 call dword ptr [ecx+$38]
|
||
007D9267 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007D9269 E85AC6CEFF call 004C58C8
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007D926E 8B9348030000 mov edx, [ebx+$0348]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D9274 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D927A E811DCFDFF call 007B6E90
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007D927F 8B9348030000 mov edx, [ebx+$0348]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D9285 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D928B E888DDFDFF call 007B7018
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D9290 8BB34C030000 mov esi, [ebx+$034C]
|
||
007D9296 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007D9298 E837C6CEFF call 004C58D4
|
||
007D929D 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D929F E8084DD0FF call 004DDFAC
|
||
007D92A4 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007D92A6 FF5244 call dword ptr [edx+$44]
|
||
007D92A9 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D92AB E8FC4CD0FF call 004DDFAC
|
||
|
||
* Possible String Reference to: ' select * from JYOrderCon_Main_Note
|
||
| '
|
||
|
|
||
007D92B0 BA34977D00 mov edx, $007D9734
|
||
007D92B5 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D92B7 FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D92BA 83BBC404000001 cmp dword ptr [ebx+$04C4], +$01
|
||
007D92C1 7539 jnz 007D92FC
|
||
|
||
* Possible String Reference to: 'where MainId=''
|
||
|
|
||
007D92C3 68FC967D00 push $007D96FC
|
||
007D92C8 8D55F0 lea edx, [ebp-$10]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04CC
|
||
|
|
||
007D92CB 8B83CC040000 mov eax, [ebx+$04CC]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007D92D1 E81616C3FF call 0040A8EC
|
||
007D92D6 FF75F0 push dword ptr [ebp-$10]
|
||
007D92D9 6814977D00 push $007D9714
|
||
007D92DE 8D45F4 lea eax, [ebp-$0C]
|
||
007D92E1 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007D92E6 E8C9C3C2FF call 004056B4
|
||
007D92EB 8B45F4 mov eax, [ebp-$0C]
|
||
007D92EE 50 push eax
|
||
007D92EF 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D92F1 E8B64CD0FF call 004DDFAC
|
||
007D92F6 5A pop edx
|
||
007D92F7 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D92F9 FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D92FC 83BBC404000000 cmp dword ptr [ebx+$04C4], +$00
|
||
007D9303 7511 jnz 007D9316
|
||
007D9305 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D9307 E8A04CD0FF call 004DDFAC
|
||
|
||
* Possible String Reference to: ' where 1<>1'
|
||
|
|
||
007D930C BA20977D00 mov edx, $007D9720
|
||
007D9311 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D9313 FF5138 call dword ptr [ecx+$38]
|
||
007D9316 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007D9318 E8ABC5CEFF call 004C58C8
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007D931D 8B9398040000 mov edx, [ebx+$0498]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D9323 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D9329 E862DBFDFF call 007B6E90
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007D932E 8B9398040000 mov edx, [ebx+$0498]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D9334 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D933A E8D9DCFDFF call 007B7018
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D933F 8BB34C030000 mov esi, [ebx+$034C]
|
||
007D9345 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007D9347 E888C5CEFF call 004C58D4
|
||
007D934C 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D934E E8594CD0FF call 004DDFAC
|
||
007D9353 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007D9355 FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'select * from JYOrderCon_Main where
|
||
| MainId=''
|
||
|
|
||
007D9358 6864977D00 push $007D9764
|
||
007D935D 8D55E8 lea edx, [ebp-$18]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04CC
|
||
|
|
||
007D9360 8B83CC040000 mov eax, [ebx+$04CC]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007D9366 E88115C3FF call 0040A8EC
|
||
007D936B FF75E8 push dword ptr [ebp-$18]
|
||
007D936E 6814977D00 push $007D9714
|
||
007D9373 8D45EC lea eax, [ebp-$14]
|
||
007D9376 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007D937B E834C3C2FF call 004056B4
|
||
007D9380 8B45EC mov eax, [ebp-$14]
|
||
007D9383 50 push eax
|
||
007D9384 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D9386 E8214CD0FF call 004DDFAC
|
||
007D938B 5A pop edx
|
||
007D938C 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007D938E FF5138 call dword ptr [ecx+$38]
|
||
007D9391 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007D9393 E830C5CEFF call 004C58C8
|
||
007D9398 B902000000 mov ecx, $00000002
|
||
|
||
* Reference to control TfrmConInPut.ScrollBox1 : TScrollBox
|
||
|
|
||
007D939D 8B9304030000 mov edx, [ebx+$0304]
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D93A3 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
|
|
||
007D93A9 E86EC4FDFF call 007B581C
|
||
|
||
* Possible String Reference to: 'ConDefStr2'
|
||
|
|
||
007D93AE BA9C977D00 mov edx, $007D979C
|
||
|
||
* Reference to control TfrmConInPut.ADOQuery1 : TADOQuery
|
||
|
|
||
007D93B3 8B834C030000 mov eax, [ebx+$034C]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007D93B9 E8F6D7CEFF call 004C6BB4
|
||
007D93BE 8D55E0 lea edx, [ebp-$20]
|
||
007D93C1 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_60
|
||
|
|
||
007D93C3 FF5160 call dword ptr [ecx+$60]
|
||
007D93C6 8B45E0 mov eax, [ebp-$20]
|
||
007D93C9 8D55E4 lea edx, [ebp-$1C]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007D93CC E81B15C3FF call 0040A8EC
|
||
007D93D1 8B55E4 mov edx, [ebp-$1C]
|
||
|
||
* Reference to control TfrmConInPut.SYRName : TBtnEditC
|
||
|
|
||
007D93D4 8B837C030000 mov eax, [ebx+$037C]
|
||
007D93DA 0538020000 add eax, +$00000238
|
||
|
||
* Reference to: System.@LStrAsg(void;void;void;void);
|
||
|
|
||
007D93DF E894BFC2FF call 00405378
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D93E4 83BBC404000000 cmp dword ptr [ebx+$04C4], +$00
|
||
007D93EB 753A jnz 007D9427
|
||
|
||
* Reference to control TfrmConInPut.ADOTemp : TADOQuery
|
||
|
|
||
007D93ED 8B833C030000 mov eax, [ebx+$033C]
|
||
|
||
|
|
||
007D93F3 E8E4B6FDFF call 007B4ADC
|
||
007D93F8 83C4F8 add esp, -$08
|
||
007D93FB DD1C24 fstp qword ptr [esp]
|
||
007D93FE 9B wait
|
||
|
||
* Reference to control TfrmConInPut.OrdDate : TDateTimePicker
|
||
|
|
||
007D93FF 8B830C030000 mov eax, [ebx+$030C]
|
||
|
||
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
||
|
|
||
007D9405 E8228EC9FF call 0047222C
|
||
|
||
* Reference to control TfrmConInPut.ADOTemp : TADOQuery
|
||
|
|
||
007D940A 8B833C030000 mov eax, [ebx+$033C]
|
||
|
||
|
|
||
007D9410 E8C7B6FDFF call 007B4ADC
|
||
007D9415 83C4F8 add esp, -$08
|
||
007D9418 DD1C24 fstp qword ptr [esp]
|
||
007D941B 9B wait
|
||
|
||
* Reference to control TfrmConInPut.DlyDate : TDateTimePicker
|
||
|
|
||
007D941C 8B8314030000 mov eax, [ebx+$0314]
|
||
|
||
* Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
||
|
|
||
007D9422 E8058EC9FF call 0047222C
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C8
|
||
|
|
||
007D9427 83BBC804000063 cmp dword ptr [ebx+$04C8], +$63
|
||
007D942E 0F85FF000000 jnz 007D9533
|
||
007D9434 33C0 xor eax, eax
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D9436 8983C4040000 mov [ebx+$04C4], eax
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04CC
|
||
|
|
||
007D943C 8D83CC040000 lea eax, [ebx+$04CC]
|
||
|
||
* Reference to: System.@LStrClr(void;void);
|
||
|
|
||
007D9442 E8DDBEC2FF call 00405324
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007D9447 8BB348030000 mov esi, [ebx+$0348]
|
||
007D944D 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.First(TDataSet);
|
||
|
|
||
007D944F E8DCEBCEFF call 004C8030
|
||
007D9454 EB5E jmp 007D94B4
|
||
007D9456 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007D9458 E8E3EFCEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'MainId'
|
||
|
|
||
007D945D BAB0977D00 mov edx, $007D97B0
|
||
007D9462 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007D9464 E84BD7CEFF call 004C6BB4
|
||
007D9469 50 push eax
|
||
007D946A 8D45D0 lea eax, [ebp-$30]
|
||
007D946D 33D2 xor edx, edx
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007D946F E854F9C3FF call 00418DC8
|
||
007D9474 8D55D0 lea edx, [ebp-$30]
|
||
007D9477 58 pop eax
|
||
007D9478 8B08 mov ecx, [eax]
|
||
007D947A FF91B4000000 call dword ptr [ecx+$00B4]
|
||
|
||
* Possible String Reference to: 'SubId'
|
||
|
|
||
007D9480 BAC0977D00 mov edx, $007D97C0
|
||
007D9485 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007D9487 E828D7CEFF call 004C6BB4
|
||
007D948C 50 push eax
|
||
007D948D 8D45C0 lea eax, [ebp-$40]
|
||
007D9490 33D2 xor edx, edx
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007D9492 E831F9C3FF call 00418DC8
|
||
007D9497 8D55C0 lea edx, [ebp-$40]
|
||
007D949A 58 pop eax
|
||
007D949B 8B08 mov ecx, [eax]
|
||
007D949D FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007D94A3 8BC6 mov eax, esi
|
||
007D94A5 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007D94A7 FF924C020000 call dword ptr [edx+$024C]
|
||
007D94AD 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Next(TDataSet);
|
||
|
|
||
007D94AF E898EECEFF call 004C834C
|
||
|
||
* Reference to field TClientDataSet.Eof : Boolean
|
||
|
|
||
007D94B4 80BEA100000000 cmp byte ptr [esi+$00A1], $00
|
||
007D94BB 7499 jz 007D9456
|
||
|
||
* Reference to control TfrmConInPut.Order_Note : TClientDataSet
|
||
|
|
||
007D94BD 8BB398040000 mov esi, [ebx+$0498]
|
||
007D94C3 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.First(TDataSet);
|
||
|
|
||
007D94C5 E866EBCEFF call 004C8030
|
||
007D94CA EB5E jmp 007D952A
|
||
007D94CC 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007D94CE E86DEFCEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'MainId'
|
||
|
|
||
007D94D3 BAB0977D00 mov edx, $007D97B0
|
||
007D94D8 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007D94DA E8D5D6CEFF call 004C6BB4
|
||
007D94DF 50 push eax
|
||
007D94E0 8D45B0 lea eax, [ebp-$50]
|
||
007D94E3 33D2 xor edx, edx
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007D94E5 E8DEF8C3FF call 00418DC8
|
||
007D94EA 8D55B0 lea edx, [ebp-$50]
|
||
007D94ED 58 pop eax
|
||
007D94EE 8B08 mov ecx, [eax]
|
||
007D94F0 FF91B4000000 call dword ptr [ecx+$00B4]
|
||
|
||
* Possible String Reference to: 'MNId'
|
||
|
|
||
007D94F6 BAD0977D00 mov edx, $007D97D0
|
||
007D94FB 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007D94FD E8B2D6CEFF call 004C6BB4
|
||
007D9502 50 push eax
|
||
007D9503 8D45A0 lea eax, [ebp-$60]
|
||
007D9506 33D2 xor edx, edx
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007D9508 E8BBF8C3FF call 00418DC8
|
||
007D950D 8D55A0 lea edx, [ebp-$60]
|
||
007D9510 58 pop eax
|
||
007D9511 8B08 mov ecx, [eax]
|
||
007D9513 FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007D9519 8BC6 mov eax, esi
|
||
007D951B 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007D951D FF924C020000 call dword ptr [edx+$024C]
|
||
007D9523 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Next(TDataSet);
|
||
|
|
||
007D9525 E822EECEFF call 004C834C
|
||
|
||
* Reference to field TClientDataSet.Eof : Boolean
|
||
|
|
||
007D952A 80BEA100000000 cmp byte ptr [esi+$00A1], $00
|
||
007D9531 7499 jz 007D94CC
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04C4
|
||
|
|
||
007D9533 83BBC404000000 cmp dword ptr [ebx+$04C4], +$00
|
||
007D953A 0F850C010000 jnz 007D964C
|
||
|
||
* Reference to control TfrmConInPut.ADOTemp : TADOQuery
|
||
|
|
||
007D9540 8BB33C030000 mov esi, [ebx+$033C]
|
||
007D9546 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007D9548 E887C3CEFF call 004C58D4
|
||
007D954D 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007D954F E8584AD0FF call 004DDFAC
|
||
007D9554 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007D9556 FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'select TOp 1* from JYOrderCon_Main
|
||
| where Filler=''
|
||
|
|
||
007D9559 68E0977D00 push $007D97E0
|
||
007D955E 8D5598 lea edx, [ebp-$68]
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007D98E5(Sender : TObject);
|
||
begin
|
||
(*
|
||
007D98E5 8BEC mov ebp, esp
|
||
007D98E7 B93C000000 mov ecx, $0000003C
|
||
007D98EC 6A00 push $00
|
||
007D98EE 6A00 push $00
|
||
007D98F0 49 dec ecx
|
||
007D98F1 75F9 jnz 007D98EC
|
||
007D98F3 53 push ebx
|
||
007D98F4 56 push esi
|
||
007D98F5 57 push edi
|
||
007D98F6 8945FC mov [ebp-$04], eax
|
||
007D98F9 33C0 xor eax, eax
|
||
007D98FB 55 push ebp
|
||
007D98FC 6830A77D00 push $007DA730
|
||
|
||
***** TRY
|
||
|
|
||
007D9901 64FF30 push dword ptr fs:[eax]
|
||
007D9904 648920 mov fs:[eax], esp
|
||
007D9907 33C0 xor eax, eax
|
||
007D9909 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>Ԣ<EFBFBD><D4A2><EFBFBD>E<EFBFBD>'
|
||
|
|
||
007D990A 6867A57D00 push $007DA567
|
||
|
||
***** TRY
|
||
|
|
||
007D990F 64FF30 push dword ptr fs:[eax]
|
||
007D9912 648920 mov fs:[eax], esp
|
||
007D9915 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007D9918 8B8040030000 mov eax, [eax+$0340]
|
||
|
||
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
||
|
|
||
007D991E E80925D0FF call 004DBE2C
|
||
|
||
* Reference to: ADODB.TADOConnection.BeginTrans(TADOConnection):Integer;
|
||
|
|
||
007D9923 E86C89CFFF call 004D2294
|
||
007D9928 8D55E8 lea edx, [ebp-$18]
|
||
007D992B 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to field TfrmConInPut.OFFS_04CC
|
||
|
|
||
007D992E 8B80CC040000 mov eax, [eax+$04CC]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007D9934 E8B30FC3FF call 0040A8EC
|
||
007D9939 837DE800 cmp dword ptr [ebp-$18], +$00
|
||
007D993D 755B jnz 007D999A
|
||
|
||
* Possible String Reference to: 'JYOrderCon_Main'
|
||
|
|
||
007D993F 684CA77D00 push $007DA74C
|
||
007D9944 6A03 push $03
|
||
007D9946 6A01 push $01
|
||
007D9948 8D55F4 lea edx, [ebp-$0C]
|
||
007D994B 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007D994E 8B8040030000 mov eax, [eax+$0340]
|
||
|
||
* Possible String Reference to: 'JW'
|
||
|
|
||
007D9954 B964A77D00 mov ecx, $007DA764
|
||
|
||
* Reference to : TfrmSelExportField._PROC_007B7708()
|
||
|
|
||
007D9959 E8AADDFDFF call 007B7708
|
||
007D995E 84C0 test al, al
|
||
007D9960 7549 jnz 007D99AB
|
||
007D9962 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007D9965 8B8040030000 mov eax, [eax+$0340]
|
||
|
||
* Reference to: ADODB.TCustomADODataSet.GetConnection(TCustomADODataSet):TADOConnection;
|
||
|
|
||
007D996B E8BC24D0FF call 004DBE2C
|
||
|
||
* Reference to: ADODB.TADOConnection.RollbackTrans(TADOConnection);
|
||
|
|
||
007D9970 E86B89CFFF call 004D22E0
|
||
007D9975 6A00 push $00
|
||
|
||
* Possible String Reference to: '<27><>ʾ'
|
||
|
|
||
007D9977 B968A77D00 mov ecx, $007DA768
|
||
|
||
* Possible String Reference to: 'ȡ<><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʧ<EFBFBD><CAA7>!'
|
||
|
|
||
007D997C BA70A77D00 mov edx, $007DA770
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DA899(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DA899 50 push eax
|
||
007DA89A 6461 popa
|
||
007DA89C 7465 jz 007DA903
|
||
007DA89E 204A59 and [edx+$59], cl
|
||
007DA8A1 4F dec edi
|
||
007DA8A2 7264 jb 007DA908
|
||
007DA8A4 657243 jb 007DA8EA
|
||
007DA8A7 6F outsd
|
||
007DA8A8 6E outsb
|
||
007DA8A9 5F pop edi
|
||
007DA8AA 4D dec ebp
|
||
007DA8AB 61 popa
|
||
007DA8AC 696E2053657420 imul ebp, [esi+$20], $20746553
|
||
007DA8B3 46 inc esi
|
||
007DA8B4 696C6C65723D2700 imul ebp, [esp+ebp*2+$65], $00273D72
|
||
007DA8BC FFFF DB $FF, $FF //
|
||
007DA8BE FFFF DB $FF, $FF //
|
||
007DA8C0 0F0000 sldt word ptr [eax]
|
||
007DA8C3 0020 add [eax], ah
|
||
007DA8C5 7768 jnbe 007DA92F
|
||
007DA8C7 657265 jb 007DA92F
|
||
007DA8CA 204D61 and [ebp+$61], cl
|
||
007DA8CD 696E49643D2700 imul ebp, [esi+$49], $00273D64
|
||
007DA8D4 FFFF DB $FF, $FF //
|
||
007DA8D6 FFFF DB $FF, $FF //
|
||
007DA8D8 0400 add al, +$00
|
||
007DA8DA 0000 add [eax], al
|
||
|
||
007DA8DC 4D dec ebp
|
||
007DA8DD 4E dec esi
|
||
007DA8DE 49 dec ecx
|
||
007DA8DF 640000 add fs:[eax], al
|
||
007DA8E2 0000 add [eax], al
|
||
|
||
007DA8E4 FFFF DB $FF, $FF //
|
||
007DA8E6 FFFF DB $FF, $FF //
|
||
007DA8E8 1400 adc al, $00
|
||
007DA8EA 0000 add [eax], al
|
||
|
||
007DA8EC 4A dec edx
|
||
007DA8ED 59 pop ecx
|
||
007DA8EE 4F dec edi
|
||
007DA8EF 7264 jb 007DA955
|
||
007DA8F1 657243 jb 007DA937
|
||
007DA8F4 6F outsd
|
||
007DA8F5 6E outsb
|
||
007DA8F6 5F pop edi
|
||
007DA8F7 4D dec ebp
|
||
007DA8F8 61 popa
|
||
007DA8F9 696E5F4E6F7465 imul ebp, [esi+$5F], $65746F4E
|
||
007DA900 0000 add [eax], al
|
||
|
||
007DA902 0000 add [eax], al
|
||
|
||
007DA904 FFFF DB $FF, $FF //
|
||
007DA906 FFFF DB $FF, $FF //
|
||
007DA908 0200 add al, byte ptr [eax]
|
||
007DA90A 0000 add [eax], al
|
||
|
||
007DA90C 4D dec ebp
|
||
007DA90D 4E dec esi
|
||
007DA90E 0000 add [eax], al
|
||
|
||
007DA910 C8A1 enter , $A1
|
||
007DA912 B1B8 mov cl, $B8
|
||
007DA914 D7 xlat
|
||
007DA915 A2C1F7CBAE mov byte ptr [$AECBF7C1], al
|
||
007DA91A BAC5CAA7B0 mov edx, $B0A7CAC5
|
||
007DA91F DCA3A10000FF fsub qword ptr [ebx+$FF0000A1]
|
||
007DA925 FFFF DB $FF, $FF //
|
||
007DA927 FF31 push dword ptr [ecx]
|
||
007DA929 0000 add [eax], al
|
||
|
||
007DA92B 007365 add [ebx+$65], dh
|
||
007DA92E 6C insb
|
||
007DA92F 656374202A arpl gs:[eax+$2A], si
|
||
007DA934 206672 and [esi+$72], ah
|
||
007DA937 6F outsd
|
||
007DA938 6D insd
|
||
007DA939 204A59 and [edx+$59], cl
|
||
007DA93C 4F dec edi
|
||
007DA93D 7264 jb 007DA9A3
|
||
007DA93F 657243 jb 007DA985
|
||
007DA942 6F outsd
|
||
007DA943 6E outsb
|
||
007DA944 5F pop edi
|
||
007DA945 4D dec ebp
|
||
007DA946 61 popa
|
||
007DA947 696E5F4E6F7465 imul ebp, [esi+$5F], $65746F4E
|
||
007DA94E 207768 and [edi+$68], dh
|
||
007DA951 657265 jb 007DA9B9
|
||
007DA954 204D61 and [ebp+$61], cl
|
||
007DA957 696E49643D2700 imul ebp, [esi+$49], $00273D64
|
||
007DA95E 0000 add [eax], al
|
||
|
||
007DA960 FFFF DB $FF, $FF //
|
||
007DA962 FFFF DB $FF, $FF //
|
||
007DA964 0B00 or eax, [eax]
|
||
007DA966 0000 add [eax], al
|
||
|
||
007DA968 20616E and [ecx+$6E], ah
|
||
007DA96B 64204D4E and fs:[ebp+$4E], cl
|
||
007DA96F 49 dec ecx
|
||
007DA970 643D2700FFFF cmp eax, $FFFF0027
|
||
007DA976 FFFF DB $FF, $FF //
|
||
007DA978 06 push es
|
||
007DA979 0000 add [eax], al
|
||
|
||
007DA97B 004D4E add [ebp+$4E], cl
|
||
007DA97E 54 push esp
|
||
007DA97F 7970 jns 007DA9F1
|
||
007DA981 650000 add gs:[eax], al
|
||
007DA984 FFFF DB $FF, $FF //
|
||
007DA986 FFFF DB $FF, $FF //
|
||
007DA988 0500000053 add eax, +$53000000
|
||
007DA98D 7562 jnz 007DA9F1
|
||
007DA98F 49 dec ecx
|
||
007DA990 640000 add fs:[eax], al
|
||
007DA993 00FF add bh, bh
|
||
007DA995 FFFF DB $FF, $FF //
|
||
007DA997 FF0E dec dword ptr [esi]
|
||
007DA999 0000 add [eax], al
|
||
|
||
007DA99B 004A59 add [edx+$59], cl
|
||
007DA99E 4F dec edi
|
||
007DA99F 7264 jb 007DAA05
|
||
007DA9A1 657243 jb 007DA9E7
|
||
007DA9A4 6F outsd
|
||
007DA9A5 6E outsb
|
||
007DA9A6 5F pop edi
|
||
007DA9A7 53 push ebx
|
||
007DA9A8 7562 jnz 007DAA0C
|
||
007DA9AA 0000 add [eax], al
|
||
|
||
007DA9AC FFFF DB $FF, $FF //
|
||
007DA9AE FFFF DB $FF, $FF //
|
||
007DA9B0 0200 add al, byte ptr [eax]
|
||
007DA9B2 0000 add [eax], al
|
||
|
||
007DA9B4 4A dec edx
|
||
007DA9B5 42 inc edx
|
||
007DA9B6 0000 add [eax], al
|
||
|
||
007DA9B8 C8A1 enter , $A1
|
||
007DA9BA D7 xlat
|
||
007DA9BB D3C1 rol ecx, cl
|
||
007DA9BD F7CB DB $F7, $CB // ebx
|
||
007DA9BF AE scasb
|
||
007DA9C0 BAC5CAA7B0 mov edx, $B0A7CAC5
|
||
007DA9C5 DCA3A1000000 fsub qword ptr [ebx+$00A1]
|
||
007DA9CB 00FF add bh, bh
|
||
007DA9CD FFFF DB $FF, $FF //
|
||
007DA9CF FF2B jmp [ebx]
|
||
007DA9D1 0000 add [eax], al
|
||
|
||
007DA9D3 007365 add [ebx+$65], dh
|
||
007DA9D6 6C insb
|
||
007DA9D7 656374202A arpl gs:[eax+$2A], si
|
||
007DA9DC 206672 and [esi+$72], ah
|
||
007DA9DF 6F outsd
|
||
007DA9E0 6D insd
|
||
007DA9E1 204A59 and [edx+$59], cl
|
||
007DA9E4 4F dec edi
|
||
007DA9E5 7264 jb 007DAA4B
|
||
007DA9E7 657243 jb 007DAA2D
|
||
007DA9EA 6F outsd
|
||
007DA9EB 6E outsb
|
||
007DA9EC 5F pop edi
|
||
007DA9ED 53 push ebx
|
||
007DA9EE 7562 jnz 007DAA52
|
||
007DA9F0 207768 and [edi+$68], dh
|
||
007DA9F3 657265 jb 007DAA5B
|
||
007DA9F6 204D61 and [ebp+$61], cl
|
||
007DA9F9 696E49643D2700 imul ebp, [esi+$49], $00273D64
|
||
007DAA00 FFFF DB $FF, $FF //
|
||
007DAA02 FFFF DB $FF, $FF //
|
||
007DAA04 0C00 or al, $00
|
||
007DAA06 0000 add [eax], al
|
||
|
||
007DAA08 20616E and [ecx+$6E], ah
|
||
007DAA0B 64205375 and fs:[ebx+$75], dl
|
||
007DAA0F 624964 bound ecx, qword ptr [ecx+$64]
|
||
007DAA12 3D27000000 cmp eax, $00000027
|
||
007DAA17 00FF add bh, bh
|
||
007DAA19 FFFF DB $FF, $FF //
|
||
007DAA1B FF0B dec dword ptr [ebx]
|
||
007DAA1D 0000 add [eax], al
|
||
|
||
007DAA1F 005052 add [eax+$52], dl
|
||
007DAA22 54 push esp
|
||
007DAA23 4F dec edi
|
||
007DAA24 7264 jb 007DAA8A
|
||
007DAA26 657251 jb 007DAA7A
|
||
007DAA29 7479 jz 007DAAA4
|
||
007DAA2B 00FF add bh, bh
|
||
007DAA2D FFFF DB $FF, $FF //
|
||
007DAA2F FF08 dec dword ptr [eax]
|
||
007DAA31 0000 add [eax], al
|
||
|
||
007DAA33 005052 add [eax+$52], dl
|
||
007DAA36 54 push esp
|
||
007DAA37 50 push eax
|
||
007DAA38 7269 jb 007DAAA3
|
||
007DAA3A 636500 arpl [ebp+$00], sp
|
||
007DAA3D 0000 add [eax], al
|
||
|
||
007DAA3F 00FF add bh, bh
|
||
007DAA41 FFFF DB $FF, $FF //
|
||
007DAA43 FF6700 jmp dword ptr [edi+$00]
|
||
007DAA46 0000 add [eax], al
|
||
|
||
007DAA48 55 push ebp
|
||
007DAA49 7064 jo 007DAAAF
|
||
007DAA4B 61 popa
|
||
007DAA4C 7465 jz 007DAAB3
|
||
007DAA4E 204A59 and [edx+$59], cl
|
||
007DAA51 4F dec edi
|
||
007DAA52 7264 jb 007DAAB8
|
||
007DAA54 657243 jb 007DAA9A
|
||
007DAA57 6F outsd
|
||
007DAA58 6E outsb
|
||
007DAA59 5F pop edi
|
||
007DAA5A 53 push ebx
|
||
007DAA5B 7562 jnz 007DAABF
|
||
007DAA5D 205365 and [ebx+$65], dl
|
||
007DAA60 7420 jz 007DAA82
|
||
007DAA62 43 inc ebx
|
||
007DAA63 6F outsd
|
||
007DAA64 6E outsb
|
||
007DAA65 4D dec ebp
|
||
007DAA66 58 pop eax
|
||
007DAA67 4D dec ebp
|
||
007DAA68 6F outsd
|
||
007DAA69 6E outsb
|
||
007DAA6A 65793D jns 007DAAAA
|
||
007DAA6D 43 inc ebx
|
||
007DAA6E 61 popa
|
||
007DAA6F 7374 jnb 007DAAE5
|
||
007DAA71 285052 sub [eax+$52], dl
|
||
007DAA74 54 push esp
|
||
007DAA75 50 push eax
|
||
007DAA76 7269 jb 007DAAE1
|
||
007DAA78 63652A arpl [ebp+$2A], sp
|
||
007DAA7B 50 push eax
|
||
007DAA7C 52 push edx
|
||
007DAA7D 54 push esp
|
||
007DAA7E 4F dec edi
|
||
007DAA7F 7264 jb 007DAAE5
|
||
007DAA81 657251 jb 007DAAD5
|
||
007DAA84 7479 jz 007DAAFF
|
||
007DAA86 206173 and [ecx+$73], ah
|
||
007DAA89 20646563 and [ebp+$63], ah
|
||
007DAA8D 696D616C283138 imul ebp, [ebp+$61], $3831286C
|
||
007DAA94 2C32 sub al, $32
|
||
007DAA96 2929 sub dword ptr [ecx], ebp
|
||
007DAA98 2B6973 sub ebp, dword ptr [ecx+$73]
|
||
007DAA9B 6E outsb
|
||
007DAA9C 756C jnz 007DAB0A
|
||
007DAA9E 6C insb
|
||
007DAA9F 285A68 sub [edx+$68], bl
|
||
007DAAA2 656E outsb
|
||
007DAAA4 5A pop edx
|
||
007DAAA5 6869534A46 push $464A5369
|
||
007DAAAA 65652C30 sub al, $30
|
||
007DAAAE 2900 sub dword ptr [eax], eax
|
||
007DAAB0 FFFF DB $FF, $FF //
|
||
007DAAB2 FFFF DB $FF, $FF //
|
||
007DAAB4 57 push edi
|
||
007DAAB5 0000 add [eax], al
|
||
|
||
007DAAB7 002B add [ebx], ch
|
||
007DAAB9 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
|
||
007DAAC0 59 pop ecx
|
||
007DAAC1 696E487561534A imul ebp, [esi+$48], $4A536175
|
||
007DAAC8 46 inc esi
|
||
007DAAC9 65652C30 sub al, $30
|
||
007DAACD 292B sub dword ptr [ebx], ebp
|
||
007DAACF 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
|
||
007DAAD6 42 inc edx
|
||
007DAAD7 61 popa
|
||
007DAAD8 6F outsd
|
||
007DAAD9 47 inc edi
|
||
007DAADA 61 popa
|
||
007DAADB 6E outsb
|
||
007DAADC 6746 inc esi
|
||
007DAADE 65652C30 sub al, $30
|
||
007DAAE2 292B sub dword ptr [ebx], ebp
|
||
007DAAE4 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
|
||
007DAAEB 5A pop edx
|
||
007DAAEC 686957616E push $6E615769
|
||
007DAAF1 675A pop edx
|
||
007DAAF3 686942616E push $6E614269
|
||
007DAAF8 46 inc esi
|
||
007DAAF9 65652C30 sub al, $30
|
||
007DAAFD 292A sub dword ptr [edx], ebp
|
||
007DAAFF 69736E756C6C28 imul esi, [ebx+$6E], $286C6C75
|
||
007DAB06 54 push esp
|
||
007DAB07 61 popa
|
||
007DAB08 6F outsd
|
||
007DAB09 51 push ecx
|
||
007DAB0A 7479 jz 007DAB85
|
||
007DAB0C 2C30 sub al, $30
|
||
007DAB0E 2900 sub dword ptr [eax], eax
|
||
007DAB10 FFFF DB $FF, $FF //
|
||
007DAB12 FFFF DB $FF, $FF //
|
||
007DAB14 0E push cs
|
||
007DAB15 0000 add [eax], al
|
||
|
||
007DAB17 0020 add [eax], ah
|
||
007DAB19 7768 jnbe 007DAB83
|
||
007DAB1B 657265 jb 007DAB83
|
||
007DAB1E 205375 and [ebx+$75], dl
|
||
007DAB21 624964 bound ecx, qword ptr [ecx+$64]
|
||
007DAB24 3D270000FF cmp eax, $FF000027
|
||
007DAB29 FFFF DB $FF, $FF //
|
||
007DAB2B FF78 DB $FF, $78 //
|
||
007DAB2D 0000 add [eax], al
|
||
|
||
007DAB2F 005570 add [ebp+$70], dl
|
||
007DAB32 6461 popa
|
||
007DAB34 7465 jz 007DAB9B
|
||
007DAB36 204A59 and [edx+$59], cl
|
||
007DAB39 4F dec edi
|
||
007DAB3A 7264 jb 007DABA0
|
||
007DAB3C 657243 jb 007DAB82
|
||
007DAB3F 6F outsd
|
||
007DAB40 6E outsb
|
||
007DAB41 5F pop edi
|
||
007DAB42 4D dec ebp
|
||
007DAB43 61 popa
|
||
007DAB44 696E2053657420 imul ebp, [esi+$20], $20746553
|
||
007DAB4B 43 inc ebx
|
||
007DAB4C 6F outsd
|
||
007DAB4D 6E outsb
|
||
007DAB4E 4D dec ebp
|
||
007DAB4F 6F outsd
|
||
007DAB50 6E outsb
|
||
007DAB51 65793D jns 007DAB91
|
||
007DAB54 287365 sub [ebx+$65], dh
|
||
007DAB57 6C insb
|
||
007DAB58 6563742053 arpl gs:[eax+$53], si
|
||
007DAB5D 756D jnz 007DABCC
|
||
007DAB5F 28436F sub [ebx+$6F], al
|
||
007DAB62 6E outsb
|
||
007DAB63 4D dec ebp
|
||
007DAB64 58 pop eax
|
||
007DAB65 4D dec ebp
|
||
007DAB66 6F outsd
|
||
007DAB67 6E outsb
|
||
007DAB68 657929 jns 007DAB94
|
||
007DAB6B 206672 and [esi+$72], ah
|
||
007DAB6E 6F outsd
|
||
007DAB6F 6D insd
|
||
007DAB70 204A59 and [edx+$59], cl
|
||
007DAB73 4F dec edi
|
||
007DAB74 7264 jb 007DABDA
|
||
007DAB76 657243 jb 007DABBC
|
||
007DAB79 6F outsd
|
||
007DAB7A 6E outsb
|
||
007DAB7B 5F pop edi
|
||
007DAB7C 53 push ebx
|
||
007DAB7D 7562 jnz 007DABE1
|
||
007DAB7F 204120 and [ecx+$20], al
|
||
007DAB82 7768 jnbe 007DABEC
|
||
007DAB84 657265 jb 007DABEC
|
||
007DAB87 20412E and [ecx+$2E], al
|
||
007DAB8A 4D dec ebp
|
||
007DAB8B 61 popa
|
||
007DAB8C 696E49643D4A59 imul ebp, [esi+$49], $594A3D64
|
||
007DAB93 4F dec edi
|
||
007DAB94 7264 jb 007DABFA
|
||
007DAB96 657243 jb 007DABDC
|
||
007DAB99 6F outsd
|
||
007DAB9A 6E outsb
|
||
007DAB9B 5F pop edi
|
||
007DAB9C 4D dec ebp
|
||
007DAB9D 61 popa
|
||
007DAB9E 696E2E4D61696E imul ebp, [esi+$2E], $6E69614D
|
||
007DABA5 49 dec ecx
|
||
007DABA6 642900 sub dword ptr fs:[eax], eax
|
||
007DABA9 0000 add [eax], al
|
||
|
||
007DABAB 00B1A3B4E6CA add [ecx+$CAE6B4A3], dh
|
||
007DABB1 A7 cmpsd
|
||
007DABB2 B0DC mov al, $DC
|
||
007DABB4 A3A1000055 mov dword ptr [$550000A1], eax
|
||
007DABB9 8BEC mov ebp, esp
|
||
007DABBB B920000000 mov ecx, $00000020
|
||
007DABC0 6A00 push $00
|
||
007DABC2 6A00 push $00
|
||
007DABC4 49 dec ecx
|
||
007DABC5 75F9 jnz 007DABC0
|
||
007DABC7 53 push ebx
|
||
007DABC8 56 push esi
|
||
007DABC9 57 push edi
|
||
007DABCA 8BD8 mov ebx, eax
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DB40E(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DB40E 6E outsb
|
||
007DB40F 6974000000CAFDC1 imul esi, [eax+eax+$00], $C1FDCA00
|
||
007DB417 BFB5A5CEBB mov edi, $BBCEA5B5
|
||
007DB41C B2BB mov dl, $BB
|
||
007DB41E C4DC les ebx, sp
|
||
007DB420 CE into
|
||
007DB421 AA stosb
|
||
007DB422 BFD5A3A100 mov edi, $00A1A3D5
|
||
007DB427 00FF add bh, bh
|
||
007DB429 FFFF DB $FF, $FF //
|
||
007DB42B FF08 dec dword ptr [eax]
|
||
007DB42D 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DB45A(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DB45A 6E outsb
|
||
007DB45B 6974000000B1D2D6 imul esi, [eax+eax+$00], $D6D2B100
|
||
007DB463 D6 DB $D6 //
|
||
007DB464 B2BB mov dl, $BB
|
||
007DB466 C4DC les ebx, sp
|
||
007DB468 CE into
|
||
007DB469 AA stosb
|
||
007DB46A BFD5A3A100 mov edi, $00A1A3D5
|
||
007DB46F 00B1A3B4E6B3 add [ecx+$B3E6B4A3], dh
|
||
007DB475 C9 leave
|
||
007DB476 B9A6A3A100 mov ecx, $00A1A3A6
|
||
007DB47B 00558B add [ebp-$75], dl
|
||
007DB47E EC in al, dx
|
||
007DB47F 51 push ecx
|
||
007DB480 B906000000 mov ecx, $00000006
|
||
007DB485 6A00 push $00
|
||
007DB487 6A00 push $00
|
||
007DB489 49 dec ecx
|
||
007DB48A 75F9 jnz 007DB485
|
||
007DB48C 874DFC xchg [ebp-$04], ecx
|
||
007DB48F 53 push ebx
|
||
007DB490 8BD8 mov ebx, eax
|
||
007DB492 33C0 xor eax, eax
|
||
007DB494 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>t<EFBFBD><74><EFBFBD><EFBFBD><EFBFBD>[<5B><>]<5D>'
|
||
|
|
||
007DB495 687BB67D00 push $007DB67B
|
||
|
||
***** TRY
|
||
|
|
||
007DB49A 64FF30 push dword ptr fs:[eax]
|
||
007DB49D 648920 mov fs:[eax], esp
|
||
007DB4A0 33C0 xor eax, eax
|
||
007DB4A2 55 push ebp
|
||
007DB4A3 6834B67D00 push $007DB634
|
||
|
||
***** TRY
|
||
|
|
||
007DB4A8 64FF30 push dword ptr fs:[eax]
|
||
007DB4AB 648920 mov fs:[eax], esp
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DC14F(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC14F 004C6162 add [ecx+$62], cl
|
||
007DC153 656C insb
|
||
007DC155 53 push ebx
|
||
007DC156 65742E jz 007DC187
|
||
007DC159 646C insb
|
||
007DC15B 6C insb
|
||
007DC15C 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DC34A(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC34A 6E outsb
|
||
007DC34B 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00
|
||
007DC353 FF08 dec dword ptr [eax]
|
||
007DC355 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DC375(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC375 8BEC mov ebp, esp
|
||
007DC377 33C0 xor eax, eax
|
||
007DC379 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>\<5C><><EFBFBD><EFBFBD><EFBFBD>]<5D>U<EFBFBD><55>3<EFBFBD>Uh<55><68>}'
|
||
|
|
||
007DC37A 6893C37D00 push $007DC393
|
||
|
||
***** TRY
|
||
|
|
||
007DC37F 64FF30 push dword ptr fs:[eax]
|
||
007DC382 648920 mov fs:[eax], esp
|
||
007DC385 33C0 xor eax, eax
|
||
007DC387 5A pop edx
|
||
007DC388 59 pop ecx
|
||
007DC389 59 pop ecx
|
||
007DC38A 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: ']<5D>U<EFBFBD><55>3<EFBFBD>Uh<55><68>}'
|
||
|
|
||
007DC38D 689AC37D00 push $007DC39A
|
||
007DC392 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DC393 E95C87C2FF jmp 00404AF4
|
||
007DC398 EBF8 jmp 007DC392
|
||
|
||
****** END
|
||
|
|
||
007DC39A 5D pop ebp
|
||
007DC39B C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DC39C(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC39C 55 push ebp
|
||
007DC39D 8BEC mov ebp, esp
|
||
007DC39F 33C0 xor eax, eax
|
||
007DC3A1 55 push ebp
|
||
|
||
* Possible String Reference to: '<27>4<EFBFBD><34><EFBFBD><EFBFBD><EFBFBD>]<5D>U<EFBFBD><55>j'
|
||
|
|
||
007DC3A2 68BBC37D00 push $007DC3BB
|
||
|
||
***** TRY
|
||
|
|
||
007DC3A7 64FF30 push dword ptr fs:[eax]
|
||
007DC3AA 648920 mov fs:[eax], esp
|
||
007DC3AD 33C0 xor eax, eax
|
||
007DC3AF 5A pop edx
|
||
007DC3B0 59 pop ecx
|
||
007DC3B1 59 pop ecx
|
||
007DC3B2 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: ']<5D>U<EFBFBD><55>j'
|
||
|
|
||
007DC3B5 68C2C37D00 push $007DC3C2
|
||
007DC3BA C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DC3BB E93487C2FF jmp 00404AF4
|
||
007DC3C0 EBF8 jmp 007DC3BA
|
||
|
||
****** END
|
||
|
|
||
007DC3C2 5D pop ebp
|
||
007DC3C3 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DC56E(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DC56E 6E outsb
|
||
007DC56F 6974000000FFFFFF imul esi, [eax+eax+$00], $FFFFFF00
|
||
007DC577 FF08 dec dword ptr [eax]
|
||
007DC579 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DD512(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DD512 6E outsb
|
||
007DD513 6974000000558BEC imul esi, [eax+eax+$00], $EC8B5500
|
||
007DD51B B907000000 mov ecx, $00000007
|
||
007DD520 6A00 push $00
|
||
007DD522 6A00 push $00
|
||
007DD524 49 dec ecx
|
||
007DD525 75F9 jnz 007DD520
|
||
007DD527 53 push ebx
|
||
007DD528 56 push esi
|
||
007DD529 8BF2 mov esi, edx
|
||
007DD52B 8BD8 mov ebx, eax
|
||
007DD52D 33C0 xor eax, eax
|
||
007DD52F 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>s<EFBFBD><73><EFBFBD><EFBFBD>^[<5B><>]<5D>'
|
||
|
|
||
007DD530 68FAD67D00 push $007DD6FA
|
||
|
||
***** TRY
|
||
|
|
||
007DD535 64FF30 push dword ptr fs:[eax]
|
||
007DD538 648920 mov fs:[eax], esp
|
||
007DD53B 8D55FC lea edx, [ebp-$04]
|
||
007DD53E 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;
|
||
|
|
||
007DD540 E87721DBFF call 0058F6BC
|
||
007DD545 8D55F8 lea edx, [ebp-$08]
|
||
007DD548 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD54B E89CD3C2FF call 0040A8EC
|
||
007DD550 837DF800 cmp dword ptr [ebp-$08], +$00
|
||
007DD554 750D jnz 007DD563
|
||
007DD556 8D45FC lea eax, [ebp-$04]
|
||
007DD559 BA10D77D00 mov edx, $007DD710
|
||
|
||
* Reference to: System.@LStrLAsg(void;void;void;void);
|
||
|
|
||
007DD55E E8597EC2FF call 004053BC
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD563 8BB348030000 mov esi, [ebx+$0348]
|
||
007DD569 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Edit(TDataSet);
|
||
|
|
||
007DD56B E8D0AECEFF call 004C8440
|
||
|
||
* Possible String Reference to: 'PRTPrice'
|
||
|
|
||
007DD570 BA1CD77D00 mov edx, $007DD71C
|
||
007DD575 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD577 E83896CEFF call 004C6BB4
|
||
007DD57C 50 push eax
|
||
007DD57D 8D45E8 lea eax, [ebp-$18]
|
||
007DD580 8B55FC mov edx, [ebp-$04]
|
||
|
||
* Reference to: Variants.@VarFromLStr(TVarData;TVarData;AnsiString);
|
||
|
|
||
007DD583 E840B8C3FF call 00418DC8
|
||
007DD588 8D55E8 lea edx, [ebp-$18]
|
||
007DD58B 58 pop eax
|
||
007DD58C 8B08 mov ecx, [eax]
|
||
007DD58E FF91B4000000 call dword ptr [ecx+$00B4]
|
||
007DD594 8BC6 mov eax, esi
|
||
007DD596 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TClientDataSet.Post()
|
||
|
|
||
007DD598 FF924C020000 call dword ptr [edx+$024C]
|
||
007DD59E 8BC3 mov eax, ebx
|
||
|
||
* Reference to: DBAdapt.TBaseDataSetAdapterField.ImplCheckOrigValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DBAdapt.TBaseDataSetAdapterField.ImplUpdateValue(TBaseDataSetAdapterField;WebAdapt.IActionRequest;System.Integer);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterRequest(TWebDesignContext;System.IUnknown);
|
||
| or: DsgnCntxt.TWebDesignContext.SetAdapterResponse(TWebDesignContext;System.IUnknown);
|
||
| or: InSSLOpenSSL.TIdSSLSocket.SetCipherList(TIdSSLSocket;AnsiString);
|
||
| or: IWDBStdCtrls.SetFieldText(TField;AnsiString);
|
||
|
|
||
007DD5A0 E8F7EDFFFF call 007DC39C
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007DD5A5 8BB340030000 mov esi, [ebx+$0340]
|
||
007DD5AB 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007DD5AD E82283CEFF call 004C58D4
|
||
007DD5B2 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD5B4 E8F309D0FF call 004DDFAC
|
||
007DD5B9 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007DD5BB FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'select * from YF_Money_CR where YFT
|
||
| ypeId=''
|
||
|
|
||
007DD5BE 6830D77D00 push $007DD730
|
||
|
||
* Possible String Reference to: 'Subid'
|
||
|
|
||
007DD5C3 BA64D77D00 mov edx, $007DD764
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD5C8 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD5CE E8E195CEFF call 004C6BB4
|
||
007DD5D3 8D55DC lea edx, [ebp-$24]
|
||
007DD5D6 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DD5D8 FF5160 call dword ptr [ecx+$60]
|
||
007DD5DB 8B45DC mov eax, [ebp-$24]
|
||
007DD5DE 8D55E0 lea edx, [ebp-$20]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD5E1 E806D3C2FF call 0040A8EC
|
||
007DD5E6 FF75E0 push dword ptr [ebp-$20]
|
||
007DD5E9 6874D77D00 push $007DD774
|
||
007DD5EE 8D45E4 lea eax, [ebp-$1C]
|
||
007DD5F1 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD5F6 E8B980C2FF call 004056B4
|
||
007DD5FB 8B45E4 mov eax, [ebp-$1C]
|
||
007DD5FE 50 push eax
|
||
007DD5FF 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD601 E8A609D0FF call 004DDFAC
|
||
007DD606 5A pop edx
|
||
007DD607 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD609 FF5138 call dword ptr [ecx+$38]
|
||
007DD60C 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Open(TDataSet);
|
||
|
|
||
007DD60E E8B582CEFF call 004C58C8
|
||
|
||
* Reference to control TfrmConInPut.ADOCmd : TADOQuery
|
||
|
|
||
007DD613 8B8340030000 mov eax, [ebx+$0340]
|
||
|
||
* Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean;
|
||
|
|
||
007DD619 E8A2A8CEFF call 004C7EC0
|
||
007DD61E 84C0 test al, al
|
||
007DD620 0F85A4000000 jnz 007DD6CA
|
||
|
||
* Reference to control TfrmConInPut.ADOTemp : TADOQuery
|
||
|
|
||
007DD626 8BB33C030000 mov esi, [ebx+$033C]
|
||
007DD62C 8BC6 mov eax, esi
|
||
|
||
* Reference to: DB.TDataSet.Close(TDataSet);
|
||
|
|
||
007DD62E E8A182CEFF call 004C58D4
|
||
007DD633 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD635 E87209D0FF call 004DDFAC
|
||
007DD63A 8B10 mov edx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_44
|
||
|
|
||
007DD63C FF5244 call dword ptr [edx+$44]
|
||
|
||
* Possible String Reference to: 'update YF_Money_CR set Price=''
|
||
|
|
||
007DD63F 6880D77D00 push $007DD780
|
||
007DD644 8D55D4 lea edx, [ebp-$2C]
|
||
007DD647 8B45FC mov eax, [ebp-$04]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD64A E89DD2C2FF call 0040A8EC
|
||
007DD64F FF75D4 push dword ptr [ebp-$2C]
|
||
|
||
* Possible String Reference to: '' '
|
||
|
|
||
007DD652 68A8D77D00 push $007DD7A8
|
||
007DD657 8D45D8 lea eax, [ebp-$28]
|
||
007DD65A BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD65F E85080C2FF call 004056B4
|
||
007DD664 8B45D8 mov eax, [ebp-$28]
|
||
007DD667 50 push eax
|
||
007DD668 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD66A E83D09D0FF call 004DDFAC
|
||
007DD66F 5A pop edx
|
||
007DD670 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD672 FF5138 call dword ptr [ecx+$38]
|
||
|
||
* Possible String Reference to: 'where YFTypeId=''
|
||
|
|
||
007DD675 68B4D77D00 push $007DD7B4
|
||
|
||
* Possible String Reference to: 'Subid'
|
||
|
|
||
007DD67A BA64D77D00 mov edx, $007DD764
|
||
|
||
* Reference to control TfrmConInPut.Order_Sub : TClientDataSet
|
||
|
|
||
007DD67F 8B8348030000 mov eax, [ebx+$0348]
|
||
|
||
* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
||
|
|
||
007DD685 E82A95CEFF call 004C6BB4
|
||
007DD68A 8D55C8 lea edx, [ebp-$38]
|
||
007DD68D 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TClientDataSet.OFFS_60
|
||
|
|
||
007DD68F FF5160 call dword ptr [ecx+$60]
|
||
007DD692 8B45C8 mov eax, [ebp-$38]
|
||
007DD695 8D55CC lea edx, [ebp-$34]
|
||
|
||
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
||
|
|
||
007DD698 E84FD2C2FF call 0040A8EC
|
||
007DD69D FF75CC push dword ptr [ebp-$34]
|
||
007DD6A0 6874D77D00 push $007DD774
|
||
007DD6A5 8D45D0 lea eax, [ebp-$30]
|
||
007DD6A8 BA03000000 mov edx, $00000003
|
||
|
||
* Reference to: System.@LStrCatN;
|
||
|
|
||
007DD6AD E80280C2FF call 004056B4
|
||
007DD6B2 8B45D0 mov eax, [ebp-$30]
|
||
007DD6B5 50 push eax
|
||
007DD6B6 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|
||
|
|
||
007DD6B8 E8EF08D0FF call 004DDFAC
|
||
007DD6BD 5A pop edx
|
||
007DD6BE 8B08 mov ecx, [eax]
|
||
|
||
* Possible reference to virtual method TADOQuery.OFFS_38
|
||
|
|
||
007DD6C0 FF5138 call dword ptr [ecx+$38]
|
||
007DD6C3 8BC6 mov eax, esi
|
||
|
||
* Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer;
|
||
|
|
||
007DD6C5 E80A08D0FF call 004DDED4
|
||
007DD6CA 33C0 xor eax, eax
|
||
007DD6CC 5A pop edx
|
||
007DD6CD 59 pop ecx
|
||
007DD6CE 59 pop ecx
|
||
007DD6CF 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: '^[<5B><>]<5D>'
|
||
|
|
||
007DD6D2 6801D77D00 push $007DD701
|
||
007DD6D7 8D45C8 lea eax, [ebp-$38]
|
||
007DD6DA BA08000000 mov edx, $00000008
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
007DD6DF E8647CC2FF call 00405348
|
||
007DD6E4 8D45E8 lea eax, [ebp-$18]
|
||
|
||
* Reference to: Variants.@VarClr(TVarData;TVarData);
|
||
|
|
||
007DD6E7 E8886FC3FF call 00414674
|
||
007DD6EC 8D45F8 lea eax, [ebp-$08]
|
||
007DD6EF BA02000000 mov edx, $00000002
|
||
|
||
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
||
|
|
||
007DD6F4 E84F7CC2FF call 00405348
|
||
007DD6F9 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DD6FA E9F573C2FF jmp 00404AF4
|
||
007DD6FF EBD6 jmp 007DD6D7
|
||
|
||
****** END
|
||
|
|
||
007DD701 5E pop esi
|
||
007DD702 5B pop ebx
|
||
007DD703 8BE5 mov esp, ebp
|
||
007DD705 5D pop ebp
|
||
007DD706 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DDF2D(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDF2D 8BEC mov ebp, esp
|
||
007DDF2F 33C0 xor eax, eax
|
||
007DDF31 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><>k<EFBFBD><6B><EFBFBD><EFBFBD>]Ë<><C38B>-<2D><<3C>'
|
||
|
|
||
007DDF32 6851DF7D00 push $007DDF51
|
||
|
||
***** TRY
|
||
|
|
||
007DDF37 64FF30 push dword ptr fs:[eax]
|
||
007DDF3A 648920 mov fs:[eax], esp
|
||
007DDF3D FF05BC3C8900 inc dword ptr [$00893CBC]
|
||
007DDF43 33C0 xor eax, eax
|
||
007DDF45 5A pop edx
|
||
007DDF46 59 pop ecx
|
||
007DDF47 59 pop ecx
|
||
007DDF48 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: ']Ë<><C38B>-<2D><<3C>'
|
||
|
|
||
007DDF4B 6858DF7D00 push $007DDF58
|
||
007DDF50 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
007DDF51 E99E6BC2FF jmp 00404AF4
|
||
007DDF56 EBF8 jmp 007DDF50
|
||
|
||
****** END
|
||
|
|
||
007DDF58 5D pop ebp
|
||
007DDF59 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DDF5C(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDF5C 832DBC3C890001 sub dword ptr [$00893CBC], +$01
|
||
007DDF63 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DDF64(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDF64 B0DF mov al, $DF
|
||
007DDF66 7D00 jnl 007DDF68
|
||
007DDF68 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TfrmConInPut._PROC_007DDFCA(Sender : TObject);
|
||
begin
|
||
(*
|
||
007DDFCA 48 dec eax
|
||
007DDFCB 0050D4 add [eax-$2C], dl
|
||
007DDFCE 42 inc edx
|
||
007DDFCF 0008 add [eax], cl
|
||
007DDFD1 2D4A007CD0 sub eax, $D07C004A
|
||
007DDFD6 42 inc edx
|
||
007DDFD7 00F4 add ah, dh
|
||
007DDFD9 6B4A00D0 imul ecx, [edx+$00], $D0
|
||
007DDFDD 1D4A0030F6 sbb eax, $F630004A
|
||
007DDFE2 48 dec eax
|
||
007DDFE3 004CFB48 add [ebx+edi*8+$48], cl
|
||
007DDFE7 0098FA48000C add [eax+$C0048FA], bl
|
||
007DDFED 7948 jns 007DE037
|
||
007DDFEF 00ACF04800E829 add [eax+esi*8+$29E80048], ch
|
||
007DDFF6 4A dec edx
|
||
007DDFF7 00E4 add ah, ah
|
||
007DDFF9 ED in eax, dx
|
||
007DDFFA 48 dec eax
|
||
007DDFFB 00547848 add [eax+edi*2+$48], dl
|
||
007DDFFF 005878 add [eax+$78], bl
|
||
007DE002 48 dec eax
|
||
007DE003 00DC add ah, bl
|
||
007DE005 2A4A00 sub cl, byte ptr [edx+$00]
|
||
007DE008 3CA9 cmp al, $A9
|
||
007DE00A 48 dec eax
|
||
007DE00B 00C0 add al, al
|
||
007DE00D 834800D0 or dword ptr [eax+$00], -$30
|
||
007DE011 7948 jns 007DE05B
|
||
007DE013 004C8548 add [ebp+eax*4+$48], cl
|
||
007DE017 00D0 add al, dl
|
||
007DE019 2C4A sub al, $4A
|
||
007DE01B 009C2B4A008486 add [ebx+ebp+$8684004A], bl
|
||
007DE022 48 dec eax
|
||
007DE023 00482D add [eax+$2D], cl
|
||
007DE026 4A dec edx
|
||
007DE027 00C0 add al, al
|
||
007DE029 A9480038EE test eax, $EE380048
|
||
007DE02E 48 dec eax
|
||
007DE02F 00F4 add ah, dh
|
||
007DE031 EE out dx, al
|
||
007DE032 48 dec eax
|
||
007DE033 00F0 add al, dh
|
||
007DE035 E94800D8EE jmp EF55E082
|
||
007DE03A 48 dec eax
|
||
007DE03B 00D8 add al, bl
|
||
007DE03D 1B4A00 sbb ecx, [edx+$00]
|
||
007DE040 EC in al, dx
|
||
007DE041 334A00 xor ecx, [edx+$00]
|
||
007DE044 20C4 and ah, al
|
||
007DE046 48 dec eax
|
||
007DE047 00B0404A0010 add [eax+$10004A40], dh
|
||
007DE04D 44 inc esp
|
||
007DE04E 4A dec edx
|
||
007DE04F 00CC add ah, cl
|
||
007DE051 42 inc edx
|
||
007DE052 4A dec edx
|
||
007DE053 00B8C44800BC add [eax+$BC0048C4], bh
|
||
007DE059 C44800 les ecx, [eax+$00]
|
||
007DE05C 48 dec eax
|
||
007DE05D 45 inc ebp
|
||
007DE05E 4A dec edx
|
||
007DE05F 001CC3 add [ebx+eax*8], bl
|
||
007DE062 48 dec eax
|
||
007DE063 0018 add [eax], bl
|
||
007DE065 F0 lock
|
||
007DE066 48 dec eax
|
||
007DE067 00444C4A add [esp+ecx*2+$4A], al
|
||
007DE06B 000C02 add [edx+eax], cl
|
||
007DE06E 49 dec ecx
|
||
007DE06F 0094EC48009C64 add [esp+ebp*8+$649C0048], dl
|
||
007DE076 4A dec edx
|
||
007DE077 008C154A003C18 add [ebp+edx+$183C004A], cl
|
||
007DE07E 4A dec edx
|
||
007DE07F 0038 add [eax], bh
|
||
007DE081 52 push edx
|
||
007DE082 4A dec edx
|
||
007DE083 005C224A add [edx+$4A], bl
|
||
007DE087 00D8 add al, bl
|
||
007DE089 224A00 and cl, byte ptr [edx+$00]
|
||
007DE08C 7C68 jl 007DE0F6
|
||
007DE08E 4A dec edx
|
||
007DE08F 00941F4A003C60 add [edi+ebx+$603C004A], dl
|
||
007DE096 4A dec edx
|
||
007DE097 001447 add [edi+eax*2], dl
|
||
007DE09A 4A dec edx
|
||
007DE09B 0034654A00CC2C add [$2CCC004A], dh
|
||
007DE0A2 4A dec edx
|
||
007DE0A3 000E add [esi], cl
|
||
007DE0A5 0000 add [eax], al
|
||
|
||
007DE0A7 0000 add [eax], al
|
||
|
||
007DE0A9 000500000020 add [$20000000], al
|
||
007DE0AF 114000 adc [eax+$00], eax
|
||
007DE0B2 E003 loopn +$03
|
||
007DE0B4 0000 add [eax], al
|
||
|
||
007DE0B6 2011 and [ecx], dl
|
||
007DE0B8 40 inc eax
|
||
007DE0B9 00E4 add ah, ah
|
||
007DE0BB 0300 add eax, [eax]
|
||
007DE0BD 0020 add [eax], ah
|
||
007DE0BF 114000 adc [eax+$00], eax
|
||
007DE0C2 E803000020 call 207DE0CA
|
||
007DE0C7 114000 adc [eax+$00], eax
|
||
007DE0CA EC in al, dx
|
||
007DE0CB 0300 add eax, [eax]
|
||
007DE0CD 0020 add [eax], ah
|
||
007DE0CF 114000 adc [eax+$00], eax
|
||
007DE0D2 F0 lock
|
||
007DE0D3 0300 add eax, [eax]
|
||
007DE0D5 003500AEE57D add [$7DE5AE00], dh
|
||
007DE0DB 00F8 add al, bh
|
||
007DE0DD 0200 add al, byte ptr [eax]
|
||
007DE0DF 0000 add [eax], al
|
||
|
||
007DE0E1 0008 add [eax], cl
|
||
007DE0E3 54 push esp
|
||
007DE0E4 6F outsd
|
||
007DE0E5 6F outsd
|
||
007DE0E6 6C insb
|
||
007DE0E7 42 inc edx
|
||
007DE0E8 61 popa
|
||
007DE0E9 7231 jb 007DE11C
|
||
007DE0EB FC cld
|
||
007DE0EC 0200 add al, byte ptr [eax]
|
||
007DE0EE 0001 add [ecx], al
|
||
007DE0F0 0009 add [ecx], cl
|
||
007DE0F2 54 push esp
|
||
007DE0F3 42 inc edx
|
||
007DE0F4 52 push edx
|
||
007DE0F5 61 popa
|
||
007DE0F6 667265 jb 007DE15E
|
||
007DE0F9 7368 jnb 007DE163
|
||
007DE0FB 0003 add [ebx], al
|
||
007DE0FD 0000 add [eax], al
|
||
|
||
007DE0FF 0100 add [eax], eax
|
||
007DE101 06 push es
|
||
007DE102 54 push esp
|
||
007DE103 42 inc edx
|
||
007DE104 46 inc esi
|
||
007DE105 696E6404030000 imul ebp, [esi+$64], $00000304
|
||
007DE10C 0100 add [eax], eax
|
||
007DE10E 07 pop es
|
||
007DE10F 54 push esp
|
||
007DE110 42 inc edx
|
||
007DE111 43 inc ebx
|
||
007DE112 6C insb
|
||
007DE113 6F outsd
|
||
007DE114 7365 jnb 007DE17B
|
||
007DE116 0803 or [ebx], al
|
||
007DE118 0000 add [eax], al
|
||
|
||
007DE11A 0200 add al, byte ptr [eax]
|
||
007DE11C 06 push es
|
||
007DE11D 50 push eax
|
||
007DE11E 61 popa
|
||
007DE11F 6E outsb
|
||
007DE120 656C insb
|
||
007DE122 310C03 xor [ebx+eax], ecx
|
||
007DE125 0000 add [eax], al
|
||
|
||
007DE127 0300 add eax, [eax]
|
||
007DE129 07 pop es
|
||
007DE12A 42 inc edx
|
||
007DE12B 656744 inc esp
|
||
007DE12E 61 popa
|
||
007DE12F 7465 jz 007DE196
|
||
007DE131 1003 adc [ebx], al
|
||
007DE133 0000 add [eax], al
|
||
|
||
007DE135 0300 add eax, [eax]
|
||
007DE137 07 pop es
|
||
007DE138 45 inc ebp
|
||
007DE139 6E outsb
|
||
007DE13A 6444 inc esp
|
||
007DE13C 61 popa
|
||
007DE13D 7465 jz 007DE1A4
|
||
007DE13F 1403 adc al, $03
|
||
007DE141 0000 add [eax], al
|
||
|
||
007DE143 0400 add al, +$00
|
||
007DE145 06 push es
|
||
007DE146 4C dec esp
|
||
007DE147 61 popa
|
||
007DE148 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE14B 3118 xor [eax], ebx
|
||
007DE14D 0300 add eax, [eax]
|
||
007DE14F 000500106378 add [$78631000], al
|
||
007DE155 47 inc edi
|
||
007DE156 7269 jb 007DE1C1
|
||
007DE158 6450 push eax
|
||
007DE15A 6F outsd
|
||
007DE15B 7075 jo 007DE1D2
|
||
007DE15D 704D jo 007DE1AC
|
||
007DE15F 656E outsb
|
||
007DE161 7531 jnz 007DE194
|
||
007DE163 1C03 sbb al, $03
|
||
007DE165 0000 add [eax], al
|
||
|
||
007DE167 06 push es
|
||
007DE168 000B add [ebx], cl
|
||
007DE16A 41 inc ecx
|
||
007DE16B 44 inc esp
|
||
007DE16C 4F dec edi
|
||
007DE16D 51 push ecx
|
||
007DE16E 7565 jnz 007DE1D5
|
||
007DE170 7279 jb 007DE1EB
|
||
007DE172 43 inc ebx
|
||
007DE173 6D insd
|
||
007DE174 642003 and fs:[ebx], al
|
||
007DE177 0000 add [eax], al
|
||
|
||
007DE179 06 push es
|
||
007DE17A 000C41 add [ecx+eax*2], cl
|
||
007DE17D 44 inc esp
|
||
007DE17E 4F dec edi
|
||
007DE17F 51 push ecx
|
||
007DE180 7565 jnz 007DE1E7
|
||
007DE182 7279 jb 007DE1FD
|
||
007DE184 4D dec ebp
|
||
007DE185 61 popa
|
||
007DE186 696E2403000006 imul ebp, [esi+$24], $06000003
|
||
007DE18D 000C41 add [ecx+eax*2], cl
|
||
007DE190 44 inc esp
|
||
007DE191 4F dec edi
|
||
007DE192 51 push ecx
|
||
007DE193 7565 jnz 007DE1FA
|
||
007DE195 7279 jb 007DE210
|
||
007DE197 54 push esp
|
||
007DE198 656D insd
|
||
007DE19A 7028 jo 007DE1C4
|
||
007DE19C 0300 add eax, [eax]
|
||
007DE19E 0007 add [edi], al
|
||
007DE1A0 000B add [ebx], cl
|
||
007DE1A2 44 inc esp
|
||
007DE1A3 61 popa
|
||
007DE1A4 7461 jz 007DE207
|
||
007DE1A6 53 push ebx
|
||
007DE1A7 6F outsd
|
||
007DE1A8 7572 jnz 007DE21C
|
||
007DE1AA 636531 arpl [ebp+$31], sp
|
||
007DE1AD 2C03 sub al, $03
|
||
007DE1AF 0000 add [eax], al
|
||
|
||
007DE1B1 0800 or [eax], al
|
||
007DE1B3 0A4F72 or cl, byte ptr [edi+$72]
|
||
007DE1B6 6465725F jb 007DE219
|
||
007DE1BA 4D dec ebp
|
||
007DE1BB 61 popa
|
||
007DE1BC 696E3003000009 imul ebp, [esi+$30], $09000003
|
||
007DE1C3 0003 add [ebx], al
|
||
007DE1C5 52 push edx
|
||
007DE1C6 4D dec ebp
|
||
007DE1C7 313403 xor [ebx+eax], esi
|
||
007DE1CA 0000 add [eax], al
|
||
|
||
007DE1CC 0A00 or al, byte ptr [eax]
|
||
007DE1CE 08524D or [edx+$4D], dl
|
||
007DE1D1 44 inc esp
|
||
007DE1D2 42 inc edx
|
||
007DE1D3 4D dec ebp
|
||
007DE1D4 61 popa
|
||
007DE1D5 696E380300000B imul ebp, [esi+$38], $0B000003
|
||
007DE1DC 000C52 add [edx+edx*2], cl
|
||
007DE1DF 4D dec ebp
|
||
007DE1E0 58 pop eax
|
||
007DE1E1 4C dec esp
|
||
007DE1E2 53 push ebx
|
||
007DE1E3 45 inc ebp
|
||
007DE1E4 7870 js 007DE256
|
||
007DE1E6 6F outsd
|
||
007DE1E7 7274 jb 007DE25D
|
||
007DE1E9 313C03 xor [ebx+eax], edi
|
||
007DE1EC 0000 add [eax], al
|
||
|
||
007DE1EE 0400 add al, +$00
|
||
007DE1F0 06 push es
|
||
007DE1F1 4C dec esp
|
||
007DE1F2 61 popa
|
||
007DE1F3 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE1F6 3440 xor al, $40
|
||
007DE1F8 0300 add eax, [eax]
|
||
007DE1FA 000C00 add [eax+eax], cl
|
||
007DE1FD 0E push cs
|
||
007DE1FE 43 inc ebx
|
||
007DE1FF 7573 jnz 007DE274
|
||
007DE201 746F jz 007DE272
|
||
007DE203 6D insd
|
||
007DE204 65724E jb 007DE255
|
||
007DE207 6F outsd
|
||
007DE208 4E dec esi
|
||
007DE209 61 popa
|
||
007DE20A 6D insd
|
||
007DE20B 6544 inc esp
|
||
007DE20D 0300 add eax, [eax]
|
||
007DE20F 000D000A506F add [$6F500A00], cl
|
||
007DE215 7075 jo 007DE28C
|
||
007DE217 704D jo 007DE266
|
||
007DE219 656E outsb
|
||
007DE21B 7531 jnz 007DE24E
|
||
007DE21D 48 dec eax
|
||
007DE21E 0300 add eax, [eax]
|
||
007DE220 000E add [esi], cl
|
||
007DE222 0002 add [edx], al
|
||
007DE224 4E dec esi
|
||
007DE225 324C0300 xor cl, byte ptr [ebx+eax+$00]
|
||
007DE229 000400 add [eax+eax], al
|
||
007DE22C 06 push es
|
||
007DE22D 4C dec esp
|
||
007DE22E 61 popa
|
||
007DE22F 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE232 37 aaa
|
||
007DE233 50 push eax
|
||
007DE234 0300 add eax, [eax]
|
||
007DE236 000C00 add [eax+eax], cl
|
||
007DE239 085052 or [eax+$52], dl
|
||
007DE23C 54 push esp
|
||
007DE23D 43 inc ebx
|
||
007DE23E 6F outsd
|
||
007DE23F 6C insb
|
||
007DE240 6F outsd
|
||
007DE241 7254 jb 007DE297
|
||
007DE243 0300 add eax, [eax]
|
||
007DE245 000400 add [eax+eax], al
|
||
007DE248 06 push es
|
||
007DE249 4C dec esp
|
||
007DE24A 61 popa
|
||
007DE24B 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE24E 385803 cmp [eax+$03], bl
|
||
007DE251 0000 add [eax], al
|
||
|
||
007DE253 0C00 or al, $00
|
||
007DE255 0B5052 or edx, [eax+$52]
|
||
007DE258 54 push esp
|
||
007DE259 43 inc ebx
|
||
007DE25A 6F outsd
|
||
007DE25B 64654E dec esi
|
||
007DE25E 61 popa
|
||
007DE25F 6D insd
|
||
007DE260 655C pop esp
|
||
007DE262 0300 add eax, [eax]
|
||
007DE264 000400 add [eax+eax], al
|
||
007DE267 06 push es
|
||
007DE268 4C dec esp
|
||
007DE269 61 popa
|
||
007DE26A 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE26D 396003 cmp [eax+$03], esp
|
||
007DE270 0000 add [eax], al
|
||
|
||
007DE272 0C00 or al, $00
|
||
007DE274 05436F6E4E add eax, +$4E6E6F43
|
||
007DE279 6F outsd
|
||
007DE27A 640300 add eax, fs:[eax]
|
||
007DE27D 000400 add [eax+eax], al
|
||
007DE280 07 pop es
|
||
007DE281 4C dec esp
|
||
007DE282 61 popa
|
||
007DE283 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE286 3132 xor [edx], esi
|
||
007DE288 680300000C push $0C000003
|
||
007DE28D 00055052544B add [$4B545250], al
|
||
007DE293 5A pop edx
|
||
007DE294 6C insb
|
||
007DE295 0300 add eax, [eax]
|
||
007DE297 000400 add [eax+eax], al
|
||
007DE29A 07 pop es
|
||
007DE29B 4C dec esp
|
||
007DE29C 61 popa
|
||
007DE29D 62656C bound esp, qword ptr [ebp+$6C]
|
||
007DE2A0 3133 xor [ebx], esi
|
||
007DE2A2 7003 jo 007DE2A7
|
||
007DE2A4 0000 add [eax], al
|
||
|
||
007DE2A6 0C00 or al, $00
|
||
007DE2A8 055052544D add eax, +$4D545250
|
||
007DE2AD 46 inc esi
|
||
007DE2AE 7403 jz 007DE2B3
|
||
007DE2B0 0000 add [eax], al
|
||
|
||
007DE2B2 06 push es
|
||
007DE2B3 000D41444F51 add [$514F4441], cl
|
||
007DE2B9 7565 jnz 007DE320
|
||
007DE2BB 7279 jb 007DE336
|
||
007DE2BD 50 push eax
|
||
007DE2BE 7269 jb 007DE329
|
||
007DE2C0 6E outsb
|
||
007DE2C1 7478 jz 007DE33B
|
||
007DE2C3 0300 add eax, [eax]
|
||
007DE2C5 0008 add [eax], cl
|
||
007DE2C7 0009 add [ecx], cl
|
||
007DE2C9 43 inc ebx
|
||
007DE2CA 44 inc esp
|
||
007DE2CB 53 push ebx
|
||
007DE2CC 5F pop edi
|
||
007DE2CD 50 push eax
|
||
007DE2CE 7269 jb 007DE339
|
||
007DE2D0 6E outsb
|
||
007DE2D1 747C jz 007DE34F
|
||
007DE2D3 0300 add eax, [eax]
|
||
007DE2D5 0001 add [ecx], al
|
||
007DE2D7 000B add [ebx], cl
|
||
007DE2D9 54 push esp
|
||
007DE2DA 6F outsd
|
||
007DE2DB 6F outsd
|
||
007DE2DC 6C insb
|
||
007DE2DD 42 inc edx
|
||
007DE2DE 7574 jnz 007DE354
|
||
007DE2E0 746F jz 007DE351
|
||
007DE2E2 6E outsb
|
||
007DE2E3 33800300000F xor eax, [eax+$F000003]
|
||
007DE2E9 0007 add [edi], al
|
||
007DE2EB 637847 arpl [eax+$47], di
|
||
007DE2EE 7269 jb 007DE359
|
||
007DE2F0 6431840300001000 xor fs:[ebx+eax+$100000], eax
|
||
007DE2F8 03547631 add edx, [esi+esi*2+$31]
|
||
007DE2FC 8803 mov [ebx], al
|
||
007DE2FE 0000 add [eax], al
|
||
|
||
007DE300 1100 adc [eax], eax
|
||
007DE302 097631 or [esi+$31], esi
|
||
007DE305 43 inc ebx
|
||
007DE306 6F outsd
|
||
007DE307 6C insb
|
||
007DE308 756D jnz 007DE377
|
||
007DE30A 6E outsb
|
||
007DE30B 348C xor al, $8C
|
||
007DE30D 0300 add eax, [eax]
|
||
007DE30F 0011 add [ecx], dl
|
||
007DE311 0007 add [edi], al
|
||
007DE313 7631 jbe 007DE346
|
||
007DE315 43 inc ebx
|
||
007DE316 6F outsd
|
||
007DE317 6E outsb
|
||
007DE318 4E dec esi
|
||
007DE319 6F outsd
|
||
007DE31A 90 nop
|
||
007DE31B 0300 add eax, [eax]
|
||
007DE31D 0011 add [ecx], dl
|
||
007DE31F 000C76 add [esi+esi*2], cl
|
||
007DE322 31436F xor [ebx+$6F], eax
|
||
007DE325 6E outsb
|
||
007DE326 50 push eax
|
||
007DE327 657273 jb 007DE39D
|
||
007DE32A 6F outsd
|
||
007DE32B 6E outsb
|
||
007DE32C 31940300001100 xor [ebx+eax+$110000], edx
|
||
007DE333 097631 or [esi+$31], esi
|
||
007DE336 4F dec edi
|
||
007DE337 7264 jb 007DE39D
|
||
007DE339 44 inc esp
|
||
007DE33A 61 popa
|
||
007DE33B 7465 jz 007DE3A2
|
||
007DE33D 98 cwde
|
||
007DE33E 0300 add eax, [eax]
|
||
007DE340 0011 add [ecx], dl
|
||
007DE342 0010 add [eax], dl
|
||
007DE344 7631 jbe 007DE377
|
||
007DE346 43 inc ebx
|
||
007DE347 7573 jnz 007DE3BC
|
||
007DE349 746F jz 007DE3BA
|
||
007DE34B 6D insd
|
||
007DE34C 65724E jb 007DE39D
|
||
007DE34F 6F outsd
|
||
007DE350 4E dec esi
|
||
007DE351 61 popa
|
||
007DE352 6D insd
|
||
007DE353 659C pushf
|
||
007DE355 0300 add eax, [eax]
|
||
007DE357 0011 add [ecx], dl
|
||
007DE359 000D76315052 add [$52503176], cl
|
||
007DE35F 54 push esp
|
||
007DE360 43 inc ebx
|
||
007DE361 6F outsd
|
||
007DE362 64654E dec esi
|
||
007DE365 61 popa
|
||
007DE366 6D insd
|
||
007DE367 65A003000011 mov al, byte ptr [$11000003]
|
||
007DE36D 0009 add [ecx], cl
|
||
007DE36F 7631 jbe 007DE3A2
|
||
007DE371 43 inc ebx
|
||
007DE372 6F outsd
|
||
007DE373 6C insb
|
||
007DE374 756D jnz 007DE3E3
|
||
007DE376 6E outsb
|
||
007DE377 31A40300001100 xor [ebx+eax+$110000], esp
|
||
007DE37E 0D76315052 or eax, $52503176
|
||
007DE383 54 push esp
|
||
007DE384 4F dec edi
|
||
007DE385 7264 jb 007DE3EB
|
||
007DE387 657251 jb 007DE3DB
|
||
007DE38A 7479 jz 007DE405
|
||
007DE38C A803 test al, $03
|
||
007DE38E 0000 add [eax], al
|
||
|
||
007DE390 1100 adc [eax], eax
|
||
007DE392 0E push cs
|
||
007DE393 7631 jbe 007DE3C6
|
||
007DE395 53 push ebx
|
||
007DE396 4F dec edi
|
||
007DE397 7264 jb 007DE3FD
|
||
007DE399 44 inc esp
|
||
007DE39A 65664E dec si
|
||
007DE39D 6F outsd
|
||
007DE39E 7465 jz 007DE405
|
||
007DE3A0 31AC0300001200 xor [ebx+eax+$120000], ebp
|
||
007DE3A7 0D63784772 or eax, $72477863
|
||
007DE3AC 6964314C6576656C imul esp, [ecx+esi+$4C], $6C657665
|
||
007DE3B4 31B003000011 xor [eax+$11000003], esi
|
||
007DE3BA 0009 add [ecx], cl
|
||
007DE3BC 7631 jbe 007DE3EF
|
||
007DE3BE 7374 jnb 007DE434
|
||
007DE3C0 796C jns 007DE42E
|
||
007DE3C2 654E dec esi
|
||
007DE3C4 6F outsd
|
||
007DE3C5 B403 mov ah, $03
|
||
007DE3C7 0000 add [eax], al
|
||
|
||
007DE3C9 1100 adc [eax], eax
|
||
007DE3CB 07 pop es
|
||
007DE3CC 7631 jbe 007DE3FF
|
||
007DE3CE 50 push eax
|
||
007DE3CF 52 push edx
|
||
007DE3D0 54 push esp
|
||
007DE3D1 4D dec ebp
|
||
007DE3D2 46 inc esi
|
||
007DE3D3 B803000011 mov eax, $11000003
|
||
007DE3D8 0007 add [edi], al
|
||
007DE3DA 7631 jbe 007DE40D
|
||
007DE3DC 50 push eax
|
||
007DE3DD 52 push edx
|
||
007DE3DE 54 push esp
|
||
007DE3DF 4B dec ebx
|
||
007DE3E0 5A pop edx
|
||
007DE3E1 BC03000011 mov esp, $11000003
|
||
007DE3E6 0009 add [ecx], cl
|
||
007DE3E8 7631 jbe 007DE41B
|
||
007DE3EA 50 push eax
|
||
007DE3EB 52 push edx
|
||
007DE3EC 54 push esp
|
||
007DE3ED 53 push ebx
|
||
007DE3EE 7065 jo 007DE455
|
||
007DE3F0 63C0 arpl ax, ax
|
||
007DE3F2 0300 add eax, [eax]
|
||
007DE3F4 0011 add [ecx], dl
|
||
007DE3F6 000D7631534F add [$4F533176], cl
|
||
007DE3FC 7264 jb 007DE462
|
||
007DE3FE 44 inc esp
|
||
007DE3FF 656653 push bx
|
||
007DE402 7472 jz 007DE476
|
||
007DE404 34C4 xor al, $C4
|
||
007DE406 0300 add eax, [eax]
|
||
007DE408 0011 add [ecx], dl
|
||
007DE40A 0008 add [eax], cl
|
||
007DE40C 7631 jbe 007DE43F
|
||
007DE40E 42 inc edx
|
||
007DE40F 5A pop edx
|
||
007DE410 54 push esp
|
||
007DE411 7970 jns 007DE483
|
||
007DE413 65C803 enter , $03
|
||
007DE416 0000 add [eax], al
|
||
|
||
007DE418 0100 add [eax], eax
|
||
007DE41A 0554537365 add eax, +$65735354
|
||
007DE41F 6C insb
|
||
007DE420 1300 adc eax, [eax]
|
||
007DE422 1200 adc al, byte ptr [eax]
|
||
007DE424 30E6 xor dh, ah
|
||
007DE426 7D00 jnl 007DE428
|
||
007DE428 0B466F or eax, [esi+$6F]
|
||
007DE42B 726D jb 007DE49A
|
||
007DE42D 44 inc esp
|
||
007DE42E 657374 jnb 007DE4A5
|
||
007DE431 726F jb 007DE4A2
|
||
007DE433 7910 jns 007DE445
|
||
007DE435 0038 add [eax], bh
|
||
007DE437 E67D out $7D, al
|
||
007DE439 0009 add [ecx], cl
|
||
007DE43B 46 inc esi
|
||
007DE43C 6F outsd
|
||
007DE43D 726D jb 007DE4AC
|
||
007DE43F 43 inc ebx
|
||
007DE440 6C insb
|
||
007DE441 6F outsd
|
||
007DE442 7365 jnb 007DE4A9
|
||
007DE444 1100 adc [eax], eax
|
||
007DE446 3CE6 cmp al, $E6
|
||
007DE448 7D00 jnl 007DE44A
|
||
007DE44A 0A466F or al, byte ptr [esi+$6F]
|
||
007DE44D 726D jb 007DE4BC
|
||
007DE44F 43 inc ebx
|
||
007DE450 7265 jb 007DE4B7
|
||
007DE452 61 popa
|
||
007DE453 7465 jz 007DE4BA
|
||
007DE455 1300 adc eax, [eax]
|
||
007DE457 60 pusha
|
||
007DE458 E67D out $7D, al
|
||
007DE45A 000C54 add [esp+edx*2], cl
|
||
007DE45D 42 inc edx
|
||
007DE45E 43 inc ebx
|
||
007DE45F 6C insb
|
||
007DE460 6F outsd
|
||
007DE461 7365 jnb 007DE4C8
|
||
007DE463 43 inc ebx
|
||
007DE464 6C insb
|
||
007DE465 69636B120060EC imul esp, [ebx+$6B], $EC600012
|
||
007DE46C 7D00 jnl 007DE46E
|
||
007DE46E 0B544246 or edx, [edx+eax*2+$46]
|
||
007DE472 696E64436C6963 imul ebp, [esi+$64], $63696C43
|
||
007DE479 6B1500F0EC7D00 imul edx, [$7DECF000], $00
|
||
007DE480 0E push cs
|
||
007DE481 54 push esp
|
||
007DE482 42 inc edx
|
||
007DE483 52 push edx
|
||
007DE484 61 popa
|
||
007DE485 667265 jb 007DE4ED
|
||
007DE488 7368 jnb 007DE4F2
|
||
007DE48A 43 inc ebx
|
||
007DE48B 6C insb
|
||
007DE48C 69636B1500F8EC imul esp, [ebx+$6B], $ECF80015
|
||
007DE493 7D00 jnl 007DE495
|
||
007DE495 0E push cs
|
||
007DE496 4F dec edi
|
||
007DE497 7264 jb 007DE4FD
|
||
007DE499 65724E jb 007DE4EA
|
||
007DE49C 6F outsd
|
||
007DE49D 4D dec ebp
|
||
007DE49E 43 inc ebx
|
||
007DE49F 68616E6765 push $65676E61
|
||
007DE4A4 0F0088ED7D0008 str word ptr [eax+$8007DED]
|
||
007DE4AB 46 inc esi
|
||
007DE4AC 6F outsd
|
||
007DE4AD 726D jb 007DE51C
|
||
007DE4AF 53 push ebx
|
||
007DE4B0 686F771000 push $0010776F
|
||
007DE4B5 90 nop
|
||
007DE4B6 ED in eax, dx
|
||
007DE4B7 7D00 jnl 007DE4B9
|
||
007DE4B9 09544254 or [edx+eax*2+$54], edx
|
||
007DE4BD 50 push eax
|
||
007DE4BE 43 inc ebx
|
||
007DE4BF 6C insb
|
||
007DE4C0 69636B1500B8ED imul esp, [ebx+$6B], $EDB80015
|
||
007DE4C7 7D00 jnl 007DE4C9
|
||
007DE4C9 0E push cs
|
||
007DE4CA 43 inc ebx
|
||
007DE4CB 6865636B42 push $426B6365
|
||
007DE4D0 6F outsd
|
||
007DE4D1 7831 js 007DE504
|
||
007DE4D3 43 inc ebx
|
||
007DE4D4 6C insb
|
||
007DE4D5 69636B1500C0ED imul esp, [ebx+$6B], $EDC00015
|
||
007DE4DC 7D00 jnl 007DE4DE
|
||
007DE4DE 0E push cs
|
||
007DE4DF 43 inc ebx
|
||
007DE4E0 6865636B42 push $426B6365
|
||
007DE4E5 6F outsd
|
||
007DE4E6 7832 js 007DE51A
|
||
007DE4E8 43 inc ebx
|
||
007DE4E9 6C insb
|
||
007DE4EA 69636B1F00D4ED imul esp, [ebx+$6B], $EDD4001F
|
||
007DE4F1 7D00 jnl 007DE4F3
|
||
007DE4F3 18547631 sbb [esi+esi*2+$31], dl
|
||
007DE4F7 53 push ebx
|
||
007DE4F8 7479 jz 007DE573
|
||
007DE4FA 6C insb
|
||
007DE4FB 657347 jnb 007DE545
|
||
007DE4FE 657443 jz 007DE544
|
||
007DE501 6F outsd
|
||
007DE502 6E outsb
|
||
007DE503 7465 jz 007DE56A
|
||
007DE505 6E outsb
|
||
007DE506 7453 jz 007DE55B
|
||
007DE508 7479 jz 007DE583
|
||
007DE50A 6C insb
|
||
007DE50B 652300 and eax, gs:[eax]
|
||
007DE50E DCED fsub st(5), st(0)
|
||
007DE510 7D00 jnl 007DE512
|
||
007DE512 1C76 sbb al, $76
|
||
007DE514 3144656C xor [ebp+$6C], eax
|
||
007DE518 69766572794461 imul esi, [esi+$65], $61447972
|
||
007DE51F 7465 jz 007DE586
|
||
007DE521 43 inc ebx
|
||
007DE522 7573 jnz 007DE597
|
||
007DE524 746F jz 007DE595
|
||
007DE526 6D insd
|
||
007DE527 44 inc esp
|
||
007DE528 7261 jb 007DE58B
|
||
007DE52A 7743 jnbe 007DE56F
|
||
007DE52C 656C insb
|
||
007DE52E 6C insb
|
||
007DE52F 0E push cs
|
||
007DE530 00E4 add ah, ah
|
||
007DE532 ED in eax, dx
|
||
007DE533 7D00 jnl 007DE535
|
||
007DE535 07 pop es
|
||
007DE536 4E dec esi
|
||
007DE537 31436C xor [ebx+$6C], eax
|
||
007DE53A 69636B0E0054F0 imul esp, [ebx+$6B], $F054000E
|
||
007DE541 7D00 jnl 007DE543
|
||
007DE543 07 pop es
|
||
007DE544 4E dec esi
|
||
007DE545 32436C xor al, byte ptr [ebx+$6C]
|
||
007DE548 69636B1700C4F2 imul esp, [ebx+$6B], $F2C40017
|
||
007DE54F 7D00 jnl 007DE551
|
||
007DE551 10546F6F adc [edi+ebp*2+$6F], dl
|
||
007DE555 6C insb
|
||
007DE556 42 inc edx
|
||
007DE557 7574 jnz 007DE5CD
|
||
007DE559 746F jz 007DE5CA
|
||
007DE55B 6E outsb
|
||
007DE55C 33436C xor eax, [ebx+$6C]
|
||
007DE55F 69636B1600E4F2 imul esp, [ebx+$6B], $F2E40016
|
||
007DE566 7D00 jnl 007DE568
|
||
007DE568 0F54 DB $0F, $54 //
|
||
007DE56A 7631 jbe 007DE59D
|
||
007DE56C 43 inc ebx
|
||
007DE56D 656C insb
|
||
007DE56F 6C insb
|
||
007DE570 44 inc esp
|
||
007DE571 626C436C bound ebp, qword ptr [ebx+eax*2+$6C]
|
||
007DE575 69636B140030F3 imul esp, [ebx+$6B], $F3300014
|
||
007DE57C 7D00 jnl 007DE57E
|
||
007DE57E 0D436F6E4E or eax, $4E6E6F43
|
||
007DE583 6F outsd
|
||
007DE584 4B dec ebx
|
||
007DE585 657950 jns 007DE5D8
|
||
007DE588 7265 jb 007DE5EF
|
||
007DE58A 7373 jnb 007DE5FF
|
||
007DE58C 1100 adc [eax], eax
|
||
007DE58E CC int 3
|
||
007DE58F F67D00 idiv byte ptr [ebp+$00]
|
||
007DE592 0A545373 or dl, byte ptr [ebx+edx*2+$73]
|
||
007DE596 656C insb
|
||
007DE598 43 inc ebx
|
||
007DE599 6C insb
|
||
007DE59A 69636B10546672 imul esp, [ebx+$6B], $72665410
|
||
007DE5A1 6D insd
|
||
007DE5A2 4A dec edx
|
||
007DE5A3 59 pop ecx
|
||
007DE5A4 6F outsd
|
||
007DE5A5 7264 jb 007DE60B
|
||
007DE5A7 657243 jb 007DE5ED
|
||
007DE5AA 6F outsd
|
||
007DE5AB 6E outsb
|
||
007DE5AC 43 inc ebx
|
||
007DE5AD 58 pop eax
|
||
007DE5AE 1300 adc eax, [eax]
|
||
007DE5B0 28944500648A45 sub [ebp+eax*2+$458A6400], dl
|
||
007DE5B7 0020 add [eax], ah
|
||
007DE5B9 42 inc edx
|
||
007DE5BA 44 inc esp
|
||
007DE5BB 00E0 add al, ah
|
||
007DE5BD A5 movsd
|
||
007DE5BE 45 inc ebp
|
||
007DE5BF 001C5F add [edi+ebx*2], bl
|
||
007DE5C2 47 inc edi
|
||
007DE5C3 005876 add [eax+$76], bl
|
||
007DE5C6 7C00 jl 007DE5C8
|
||
007DE5C8 B8124D0008 mov eax, $08004D12
|
||
007DE5CD 7F4B jnle 007DE61A
|
||
007DE5CF 0088996A0064 add [eax+$64006A99], cl
|
||
007DE5D5 D37800 sar dword ptr [eax+$00], cl
|
||
007DE5D8 A80A test al, $0A
|
||
007DE5DA 7800 js 007DE5DC
|
||
007DE5DC 6C insb
|
||
007DE5DD 157B00B867 adc eax, $67B8007B
|
||
007DE5E2 47 inc edi
|
||
007DE5E3 00887E49008C add [eax+$8C00497E], cl
|
||
007DE5E9 7649 jbe 007DE634
|
||
007DE5EB 0000 add [eax], al
|
||
|
||
007DE5ED 16 push ss
|
||
007DE5EE 6300 arpl [eax], ax
|
||
007DE5F0 F4 hlt
|
||
007DE5F1 B466 mov ah, $66
|
||
007DE5F3 0034B1 add [ecx+esi*4], dh
|
||
007DE5F6 6600A40E640000E6 add [esi+ecx+$E6000064], ah
|
||
007DE5FE 7D00 jnl 007DE600
|
||
007DE600 07 pop es
|
||
007DE601 10546672 adc [esi+$72], dl
|
||
007DE605 6D insd
|
||
007DE606 4A dec edx
|
||
007DE607 59 pop ecx
|
||
007DE608 6F outsd
|
||
007DE609 7264 jb 007DE66F
|
||
007DE60B 657243 jb 007DE651
|
||
007DE60E 6F outsd
|
||
007DE60F 6E outsb
|
||
007DE610 43 inc ebx
|
||
007DE611 58 pop eax
|
||
007DE612 B0DF mov al, $DF
|
||
007DE614 7D00 jnl 007DE616
|
||
007DE616 D0F2 DB $D0, $F2 // dl, 1
|
||
007DE618 49 dec ecx
|
||
007DE619 005E00 add [esi+$00], bl
|
||
007DE61C 0F55 DB $0F, $55 //
|
||
007DE61E 5F pop edi
|
||
007DE61F 4A dec edx
|
||
007DE620 59 pop ecx
|
||
007DE621 4F dec edi
|
||
007DE622 7264 jb 007DE688
|
||
007DE624 657243 jb 007DE66A
|
||
007DE627 6F outsd
|
||
007DE628 6E outsb
|
||
007DE629 5F pop edi
|
||
007DE62A 43 inc ebx
|
||
007DE62B 58 pop eax
|
||
007DE62C 0000 add [eax], al
|
||
|
||
007DE62E 8BC0 mov eax, eax
|
||
007DE630 33C0 xor eax, eax
|
||
|
||
* Reference to GlobalVar_00893CC0
|
||
|
|
||
007DE632 A3C03C8900 mov dword ptr [$00893CC0], eax
|
||
007DE637 C3 ret
|
||
|
||
007DE638 C60102 mov byte ptr [ecx], $02
|
||
007DE63B C3 ret
|
||
|
||
007DE63C 53 push ebx
|
||
007DE63D 8BD8 mov ebx, eax
|
||
007DE63F B205 mov dl, $05
|
||
|
||
* Reference to control v1OrderUnit : TcxGridDBColumn
|
||
|
|
||
007DE641 8B8380030000 mov eax, [ebx+$0380]
|
||
|
||
* Reference to: Controls.TControl.SetAlign(TControl;TAlign);
|
||
|
|
||
007DE647 E89094CAFF call 00487ADC
|
||
|
||
* Reference to control ToolButton2 : TToolButton
|
||
|
|
||
007DE64C 8B8324030000 mov eax, [ebx+$0324]
|
||
|
||
|
|
||
007DE652 E83163FDFF call 007B4988
|
||
007DE657 DD9BD0030000 fstp qword ptr [ebx+$03D0]
|
||
007DE65D 9B wait
|
||
007DE65E 5B pop ebx
|
||
007DE65F C3 ret
|
||
|
||
007DE660 53 push ebx
|
||
007DE661 8BD8 mov ebx, eax
|
||
007DE663 8BC3 mov eax, ebx
|
||
|
||
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
||
|
|
||
007DE665 E82E79CCFF call 004A5F98
|
||
|
||
* Reference to control Label23 : TLabel
|
||
|
|
||
007DE66A 83BBDC03000001 cmp dword ptr [ebx+$03DC], +$01
|
||
007DE671 7417 jz 007DE68A
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>ָʾ<D6B8><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
||
|
|
||
007DE673 B9ACE67D00 mov ecx, $007DE6AC
|
||
|
||
* Reference to control v1PriceUnit : TcxGridDBColumn
|
||
|
|
||
007DE678 8B9384030000 mov edx, [ebx+$0384]
|
||
|
||
* Possible String Reference to: 'ָʾ<D6B8><CABE><EFBFBD>б<EFBFBD>10'
|
||
|
|
||
007DE67E B8C4E67D00 mov eax, $007DE6C4
|
||
|
||
|
|
||
007DE683 E81895FDFF call 007B7BA0
|
||
007DE688 5B pop ebx
|
||
007DE689 C3 ret
|
||
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD>ָʾ<D6B8><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
|
||
|
|
||
007DE68A B9ACE67D00 mov ecx, $007DE6AC
|
||
|
||
* Reference to control v1PriceUnit : TcxGridDBColumn
|
||
|
|
||
007DE68F 8B9384030000 mov edx, [ebx+$0384]
|
||
|
||
* Possible String Reference to: 'ָʾ<D6B8><CABE><EFBFBD>б<EFBFBD>ѡ<EFBFBD><D1A1>'
|
||
|
|
||
007DE695 B8DCE67D00 mov eax, $007DE6DC
|
||
|
||
|
|
||
007DE69A E80195FDFF call 007B7BA0
|
||
007DE69F 5B pop ebx
|
||
007DE6A0 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
end. |