unit cxFilterControlDialog; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfmFilterControlDialog=class(TForm) pnlBottom: TPanel; btOpen: TcxButton; btSave: TcxButton; OpenDialog: TOpenDialog; SaveDialog: TSaveDialog; pnlBottomRight: TPanel; btApply: TcxButton; btCancel: TcxButton; btOk: TcxButton; procedure acApplyExecute(Sender : TObject); procedure acOkExecute(Sender : TObject); procedure acOpenExecute(Sender : TObject); procedure acSaveExecute(Sender : TObject); procedure FormClose(Sender : TObject); procedure FormKeyPress(Sender : TObject); procedure FormKeyDown(Sender : TObject); procedure _PROC_005CBC3D(Sender : TObject); procedure _PROC_005CBC68(Sender : TObject); procedure _PROC_005CBCA0(Sender : TObject); procedure _PROC_005CBCB4(Sender : TObject); procedure _PROC_005CBF38(Sender : TObject); procedure _PROC_005CBFB8(Sender : TObject); procedure _PROC_005CC20C(Sender : TObject); procedure _PROC_005CC23C(Sender : TObject); procedure _PROC_005CC244(Sender : TObject); private { Private declarations } public { Public declarations } end ; var fmFilterControlDialog: TfmFilterControlDialog; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfmFilterControlDialog.acApplyExecute(Sender : TObject); begin (* * Reference to field TfmFilterControlDialog.OFFS_0320 | 005CC07C 8B8020030000 mov eax, [eax+$0320] * Reference to: ActnMenus.TCustomizeActionToolBar.CMItemSelected(TCustomizeActionToolBar;TCMItemMsg;TCMItemMsg); | 005CC082 E83DFFFDFF call 005ABFC4 005CC087 C3 ret *) end; procedure TfmFilterControlDialog.acOkExecute(Sender : TObject); begin (* * Reference to field TfmFilterControlDialog.OFFS_0320 | 005CC088 8B8020030000 mov eax, [eax+$0320] * Reference to: ActnMenus.TCustomizeActionToolBar.CMItemSelected(TCustomizeActionToolBar;TCMItemMsg;TCMItemMsg); | 005CC08E E831FFFDFF call 005ABFC4 005CC093 C3 ret *) end; procedure TfmFilterControlDialog.acOpenExecute(Sender : TObject); begin (* 005CC094 55 push ebp 005CC095 8BEC mov ebp, esp 005CC097 6A00 push $00 005CC099 6A00 push $00 005CC09B 53 push ebx 005CC09C 8BD8 mov ebx, eax 005CC09E 33C0 xor eax, eax 005CC0A0 55 push ebp * Possible String Reference to: '׉[YY]Uj' | 005CC0A1 6818C15C00 push $005CC118 ***** TRY | 005CC0A6 64FF30 push dword ptr fs:[eax] 005CC0A9 648920 mov fs:[eax], esp * Reference to control TfmFilterControlDialog.OpenDialog : TOpenDialog | 005CC0AC 8B8304030000 mov eax, [ebx+$0304] 005CC0B2 83C078 add eax, +$78 * Reference to: System.@LStrClr(void;void); | 005CC0B5 E86A92E3FF call 00405324 * Reference to control TfmFilterControlDialog.OpenDialog : TOpenDialog | 005CC0BA 8B8304030000 mov eax, [ebx+$0304] 005CC0C0 8B10 mov edx, [eax] * Reference to method TOpenDialog.Execute() | 005CC0C2 FF523C call dword ptr [edx+$3C] 005CC0C5 84C0 test al, al 005CC0C7 7434 jz 005CC0FD 005CC0C9 8D55FC lea edx, [ebp-$04] * Reference to control TfmFilterControlDialog.OpenDialog : TOpenDialog | 005CC0CC 8B8304030000 mov eax, [ebx+$0304] * Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName; | 005CC0D2 E8F144E7FF call 004405C8 005CC0D7 8B55FC mov edx, [ebp-$04] * Reference to field TfmFilterControlDialog.OFFS_0320 | 005CC0DA 8B8320030000 mov eax, [ebx+$0320] * Reference to: ComCtrls.TCustomTreeView.LoadFromFile(TCustomTreeView;AnsiString); | or: DB.TBlobField.LoadFromFile(TBlobField;AnsiString); | or: DBGrids.TDBGridColumns.LoadFromFile(TDBGridColumns;AnsiString); | or: OleCtnrs.TOleContainer.LoadFromFile(TOleContainer;AnsiString); | or: Outline.TCustomOutline.LoadFromFile(TCustomOutline;AnsiString); | or: QComCtrls.TCustomTreeView.LoadFromFile(TCustomTreeView;AnsiString); | 005CC0E0 E8CB01FEFF call 005AC2B0 005CC0E5 8D55F8 lea edx, [ebp-$08] * Reference to control TfmFilterControlDialog.OpenDialog : TOpenDialog | 005CC0E8 8B8304030000 mov eax, [ebx+$0304] * Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName; | 005CC0EE E8D544E7FF call 004405C8 005CC0F3 8B55F8 mov edx, [ebp-$08] 005CC0F6 8BC3 mov eax, ebx * Reference to : TfmFilterControlDialog._PROC_005CBFB8() | 005CC0F8 E8BBFEFFFF call 005CBFB8 005CC0FD 33C0 xor eax, eax 005CC0FF 5A pop edx 005CC100 59 pop ecx 005CC101 59 pop ecx 005CC102 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[YY]Uj' | 005CC105 681FC15C00 push $005CC11F 005CC10A 8D45F8 lea eax, [ebp-$08] 005CC10D BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 005CC112 E83192E3FF call 00405348 005CC117 C3 ret * Reference to: System.@HandleFinally; | 005CC118 E9D789E3FF jmp 00404AF4 005CC11D EBEB jmp 005CC10A ****** END | 005CC11F 5B pop ebx 005CC120 59 pop ecx 005CC121 59 pop ecx 005CC122 5D pop ebp 005CC123 C3 ret *) end; procedure TfmFilterControlDialog.acSaveExecute(Sender : TObject); begin (* 005CC124 55 push ebp 005CC125 8BEC mov ebp, esp 005CC127 6A00 push $00 005CC129 6A00 push $00 005CC12B 53 push ebx 005CC12C 8BD8 mov ebx, eax 005CC12E 33C0 xor eax, eax 005CC130 55 push ebp 005CC131 689AC15C00 push $005CC19A ***** TRY | 005CC136 64FF30 push dword ptr fs:[eax] 005CC139 648920 mov fs:[eax], esp * Reference to control TfmFilterControlDialog.SaveDialog : TSaveDialog | 005CC13C 8B8308030000 mov eax, [ebx+$0308] 005CC142 8B10 mov edx, [eax] * Reference to method TSaveDialog.Execute() | 005CC144 FF523C call dword ptr [edx+$3C] 005CC147 84C0 test al, al 005CC149 7434 jz 005CC17F 005CC14B 8D55FC lea edx, [ebp-$04] * Reference to control TfmFilterControlDialog.SaveDialog : TSaveDialog | 005CC14E 8B8308030000 mov eax, [ebx+$0308] * Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName; | 005CC154 E86F44E7FF call 004405C8 005CC159 8B55FC mov edx, [ebp-$04] * Reference to field TfmFilterControlDialog.OFFS_0320 | 005CC15C 8B8320030000 mov eax, [ebx+$0320] * Reference to: Classes.TCustomMemoryStream.SaveToFile(TCustomMemoryStream;AnsiString); | or: ComCtrls.TCustomTreeView.SaveToFile(TCustomTreeView;AnsiString); | or: DB.TBlobField.SaveToFile(TBlobField;AnsiString); | or: DBGrids.TDBGridColumns.SaveToFile(TDBGridColumns;AnsiString); | or: IBSQL.TIBXSQLVAR.SaveToFile(TIBXSQLVAR;AnsiString); | or: OleCtnrs.TOleContainer.SaveToFile(TOleContainer;AnsiString); | 005CC162 E82502FEFF call 005AC38C 005CC167 8D55F8 lea edx, [ebp-$08] * Reference to control TfmFilterControlDialog.SaveDialog : TSaveDialog | 005CC16A 8B8308030000 mov eax, [ebx+$0308] * Reference to: Dialogs.TOpenDialog.GetFileName(TOpenDialog):TFileName; | 005CC170 E85344E7FF call 004405C8 005CC175 8B55F8 mov edx, [ebp-$08] 005CC178 8BC3 mov eax, ebx * Reference to : TfmFilterControlDialog._PROC_005CBFB8() | 005CC17A E839FEFFFF call 005CBFB8 005CC17F 33C0 xor eax, eax 005CC181 5A pop edx 005CC182 59 pop ecx 005CC183 59 pop ecx 005CC184 648910 mov fs:[eax], edx ****** FINALLY | 005CC187 68A1C15C00 push $005CC1A1 005CC18C 8D45F8 lea eax, [ebp-$08] 005CC18F BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 005CC194 E8AF91E3FF call 00405348 005CC199 C3 ret * Reference to: System.@HandleFinally; | 005CC19A E95589E3FF jmp 00404AF4 005CC19F EBEB jmp 005CC18C ****** END | 005CC1A1 5B pop ebx 005CC1A2 59 pop ecx 005CC1A3 59 pop ecx 005CC1A4 5D pop ebp 005CC1A5 C3 ret *) end; procedure TfmFilterControlDialog.FormClose(Sender : TObject); begin (* 005CC1A8 53 push ebx 005CC1A9 56 push esi 005CC1AA 57 push edi 005CC1AB 83C4F0 add esp, -$10 005CC1AE 8BD8 mov ebx, eax * Reference to field TfmFilterControlDialog.Height : Integer | 005CC1B0 8B434C mov eax, [ebx+$4C] 005CC1B3 50 push eax 005CC1B4 8D442404 lea eax, [esp+$04] 005CC1B8 50 push eax * Reference to field TfmFilterControlDialog.Width : Integer | 005CC1B9 8B4B48 mov ecx, [ebx+$48] * Reference to field TfmFilterControlDialog.Top : Integer | 005CC1BC 8B5344 mov edx, [ebx+$44] * Reference to field TfmFilterControlDialog.Left : Integer | 005CC1BF 8B4340 mov eax, [ebx+$40] | 005CC1C2 E8AD53E5FF call 00421574 005CC1C7 8BF4 mov esi, esp 005CC1C9 BF4C848800 mov edi, $0088844C 005CC1CE A5 movsd 005CC1CF A5 movsd 005CC1D0 A5 movsd 005CC1D1 A5 movsd 005CC1D2 83C410 add esp, +$10 005CC1D5 5F pop edi 005CC1D6 5E pop esi 005CC1D7 5B pop ebx 005CC1D8 C3 ret *) end; procedure TfmFilterControlDialog.FormKeyPress(Sender : TObject); begin (* 005CC1DC 80391B cmp byte ptr [ecx], $1B 005CC1DF 750E jnz 005CC1EF * Reference to field TfmFilterControlDialog.OFFS_031C | 005CC1E1 80B81C03000000 cmp byte ptr [eax+$031C], $00 005CC1E8 7505 jnz 005CC1EF * Reference to: Forms.TCustomForm.Close(TCustomForm); | 005CC1EA E8A99DEDFF call 004A5F98 005CC1EF C3 ret *) end; procedure TfmFilterControlDialog.FormKeyDown(Sender : TObject); begin (* 005CC1F0 55 push ebp 005CC1F1 8BEC mov ebp, esp 005CC1F3 53 push ebx 005CC1F4 8BD8 mov ebx, eax * Reference to field TfmFilterControlDialog.ActiveControl : TWinControl | 005CC1F6 8B8320020000 mov eax, [ebx+$0220] * Reference to : TcxCustomInnerListBox._PROC_0051EC30() | 005CC1FC E82F2AF5FF call 0051EC30 * Reference to field TfmFilterControlDialog.OFFS_031C | 005CC201 88831C030000 mov [ebx+$031C], al 005CC207 5B pop ebx 005CC208 5D pop ebp 005CC209 C20400 ret $0004 *) end; procedure TfmFilterControlDialog._PROC_005CBC3D(Sender : TObject); begin (* 005CBC3D 8BEC mov ebp, esp 005CBC3F 53 push ebx 005CBC40 FF751C push dword ptr [ebp+$1C] 005CBC43 FF7518 push dword ptr [ebp+$18] 005CBC46 FF7514 push dword ptr [ebp+$14] 005CBC49 FF7510 push dword ptr [ebp+$10] 005CBC4C 51 push ecx 005CBC4D 8B4D0C mov ecx, [ebp+$0C] 005CBC50 51 push ecx 005CBC51 8B4D08 mov ecx, [ebp+$08] 005CBC54 51 push ecx * Reference to class TcxFilterControl | 005CBC55 8B0DFC965A00 mov ecx, [$005A96FC] 005CBC5B 91 xchg eax, ecx 005CBC5C 87CA xchg edx, ecx | 005CBC5E E869FEFFFF call 005CBACC 005CBC63 5B pop ebx 005CBC64 5D pop ebp 005CBC65 C21800 ret $0018 *) end; procedure TfmFilterControlDialog._PROC_005CBC68(Sender : TObject); begin (* 005CBC68 53 push ebx 005CBC69 56 push esi 005CBC6A 84D2 test dl, dl 005CBC6C 7408 jz 005CBC76 005CBC6E 83C4F0 add esp, -$10 * Reference to: System.@ClassCreate(TClass;Boolean):TObject; | 005CBC71 E84E8AE3FF call 004046C4 005CBC76 8BDA mov ebx, edx 005CBC78 8BF0 mov esi, eax 005CBC7A 33D2 xor edx, edx 005CBC7C 8BC6 mov eax, esi * Reference to: Forms.TCustomForm.Create(TCustomForm;boolean;TComponent); | or: QForms.TCustomForm.Create(TCustomForm;boolean;TComponent); | 005CBC7E E84D61EDFF call 004A1DD0 005CBC83 8BC6 mov eax, esi 005CBC85 84DB test bl, bl 005CBC87 740F jz 005CBC98 * Reference to: System.@AfterConstruction(TObject):TObject; | 005CBC89 E88E8AE3FF call 0040471C 005CBC8E 648F0500000000 pop dword ptr fs:[$00000000] 005CBC95 83C40C add esp, +$0C 005CBC98 8BC6 mov eax, esi 005CBC9A 5E pop esi 005CBC9B 5B pop ebx 005CBC9C C3 ret *) end; procedure TfmFilterControlDialog._PROC_005CBCA0(Sender : TObject); begin (* 005CBCA0 53 push ebx 005CBCA1 8BDA mov ebx, edx 005CBCA3 8BD3 mov edx, ebx * Reference to: Forms.TCustomForm.CreateParams(TCustomForm;TCreateParams;TCreateParams); | 005CBCA5 E80684EDFF call 004A40B0 005CBCAA 814B0400000080 or dword ptr [ebx+$04], $80000000 005CBCB1 5B pop ebx 005CBCB2 C3 ret *) end; procedure TfmFilterControlDialog._PROC_005CBCB4(Sender : TObject); begin (* 005CBCB4 55 push ebp 005CBCB5 8BEC mov ebp, esp 005CBCB7 B90A000000 mov ecx, $0000000A 005CBCBC 6A00 push $00 005CBCBE 6A00 push $00 005CBCC0 49 dec ecx 005CBCC1 75F9 jnz 005CBCBC 005CBCC3 53 push ebx 005CBCC4 56 push esi 005CBCC5 57 push edi 005CBCC6 8BF2 mov esi, edx 005CBCC8 8BD8 mov ebx, eax 005CBCCA BF4C848800 mov edi, $0088844C 005CBCCF 33C0 xor eax, eax 005CBCD1 55 push ebp * Possible String Reference to: 'ȋ_^[]Í@' | 005CBCD2 6827BF5C00 push $005CBF27 ***** TRY | 005CBCD7 64FF30 push dword ptr fs:[eax] 005CBCDA 648920 mov fs:[eax], esp 005CBCDD 8D55F8 lea edx, [ebp-$08] *) end; procedure TfmFilterControlDialog._PROC_005CBF38(Sender : TObject); begin (* 005CBF38 53 push ebx 005CBF39 56 push esi 005CBF3A 8BF2 mov esi, edx 005CBF3C 8BD8 mov ebx, eax 005CBF3E 85F6 test esi, esi 005CBF40 7472 jz 005CBFB4 * Reference to control TfmFilterControlDialog.btOk : TcxButton | 005CBF42 8B8318030000 mov eax, [ebx+$0318] * Reference to field TcxButton.OFFS_0234 | 005CBF48 8B8034020000 mov eax, [eax+$0234] 005CBF4E 8BD6 mov edx, esi | 005CBF50 E88302F2FF call 004EC1D8 * Reference to control TfmFilterControlDialog.btCancel : TcxButton | 005CBF55 8B8314030000 mov eax, [ebx+$0314] * Reference to field TcxButton.OFFS_0234 | 005CBF5B 8B8034020000 mov eax, [eax+$0234] 005CBF61 8BD6 mov edx, esi | 005CBF63 E87002F2FF call 004EC1D8 * Reference to control TfmFilterControlDialog.btApply : TcxButton | 005CBF68 8B8310030000 mov eax, [ebx+$0310] * Reference to field TcxButton.OFFS_0234 | 005CBF6E 8B8034020000 mov eax, [eax+$0234] 005CBF74 8BD6 mov edx, esi | 005CBF76 E85D02F2FF call 004EC1D8 * Reference to control TfmFilterControlDialog.btOpen : TcxButton | 005CBF7B 8B83FC020000 mov eax, [ebx+$02FC] * Reference to field TcxButton.OFFS_0234 | 005CBF81 8B8034020000 mov eax, [eax+$0234] 005CBF87 8BD6 mov edx, esi | 005CBF89 E84A02F2FF call 004EC1D8 * Reference to control TfmFilterControlDialog.btSave : TcxButton | 005CBF8E 8B8300030000 mov eax, [ebx+$0300] * Reference to field TcxButton.OFFS_0234 | 005CBF94 8B8034020000 mov eax, [eax+$0234] 005CBF9A 8BD6 mov edx, esi | 005CBF9C E83702F2FF call 004EC1D8 * Reference to field TfmFilterControlDialog.OFFS_0320 | 005CBFA1 8B8320030000 mov eax, [ebx+$0320] 005CBFA7 8B8040020000 mov eax, [eax+$0240] 005CBFAD 8BD6 mov edx, esi | 005CBFAF E82402F2FF call 004EC1D8 005CBFB4 5E pop esi 005CBFB5 5B pop ebx 005CBFB6 C3 ret *) end; procedure TfmFilterControlDialog._PROC_005CBFB8(Sender : TObject); begin (* 005CBFB8 55 push ebp 005CBFB9 8BEC mov ebp, esp 005CBFBB 83C4E4 add esp, -$1C 005CBFBE 53 push ebx 005CBFBF 56 push esi 005CBFC0 33C9 xor ecx, ecx 005CBFC2 894DFC mov [ebp-$04], ecx 005CBFC5 894DE8 mov [ebp-$18], ecx 005CBFC8 894DE4 mov [ebp-$1C], ecx 005CBFCB 8BF2 mov esi, edx 005CBFCD 8BD8 mov ebx, eax 005CBFCF 33C0 xor eax, eax 005CBFD1 55 push ebp * Possible String Reference to: '閊^[]' | 005CBFD2 6859C05C00 push $005CC059 ***** TRY | 005CBFD7 64FF30 push dword ptr fs:[eax] 005CBFDA 648920 mov fs:[eax], esp * Reference to control TfmFilterControlDialog.SaveDialog : TSaveDialog | 005CBFDD 8B8308030000 mov eax, [ebx+$0308] 005CBFE3 83C078 add eax, +$78 005CBFE6 8BD6 mov edx, esi * Reference to: System.@LStrAsg(void;void;void;void); | 005CBFE8 E88B93E3FF call 00405378 005CBFED 8D45FC lea eax, [ebp-$04] 005CBFF0 50 push eax 005CBFF1 8D55E4 lea edx, [ebp-$1C] *) end; procedure TfmFilterControlDialog._PROC_005CC20C(Sender : TObject); begin (* 005CC20C 55 push ebp 005CC20D 8BEC mov ebp, esp 005CC20F 33C0 xor eax, eax 005CC211 55 push ebp * Possible String Reference to: '龈]Ë-3' | 005CC212 6831C25C00 push $005CC231 ***** TRY | 005CC217 64FF30 push dword ptr fs:[eax] 005CC21A 648920 mov fs:[eax], esp 005CC21D FF05D4338900 inc dword ptr [$008933D4] 005CC223 33C0 xor eax, eax 005CC225 5A pop edx 005CC226 59 pop ecx 005CC227 59 pop ecx 005CC228 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']Ë-3' | 005CC22B 6838C25C00 push $005CC238 005CC230 C3 ret * Reference to: System.@HandleFinally; | 005CC231 E9BE88E3FF jmp 00404AF4 005CC236 EBF8 jmp 005CC230 ****** END | 005CC238 5D pop ebp 005CC239 C3 ret *) end; procedure TfmFilterControlDialog._PROC_005CC23C(Sender : TObject); begin (* 005CC23C 832DD433890001 sub dword ptr [$008933D4], +$01 005CC243 C3 ret *) end; procedure TfmFilterControlDialog._PROC_005CC244(Sender : TObject); begin (* 005CC244 48 dec eax 005CC245 C25C00 ret $005C *) end; end.