unit U_SXCKNewList_SK; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmSXCKNewList_SK=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBFind: TToolButton; TBExport: TToolButton; TBClose: TToolButton; Panel1: TPanel; ADOQueryCmd: TADOQuery; ADOQueryMain: TADOQuery; ADOQueryTemp: TADOQuery; DataSource1: TDataSource; Label1: TLabel; Label2: TLabel; BegDate: TDateTimePicker; EndDate: TDateTimePicker; CDS_Main: TClientDataSet; PopupMenu1: TPopupMenu; N1: TMenuItem; N2: TMenuItem; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label8: TLabel; Label12: TLabel; SPName: TEdit; FactoryName: TEdit; SPID: TEdit; SPSpec: TEdit; CRType: TComboBox; Label6: TLabel; SPCF: TEdit; Label7: TLabel; OrderNo: TEdit; cxGrid2: TcxGrid; Tv1: TcxGridDBTableView; v1Column2: TcxGridDBColumn; v1Column4: TcxGridDBColumn; v1Column13: TcxGridDBColumn; v1FactoryName: TcxGridDBColumn; v2Column1: TcxGridDBColumn; v1Column8: TcxGridDBColumn; v1Column1: TcxGridDBColumn; v1Column10: TcxGridDBColumn; v1Column9: TcxGridDBColumn; v2Column6: TcxGridDBColumn; v1Column3: TcxGridDBColumn; v1Column12: TcxGridDBColumn; cxGrid2Level1: TcxGridLevel; Label9: TLabel; SSType: TComboBox; v1Column17: TcxGridDBColumn; ToolButton1: TToolButton; cxTabControl1: TcxTabControl; cxGridPopupMenu1: TcxGridPopupMenu; Label11: TLabel; ConNO: TEdit; v1ConNO: TcxGridDBColumn; v1ComTaiTou: TcxGridDBColumn; v1HYPrice: TcxGridDBColumn; v1BZType: TcxGridDBColumn; v1YJBLi: TcxGridDBColumn; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure FormCreate(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ConNoMChange(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBExportClick(Sender : TObject); procedure TBFindClick(Sender : TObject); procedure N1Click(Sender : TObject); procedure N2Click(Sender : TObject); procedure SPIDKeyPress(Sender : TObject); procedure SPIDChange(Sender : TObject); procedure SPSpecChange(Sender : TObject); procedure FactoryNameChange(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure cxTabControl1Change(Sender : TObject); procedure OrderNoKeyPress(Sender : TObject); procedure ConNOKeyPress(Sender : TObject); procedure _PROC_007F0D81(Sender : TObject); procedure _PROC_007F0FB4(Sender : TObject); procedure _PROC_007F1219(Sender : TObject); procedure _PROC_007F1454(Sender : TObject); procedure _PROC_007F1888(Sender : TObject); procedure _PROC_007F2981(Sender : TObject); procedure _PROC_007F29B0(Sender : TObject); procedure _PROC_007F29B8(Sender : TObject); procedure _PROC_007F2A1E(Sender : TObject); procedure _PROC_007F3165(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmSXCKNewList_SK: TfrmSXCKNewList_SK; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmSXCKNewList_SK.FormDestroy(Sender : TObject); begin (* 007F1394 33C0 xor eax, eax * Reference to GlobalVar_00893CD8 | 007F1396 A3D83C8900 mov dword ptr [$00893CD8], eax 007F139B C3 ret *) end; procedure TfrmSXCKNewList_SK.FormClose(Sender : TObject); begin (* 007F139C C60102 mov byte ptr [ecx], $02 007F139F C3 ret *) end; procedure TfrmSXCKNewList_SK.FormCreate(Sender : TObject); begin (* 007F13A0 55 push ebp 007F13A1 8BEC mov ebp, esp 007F13A3 6A00 push $00 007F13A5 6A00 push $00 007F13A7 53 push ebx 007F13A8 8BD8 mov ebx, eax 007F13AA 33C0 xor eax, eax 007F13AC 55 push ebp 007F13AD 6847147F00 push $007F1447 ***** TRY | 007F13B2 64FF30 push dword ptr fs:[eax] 007F13B5 648920 mov fs:[eax], esp * Reference to control TfrmSXCKNewList_SK.ADOQueryTemp : TADOQuery | 007F13B8 8B8318030000 mov eax, [ebx+$0318] | 007F13BE E80D38FCFF call 007B4BD0 007F13C3 83C4F8 add esp, -$08 007F13C6 DD1C24 fstp qword ptr [esp] 007F13C9 9B wait * Reference to control TfrmSXCKNewList_SK.EndDate : TDateTimePicker | 007F13CA 8B832C030000 mov eax, [ebx+$032C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F13D0 E8570EC8FF call 0047222C * Reference to control TfrmSXCKNewList_SK.EndDate : TDateTimePicker | 007F13D5 8B832C030000 mov eax, [ebx+$032C] 007F13DB FFB014020000 push dword ptr [eax+$0214] 007F13E1 FFB010020000 push dword ptr [eax+$0210] * Reference to control TfrmSXCKNewList_SK.BegDate : TDateTimePicker | 007F13E7 8B8328030000 mov eax, [ebx+$0328] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F13ED E83A0EC8FF call 0047222C 007F13F2 8D55FC lea edx, [ebp-$04] *) end; procedure TfrmSXCKNewList_SK.TBRafreshClick(Sender : TObject); begin (* 007F1B34 53 push ebx 007F1B35 8BD8 mov ebx, eax * Reference to control TfrmSXCKNewList_SK.BegDate : TDateTimePicker | 007F1B37 8B8328030000 mov eax, [ebx+$0328] 007F1B3D 8B10 mov edx, [eax] * Reference to method TDateTimePicker.SetFocus() | 007F1B3F FF92C4000000 call dword ptr [edx+$00C4] 007F1B45 8BC3 mov eax, ebx * Reference to : TfrmSXCKNewList_SK._PROC_007F1454() | 007F1B47 E808F9FFFF call 007F1454 007F1B4C 5B pop ebx 007F1B4D C3 ret *) end; procedure TfrmSXCKNewList_SK.ConNoMChange(Sender : TObject); begin (* 007F1B50 55 push ebp 007F1B51 8BEC mov ebp, esp 007F1B53 6A00 push $00 007F1B55 53 push ebx 007F1B56 8BD8 mov ebx, eax 007F1B58 33C0 xor eax, eax 007F1B5A 55 push ebp * Possible String Reference to: '=/[Y]Í@' | 007F1B5B 68B21B7F00 push $007F1BB2 ***** TRY | 007F1B60 64FF30 push dword ptr fs:[eax] 007F1B63 648920 mov fs:[eax], esp * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1B66 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 007F1B6C E8A33ECDFF call 004C5A14 007F1B71 84C0 test al, al 007F1B73 7427 jz 007F1B9C 007F1B75 8D45FC lea eax, [ebp-$04] 007F1B78 50 push eax 007F1B79 B902000000 mov ecx, $00000002 007F1B7E BA01000000 mov edx, $00000001 * Reference to control TfrmSXCKNewList_SK.Panel1 : TPanel | 007F1B83 8B830C030000 mov eax, [ebx+$030C] | 007F1B89 E82245FCFF call 007B60B0 007F1B8E 8B55FC mov edx, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1B91 8B8314030000 mov eax, [ebx+$0314] | 007F1B97 E82C51FCFF call 007B6CC8 007F1B9C 33C0 xor eax, eax 007F1B9E 5A pop edx 007F1B9F 59 pop ecx 007F1BA0 59 pop ecx 007F1BA1 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]Í@' | 007F1BA4 68B91B7F00 push $007F1BB9 007F1BA9 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1BAC E87337C1FF call 00405324 007F1BB1 C3 ret * Reference to: System.@HandleFinally; | 007F1BB2 E93D2FC1FF jmp 00404AF4 007F1BB7 EBF0 jmp 007F1BA9 ****** END | 007F1BB9 5B pop ebx 007F1BBA 59 pop ecx 007F1BBB 5D pop ebp 007F1BBC C3 ret *) end; procedure TfrmSXCKNewList_SK.TBCloseClick(Sender : TObject); begin (* 007F1BC0 55 push ebp 007F1BC1 8BEC mov ebp, esp 007F1BC3 6A00 push $00 007F1BC5 53 push ebx 007F1BC6 8BD8 mov ebx, eax 007F1BC8 33C0 xor eax, eax 007F1BCA 55 push ebp * Possible String Reference to: '.[Y]' | 007F1BCB 68101C7F00 push $007F1C10 ***** TRY | 007F1BD0 64FF30 push dword ptr fs:[eax] 007F1BD3 648920 mov fs:[eax], esp 007F1BD6 8D55FC lea edx, [ebp-$04] 007F1BD9 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F1BDB E8106AC9FF call 004885F0 007F1BE0 8B45FC mov eax, [ebp-$04] * Possible String Reference to: 'ֿ' | 007F1BE3 B9241C7F00 mov ecx, $007F1C24 * Reference to control TfrmSXCKNewList_SK.Tv1 : TcxGridDBTableView | 007F1BE8 8B937C030000 mov edx, [ebx+$037C] | 007F1BEE E8AD5FFCFF call 007B7BA0 007F1BF3 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 007F1BF5 E89E43CBFF call 004A5F98 007F1BFA 33C0 xor eax, eax 007F1BFC 5A pop edx 007F1BFD 59 pop ecx 007F1BFE 59 pop ecx 007F1BFF 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]' | 007F1C02 68171C7F00 push $007F1C17 007F1C07 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1C0A E81537C1FF call 00405324 007F1C0F C3 ret * Reference to: System.@HandleFinally; | 007F1C10 E9DF2EC1FF jmp 00404AF4 007F1C15 EBF0 jmp 007F1C07 ****** END | 007F1C17 5B pop ebx 007F1C18 59 pop ecx 007F1C19 5D pop ebp 007F1C1A C3 ret *) end; procedure TfrmSXCKNewList_SK.FormShow(Sender : TObject); begin (* 007F1C30 55 push ebp 007F1C31 8BEC mov ebp, esp 007F1C33 6A00 push $00 007F1C35 53 push ebx 007F1C36 8BD8 mov ebx, eax 007F1C38 33C0 xor eax, eax 007F1C3A 55 push ebp * Possible String Reference to: 'o.[Y]' | 007F1C3B 68801C7F00 push $007F1C80 ***** TRY | 007F1C40 64FF30 push dword ptr fs:[eax] 007F1C43 648920 mov fs:[eax], esp 007F1C46 8D55FC lea edx, [ebp-$04] 007F1C49 8BC3 mov eax, ebx * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F1C4B E8A069C9FF call 004885F0 007F1C50 8B45FC mov eax, [ebp-$04] * Possible String Reference to: 'ֿ' | 007F1C53 B9941C7F00 mov ecx, $007F1C94 * Reference to control TfrmSXCKNewList_SK.Tv1 : TcxGridDBTableView | 007F1C58 8B937C030000 mov edx, [ebx+$037C] | 007F1C5E E8415DFCFF call 007B79A4 007F1C63 8BC3 mov eax, ebx * Reference to : TfrmSXCKNewList_SK._PROC_007F1454() | 007F1C65 E8EAF7FFFF call 007F1454 007F1C6A 33C0 xor eax, eax 007F1C6C 5A pop edx 007F1C6D 59 pop ecx 007F1C6E 59 pop ecx 007F1C6F 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]' | 007F1C72 68871C7F00 push $007F1C87 007F1C77 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1C7A E8A536C1FF call 00405324 007F1C7F C3 ret * Reference to: System.@HandleFinally; | 007F1C80 E96F2EC1FF jmp 00404AF4 007F1C85 EBF0 jmp 007F1C77 ****** END | 007F1C87 5B pop ebx 007F1C88 59 pop ecx 007F1C89 5D pop ebp 007F1C8A C3 ret *) end; procedure TfrmSXCKNewList_SK.TBExportClick(Sender : TObject); begin (* 007F1CA0 53 push ebx 007F1CA1 8BD8 mov ebx, eax * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1CA3 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F1CA9 E81262CDFF call 004C7EC0 007F1CAE 84C0 test al, al 007F1CB0 7510 jnz 007F1CC2 * Reference to control TfrmSXCKNewList_SK.cxGrid2 : TcxGrid | 007F1CB2 8B9378030000 mov edx, [ebx+$0378] * Possible String Reference to: 'б' | 007F1CB8 B8CC1C7F00 mov eax, $007F1CCC | 007F1CBD E88263FCFF call 007B8044 007F1CC2 5B pop ebx 007F1CC3 C3 ret *) end; procedure TfrmSXCKNewList_SK.TBFindClick(Sender : TObject); begin (* 007F1CDC 55 push ebp 007F1CDD 8BEC mov ebp, esp 007F1CDF 6A00 push $00 007F1CE1 53 push ebx 007F1CE2 8BD8 mov ebx, eax 007F1CE4 33C0 xor eax, eax 007F1CE6 55 push ebp 007F1CE7 68511D7F00 push $007F1D51 ***** TRY | 007F1CEC 64FF30 push dword ptr fs:[eax] 007F1CEF 648920 mov fs:[eax], esp 007F1CF2 8D45FC lea eax, [ebp-$04] 007F1CF5 50 push eax 007F1CF6 B902000000 mov ecx, $00000002 007F1CFB BA01000000 mov edx, $00000001 * Reference to control TfrmSXCKNewList_SK.Panel1 : TPanel | 007F1D00 8B830C030000 mov eax, [ebx+$030C] | 007F1D06 E8A543FCFF call 007B60B0 007F1D0B 8B55FC mov edx, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1D0E 8B8314030000 mov eax, [ebx+$0314] | 007F1D14 E8AF4FFCFF call 007B6CC8 * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1D19 8B9330030000 mov edx, [ebx+$0330] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1D1F 8B8314030000 mov eax, [ebx+$0314] | 007F1D25 E86651FCFF call 007B6E90 * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1D2A 8B9330030000 mov edx, [ebx+$0330] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1D30 8B8314030000 mov eax, [ebx+$0314] | 007F1D36 E8DD52FCFF call 007B7018 007F1D3B 33C0 xor eax, eax 007F1D3D 5A pop edx 007F1D3E 59 pop ecx 007F1D3F 59 pop ecx 007F1D40 648910 mov fs:[eax], edx ****** FINALLY | 007F1D43 68581D7F00 push $007F1D58 007F1D48 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1D4B E8D435C1FF call 00405324 007F1D50 C3 ret * Reference to: System.@HandleFinally; | 007F1D51 E99E2DC1FF jmp 00404AF4 007F1D56 EBF0 jmp 007F1D48 ****** END | 007F1D58 5B pop ebx 007F1D59 59 pop ecx 007F1D5A 5D pop ebp 007F1D5B C3 ret *) end; procedure TfrmSXCKNewList_SK.N1Click(Sender : TObject); begin (* 007F1D5C B201 mov dl, $01 * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1D5E 8B8030030000 mov eax, [eax+$0330] * Reference to : TfrmSelExportField._PROC_007B84A4() | 007F1D64 E83B67FCFF call 007B84A4 007F1D69 C3 ret *) end; procedure TfrmSXCKNewList_SK.N2Click(Sender : TObject); begin (* 007F1D6C 33D2 xor edx, edx * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1D6E 8B8030030000 mov eax, [eax+$0330] * Reference to : TfrmSelExportField._PROC_007B84A4() | 007F1D74 E82B67FCFF call 007B84A4 007F1D79 C3 ret *) end; procedure TfrmSXCKNewList_SK.SPIDKeyPress(Sender : TObject); begin (* 007F1D7C 80390D cmp byte ptr [ecx], $0D 007F1D7F C3 ret *) end; procedure TfrmSXCKNewList_SK.SPIDChange(Sender : TObject); begin (* 007F1D80 55 push ebp 007F1D81 8BEC mov ebp, esp 007F1D83 33C9 xor ecx, ecx 007F1D85 51 push ecx 007F1D86 51 push ecx 007F1D87 51 push ecx 007F1D88 51 push ecx 007F1D89 53 push ebx 007F1D8A 56 push esi 007F1D8B 8BD8 mov ebx, eax 007F1D8D 33C0 xor eax, eax 007F1D8F 55 push ebp * Possible String Reference to: ',^[]ËV' | 007F1D90 681D1E7F00 push $007F1E1D ***** TRY | 007F1D95 64FF30 push dword ptr fs:[eax] 007F1D98 648920 mov fs:[eax], esp 007F1D9B 8D55F8 lea edx, [ebp-$08] * Reference to control TfrmSXCKNewList_SK.SPID : TEdit | 007F1D9E 8B835C030000 mov eax, [ebx+$035C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F1DA4 E84768C9FF call 004885F0 007F1DA9 8B45F8 mov eax, [ebp-$08] 007F1DAC 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F1DAF E8388BC1FF call 0040A8EC 007F1DB4 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 007F1DB7 E83838C1FF call 004055F4 007F1DBC 83F804 cmp eax, +$04 007F1DBF 7D1F jnl 007F1DE0 007F1DC1 8D55F0 lea edx, [ebp-$10] * Reference to control TfrmSXCKNewList_SK.SPID : TEdit | 007F1DC4 8B835C030000 mov eax, [ebx+$035C] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F1DCA E82168C9FF call 004885F0 007F1DCF 8B45F0 mov eax, [ebp-$10] 007F1DD2 8D55F4 lea edx, [ebp-$0C] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F1DD5 E8128BC1FF call 0040A8EC 007F1DDA 837DF400 cmp dword ptr [ebp-$0C], +$00 007F1DDE 750F jnz 007F1DEF * Reference to control TfrmSXCKNewList_SK.TBFind : TToolButton | 007F1DE0 8B8300030000 mov eax, [ebx+$0300] 007F1DE6 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007F1DEA E86527C1FF call 00404554 007F1DEF 33C0 xor eax, eax 007F1DF1 5A pop edx 007F1DF2 59 pop ecx 007F1DF3 59 pop ecx 007F1DF4 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[]ËV' | 007F1DF7 68241E7F00 push $007F1E24 007F1DFC 8D45F0 lea eax, [ebp-$10] * Reference to: System.@LStrClr(void;void); | 007F1DFF E82035C1FF call 00405324 007F1E04 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 007F1E07 E81835C1FF call 00405324 007F1E0C 8D45F8 lea eax, [ebp-$08] * Reference to: System.@LStrClr(void;void); | 007F1E0F E81035C1FF call 00405324 007F1E14 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1E17 E80835C1FF call 00405324 007F1E1C C3 ret * Reference to: System.@HandleFinally; | 007F1E1D E9D22CC1FF jmp 00404AF4 007F1E22 EBD8 jmp 007F1DFC ****** END | 007F1E24 5E pop esi 007F1E25 5B pop ebx 007F1E26 8BE5 mov esp, ebp 007F1E28 5D pop ebp 007F1E29 C3 ret *) end; procedure TfrmSXCKNewList_SK.SPSpecChange(Sender : TObject); begin (* 007F1E2C 56 push esi * Reference to control TfrmSXCKNewList_SK.TBFind : TToolButton | 007F1E2D 8B8000030000 mov eax, [eax+$0300] 007F1E33 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007F1E37 E81827C1FF call 00404554 007F1E3C 5E pop esi 007F1E3D C3 ret *) end; procedure TfrmSXCKNewList_SK.FactoryNameChange(Sender : TObject); begin (* 007F1E40 56 push esi * Reference to control TfrmSXCKNewList_SK.TBFind : TToolButton | 007F1E41 8B8000030000 mov eax, [eax+$0300] 007F1E47 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 007F1E4B E80427C1FF call 00404554 007F1E50 5E pop esi 007F1E51 C3 ret *) end; procedure TfrmSXCKNewList_SK.ToolButton1Click(Sender : TObject); begin (* 007F1E54 55 push ebp 007F1E55 8BEC mov ebp, esp 007F1E57 33C9 xor ecx, ecx 007F1E59 51 push ecx 007F1E5A 51 push ecx 007F1E5B 51 push ecx 007F1E5C 51 push ecx 007F1E5D 51 push ecx 007F1E5E 53 push ebx 007F1E5F 56 push esi 007F1E60 57 push edi 007F1E61 8945FC mov [ebp-$04], eax 007F1E64 33C0 xor eax, eax 007F1E66 55 push ebp * Possible String Reference to: '*_^[]' | 007F1E67 68FE1F7F00 push $007F1FFE ***** TRY | 007F1E6C 64FF30 push dword ptr fs:[eax] 007F1E6F 648920 mov fs:[eax], esp 007F1E72 8B45FC mov eax, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1E75 8B8030030000 mov eax, [eax+$0330] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 007F1E7B E84060CDFF call 004C7EC0 007F1E80 84C0 test al, al 007F1E82 0F8560010000 jnz 007F1FE8 007F1E88 A00C207F00 mov al, byte ptr [$007F200C] 007F1E8D 50 push eax 007F1E8E 8D45EC lea eax, [ebp-$14] 007F1E91 B201 mov dl, $01 * Reference to: Variants.@VarFromBool(TVarData;TVarData;Boolean); | 007F1E93 E8CC6EC2FF call 00418D64 007F1E98 8D4DEC lea ecx, [ebp-$14] 007F1E9B 8B45FC mov eax, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F1E9E 8B8030030000 mov eax, [eax+$0330] * Possible String Reference to: 'ssel' | 007F1EA4 BA18207F00 mov edx, $007F2018 007F1EA9 8B18 mov ebx, [eax] * Reference to method TClientDataSet.Locate(string,Variant,TLocateOptions) | 007F1EAB FF9344020000 call dword ptr [ebx+$0244] 007F1EB1 84C0 test al, al 007F1EB3 751D jnz 007F1ED2 007F1EB5 6A00 push $00 * Possible String Reference to: 'ʾϢ' | 007F1EB7 B920207F00 mov ecx, $007F2020 * Possible String Reference to: 'ûѡݣ' | 007F1EBC BA2C207F00 mov edx, $007F202C *) end; procedure TfrmSXCKNewList_SK.cxTabControl1Change(Sender : TObject); begin (* * Reference to : TfrmSXCKNewList_SK._PROC_007F1454() | 007F2064 E8EBF3FFFF call 007F1454 007F2069 C3 ret *) end; procedure TfrmSXCKNewList_SK.OrderNoKeyPress(Sender : TObject); begin (* 007F206C 55 push ebp 007F206D 8BEC mov ebp, esp 007F206F 6A00 push $00 007F2071 6A00 push $00 007F2073 6A00 push $00 007F2075 6A00 push $00 007F2077 53 push ebx 007F2078 56 push esi 007F2079 8BF0 mov esi, eax 007F207B 33C0 xor eax, eax 007F207D 55 push ebp * Possible String Reference to: '(^[]' | 007F207E 6825227F00 push $007F2225 ***** TRY | 007F2083 64FF30 push dword ptr fs:[eax] 007F2086 648920 mov fs:[eax], esp 007F2089 80390D cmp byte ptr [ecx], $0D 007F208C 0F8568010000 jnz 007F21FA 007F2092 8D55FC lea edx, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.OrderNo : TEdit | 007F2095 8B8674030000 mov eax, [esi+$0374] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F209B E85065C9FF call 004885F0 007F20A0 8B45FC mov eax, [ebp-$04] * Reference to: System.@LStrLen(String):Integer; | or: System.@DynArrayLength; | or: System.DynArraySize(Pointer):Integer; | or: Variants.DynArraySize(Pointer):Integer; | 007F20A3 E84C35C1FF call 004055F4 007F20A8 83F803 cmp eax, +$03 007F20AB 7D1D jnl 007F20CA 007F20AD 6A00 push $00 * Possible String Reference to: 'ʾ' | 007F20AF B934227F00 mov ecx, $007F2234 * Possible String Reference to: '3' | 007F20B4 BA3C227F00 mov edx, $007F223C *) end; procedure TfrmSXCKNewList_SK.ConNOKeyPress(Sender : TObject); begin (* 007F2524 55 push ebp 007F2525 8BEC mov ebp, esp 007F2527 6A00 push $00 007F2529 6A00 push $00 007F252B 6A00 push $00 007F252D 53 push ebx 007F252E 56 push esi 007F252F 8BF0 mov esi, eax 007F2531 33C0 xor eax, eax 007F2533 55 push ebp * Possible String Reference to: 'T$^[]:' | 007F2534 689B267F00 push $007F269B ***** TRY | 007F2539 64FF30 push dword ptr fs:[eax] 007F253C 648920 mov fs:[eax], esp 007F253F 80390D cmp byte ptr [ecx], $0D 007F2542 0F8530010000 jnz 007F2678 * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F2548 8B9E14030000 mov ebx, [esi+$0314] 007F254E 33D2 xor edx, edx 007F2550 8BC3 mov eax, ebx 007F2552 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 007F2554 FF9190010000 call dword ptr [ecx+$0190] 007F255A 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F255C E87333CDFF call 004C58D4 007F2561 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F2563 E844BACEFF call 004DDFAC 007F2568 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F256A FF5244 call dword ptr [edx+$44] 007F256D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F256F E838BACEFF call 004DDFAC * Possible String Reference to: ' select isnull(A.FactoryName,A.ToFa | ctoryName) FactoryName ' | 007F2574 BAB0267F00 mov edx, $007F26B0 007F2579 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F257B FF5138 call dword ptr [ecx+$38] 007F257E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F2580 E827BACEFF call 004DDFAC * Possible String Reference to: ',HYPrice=(select HYPrice from JYOrd | erCon_Sub JS inner join JYOrder_Mai | n JM on JS.Subid=JM.ConSubid where | JM.Mainid=A.OrdMainidCK)' | 007F2585 BAF4267F00 mov edx, $007F26F4 007F258A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F258C FF5138 call dword ptr [ecx+$38] 007F258F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F2591 E816BACEFF call 004DDFAC * Possible String Reference to: ',OrderNO=(select OrderNO from JYOrd | er_Main JM where JM.MainId=A.ORDMai | nIdCK)' | 007F2596 BA80277F00 mov edx, $007F2780 007F259B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F259D FF5138 call dword ptr [ecx+$38] 007F25A0 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F25A2 E805BACEFF call 004DDFAC * Possible String Reference to: ',ConNO=(select ConNO from JYOrder_M | ain JM where JM.MainId=A.ORDMainIdC | K),A.*' | 007F25A7 BAD8277F00 mov edx, $007F27D8 007F25AC 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F25AE FF5138 call dword ptr [ecx+$38] 007F25B1 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F25B3 E8F4B9CEFF call 004DDFAC * Possible String Reference to: ' from CK_SXPB_CR A' | 007F25B8 BA30287F00 mov edx, $007F2830 007F25BD 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F25BF FF5138 call dword ptr [ecx+$38] * Possible String Reference to: ' where (select ConNO from JYOrder_M | ain JM where JM.MainId=A.ORDMainIdC | K) like '%' | 007F25C2 684C287F00 push $007F284C 007F25C7 8D55F4 lea edx, [ebp-$0C] * Reference to control TfrmSXCKNewList_SK.ConNO : TEdit | 007F25CA 8B86D0030000 mov eax, [esi+$03D0] * Reference to: Controls.TControl.GetText(TControl):TCaption; | 007F25D0 E81B60C9FF call 004885F0 007F25D5 8B45F4 mov eax, [ebp-$0C] 007F25D8 8D55F8 lea edx, [ebp-$08] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 007F25DB E80C83C1FF call 0040A8EC 007F25E0 FF75F8 push dword ptr [ebp-$08] 007F25E3 68A8287F00 push $007F28A8 007F25E8 68B4287F00 push $007F28B4 007F25ED 8D45FC lea eax, [ebp-$04] 007F25F0 BA04000000 mov edx, $00000004 * Reference to: System.@LStrCatN; | 007F25F5 E8BA30C1FF call 004056B4 007F25FA 8B45FC mov eax, [ebp-$04] 007F25FD 50 push eax 007F25FE 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F2600 E8A7B9CEFF call 004DDFAC 007F2605 5A pop edx 007F2606 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F2608 FF5138 call dword ptr [ecx+$38] 007F260B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F260D E89AB9CEFF call 004DDFAC * Possible String Reference to: ' and CRType in('۳')' | 007F2612 BAC0287F00 mov edx, $007F28C0 007F2617 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F2619 FF5138 call dword ptr [ecx+$38] * Reference to control TfrmSXCKNewList_SK.cxTabControl1 : TcxTabControl | 007F261C 8B86C4030000 mov eax, [esi+$03C4] * Reference to control ADOTemp : N.A. | 007F2622 83B83C03000000 cmp dword ptr [eax+$033C], +$00 007F2629 7513 jnz 007F263E 007F262B 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F262D E87AB9CEFF call 004DDFAC * Possible String Reference to: ' and not exists(select maiNID from | YF_Money_CR X where X.MainID=A.SPID | ) ' | 007F2632 BAE4287F00 mov edx, $007F28E4 007F2637 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F2639 FF5138 call dword ptr [ecx+$38] 007F263C EB11 jmp 007F264F 007F263E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F2640 E867B9CEFF call 004DDFAC * Possible String Reference to: ' and exists(select maiNID from YF_M | oney_CR X where X.MainID=A.SPID )' | 007F2645 BA38297F00 mov edx, $007F2938 007F264A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F264C FF5138 call dword ptr [ecx+$38] 007F264F 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 007F2651 E87232CDFF call 004C58C8 * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F2656 8B9630030000 mov edx, [esi+$0330] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F265C 8B8614030000 mov eax, [esi+$0314] | 007F2662 E82948FCFF call 007B6E90 * Reference to control TfrmSXCKNewList_SK.CDS_Main : TClientDataSet | 007F2667 8B9630030000 mov edx, [esi+$0330] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F266D 8B8614030000 mov eax, [esi+$0314] | 007F2673 E8A049FCFF call 007B7018 007F2678 33C0 xor eax, eax 007F267A 5A pop edx 007F267B 59 pop ecx 007F267C 59 pop ecx 007F267D 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '^[]:' | 007F2680 68A2267F00 push $007F26A2 007F2685 8D45F4 lea eax, [ebp-$0C] * Reference to: System.@LStrClr(void;void); | 007F2688 E8972CC1FF call 00405324 007F268D 8D45F8 lea eax, [ebp-$08] 007F2690 BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F2695 E8AE2CC1FF call 00405348 007F269A C3 ret * Reference to: System.@HandleFinally; | 007F269B E95424C1FF jmp 00404AF4 007F26A0 EBE3 jmp 007F2685 ****** END | 007F26A2 5E pop esi 007F26A3 5B pop ebx 007F26A4 8BE5 mov esp, ebp 007F26A6 5D pop ebp 007F26A7 C3 ret *) end; procedure TfrmSXCKNewList_SK._PROC_007F0D81(Sender : TObject); begin (* 007F0D81 7064 jo 007F0DE7 007F0D83 61 popa 007F0D84 7465 jz 007F0DEB 007F0D86 205946 and [ecx+$46], bl 007F0D89 5F pop edi 007F0D8A 4D dec ebp 007F0D8B 6F outsd 007F0D8C 6E outsb 007F0D8D 65795F jns 007F0DEF 007F0D90 43 inc ebx 007F0D91 52 push edx 007F0D92 49 dec ecx 007F0D93 44 inc esp 007F0D94 207365 and [ebx+$65], dh 007F0D97 7420 jz 007F0DB9 007F0D99 43 inc ebx 007F0D9A 52 push edx 007F0D9B 49 dec ecx 007F0D9C 44 inc esp 007F0D9D 3D43524944 cmp eax, $44495243 007F0DA2 2B31 sub esi, dword ptr [ecx] 007F0DA4 0000 add [eax], al 007F0DA6 0000 add [eax], al 007F0DA8 FFFF DB $FF, $FF // 007F0DAA FFFF DB $FF, $FF // 007F0DAC 1C00 sbb al, $00 007F0DAE 0000 add [eax], al 007F0DB0 7365 jnb 007F0E17 007F0DB2 6C insb 007F0DB3 656374202A arpl gs:[eax+$2A], si 007F0DB8 206672 and [esi+$72], ah 007F0DBB 6F outsd 007F0DBC 6D insd 007F0DBD 205946 and [ecx+$46], bl 007F0DC0 5F pop edi 007F0DC1 4D dec ebp 007F0DC2 6F outsd 007F0DC3 6E outsb 007F0DC4 65795F jns 007F0E26 007F0DC7 43 inc ebx 007F0DC8 52 push edx 007F0DC9 49 dec ecx 007F0DCA 44 inc esp 007F0DCB 2000 and [eax], al 007F0DCD 0000 add [eax], al 007F0DCF 00FF add bh, bh 007F0DD1 FFFF DB $FF, $FF // 007F0DD3 FF23 jmp dword ptr [ebx] 007F0DD5 0000 add [eax], al 007F0DD7 007365 add [ebx+$65], dh 007F0DDA 6C insb 007F0DDB 656374202A arpl gs:[eax+$2A], si 007F0DE0 206672 and [esi+$72], ah 007F0DE3 6F outsd 007F0DE4 6D insd 007F0DE5 205946 and [ecx+$46], bl 007F0DE8 5F pop edi 007F0DE9 4D dec ebp 007F0DEA 6F outsd 007F0DEB 6E outsb 007F0DEC 65795F jns 007F0E4E 007F0DEF 4B dec ebx 007F0DF0 43 inc ebx 007F0DF1 207768 and [edi+$68], dh 007F0DF4 657265 jb 007F0E5C 007F0DF7 2031 and [ecx], dh 007F0DF9 3D3200FFFF cmp eax, $FFFF0032 007F0DFE FFFF DB $FF, $FF // 007F0E00 0B00 or eax, [eax] 007F0E02 0000 add [eax], al 007F0E04 46 inc esi 007F0E05 61 popa 007F0E06 63746F72 arpl [edi+ebp*2+$72], si 007F0E0A 794E jns 007F0E5A 007F0E0C 61 popa 007F0E0D 6D insd 007F0E0E 6500FF add bh, bh 007F0E11 FFFF DB $FF, $FF // 007F0E13 FF07 inc dword ptr [edi] 007F0E15 0000 add [eax], al 007F0E17 005A64 add [edx+$64], bl 007F0E1A 7953 jns 007F0E6F 007F0E1C 7472 jz 007F0E90 007F0E1E 3100 xor [eax], eax 007F0E20 FFFF DB $FF, $FF // 007F0E22 FFFF DB $FF, $FF // 007F0E24 06 push es 007F0E25 0000 add [eax], al 007F0E27 00D3 add bl, dl 007F0E29 A6 cmpsb 007F0E2A CA ret 007F0E2B D5 aad 007F0E2C CA ret 007F0E2D D5 aad 007F0E2E 0000 add [eax], al 007F0E30 FFFF DB $FF, $FF // 007F0E32 FFFF DB $FF, $FF // 007F0E34 2C00 sub al, $00 007F0E36 0000 add [eax], al 007F0E38 7365 jnb 007F0E9F 007F0E3A 6C insb 007F0E3B 656374202A arpl gs:[eax+$2A], si 007F0E40 206672 and [esi+$72], ah 007F0E43 6F outsd 007F0E44 6D insd 007F0E45 205946 and [ecx+$46], bl 007F0E48 5F pop edi 007F0E49 4D dec ebp 007F0E4A 6F outsd 007F0E4B 6E outsb 007F0E4C 65795F jns 007F0EAE 007F0E4F 43 inc ebx 007F0E50 52 push edx 007F0E51 207768 and [edi+$68], dh 007F0E54 657265 jb 007F0EBC 007F0E57 204661 and [esi+$61], al 007F0E5A 63746F72 arpl [edi+ebp*2+$72], si 007F0E5E 794E jns 007F0EAE 007F0E60 61 popa 007F0E61 6D insd 007F0E62 653D00000000 cmp eax, $00000000 007F0E68 FFFF DB $FF, $FF // 007F0E6A FFFF DB $FF, $FF // 007F0E6C 0F0000 sldt word ptr [eax] 007F0E6F 0020 add [eax], ah 007F0E71 61 popa 007F0E72 6E outsb 007F0E73 64205946 and fs:[ecx+$46], bl 007F0E77 54 push esp 007F0E78 7970 jns 007F0EEA 007F0E7A 6549 dec ecx 007F0E7C 643D2700FFFF cmp eax, $FFFF0027 007F0E82 FFFF DB $FF, $FF // 007F0E84 0400 add al, +$00 007F0E86 0000 add [eax], al 007F0E88 53 push ebx 007F0E89 50 push eax 007F0E8A 49 dec ecx 007F0E8B 44 inc esp 007F0E8C 0000 add [eax], al 007F0E8E 0000 add [eax], al 007F0E90 FFFF DB $FF, $FF // 007F0E92 FFFF DB $FF, $FF // 007F0E94 0100 add [eax], eax 007F0E96 0000 add [eax], al 007F0E98 27 daa 007F0E99 0000 add [eax], al 007F0E9B 00FF add bh, bh 007F0E9D FFFF DB $FF, $FF // 007F0E9F FF0B dec dword ptr [ebx] 007F0EA1 0000 add [eax], al 007F0EA3 005946 add [ecx+$46], bl 007F0EA6 5F pop edi 007F0EA7 4D dec ebp 007F0EA8 6F outsd 007F0EA9 6E outsb 007F0EAA 65795F jns 007F0F0C 007F0EAD 43 inc ebx 007F0EAE 52 push edx 007F0EAF 00FF add bh, bh 007F0EB1 FFFF DB $FF, $FF // 007F0EB3 FF02 inc dword ptr [edx] 007F0EB5 0000 add [eax], al 007F0EB7 005946 add [ecx+$46], bl 007F0EBA 0000 add [eax], al 007F0EBC CC int 3 007F0EBD E1CA loope -$36 007F0EBF BE00000000 mov esi, $00000000 007F0EC4 C8A1 enter , $A1 007F0EC6 C5F7 lds esi, di 007F0EC8 B2BC mov dl, $BC 007F0ECA D3A6CAD5D7EE shl dword ptr [esi+$EED7D5CA], cl 007F0ED0 B4F3 mov ah, $F3 007F0ED2 BAC5CAA7B0 mov edx, $B0A7CAC5 007F0ED7 DC21 fsub qword ptr [ecx] 007F0ED9 0000 add [eax], al 007F0EDB 00FF add bh, bh 007F0EDD FFFF DB $FF, $FF // 007F0EDF FF0400 inc dword ptr [eax+eax] 007F0EE2 0000 add [eax], al 007F0EE4 59 pop ecx 007F0EE5 46 inc esi 007F0EE6 49 dec ecx 007F0EE7 44 inc esp 007F0EE8 0000 add [eax], al 007F0EEA 0000 add [eax], al *) end; procedure TfrmSXCKNewList_SK._PROC_007F0FB4(Sender : TObject); begin (* 007F0FB4 6E outsb 007F0FB5 697400FFFFFFFF01 imul esi, [eax+eax-$01], $01FFFFFF 007F0FBD 0000 add [eax], al *) end; procedure TfrmSXCKNewList_SK._PROC_007F1219(Sender : TObject); begin (* 007F1219 7064 jo 007F127F 007F121B 61 popa 007F121C 7465 jz 007F1283 007F121E 205946 and [ecx+$46], bl 007F1221 5F pop edi 007F1222 4D dec ebp 007F1223 6F outsd 007F1224 6E outsb 007F1225 65795F jns 007F1287 007F1228 43 inc ebx 007F1229 52 push edx 007F122A 205365 and [ebx+$65], dl 007F122D 7420 jz 007F124F 007F122F 48 dec eax 007F1230 59 pop ecx 007F1231 4D dec ebp 007F1232 6F outsd 007F1233 6E outsb 007F1234 65793D jns 007F1274 007F1237 51 push ecx 007F1238 7479 jz 007F12B3 007F123A 2A5072 sub dl, byte ptr [eax+$72] 007F123D 6963652C4D6F6E imul esp, [ebx+$65], $6E6F4D2C 007F1244 65793D jns 007F1284 007F1247 51 push ecx 007F1248 7479 jz 007F12C3 007F124A 2A5072 sub dl, byte ptr [eax+$72] 007F124D 6963652A28312D imul esp, [ebx+$65], $2D31282A 007F1254 59 pop ecx 007F1255 4A dec edx 007F1256 42 inc edx 007F1257 4C dec esp 007F1258 692F31303029 imul ebp, [edi], $29303031 007F125E 2C42 sub al, $42 007F1260 42 inc edx 007F1261 4D dec ebp 007F1262 6F outsd 007F1263 6E outsb 007F1264 65793D jns 007F12A4 007F1267 51 push ecx 007F1268 7479 jz 007F12E3 007F126A 2A5072 sub dl, byte ptr [eax+$72] 007F126D 69636500000000 imul esp, [ebx+$65], $00000000 007F1274 FFFF DB $FF, $FF // 007F1276 FFFF DB $FF, $FF // 007F1278 1100 adc [eax], eax 007F127A 0000 add [eax], al 007F127C 207768 and [edi+$68], dh 007F127F 657265 jb 007F12E7 007F1282 205946 and [ecx+$46], bl 007F1285 54 push esp 007F1286 7970 jns 007F12F8 007F1288 6549 dec ecx 007F128A 643D27000000 cmp eax, $00000027 007F1290 FFFF DB $FF, $FF // 007F1292 FFFF DB $FF, $FF // 007F1294 7700 jnbe 007F1296 007F1296 0000 add [eax], al 007F1298 55 push ebp 007F1299 7064 jo 007F12FF 007F129B 61 popa 007F129C 7465 jz 007F1303 007F129E 205946 and [ecx+$46], bl 007F12A1 5F pop edi 007F12A2 4D dec ebp 007F12A3 6F outsd 007F12A4 6E outsb 007F12A5 65795F jns 007F1307 007F12A8 4B dec ebx 007F12A9 43 inc ebx 007F12AA 205365 and [ebx+$65], dl 007F12AD 7420 jz 007F12CF 007F12AF 4B dec ebx 007F12B0 43 inc ebx 007F12B1 4D dec ebp 007F12B2 6F outsd 007F12B3 6E outsb 007F12B4 65793D jns 007F12F4 007F12B7 287365 sub [ebx+$65], dh 007F12BA 6C insb 007F12BB 6563742069 arpl gs:[eax+$69], si 007F12C0 736E jnb 007F1330 007F12C2 756C jnz 007F1330 007F12C4 6C insb 007F12C5 285375 sub [ebx+$75], dl 007F12C8 6D insd 007F12C9 284859 sub [eax+$59], cl 007F12CC 4D dec ebp 007F12CD 6F outsd 007F12CE 6E outsb 007F12CF 65792A jns 007F12FC 007F12D2 51 push ecx 007F12D3 7479 jz 007F134E 007F12D5 46 inc esi 007F12D6 6C insb 007F12D7 61 popa 007F12D8 67292C sub dword ptr [si], ebp 007F12DB 3029 xor [ecx], ch 007F12DD 206672 and [esi+$72], ah 007F12E0 6F outsd 007F12E1 6D insd 007F12E2 205946 and [ecx+$46], bl 007F12E5 5F pop edi 007F12E6 4D dec ebp 007F12E7 6F outsd 007F12E8 6E outsb 007F12E9 65795F jns 007F134B 007F12EC 43 inc ebx 007F12ED 52 push edx 007F12EE 204120 and [ecx+$20], al 007F12F1 7768 jnbe 007F135B 007F12F3 657265 jb 007F135B 007F12F6 20412E and [ecx+$2E], al 007F12F9 43 inc ebx 007F12FA 52 push edx 007F12FB 49 dec ecx 007F12FC 44 inc esp 007F12FD 3D59465F4D cmp eax, $4D5F4659 007F1302 6F outsd 007F1303 6E outsb 007F1304 65795F jns 007F1366 007F1307 4B dec ebx 007F1308 43 inc ebx 007F1309 2E43 inc ebx 007F130B 52 push edx 007F130C 49 dec ecx 007F130D 44 inc esp 007F130E 2900 sub dword ptr [eax], eax 007F1310 FFFF DB $FF, $FF // 007F1312 FFFF DB $FF, $FF // 007F1314 6300 arpl [eax], ax 007F1316 0000 add [eax], al 007F1318 2C4B sub al, $4B 007F131A 43 inc ebx 007F131B 42 inc edx 007F131C 42 inc edx 007F131D 4D dec ebp 007F131E 6F outsd 007F131F 6E outsb 007F1320 65793D jns 007F1360 007F1323 287365 sub [ebx+$65], dh 007F1326 6C insb 007F1327 6563742069 arpl gs:[eax+$69], si 007F132C 736E jnb 007F139C 007F132E 756C jnz 007F139C 007F1330 6C insb 007F1331 285375 sub [ebx+$75], dl 007F1334 6D insd 007F1335 284242 sub [edx+$42], al 007F1338 4D dec ebp 007F1339 6F outsd 007F133A 6E outsb 007F133B 65792A jns 007F1368 007F133E 51 push ecx 007F133F 7479 jz 007F13BA 007F1341 46 inc esi 007F1342 6C insb 007F1343 61 popa 007F1344 67292C sub dword ptr [si], ebp 007F1347 3029 xor [ecx], ch 007F1349 206672 and [esi+$72], ah 007F134C 6F outsd 007F134D 6D insd 007F134E 205946 and [ecx+$46], bl 007F1351 5F pop edi 007F1352 4D dec ebp 007F1353 6F outsd 007F1354 6E outsb 007F1355 65795F jns 007F13B7 007F1358 43 inc ebx 007F1359 52 push edx 007F135A 204120 and [ecx+$20], al 007F135D 7768 jnbe 007F13C7 007F135F 657265 jb 007F13C7 007F1362 20412E and [ecx+$2E], al 007F1365 43 inc ebx 007F1366 52 push edx 007F1367 49 dec ecx 007F1368 44 inc esp 007F1369 3D59465F4D cmp eax, $4D5F4659 007F136E 6F outsd 007F136F 6E outsb 007F1370 65795F jns 007F13D2 007F1373 4B dec ebx 007F1374 43 inc ebx 007F1375 2E43 inc ebx 007F1377 52 push edx 007F1378 49 dec ecx 007F1379 44 inc esp 007F137A 2900 sub dword ptr [eax], eax 007F137C FFFF DB $FF, $FF // 007F137E FFFF DB $FF, $FF // 007F1380 0C00 or al, $00 007F1382 0000 add [eax], al 007F1384 207768 and [edi+$68], dh 007F1387 657265 jb 007F13EF 007F138A 204352 and [ebx+$52], al 007F138D 49 dec ecx 007F138E 44 inc esp 007F138F 3D00000000 cmp eax, $00000000 007F1394 33C0 xor eax, eax * Reference to GlobalVar_00893CD8 | 007F1396 A3D83C8900 mov dword ptr [$00893CD8], eax 007F139B C3 ret 007F139C C60102 mov byte ptr [ecx], $02 007F139F C3 ret 007F13A0 55 push ebp 007F13A1 8BEC mov ebp, esp 007F13A3 6A00 push $00 007F13A5 6A00 push $00 007F13A7 53 push ebx 007F13A8 8BD8 mov ebx, eax 007F13AA 33C0 xor eax, eax 007F13AC 55 push ebp 007F13AD 6847147F00 push $007F1447 ***** TRY | 007F13B2 64FF30 push dword ptr fs:[eax] 007F13B5 648920 mov fs:[eax], esp * Reference to control Label7 : TLabel | 007F13B8 8B8318030000 mov eax, [ebx+$0318] | 007F13BE E80D38FCFF call 007B4BD0 007F13C3 83C4F8 add esp, -$08 007F13C6 DD1C24 fstp qword ptr [esp] 007F13C9 9B wait * Reference to control Tv1 : TcxGridDBTableView | 007F13CA 8B832C030000 mov eax, [ebx+$032C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F13D0 E8570EC8FF call 0047222C * Reference to control Tv1 : TcxGridDBTableView | 007F13D5 8B832C030000 mov eax, [ebx+$032C] 007F13DB FFB014020000 push dword ptr [eax+$0214] 007F13E1 FFB010020000 push dword ptr [eax+$0210] * Reference to control cxGrid1 : N.A. | 007F13E7 8B8328030000 mov eax, [ebx+$0328] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 007F13ED E83A0EC8FF call 0047222C 007F13F2 8D55FC lea edx, [ebp-$04] *) end; procedure TfrmSXCKNewList_SK._PROC_007F1454(Sender : TObject); begin (* 007F1454 55 push ebp 007F1455 8BEC mov ebp, esp 007F1457 B905000000 mov ecx, $00000005 007F145C 6A00 push $00 007F145E 6A00 push $00 007F1460 49 dec ecx 007F1461 75F9 jnz 007F145C 007F1463 53 push ebx 007F1464 8945FC mov [ebp-$04], eax 007F1467 33C0 xor eax, eax 007F1469 55 push ebp * Possible String Reference to: '3[]' | 007F146A 6820177F00 push $007F1720 ***** TRY | 007F146F 64FF30 push dword ptr fs:[eax] 007F1472 648920 mov fs:[eax], esp 007F1475 33C0 xor eax, eax 007F1477 55 push ebp 007F1478 68FE167F00 push $007F16FE ***** TRY | 007F147D 64FF30 push dword ptr fs:[eax] 007F1480 648920 mov fs:[eax], esp 007F1483 8B45FC mov eax, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1486 8B8014030000 mov eax, [eax+$0314] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 007F148C E8C360CDFF call 004C7554 007F1491 8B45FC mov eax, [ebp-$04] * Reference to control TfrmSXCKNewList_SK.ADOQueryMain : TADOQuery | 007F1494 8B9814030000 mov ebx, [eax+$0314] 007F149A 33D2 xor edx, edx 007F149C 8BC3 mov eax, ebx 007F149E 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_0190 | 007F14A0 FF9190010000 call dword ptr [ecx+$0190] 007F14A6 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 007F14A8 E82744CDFF call 004C58D4 007F14AD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14AF E8F8CACEFF call 004DDFAC 007F14B4 8B10 mov edx, [eax] * Possible reference to virtual method TADOQuery.OFFS_44 | 007F14B6 FF5244 call dword ptr [edx+$44] 007F14B9 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14BB E8ECCACEFF call 004DDFAC * Possible String Reference to: ' select FactoryName=isnull((select | Top 1 JS.CustomerNoName from JYOrde | r_Main JS where JS.Mainid=A.ORDMain | IdCK),A.ToFactoryName) ' | 007F14C0 BA34177F00 mov edx, $007F1734 007F14C5 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F14C7 FF5138 call dword ptr [ecx+$38] 007F14CA 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14CC E8DBCACEFF call 004DDFAC * Possible String Reference to: ',HYPrice=(select Top 1 HYPrice from | JYOrderCon_Sub JS where JS.Subid=A | .ConCKID)' | 007F14D1 BAC0177F00 mov edx, $007F17C0 007F14D6 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F14D8 FF5138 call dword ptr [ecx+$38] 007F14DB 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14DD E8CACACEFF call 004DDFAC * Possible String Reference to: ',YJBLi=(select Top 1 YJBLi from JYO | rderCon_Sub JS where JS.Subid=A.Con | CKID)' | 007F14E2 BA18187F00 mov edx, $007F1818 007F14E7 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F14E9 FF5138 call dword ptr [ecx+$38] 007F14EC 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14EE E8B9CACEFF call 004DDFAC * Possible String Reference to: ',BZType=(select Top 1 PriceUnit fro | m JYOrderCon_Sub JS where JS.Subid= | A.ConCKID)' | 007F14F3 BA6C187F00 mov edx, $007F186C 007F14F8 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F14FA FF5138 call dword ptr [ecx+$38] 007F14FD 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F14FF E8A8CACEFF call 004DDFAC * Possible String Reference to: ',OrderNO=(select OrderNO from JYOrd | er_Main JM where JM.MainId=A.ORDMai | nIdCK)' | 007F1504 BAC8187F00 mov edx, $007F18C8 007F1509 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F150B FF5138 call dword ptr [ecx+$38] 007F150E 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F1510 E897CACEFF call 004DDFAC * Possible String Reference to: ',ComTaiTou=(select Top 1 JS.SYRName | from JYOrderCon_Main JS where JS.C | onNo=A.ConNo)' | 007F1515 BA20197F00 mov edx, $007F1920 007F151A 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F151C FF5138 call dword ptr [ecx+$38] 007F151F 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F1521 E886CACEFF call 004DDFAC * Possible String Reference to: ',A.*' | 007F1526 BA7C197F00 mov edx, $007F197C 007F152B 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F152D FF5138 call dword ptr [ecx+$38] 007F1530 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F1532 E875CACEFF call 004DDFAC * Possible String Reference to: ' from CK_SXPB_CR A' | 007F1537 BA8C197F00 mov edx, $007F198C 007F153C 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F153E FF5138 call dword ptr [ecx+$38] 007F1541 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | 007F1543 E864CACEFF call 004DDFAC * Possible String Reference to: ' where CRType in('۳',' | ') ' | 007F1548 BAA8197F00 mov edx, $007F19A8 007F154D 8B08 mov ecx, [eax] * Possible reference to virtual method TADOQuery.OFFS_38 | 007F154F FF5138 call dword ptr [ecx+$38] 007F1552 8D55F8 lea edx, [ebp-$08] *) end; procedure TfrmSXCKNewList_SK._PROC_007F1888(Sender : TObject); begin (* 007F1888 6E outsb 007F1889 69742066726F6D20 imul esi, [eax+$66], $206D6F72 007F1891 4A dec edx 007F1892 59 pop ecx 007F1893 4F dec edi 007F1894 7264 jb 007F18FA 007F1896 657243 jb 007F18DC 007F1899 6F outsd 007F189A 6E outsb 007F189B 5F pop edi 007F189C 53 push ebx 007F189D 7562 jnz 007F1901 007F189F 204A53 and [edx+$53], cl 007F18A2 207768 and [edi+$68], dh 007F18A5 657265 jb 007F190D 007F18A8 204A53 and [edx+$53], cl 007F18AB 2E53 push ebx 007F18AD 7562 jnz 007F1911 007F18AF 69643D412E436F6E imul esp, [ebp+edi+$41], $6E6F432E 007F18B7 43 inc ebx 007F18B8 4B dec ebx 007F18B9 49 dec ecx 007F18BA 44 inc esp 007F18BB 2900 sub dword ptr [eax], eax 007F18BD 0000 add [eax], al 007F18BF 00FF add bh, bh 007F18C1 FFFF DB $FF, $FF // 007F18C3 FF4C0000 dec dword ptr [eax+eax+$00] 007F18C7 002C4F add [edi+ecx*2], ch 007F18CA 7264 jb 007F1930 007F18CC 65724E jb 007F191D 007F18CF 4F dec edi 007F18D0 3D2873656C cmp eax, $6C657328 007F18D5 656374204F arpl gs:[eax+$4F], si 007F18DA 7264 jb 007F1940 007F18DC 65724E jb 007F192D 007F18DF 4F dec edi 007F18E0 206672 and [esi+$72], ah 007F18E3 6F outsd 007F18E4 6D insd 007F18E5 204A59 and [edx+$59], cl 007F18E8 4F dec edi 007F18E9 7264 jb 007F194F 007F18EB 65725F jb 007F194D 007F18EE 4D dec ebp 007F18EF 61 popa 007F18F0 696E204A4D2077 imul ebp, [esi+$20], $77204D4A 007F18F7 6865726520 push $20657265 007F18FC 4A dec edx 007F18FD 4D dec ebp 007F18FE 2E4D dec ebp 007F1900 61 popa 007F1901 696E49643D412E imul ebp, [esi+$49], $2E413D64 007F1908 4F dec edi 007F1909 52 push edx 007F190A 44 inc esp 007F190B 4D dec ebp 007F190C 61 popa 007F190D 696E4964434B29 imul ebp, [esi+$49], $294B4364 007F1914 0000 add [eax], al 007F1916 0000 add [eax], al 007F1918 FFFF DB $FF, $FF // 007F191A FFFF DB $FF, $FF // 007F191C 53 push ebx 007F191D 0000 add [eax], al 007F191F 002C43 add [ebx+eax*2], ch 007F1922 6F outsd 007F1923 6D insd 007F1924 54 push esp 007F1925 61 popa 007F1926 69546F753D287365 imul edx, [edi+ebp*2+$75], $6573283D 007F192E 6C insb 007F192F 6563742054 arpl gs:[eax+$54], si 007F1934 6F outsd 007F1935 7020 jo 007F1957 007F1937 3120 xor [eax], esp 007F1939 4A dec edx 007F193A 53 push ebx 007F193B 2E53 push ebx 007F193D 59 pop ecx 007F193E 52 push edx 007F193F 4E dec esi 007F1940 61 popa 007F1941 6D insd 007F1942 65206672 and gs:[esi+$72], ah 007F1946 6F outsd 007F1947 6D insd 007F1948 204A59 and [edx+$59], cl 007F194B 4F dec edi 007F194C 7264 jb 007F19B2 007F194E 657243 jb 007F1994 007F1951 6F outsd 007F1952 6E outsb 007F1953 5F pop edi 007F1954 4D dec ebp 007F1955 61 popa 007F1956 696E204A532077 imul ebp, [esi+$20], $7720534A 007F195D 6865726520 push $20657265 007F1962 4A dec edx 007F1963 53 push ebx 007F1964 2E43 inc ebx 007F1966 6F outsd 007F1967 6E outsb 007F1968 4E dec esi 007F1969 6F outsd 007F196A 3D412E436F cmp eax, $6F432E41 007F196F 6E outsb 007F1970 4E dec esi 007F1971 6F outsd 007F1972 2900 sub dword ptr [eax], eax 007F1974 FFFF DB $FF, $FF // 007F1976 FFFF DB $FF, $FF // 007F1978 0400 add al, +$00 007F197A 0000 add [eax], al 007F197C 2C41 sub al, $41 007F197E 2E2A00 sub al, byte ptr cs:[eax] 007F1981 0000 add [eax], al 007F1983 00FF add bh, bh 007F1985 FFFF DB $FF, $FF // 007F1987 FF12 call dword ptr [edx] 007F1989 0000 add [eax], al 007F198B 0020 add [eax], ah 007F198D 66726F jb 007F19FF 007F1990 6D insd 007F1991 20434B and [ebx+$4B], al 007F1994 5F pop edi 007F1995 53 push ebx 007F1996 58 pop eax 007F1997 50 push eax 007F1998 42 inc edx 007F1999 5F pop edi 007F199A 43 inc ebx 007F199B 52 push edx 007F199C 204100 and [ecx+$00], al 007F199F 00FF add bh, bh 007F19A1 FFFF DB $FF, $FF // 007F19A3 FF28 jmp [eax] 007F19A5 0000 add [eax], al 007F19A7 0020 add [eax], ah 007F19A9 7768 jnbe 007F1A13 007F19AB 657265 jb 007F1A13 007F19AE 204352 and [ebx+$52], al 007F19B1 54 push esp 007F19B2 7970 jns 007F1A24 007F19B4 6520696E and gs:[ecx+$6E], ch 007F19B8 2827 sub [edi], ah 007F19BA CF iret 007F19BB FA cli 007F19BC CA ret 007F19BD DBB3 DB $DB, $B3 // 007F19BF F6BFE2272C27 idiv byte ptr [edi+$272C27E2] 007F19C5 BFE2B4E6CF mov edi, $CFE6B4E2 007F19CA FA cli 007F19CB CA ret 007F19CC DB27 DB $DB, $27 // 007F19CE 2920 sub dword ptr [eax], esp 007F19D0 0000 add [eax], al 007F19D2 0000 add [eax], al 007F19D4 FFFF DB $FF, $FF // 007F19D6 FFFF DB $FF, $FF // 007F19D8 06 push es 007F19D9 0000 add [eax], al 007F19DB 00B8DFC8A8CF add [eax+$CFA8C8DF], bh 007F19E1 DE00 fiadd word ptr [eax] 007F19E3 00FF add bh, bh 007F19E5 FFFF DB $FF, $FF // 007F19E7 FF4900 dec dword ptr [ecx+$00] 007F19EA 0000 add [eax], al 007F19EC 20616E and [ecx+$6E], ah 007F19EF 642028 and fs:[eax], ch 007F19F2 7365 jnb 007F1A59 007F19F4 6C insb 007F19F5 656374204A arpl gs:[eax+$4A], si 007F19FA 4D dec ebp 007F19FB 2E59 pop ecx 007F19FD 57 push edi 007F19FE 59 pop ecx 007F19FF 206672 and [esi+$72], ah 007F1A02 6F outsd 007F1A03 6D insd 007F1A04 204A59 and [edx+$59], cl 007F1A07 4F dec edi 007F1A08 7264 jb 007F1A6E 007F1A0A 65725F jb 007F1A6C 007F1A0D 4D dec ebp 007F1A0E 61 popa 007F1A0F 696E204A4D2077 imul ebp, [esi+$20], $77204D4A 007F1A16 6865726520 push $20657265 007F1A1B 4A dec edx 007F1A1C 4D dec ebp 007F1A1D 2E4D dec ebp 007F1A1F 61 popa 007F1A20 696E49643D412E imul ebp, [esi+$49], $2E413D64 007F1A27 4F dec edi 007F1A28 52 push edx 007F1A29 44 inc esp 007F1A2A 4D dec ebp 007F1A2B 61 popa 007F1A2C 696E4964434B29 imul ebp, [esi+$49], $294B4364 007F1A33 3D27000000 cmp eax, $00000027 007F1A38 FFFF DB $FF, $FF // 007F1A3A FFFF DB $FF, $FF // 007F1A3C 0100 add [eax], eax 007F1A3E 0000 add [eax], al 007F1A40 27 daa 007F1A41 0000 add [eax], al 007F1A43 00FF add bh, bh 007F1A45 FFFF DB $FF, $FF // 007F1A47 FF10 call dword ptr [eax] 007F1A49 0000 add [eax], al 007F1A4B 0020 add [eax], ah 007F1A4D 61 popa 007F1A4E 6E outsb 007F1A4F 6420412E and fs:[ecx+$2E], al 007F1A53 43 inc ebx 007F1A54 52 push edx 007F1A55 54 push esp 007F1A56 696D653E3D2700 imul ebp, [ebp+$65], $00273D3E 007F1A5D 0000 add [eax], al 007F1A5F 00FF add bh, bh 007F1A61 FFFF DB $FF, $FF // 007F1A63 FF0A dec dword ptr [edx] 007F1A65 0000 add [eax], al 007F1A67 007979 add [ecx+$79], bh 007F1A6A 7979 jns 007F1AE5 007F1A6C 2D4D4D2D64 sub eax, $642D4D4D 007F1A71 640000 add fs:[eax], al 007F1A74 FFFF DB $FF, $FF // 007F1A76 FFFF DB $FF, $FF // 007F1A78 0F0000 sldt word ptr [eax] 007F1A7B 0020 add [eax], ah 007F1A7D 61 popa 007F1A7E 6E outsb 007F1A7F 6420412E and fs:[ecx+$2E], al 007F1A83 43 inc ebx 007F1A84 52 push edx 007F1A85 54 push esp 007F1A86 696D653C270000 imul ebp, [ebp+$65], $0000273C 007F1A8D 00803FFFFFFF add [eax+$FFFFFF3F], al 007F1A93 FF4A00 dec dword ptr [edx+$00] 007F1A96 0000 add [eax], al 007F1A98 20616E and [ecx+$6E], ah 007F1A9B 64206E6F and fs:[esi+$6F], ch 007F1A9F 7420 jz 007F1AC1 007F1AA1 657869 js 007F1B0D 007F1AA4 7374 jnb 007F1B1A 007F1AA6 7328 jnb 007F1AD0 007F1AA8 7365 jnb 007F1B0F 007F1AAA 6C insb 007F1AAB 656374206D arpl gs:[eax+$6D], si 007F1AB0 61 popa 007F1AB1 694E4944206672 imul ecx, [esi+$49], $72662044 007F1AB8 6F outsd 007F1AB9 6D insd 007F1ABA 205946 and [ecx+$46], bl 007F1ABD 5F pop edi 007F1ABE 4D dec ebp 007F1ABF 6F outsd 007F1AC0 6E outsb 007F1AC1 65795F jns 007F1B23 007F1AC4 43 inc ebx 007F1AC5 52 push edx 007F1AC6 205820 and [eax+$20], bl 007F1AC9 7768 jnbe 007F1B33 007F1ACB 657265 jb 007F1B33 007F1ACE 20582E and [eax+$2E], bl 007F1AD1 59 pop ecx 007F1AD2 46 inc esi 007F1AD3 54 push esp 007F1AD4 7970 jns 007F1B46 007F1AD6 6549 dec ecx 007F1AD8 643D412E5350 cmp eax, $50532E41 007F1ADE 49 dec ecx 007F1ADF 44 inc esp 007F1AE0 2920 sub dword ptr [eax], esp 007F1AE2 0000 add [eax], al 007F1AE4 FFFF DB $FF, $FF // 007F1AE6 FFFF DB $FF, $FF // 007F1AE8 45 inc ebp 007F1AE9 0000 add [eax], al 007F1AEB 0020 add [eax], ah 007F1AED 61 popa 007F1AEE 6E outsb 007F1AEF 64206578 and fs:[ebp+$78], ah 007F1AF3 69737473287365 imul esi, [ebx+$74], $65732873 007F1AFA 6C insb 007F1AFB 656374206D arpl gs:[eax+$6D], si 007F1B00 61 popa 007F1B01 694E4944206672 imul ecx, [esi+$49], $72662044 007F1B08 6F outsd 007F1B09 6D insd 007F1B0A 205946 and [ecx+$46], bl 007F1B0D 5F pop edi 007F1B0E 4D dec ebp 007F1B0F 6F outsd 007F1B10 6E outsb 007F1B11 65795F jns 007F1B73 007F1B14 43 inc ebx 007F1B15 52 push edx 007F1B16 205820 and [eax+$20], bl 007F1B19 7768 jnbe 007F1B83 007F1B1B 657265 jb 007F1B83 007F1B1E 20582E and [eax+$2E], bl 007F1B21 59 pop ecx 007F1B22 46 inc esi 007F1B23 54 push esp 007F1B24 7970 jns 007F1B96 007F1B26 6549 dec ecx 007F1B28 643D412E5350 cmp eax, $50532E41 007F1B2E 49 dec ecx 007F1B2F 44 inc esp 007F1B30 2900 sub dword ptr [eax], eax 007F1B32 0000 add [eax], al 007F1B34 53 push ebx 007F1B35 8BD8 mov ebx, eax * Reference to control cxGrid1 : N.A. | 007F1B37 8B8328030000 mov eax, [ebx+$0328] 007F1B3D 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_00C4 | 007F1B3F FF92C4000000 call dword ptr [edx+$00C4] 007F1B45 8BC3 mov eax, ebx * Reference to : TfrmSXCKNewList_SK._PROC_007F1454() | 007F1B47 E808F9FFFF call 007F1454 007F1B4C 5B pop ebx 007F1B4D C3 ret 007F1B4E 8BC0 mov eax, eax 007F1B50 55 push ebp 007F1B51 8BEC mov ebp, esp 007F1B53 6A00 push $00 007F1B55 53 push ebx 007F1B56 8BD8 mov ebx, eax 007F1B58 33C0 xor eax, eax 007F1B5A 55 push ebp * Possible String Reference to: '=/[Y]Í@' | 007F1B5B 68B21B7F00 push $007F1BB2 ***** TRY | 007F1B60 64FF30 push dword ptr fs:[eax] 007F1B63 648920 mov fs:[eax], esp * Reference to control DlyDate : N.A. | 007F1B66 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 007F1B6C E8A33ECDFF call 004C5A14 007F1B71 84C0 test al, al 007F1B73 7427 jz 007F1B9C 007F1B75 8D45FC lea eax, [ebp-$04] 007F1B78 50 push eax 007F1B79 B902000000 mov ecx, $00000002 007F1B7E BA01000000 mov edx, $00000001 * Reference to control OrdDate : N.A. | 007F1B83 8B830C030000 mov eax, [ebx+$030C] | 007F1B89 E82245FCFF call 007B60B0 007F1B8E 8B55FC mov edx, [ebp-$04] * Reference to control DlyDate : N.A. | 007F1B91 8B8314030000 mov eax, [ebx+$0314] | 007F1B97 E82C51FCFF call 007B6CC8 007F1B9C 33C0 xor eax, eax 007F1B9E 5A pop edx 007F1B9F 59 pop ecx 007F1BA0 59 pop ecx 007F1BA1 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]Í@' | 007F1BA4 68B91B7F00 push $007F1BB9 007F1BA9 8D45FC lea eax, [ebp-$04] * Reference to: System.@LStrClr(void;void); | 007F1BAC E87337C1FF call 00405324 007F1BB1 C3 ret *) end; procedure TfrmSXCKNewList_SK._PROC_007F2981(Sender : TObject); begin (* 007F2981 8BEC mov ebp, esp 007F2983 33C0 xor eax, eax 007F2985 55 push ebp * Possible String Reference to: 'J!]Ë-<' | 007F2986 68A5297F00 push $007F29A5 ***** TRY | 007F298B 64FF30 push dword ptr fs:[eax] 007F298E 648920 mov fs:[eax], esp 007F2991 FF05DC3C8900 inc dword ptr [$00893CDC] 007F2997 33C0 xor eax, eax 007F2999 5A pop edx 007F299A 59 pop ecx 007F299B 59 pop ecx 007F299C 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']Ë-<' | 007F299F 68AC297F00 push $007F29AC 007F29A4 C3 ret * Reference to: System.@HandleFinally; | 007F29A5 E94A21C1FF jmp 00404AF4 007F29AA EBF8 jmp 007F29A4 ****** END | 007F29AC 5D pop ebp 007F29AD C3 ret *) end; procedure TfrmSXCKNewList_SK._PROC_007F29B0(Sender : TObject); begin (* 007F29B0 832DDC3C890001 sub dword ptr [$00893CDC], +$01 007F29B7 C3 ret *) end; procedure TfrmSXCKNewList_SK._PROC_007F29B8(Sender : TObject); begin (* 007F29B8 042A add al, +$2A 007F29BA 7F00 jnle 007F29BC 007F29BC 0000 add [eax], al *) end; procedure TfrmSXCKNewList_SK._PROC_007F2A1E(Sender : TObject); begin (* 007F2A1E 48 dec eax 007F2A1F 0050D4 add [eax-$2C], dl 007F2A22 42 inc edx 007F2A23 0008 add [eax], cl 007F2A25 2D4A007CD0 sub eax, $D07C004A 007F2A2A 42 inc edx 007F2A2B 00F4 add ah, dh 007F2A2D 6B4A00D0 imul ecx, [edx+$00], $D0 007F2A31 1D4A0030F6 sbb eax, $F630004A 007F2A36 48 dec eax 007F2A37 004CFB48 add [ebx+edi*8+$48], cl 007F2A3B 0098FA48000C add [eax+$C0048FA], bl 007F2A41 7948 jns 007F2A8B 007F2A43 00ACF04800E829 add [eax+esi*8+$29E80048], ch 007F2A4A 4A dec edx 007F2A4B 00E4 add ah, ah 007F2A4D ED in eax, dx 007F2A4E 48 dec eax 007F2A4F 00547848 add [eax+edi*2+$48], dl 007F2A53 005878 add [eax+$78], bl 007F2A56 48 dec eax 007F2A57 00DC add ah, bl 007F2A59 2A4A00 sub cl, byte ptr [edx+$00] 007F2A5C 3CA9 cmp al, $A9 007F2A5E 48 dec eax 007F2A5F 00C0 add al, al 007F2A61 834800D0 or dword ptr [eax+$00], -$30 007F2A65 7948 jns 007F2AAF 007F2A67 004C8548 add [ebp+eax*4+$48], cl 007F2A6B 00D0 add al, dl 007F2A6D 2C4A sub al, $4A 007F2A6F 009C2B4A008486 add [ebx+ebp+$8684004A], bl 007F2A76 48 dec eax 007F2A77 00482D add [eax+$2D], cl 007F2A7A 4A dec edx 007F2A7B 00C0 add al, al 007F2A7D A9480038EE test eax, $EE380048 007F2A82 48 dec eax 007F2A83 00F4 add ah, dh 007F2A85 EE out dx, al 007F2A86 48 dec eax 007F2A87 00F0 add al, dh 007F2A89 E94800D8EE jmp EF572AD6 007F2A8E 48 dec eax 007F2A8F 00D8 add al, bl 007F2A91 1B4A00 sbb ecx, [edx+$00] 007F2A94 EC in al, dx 007F2A95 334A00 xor ecx, [edx+$00] 007F2A98 20C4 and ah, al 007F2A9A 48 dec eax 007F2A9B 00B0404A0010 add [eax+$10004A40], dh 007F2AA1 44 inc esp 007F2AA2 4A dec edx 007F2AA3 00CC add ah, cl 007F2AA5 42 inc edx 007F2AA6 4A dec edx 007F2AA7 00B8C44800BC add [eax+$BC0048C4], bh 007F2AAD C44800 les ecx, [eax+$00] 007F2AB0 48 dec eax 007F2AB1 45 inc ebp 007F2AB2 4A dec edx 007F2AB3 001CC3 add [ebx+eax*8], bl 007F2AB6 48 dec eax 007F2AB7 0018 add [eax], bl 007F2AB9 F0 lock 007F2ABA 48 dec eax 007F2ABB 00444C4A add [esp+ecx*2+$4A], al 007F2ABF 000C02 add [edx+eax], cl 007F2AC2 49 dec ecx 007F2AC3 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 007F2ACA 4A dec edx 007F2ACB 008C154A003C18 add [ebp+edx+$183C004A], cl 007F2AD2 4A dec edx 007F2AD3 0038 add [eax], bh 007F2AD5 52 push edx 007F2AD6 4A dec edx 007F2AD7 005C224A add [edx+$4A], bl 007F2ADB 00D8 add al, bl 007F2ADD 224A00 and cl, byte ptr [edx+$00] 007F2AE0 7C68 jl 007F2B4A 007F2AE2 4A dec edx 007F2AE3 00941F4A003C60 add [edi+ebx+$603C004A], dl 007F2AEA 4A dec edx 007F2AEB 001447 add [edi+eax*2], dl 007F2AEE 4A dec edx 007F2AEF 0034654A00CC2C add [$2CCC004A], dh 007F2AF6 4A dec edx 007F2AF7 000E add [esi], cl 007F2AF9 0000 add [eax], al 007F2AFB 0000 add [eax], al 007F2AFD 0006 add [esi], al 007F2AFF 0000 add [eax], al 007F2B01 0020 add [eax], ah 007F2B03 114000 adc [eax+$00], eax 007F2B06 100400 adc [eax+eax], al 007F2B09 0020 add [eax], ah 007F2B0B 114000 adc [eax+$00], eax 007F2B0E 1404 adc al, $04 007F2B10 0000 add [eax], al 007F2B12 2011 and [ecx], dl 007F2B14 40 inc eax 007F2B15 0018 add [eax], bl 007F2B17 0400 add al, +$00 007F2B19 0020 add [eax], ah 007F2B1B 114000 adc [eax+$00], eax 007F2B1E 1C04 sbb al, $04 007F2B20 0000 add [eax], al 007F2B22 2011 and [ecx], dl 007F2B24 40 inc eax 007F2B25 0020 add [eax], ah 007F2B27 0400 add al, +$00 007F2B29 0020 add [eax], ah 007F2B2B 114000 adc [eax+$00], eax 007F2B2E 2404 and al, $04 007F2B30 0000 add [eax], al 007F2B32 45 inc ebp 007F2B33 005034 add [eax+$34], dl 007F2B36 7F00 jnle 007F2B38 007F2B38 F8 clc 007F2B39 0200 add al, byte ptr [eax] 007F2B3B 0000 add [eax], al 007F2B3D 0008 add [eax], cl 007F2B3F 54 push esp 007F2B40 6F outsd 007F2B41 6F outsd 007F2B42 6C insb 007F2B43 42 inc edx 007F2B44 61 popa 007F2B45 7231 jb 007F2B78 007F2B47 FC cld 007F2B48 0200 add al, byte ptr [eax] 007F2B4A 0001 add [ecx], al 007F2B4C 0009 add [ecx], cl 007F2B4E 54 push esp 007F2B4F 42 inc edx 007F2B50 52 push edx 007F2B51 61 popa 007F2B52 667265 jb 007F2BBA 007F2B55 7368 jnb 007F2BBF 007F2B57 0003 add [ebx], al 007F2B59 0000 add [eax], al 007F2B5B 0100 add [eax], eax 007F2B5D 0554424465 add eax, +$65444254 007F2B62 6C insb 007F2B63 0403 add al, +$03 007F2B65 0000 add [eax], al 007F2B67 0100 add [eax], eax 007F2B69 07 pop es 007F2B6A 54 push esp 007F2B6B 42 inc edx 007F2B6C 43 inc ebx 007F2B6D 6C insb 007F2B6E 6F outsd 007F2B6F 7365 jnb 007F2BD6 007F2B71 0803 or [ebx], al 007F2B73 0000 add [eax], al 007F2B75 0200 add al, byte ptr [eax] 007F2B77 0C41 or al, $41 007F2B79 44 inc esp 007F2B7A 4F dec edi 007F2B7B 51 push ecx 007F2B7C 7565 jnz 007F2BE3 007F2B7E 7279 jb 007F2BF9 007F2B80 54 push esp 007F2B81 656D insd 007F2B83 700C jo 007F2B91 007F2B85 0300 add eax, [eax] 007F2B87 0002 add [edx], al 007F2B89 000B add [ebx], cl 007F2B8B 41 inc ecx 007F2B8C 44 inc esp 007F2B8D 4F dec edi 007F2B8E 51 push ecx 007F2B8F 7565 jnz 007F2BF6 007F2B91 7279 jb 007F2C0C 007F2B93 43 inc ebx 007F2B94 6D insd 007F2B95 641003 adc fs:[ebx], al 007F2B98 0000 add [eax], al 007F2B9A 0300 add eax, [eax] 007F2B9C 06 push es 007F2B9D 50 push eax 007F2B9E 61 popa 007F2B9F 6E outsb 007F2BA0 656C insb 007F2BA2 311403 xor [ebx+eax], edx 007F2BA5 0000 add [eax], al 007F2BA7 0100 add [eax], eax 007F2BA9 0B546F6F or edx, [edi+ebp*2+$6F] 007F2BAD 6C insb 007F2BAE 42 inc edx 007F2BAF 7574 jnz 007F2C25 007F2BB1 746F jz 007F2C22 007F2BB3 6E outsb 007F2BB4 3218 xor bl, byte ptr [eax] 007F2BB6 0300 add eax, [eax] 007F2BB8 000400 add [eax+eax], al 007F2BBB 06 push es 007F2BBC 4C dec esp 007F2BBD 61 popa 007F2BBE 62656C bound esp, qword ptr [ebp+$6C] 007F2BC1 311C03 xor [ebx+eax], ebx 007F2BC4 0000 add [eax], al 007F2BC6 0500065946 add eax, +$46590600 007F2BCB 4E dec esi 007F2BCC 61 popa 007F2BCD 6D insd 007F2BCE 652003 and gs:[ebx], al 007F2BD1 0000 add [eax], al 007F2BD3 0200 add al, byte ptr [eax] 007F2BD5 0C41 or al, $41 007F2BD7 44 inc esp 007F2BD8 4F dec edi 007F2BD9 51 push ecx 007F2BDA 7565 jnz 007F2C41 007F2BDC 7279 jb 007F2C57 007F2BDE 4D dec ebp 007F2BDF 61 popa 007F2BE0 696E2403000001 imul ebp, [esi+$24], $01000003 007F2BE7 000B add [ebx], cl 007F2BE9 54 push esp 007F2BEA 6F outsd 007F2BEB 6F outsd 007F2BEC 6C insb 007F2BED 42 inc edx 007F2BEE 7574 jnz 007F2C64 007F2BF0 746F jz 007F2C61 007F2BF2 6E outsb 007F2BF3 3128 xor [eax], ebp 007F2BF5 0300 add eax, [eax] 007F2BF7 0006 add [esi], al 007F2BF9 0003 add [ebx], al 007F2BFB 52 push edx 007F2BFC 4D dec ebp 007F2BFD 312C03 xor [ebx+eax], ebp 007F2C00 0000 add [eax], al 007F2C02 07 pop es 007F2C03 0009 add [ecx], cl 007F2C05 52 push edx 007F2C06 4D dec ebp 007F2C07 44 inc esp 007F2C08 42 inc edx 007F2C09 5F pop edi 007F2C0A 4D dec ebp 007F2C0B 61 popa 007F2C0C 696E3003000008 imul ebp, [esi+$30], $08000003 007F2C13 0007 add [edi], al 007F2C15 637847 arpl [eax+$47], di 007F2C18 7269 jb 007F2C83 007F2C1A 64323403 xor dh, byte ptr fs:[ebx+eax] 007F2C1E 0000 add [eax], al 007F2C20 0900 or [eax], eax 007F2C22 03547632 add edx, [esi+esi*2+$32] 007F2C26 3803 cmp [ebx], al 007F2C28 0000 add [eax], al 007F2C2A 0A00 or al, byte ptr [eax] 007F2C2C 0F637847 packusdw MM7, [eax+$47] 007F2C30 7269 jb 007F2C9B 007F2C32 6444 inc esp 007F2C34 42 inc edx 007F2C35 43 inc ebx 007F2C36 6F outsd 007F2C37 6C insb 007F2C38 756D jnz 007F2CA7 007F2C3A 6E outsb 007F2C3B 313C03 xor [ebx+eax], edi 007F2C3E 0000 add [eax], al 007F2C40 0A00 or al, byte ptr [eax] 007F2C42 086378 or [ebx+$78], ah 007F2C45 59 pop ecx 007F2C46 46 inc esi 007F2C47 4E dec esi 007F2C48 61 popa 007F2C49 6D insd 007F2C4A 6540 inc eax 007F2C4C 0300 add eax, [eax] 007F2C4E 000B add [ebx], cl 007F2C50 000C63 add [ebx], cl 007F2C53 7847 js 007F2C9C 007F2C55 7269 jb 007F2CC0 007F2C57 644C dec esp 007F2C59 657665 jbe 007F2CC1 007F2C5C 6C insb 007F2C5D 31440300 xor [ebx+eax+$00], eax 007F2C61 000400 add [eax+eax], al 007F2C64 06 push es 007F2C65 4C dec esp 007F2C66 61 popa 007F2C67 62656C bound esp, qword ptr [ebp+$6C] 007F2C6A 324803 xor cl, byte ptr [eax+$03] 007F2C6D 0000 add [eax], al 007F2C6F 0400 add al, +$00 007F2C71 06 push es 007F2C72 4C dec esp 007F2C73 61 popa 007F2C74 62656C bound esp, qword ptr [ebp+$6C] 007F2C77 364C dec esp 007F2C79 0300 add eax, [eax] 007F2C7B 000C00 add [eax+eax], cl 007F2C7E 07 pop es 007F2C7F 626567 bound esp, qword ptr [ebp+$67] 007F2C82 6461 popa 007F2C84 7465 jz 007F2CEB 007F2C86 50 push eax 007F2C87 0300 add eax, [eax] 007F2C89 000C00 add [eax+eax], cl 007F2C8C 07 pop es 007F2C8D 45 inc ebp 007F2C8E 6E outsb 007F2C8F 646461 popa 007F2C92 7465 jz 007F2CF9 007F2C94 54 push esp 007F2C95 0300 add eax, [eax] 007F2C97 000D00106378 add [$78631000], cl 007F2C9D 47 inc edi 007F2C9E 7269 jb 007F2D09 007F2CA0 6450 push eax 007F2CA2 6F outsd 007F2CA3 7075 jo 007F2D1A 007F2CA5 704D jo 007F2CF4 007F2CA7 656E outsb 007F2CA9 7532 jnz 007F2CDD 007F2CAB 58 pop eax 007F2CAC 0300 add eax, [eax] 007F2CAE 000E add [esi], cl 007F2CB0 000544535F48 add [$485F5344], al 007F2CB6 5A pop edx 007F2CB7 5C pop esp 007F2CB8 0300 add eax, [eax] 007F2CBA 000F add [edi], cl 007F2CBC 0006 add [esi], al 007F2CBE 43 inc ebx 007F2CBF 44 inc esp 007F2CC0 53 push ebx 007F2CC1 5F pop edi 007F2CC2 48 dec eax 007F2CC3 5A pop edx 007F2CC4 60 pusha 007F2CC5 0300 add eax, [eax] 007F2CC7 0001 add [ecx], al 007F2CC9 000B add [ebx], cl 007F2CCB 54 push esp 007F2CCC 6F outsd 007F2CCD 6F outsd 007F2CCE 6C insb 007F2CCF 42 inc edx 007F2CD0 7574 jnz 007F2D46 007F2CD2 746F jz 007F2D43 007F2CD4 6E outsb 007F2CD5 33640300 xor esp, [ebx+eax+$00] 007F2CD9 000A add [edx], cl 007F2CDB 0008 add [eax], cl 007F2CDD 56 push esi 007F2CDE 53 push ebx 007F2CDF 52 push edx 007F2CE0 4D dec ebp 007F2CE1 6F outsd 007F2CE2 6E outsb 007F2CE3 657968 jns 007F2D4E 007F2CE6 0300 add eax, [eax] 007F2CE8 000A add [edx], cl 007F2CEA 0009 add [ecx], cl 007F2CEC 7632 jbe 007F2D20 007F2CEE 43 inc ebx 007F2CEF 6F outsd 007F2CF0 6C insb 007F2CF1 756D jnz 007F2D60 007F2CF3 6E outsb 007F2CF4 366C insb 007F2CF6 0300 add eax, [eax] 007F2CF8 000A add [edx], cl 007F2CFA 0006 add [esi], al 007F2CFC 7632 jbe 007F2D30 007F2CFE 4E dec esi 007F2CFF 6F outsd 007F2D00 7465 jz 007F2D67 007F2D02 7003 jo 007F2D07 007F2D04 0000 add [eax], al 007F2D06 0A00 or al, byte ptr [eax] 007F2D08 097632 or [esi+$32], esi 007F2D0B 43 inc ebx 007F2D0C 6F outsd 007F2D0D 6C insb 007F2D0E 756D jnz 007F2D7D 007F2D10 6E outsb 007F2D11 3574030000 xor eax, $00000374 007F2D16 0400 add al, +$00 007F2D18 06 push es 007F2D19 4C dec esp 007F2D1A 61 popa 007F2D1B 62656C bound esp, qword ptr [ebp+$6C] 007F2D1E 37 aaa 007F2D1F 7803 js 007F2D24 007F2D21 0000 add [eax], al 007F2D23 0500054564 add eax, +$64450500 007F2D28 6974317C03000010 imul esi, [ecx+esi+$7C], $10000003 007F2D30 0007 add [edi], al 007F2D32 42 inc edx 007F2D33 7574 jnz 007F2DA9 007F2D35 746F jz 007F2DA6 007F2D37 6E outsb 007F2D38 318003000011 xor [eax+$11000003], eax 007F2D3E 0009 add [ecx], cl 007F2D40 43 inc ebx 007F2D41 6865636B42 push $426B6365 007F2D46 6F outsd 007F2D47 7831 js 007F2D7A 007F2D49 8403 test [ebx], al 007F2D4B 0000 add [eax], al 007F2D4D 0100 add [eax], eax 007F2D4F 0454 add al, +$54 007F2D51 63686B arpl [eax+$6B], bp 007F2D54 8803 mov [ebx], al 007F2D56 0000 add [eax], al 007F2D58 0100 add [eax], eax 007F2D5A 06 push es 007F2D5B 54 push esp 007F2D5C 6E outsb 007F2D5D 6F outsd 007F2D5E 63686B arpl [eax+$6B], bp 007F2D61 8C03 mov word ptr [ebx], es 007F2D63 0000 add [eax], al 007F2D65 1200 adc al, byte ptr [eax] 007F2D67 0D63785461 or eax, $61547863 007F2D6C 62436F bound eax, qword ptr [ebx+$6F] 007F2D6F 6E outsb 007F2D70 7472 jz 007F2DE4 007F2D72 6F outsd 007F2D73 6C insb 007F2D74 31900300000A xor [eax+$A000003], edx 007F2D7A 000A add [edx], cl 007F2D7C 7632 jbe 007F2DB0 007F2D7E 42 inc edx 007F2D7F 61 popa 007F2D80 6E outsb 007F2D81 6B4E616D imul ecx, [esi+$61], $6D 007F2D85 6594 xchg eax, esp 007F2D87 0300 add eax, [eax] 007F2D89 0001 add [ecx], al 007F2D8B 0005545A4453 add [$53445A54], al 007F2D91 43 inc ebx 007F2D92 98 cwde 007F2D93 0300 add eax, [eax] 007F2D95 000400 add [eax+eax], al 007F2D98 07 pop es 007F2D99 4C dec esp 007F2D9A 61 popa 007F2D9B 62656C bound esp, qword ptr [ebp+$6C] 007F2D9E 3131 xor [ecx], esi 007F2DA0 9C pushf 007F2DA1 0300 add eax, [eax] 007F2DA3 000400 add [eax+eax], al 007F2DA6 07 pop es 007F2DA7 4C dec esp 007F2DA8 61 popa 007F2DA9 62656C bound esp, qword ptr [ebp+$6C] 007F2DAC 3133 xor [ebx], esi 007F2DAE A003000004 mov al, byte ptr [$04000003] 007F2DB3 0006 add [esi], al 007F2DB5 4C dec esp 007F2DB6 61 popa 007F2DB7 62656C bound esp, qword ptr [ebp+$6C] 007F2DBA 35A4030000 xor eax, $000003A4 007F2DBF 0500044E6F add eax, +$6F4E0400 007F2DC4 7465 jz 007F2E2B 007F2DC6 A803 test al, $03 007F2DC8 0000 add [eax], al 007F2DCA 0200 add al, byte ptr [eax] 007F2DCC 094144 or [ecx+$44], eax 007F2DCF 4F dec edi 007F2DD0 51 push ecx 007F2DD1 7565 jnz 007F2E38 007F2DD3 7279 jb 007F2E4E 007F2DD5 31AC0300000400 xor [ebx+eax+$40000], ebp 007F2DDC 06 push es 007F2DDD 4C dec esp 007F2DDE 61 popa 007F2DDF 62656C bound esp, qword ptr [ebp+$6C] 007F2DE2 33B003000004 xor esi, [eax+$4000003] 007F2DE8 0006 add [esi], al 007F2DEA 4C dec esp 007F2DEB 61 popa 007F2DEC 62656C bound esp, qword ptr [ebp+$6C] 007F2DEF 39B40300000500 cmp [ebx+eax+$50000], esi 007F2DF6 0B4661 or eax, [esi+$61] 007F2DF9 63746F72 arpl [edi+ebp*2+$72], si 007F2DFD 794E jns 007F2E4D 007F2DFF 61 popa 007F2E00 6D insd 007F2E01 65B80300000A mov eax, $0A000003 007F2E07 0008 add [eax], cl 007F2E09 7632 jbe 007F2E3D 007F2E0B 43 inc ebx 007F2E0C 52 push edx 007F2E0D 46 inc esi 007F2E0E 6C insb 007F2E0F 61 popa 007F2E10 67BC0300000A mov esp, $0A000003 007F2E16 0006 add [esi], al 007F2E18 7632 jbe 007F2E4C 007F2E1A 49 dec ecx 007F2E1B 46 inc esi 007F2E1C 53 push ebx 007F2E1D 43 inc ebx 007F2E1E C00300 rol byte ptr [ebx], $00 007F2E21 000400 add [eax+eax], al 007F2E24 06 push es 007F2E25 4C dec esp 007F2E26 61 popa 007F2E27 62656C bound esp, qword ptr [ebp+$6C] 007F2E2A 38C4 cmp ah, al 007F2E2C 0300 add eax, [eax] 007F2E2E 000A add [edx], cl 007F2E30 0009 add [ecx], cl 007F2E32 7632 jbe 007F2E66 007F2E34 5A pop edx 007F2E35 43 inc ebx 007F2E36 4D dec ebp 007F2E37 6F outsd 007F2E38 6E outsb 007F2E39 6579C8 jns 007F2E04 007F2E3C 0300 add eax, [eax] 007F2E3E 000400 add [eax+eax], al 007F2E41 07 pop es 007F2E42 4C dec esp 007F2E43 61 popa 007F2E44 62656C bound esp, qword ptr [ebp+$6C] 007F2E47 3130 xor [eax], esi 007F2E49 CC int 3 007F2E4A 0300 add eax, [eax] 007F2E4C 0013 add [ebx], dl 007F2E4E 000449 add [ecx+ecx*2], al 007F2E51 46 inc esi 007F2E52 53 push ebx 007F2E53 43 inc ebx 007F2E54 D003 rol byte ptr [ebx], 1 007F2E56 0000 add [eax], al 007F2E58 1300 adc eax, [eax] 007F2E5A 06 push es 007F2E5B 43 inc ebx 007F2E5C 52 push edx 007F2E5D 46 inc esi 007F2E5E 6C insb 007F2E5F 61 popa 007F2E60 67D4 aam 007F2E62 0300 add eax, [eax] 007F2E64 0001 add [ecx], al 007F2E66 000554537365 add [$65735354], al 007F2E6C 6C insb 007F2E6D D803 fadd dword ptr [ebx] 007F2E6F 0000 add [eax], al *) end; procedure TfrmSXCKNewList_SK._PROC_007F3165(Sender : TObject); begin (* 007F3165 7F00 jnle 007F3167 007F3167 237632 and esi, [esi+$32] 007F316A 43 inc ebx 007F316B 6F outsd 007F316C 6C insb 007F316D 756D jnz 007F31DC 007F316F 6E outsb 007F3170 325072 xor dl, byte ptr [eax+$72] 007F3173 6F outsd 007F3174 7065 jo 007F31DB 007F3176 7274 jb 007F31EC 007F3178 69657345646974 imul esp, [ebp+$73], $74696445 007F317F 56 push esi 007F3180 61 popa 007F3181 6C insb 007F3182 7565 jnz 007F31E9 007F3184 43 inc ebx 007F3185 68616E6765 push $65676E61 007F318A 642A00 sub al, byte ptr fs:[eax] 007F318D 44 inc esp 007F318E 867F00 xchg [edi+$00], bh 007F3191 237632 and esi, [esi+$32] 007F3194 4B dec ebx 007F3195 50 push eax 007F3196 4D dec ebp 007F3197 6F outsd 007F3198 6E outsb 007F3199 657950 jns 007F31EC 007F319C 726F jb 007F320D 007F319E 7065 jo 007F3205 007F31A0 7274 jb 007F3216 007F31A2 69657345646974 imul esp, [ebp+$73], $74696445 007F31A9 56 push esi 007F31AA 61 popa 007F31AB 6C insb 007F31AC 7565 jnz 007F3213 007F31AE 43 inc ebx 007F31AF 68616E6765 push $65676E61 007F31B4 641300 adc eax, fs:[eax] 007F31B7 C48A7F000C42 les ecx, [edx+$420C007F] 007F31BD 7574 jnz 007F3233 007F31BF 746F jz 007F3230 007F31C1 6E outsb 007F31C2 31436C xor [ebx+$6C], eax 007F31C5 69636B1500408F imul esp, [ebx+$6B], $8F400015 007F31CC 7F00 jnle 007F31CE 007F31CE 0E push cs 007F31CF 43 inc ebx 007F31D0 6865636B42 push $426B6365 007F31D5 6F outsd 007F31D6 7831 js 007F3209 007F31D8 43 inc ebx 007F31D9 6C insb 007F31DA 69636B1A00BC90 imul esp, [ebx+$6B], $90BC001A 007F31E1 7F00 jnle 007F31E3 007F31E3 136378 adc esp, [ebx+$78] 007F31E6 54 push esp 007F31E7 61 popa 007F31E8 62436F bound eax, qword ptr [ebx+$6F] 007F31EB 6E outsb 007F31EC 7472 jz 007F3260 007F31EE 6F outsd 007F31EF 6C insb 007F31F0 314368 xor [ebx+$68], eax 007F31F3 61 popa 007F31F4 6E outsb 007F31F5 67651100 adc gs:[bx+si], eax 007F31F9 D0907F000A46 rcl byte ptr [eax+$460A007F], 1 007F31FF 6F outsd 007F3200 726D jb 007F326F 007F3202 43 inc ebx 007F3203 7265 jb 007F326A 007F3205 61 popa 007F3206 7465 jz 007F326D 007F3208 1000 adc [eax], al 007F320A 3491 xor al, $91 007F320C 7F00 jnle 007F320E 007F320E 09546368 or [ebx+$68], edx 007F3212 6B436C69 imul eax, [ebx+$6C], $69 007F3216 636B12 arpl [ebx+$12], bp 007F3219 00DC add ah, bl 007F321B 93 xchg eax, ebx 007F321C 7F00 jnle 007F321E 007F321E 0B546E6F or edx, [esi+ebp*2+$6F] 007F3222 63686B arpl [eax+$6B], bp 007F3225 43 inc ebx 007F3226 6C insb 007F3227 69636B27008496 imul esp, [ebx+$6B], $96840027 007F322E 7F00 jnle 007F3230 007F3230 207632 and [esi+$32], dh 007F3233 43 inc ebx 007F3234 6F outsd 007F3235 6D insd 007F3236 54 push esp 007F3237 61 popa 007F3238 69746F7550726F70 imul esi, [edi+ebp*2+$75], $706F7250 007F3240 657274 jb 007F32B7 007F3243 69657342757474 imul esp, [ebp+$73], $74747542 007F324A 6F outsd 007F324B 6E outsb 007F324C 43 inc ebx 007F324D 6C insb 007F324E 69636B1100C099 imul esp, [ebx+$6B], $99C00011 007F3255 7F00 jnle 007F3257 007F3257 0A545A44 or dl, byte ptr [edx+ebx*2+$44] 007F325B 53 push ebx 007F325C 43 inc ebx 007F325D 43 inc ebx 007F325E 6C insb 007F325F 69636B1F00949E imul esp, [ebx+$6B], $9E94001F 007F3266 7F00 jnle 007F3268 007F3268 185642 sbb [esi+$42], dl 007F326B 5A pop edx 007F326C 50 push eax 007F326D 726F jb 007F32DE 007F326F 7065 jo 007F32D6 007F3271 7274 jb 007F32E7 007F3273 69657342757474 imul esp, [ebp+$73], $74747542 007F327A 6F outsd 007F327B 6E outsb 007F327C 43 inc ebx 007F327D 6C insb 007F327E 69636B2500D8A1 imul esp, [ebx+$6B], $A1D80025 007F3285 7F00 jnle 007F3287 007F3287 1E push ds 007F3288 7632 jbe 007F32BC 007F328A 43 inc ebx 007F328B 6F outsd 007F328C 6C insb 007F328D 756D jnz 007F32FC 007F328F 6E outsb 007F3290 3450 xor al, $50 007F3292 726F jb 007F3303 007F3294 7065 jo 007F32FB 007F3296 7274 jb 007F330C 007F3298 69657342757474 imul esp, [ebp+$73], $74747542 007F329F 6F outsd 007F32A0 6E outsb 007F32A1 43 inc ebx 007F32A2 6C insb 007F32A3 69636B20002CA5 imul esp, [ebx+$6B], $A52C0020 007F32AA 7F00 jnle 007F32AC 007F32AC 197632 sbb [esi+$32], esi 007F32AF 43 inc ebx 007F32B0 6F outsd 007F32B1 6C insb 007F32B2 756D jnz 007F3321 007F32B4 6E outsb 007F32B5 3550726F70 xor eax, $706F7250 007F32BA 657274 jb 007F3331 007F32BD 6965734368616E imul esp, [ebp+$73], $6E616843 007F32C4 6765250078A57F and eax, $7FA57800 007F32CB 001E add [esi], bl 007F32CD 7632 jbe 007F3301 007F32CF 43 inc ebx 007F32D0 6F outsd 007F32D1 6E outsb 007F32D2 4E dec esi 007F32D3 6F outsd 007F32D4 48 dec eax 007F32D5 5A pop edx 007F32D6 50 push eax 007F32D7 726F jb 007F3348 007F32D9 7065 jo 007F3340 007F32DB 7274 jb 007F3351 007F32DD 69657342757474 imul esp, [ebp+$73], $74747542 007F32E4 6F outsd 007F32E5 6E outsb 007F32E6 43 inc ebx 007F32E7 6C insb 007F32E8 69636B250058A9 imul esp, [ebx+$6B], $A9580025 007F32EF 7F00 jnle 007F32F1 007F32F1 1E push ds 007F32F2 7632 jbe 007F3326 007F32F4 47 inc edi 007F32F5 59 pop ecx 007F32F6 53 push ebx 007F32F7 4E dec esi 007F32F8 61 popa 007F32F9 6D insd 007F32FA 6550 push eax 007F32FC 726F jb 007F336D 007F32FE 7065 jo 007F3365 007F3300 7274 jb 007F3376 007F3302 69657342757474 imul esp, [ebp+$73], $74747542 007F3309 6F outsd 007F330A 6E outsb 007F330B 43 inc ebx 007F330C 6C insb 007F330D 69636B2500D0AB imul esp, [ebx+$6B], $ABD00025 007F3314 7F00 jnle 007F3316 007F3316 1E push ds 007F3317 7632 jbe 007F334B 007F3319 43 inc ebx 007F331A 6F outsd 007F331B 6C insb 007F331C 756D jnz 007F338B 007F331E 6E outsb 007F331F 3650 push eax 007F3321 726F jb 007F3392 007F3323 7065 jo 007F338A 007F3325 7274 jb 007F339B 007F3327 69657342757474 imul esp, [ebp+$73], $74747542 007F332E 6F outsd 007F332F 6E outsb 007F3330 43 inc ebx 007F3331 6C insb 007F3332 69636B260060B0 imul esp, [ebx+$6B], $B0600026 007F3339 7F00 jnle 007F333B 007F333B 1F pop ds 007F333C 7632 jbe 007F3370 007F333E 42 inc edx 007F333F 61 popa 007F3340 6E outsb 007F3341 6B4E616D imul ecx, [esi+$61], $6D 007F3345 6550 push eax 007F3347 726F jb 007F33B8 007F3349 7065 jo 007F33B0 007F334B 7274 jb 007F33C1 007F334D 69657342757474 imul esp, [ebp+$73], $74747542 007F3354 6F outsd 007F3355 6E outsb 007F3356 43 inc ebx 007F3357 6C insb 007F3358 69636B1100C0B3 imul esp, [ebx+$6B], $B3C00011 007F335F 7F00 jnle 007F3361 007F3361 0A545373 or dl, byte ptr [ebx+edx*2+$73] 007F3365 656C insb 007F3367 43 inc ebx 007F3368 6C insb 007F3369 69636B2900DCB5 imul esp, [ebx+$6B], $B5DC0029 007F3370 7F00 jnle 007F3372 007F3372 225653 and dl, byte ptr [esi+$53] 007F3375 52 push edx 007F3376 4D dec ebp 007F3377 6F outsd 007F3378 6E outsb 007F3379 657950 jns 007F33CC 007F337C 726F jb 007F33ED 007F337E 7065 jo 007F33E5 007F3380 7274 jb 007F33F6 007F3382 69657345646974 imul esp, [ebp+$73], $74696445 007F3389 56 push esi 007F338A 61 popa 007F338B 6C insb 007F338C 7565 jnz 007F33F3 007F338E 43 inc ebx 007F338F 68616E6765 push $65676E61 007F3394 642A00 sub al, byte ptr fs:[eax] 007F3397 D0B87F002376 sar byte ptr [eax+$7623007F], 1 007F339D 325A43 xor bl, byte ptr [edx+$43] 007F33A0 4D dec ebp 007F33A1 6F outsd 007F33A2 6E outsb 007F33A3 657950 jns 007F33F6 007F33A6 726F jb 007F3417 007F33A8 7065 jo 007F340F 007F33AA 7274 jb 007F3420 007F33AC 69657345646974 imul esp, [ebp+$73], $74696445 007F33B3 56 push esi 007F33B4 61 popa 007F33B5 6C insb 007F33B6 7565 jnz 007F341D 007F33B8 43 inc ebx 007F33B9 68616E6765 push $65676E61 007F33BE 642600EC add ah, ch 007F33C2 BB7F001F76 mov ebx, $761F007F 007F33C7 32464B xor al, byte ptr [esi+$4B] 007F33CA 54 push esp 007F33CB 61 popa 007F33CC 69546F7550726F70 imul edx, [edi+ebp*2+$75], $706F7250 007F33D4 657274 jb 007F344B 007F33D7 69657342757474 imul esp, [ebp+$73], $74747542 007F33DE 6F outsd 007F33DF 6E outsb 007F33E0 43 inc ebx 007F33E1 6C insb 007F33E2 69636B1300A8BE imul esp, [ebx+$6B], $BEA80013 007F33E9 7F00 jnle 007F33EB 007F33EB 0C54 or al, $54 007F33ED 7632 jbe 007F3421 007F33EF 4D dec ebp 007F33F0 6F outsd 007F33F1 7573 jnz 007F3466 007F33F3 6544 inc esp 007F33F5 6F outsd 007F33F6 776E jnbe 007F3466 007F33F8 2400 and al, $00 007F33FA E4BF in al, $BF 007F33FC 7F00 jnle 007F33FE 007F33FE 1D7632425A sbb eax, $5A423276 007F3403 54 push esp 007F3404 7970 jns 007F3476 007F3406 6550 push eax 007F3408 726F jb 007F3479 007F340A 7065 jo 007F3471 007F340C 7274 jb 007F3482 007F340E 69657342757474 imul esp, [ebp+$73], $74747542 007F3415 6F outsd 007F3416 6E outsb 007F3417 43 inc ebx 007F3418 6C insb 007F3419 69636B240098C2 imul esp, [ebx+$6B], $C2980024 007F3420 7F00 jnle 007F3422 007F3422 1D76324261 sbb eax, $61423276 007F3427 6E outsb 007F3428 6B4E6F50 imul ecx, [esi+$6F], $50 007F342C 726F jb 007F349D 007F342E 7065 jo 007F3495 007F3430 7274 jb 007F34A6 007F3432 69657342757474 imul esp, [ebp+$73], $74747542 007F3439 6F outsd 007F343A 6E outsb 007F343B 43 inc ebx 007F343C 6C insb 007F343D 69636B0F546672 imul esp, [ebx+$6B], $7266540F 007F3444 6D insd 007F3445 59 pop ecx 007F3446 53 push ebx 007F3447 43 inc ebx 007F3448 52 push edx 007F3449 50 push eax 007F344A 42 inc edx 007F344B 5F pop edi 007F344C 5A pop edx 007F344D 48 dec eax 007F344E 59 pop ecx 007F344F 48 dec eax 007F3450 16 push ss 007F3451 0028 add [eax], ch 007F3453 94 xchg eax, esp 007F3454 45 inc ebp 007F3455 00648A45 add [edx+ecx*4+$45], ah 007F3459 00B8124D0020 add [eax+$20004D12], bh 007F345F 42 inc edx 007F3460 44 inc esp 007F3461 001C5F add [edi+ebx*2], bl 007F3464 47 inc edi 007F3465 00B867470064 add [eax+$64004767], bh 007F346B D37800 sar dword ptr [eax+$00], cl 007F346E A80A test al, $0A 007F3470 7800 js 007F3472 007F3472 0016 add [esi], dl 007F3474 6300 arpl [eax], ax 007F3476 F4 hlt 007F3477 B466 mov ah, $66 007F3479 0034B1 add [ecx+esi*4], dh 007F347C 6600A40E6400E0A5 add [esi+ecx+$A5E00064], ah 007F3484 45 inc ebp 007F3485 005876 add [eax+$76], bl 007F3488 7C00 jl 007F348A 007F348A 087F4B or [edi+$4B], bh 007F348D 0088996A0000 add [eax+$6A99], cl 007F3493 8E4700 mov es, word ptr [edi+$00] 007F3496 C0964700645D57 rcl byte ptr [esi+$5D640047], $57 007F349D 00F4 add ah, dh 007F349F 8147009C6D4F00 add dword ptr [edi+$00], $004F6D9C 007F34A6 50 push eax 007F34A7 704F jo 007F34F8 007F34A9 008BC0B0347F add [ebx+$7F34B0C0], cl 007F34AF 0007 add [edi], al 007F34B1 0F54 DB $0F, $54 // 007F34B3 66726D jb 007F3523 007F34B6 59 pop ecx 007F34B7 53 push ebx 007F34B8 43 inc ebx 007F34B9 52 push edx 007F34BA 50 push eax 007F34BB 42 inc edx 007F34BC 5F pop edi 007F34BD 5A pop edx 007F34BE 48 dec eax 007F34BF 59 pop ecx 007F34C0 48 dec eax 007F34C1 042A add al, +$2A 007F34C3 7F00 jnle 007F34C5 007F34C5 D0F2 DB $D0, $F2 // dl, 1 007F34C7 49 dec ecx 007F34C8 005E00 add [esi+$00], bl 007F34CB 0D555F5953 or eax, $53595F55 007F34D0 43 inc ebx 007F34D1 52 push edx 007F34D2 50 push eax 007F34D3 42 inc edx 007F34D4 5F pop edi 007F34D5 5A pop edx 007F34D6 48 dec eax 007F34D7 59 pop ecx 007F34D8 48 dec eax 007F34D9 0000 add [eax], al 007F34DB 90 nop 007F34DC 55 push ebp 007F34DD 8BEC mov ebp, esp 007F34DF 6A00 push $00 007F34E1 6A00 push $00 007F34E3 53 push ebx 007F34E4 56 push esi 007F34E5 57 push edi 007F34E6 8BD8 mov ebx, eax 007F34E8 33C0 xor eax, eax 007F34EA 55 push ebp 007F34EB 6808367F00 push $007F3608 ***** TRY | 007F34F0 64FF30 push dword ptr fs:[eax] 007F34F3 648920 mov fs:[eax], esp 007F34F6 33D2 xor edx, edx * Reference to control v1PriceUnit : N.A. | 007F34F8 8B8384030000 mov eax, [ebx+$0384] 007F34FE 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007F3500 FF5164 call dword ptr [ecx+$64] 007F3503 33D2 xor edx, edx * Reference to control Label5 : TLabel | 007F3505 8B8388030000 mov eax, [ebx+$0388] 007F350B 8B08 mov ecx, [eax] * Reference to method TLabel.SetEnabled(Boolean) | 007F350D FF5164 call dword ptr [ecx+$64] * Reference to control v1PRTColor : N.A. | 007F3510 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word; | or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte; | or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl); | or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient); | or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem); | or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter); | 007F3516 E8298EE6FF call 0065C344 007F351B 8BF0 mov esi, eax 007F351D 4E dec esi 007F351E 85F6 test esi, esi 007F3520 7C54 jl 007F3576 007F3522 46 inc esi 007F3523 33FF xor edi, edi 007F3525 8BD7 mov edx, edi * Reference to control v1PRTColor : N.A. | 007F3527 8B8334030000 mov eax, [ebx+$0334] * 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; | 007F352D E89E84E7FF call 0066B9D0 | 007F3532 E8E982E7FF call 0066B820 007F3537 8D55F8 lea edx, [ebp-$08] | 007F353A E88978E7FF call 0066ADC8 007F353F 8B45F8 mov eax, [ebp-$08] 007F3542 8D55FC lea edx, [ebp-$04] | 007F3545 E8326FC1FF call 0040A47C 007F354A 8B45FC mov eax, [ebp-$04] * Possible String Reference to: 'SSEL' | 007F354D BA20367F00 mov edx, $007F3620 * Reference to: System.@LStrCmp; | 007F3552 E8E921C1FF call 00405740 007F3557 7419 jz 007F3572 007F3559 8BD7 mov edx, edi * Reference to control v1PRTColor : N.A. | 007F355B 8B8334030000 mov eax, [ebx+$0334] * 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; | 007F3561 E86A84E7FF call 0066B9D0 | 007F3566 E8656CE6FF call 0065A1D0 007F356B 33D2 xor edx, edx * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007F356D E8EE59E3FF call 00628F60 007F3572 47 inc edi 007F3573 4E dec esi 007F3574 75AF jnz 007F3525 * Reference to control PriceNote : N.A. | 007F3576 8B838C030000 mov eax, [ebx+$038C] * Reference to control ADOTemp : N.A. | 007F357C 83B83C03000000 cmp dword ptr [eax+$033C], +$00 007F3583 753F jnz 007F35C4 007F3585 B201 mov dl, $01 * Reference to control v1PriceUnit : N.A. | 007F3587 8B8384030000 mov eax, [ebx+$0384] 007F358D 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_64 | 007F358F FF5164 call dword ptr [ecx+$64] * Reference to control v1PRTColor : N.A. | 007F3592 8B8334030000 mov eax, [ebx+$0334] * Reference to: ActiveX.PROPSETHDR_OSVER_KIND(DWORD):Word; | or: ActiveX.PROPSETHDR_OSVER_MINOR(DWORD):Byte; | or: ActnCtrls.TCustomComboControl.VisibleChanging(TCustomComboControl); | or: ActnMan.TActionClientsCollection.SetActionClient(TActionClientsCollection;Integer;TActionClient); | or: ActnMan.TActionClients.SetActionClient(TActionClients;Integer;TActionClientItem); | or: ADODB.TParameters.SetItem(TParameters;Integer;TParameter); | 007F3598 E8A78DE6FF call 0065C344 007F359D 8BF0 mov esi, eax 007F359F 4E dec esi 007F35A0 85F6 test esi, esi 007F35A2 7C20 jl 007F35C4 007F35A4 46 inc esi 007F35A5 33FF xor edi, edi 007F35A7 8BD7 mov edx, edi * Reference to control v1PRTColor : N.A. | 007F35A9 8B8334030000 mov eax, [ebx+$0334] * 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; | 007F35AF E81C84E7FF call 0066B9D0 | 007F35B4 E8176CE6FF call 0065A1D0 007F35B9 B201 mov dl, $01 * Reference to : TcxCustomGridTableView._PROC_00628F60() | 007F35BB E8A059E3FF call 00628F60 007F35C0 47 inc edi 007F35C1 4E dec esi 007F35C2 75E3 jnz 007F35A7 * Reference to control PriceNote : N.A. | 007F35C4 8B838C030000 mov eax, [ebx+$038C] * Reference to control ADOTemp : N.A. | 007F35CA 83B83C03000001 cmp dword ptr [eax+$033C], +$01 007F35D1 750D jnz 007F35E0 007F35D3 B201 mov dl, $01 * Reference to control Label5 : TLabel | 007F35D5 8B8388030000 mov eax, [ebx+$0388] 007F35DB 8B08 mov ecx, [eax] * Reference to method TLabel.SetEnabled(Boolean) | 007F35DD FF5164 call dword ptr [ecx+$64] * Reference to control PriceNote : N.A. | 007F35E0 8B838C030000 mov eax, [ebx+$038C] * Reference to control ADOTemp : N.A. | 007F35E6 83B83C03000002 cmp dword ptr [eax+$033C], +$02 007F35ED 33C0 xor eax, eax 007F35EF 5A pop edx 007F35F0 59 pop ecx 007F35F1 59 pop ecx 007F35F2 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '_^[YY]' | 007F35F5 680F367F00 push $007F360F 007F35FA 8D45F8 lea eax, [ebp-$08] 007F35FD BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 007F3602 E8411DC1FF call 00405348 007F3607 C3 ret *) end; end.