unit DBLogDlg; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TLoginDialog=class(TForm) Panel: TPanel; Bevel: TBevel; DatabaseName: TLabel; OKButton: TButton; CancelButton: TButton; Panel1: TPanel; Label1: TLabel; Label2: TLabel; Label3: TLabel; Password: TEdit; UserName: TEdit; procedure FormShow(Sender : TObject); procedure _PROC_00546810(Sender : TObject); procedure _PROC_00546940(Sender : TObject); procedure _PROC_00546B48(Sender : TObject); procedure _PROC_00546B58(Sender : TObject); procedure _PROC_00546B88(Sender : TObject); procedure _PROC_00546BDC(Sender : TObject); procedure _PROC_00546C42(Sender : TObject); private { Private declarations } public { Public declarations } end ; var LoginDialog: TLoginDialog; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TLoginDialog.FormShow(Sender : TObject); begin (* 00546B00 53 push ebx 00546B01 56 push esi 00546B02 8BD8 mov ebx, eax * Reference to control TLoginDialog.Panel : TPanel | 00546B04 8B83F8020000 mov eax, [ebx+$02F8] * Reference to: Controls.TControl.GetClientWidth(TControl):Integer; | 00546B0A E8E514F4FF call 00487FF4 * Reference to control TLoginDialog.DatabaseName : TLabel | 00546B0F 8BB300030000 mov esi, [ebx+$0300] * Reference to field TLabel.Width : Integer | 00546B15 8B5648 mov edx, [esi+$48] 00546B18 035640 add edx, [esi+$40] 00546B1B 3BC2 cmp eax, edx 00546B1D 7F24 jnle 00546B43 * Reference to control TLoginDialog.Panel : TPanel | 00546B1F 8B83F8020000 mov eax, [ebx+$02F8] * Reference to: Controls.TControl.GetClientWidth(TControl):Integer; | 00546B25 E8CA14F4FF call 00487FF4 00546B2A 8BD0 mov edx, eax * Reference to control TLoginDialog.DatabaseName : TLabel | 00546B2C 8B8300030000 mov eax, [ebx+$0300] 00546B32 2B5040 sub edx, dword ptr [eax+$40] 00546B35 83EA05 sub edx, +$05 * Reference to control TLoginDialog.DatabaseName : TLabel | 00546B38 8B8300030000 mov eax, [ebx+$0300] * Reference to: Controls.TControl.SetWidth(TControl;Integer); | 00546B3E E84112F4FF call 00487D84 00546B43 5E pop esi 00546B44 5B pop ebx 00546B45 C3 ret *) end; procedure TLoginDialog._PROC_00546810(Sender : TObject); begin (* 00546810 55 push ebp 00546811 8BEC mov ebp, esp 00546813 83C4F0 add esp, -$10 00546816 53 push ebx 00546817 56 push esi 00546818 57 push edi 00546819 33DB xor ebx, ebx 0054681B 895DF0 mov [ebp-$10], ebx 0054681E 895DF4 mov [ebp-$0C], ebx 00546821 8BF9 mov edi, ecx 00546823 8BDA mov ebx, edx 00546825 8BF0 mov esi, eax 00546827 33C0 xor eax, eax 00546829 55 push ebp 0054682A 682C695400 push $0054692C ***** TRY | 0054682F 64FF30 push dword ptr fs:[eax] 00546832 648920 mov fs:[eax], esp *) end; procedure TLoginDialog._PROC_00546940(Sender : TObject); begin (* 00546940 55 push ebp 00546941 8BEC mov ebp, esp 00546943 33C9 xor ecx, ecx 00546945 51 push ecx 00546946 51 push ecx 00546947 51 push ecx 00546948 51 push ecx 00546949 51 push ecx 0054694A 53 push ebx 0054694B 56 push esi 0054694C 8BF2 mov esi, edx 0054694E 8BD8 mov ebx, eax 00546950 33C0 xor eax, eax 00546952 55 push ebp 00546953 68EE6A5400 push $00546AEE ***** TRY | 00546958 64FF30 push dword ptr fs:[eax] 0054695B 648920 mov fs:[eax], esp *) end; procedure TLoginDialog._PROC_00546B48(Sender : TObject); begin (* *) end; procedure TLoginDialog._PROC_00546B58(Sender : TObject); begin (* 00546B58 55 push ebp 00546B59 8BEC mov ebp, esp 00546B5B 33C0 xor eax, eax 00546B5D 55 push ebp * Possible String Reference to: 'érßëÿëø]ËÀƒ-T2‰' | 00546B5E 687D6B5400 push $00546B7D ***** TRY | 00546B63 64FF30 push dword ptr fs:[eax] 00546B66 648920 mov fs:[eax], esp 00546B69 FF0554328900 inc dword ptr [$00893254] 00546B6F 33C0 xor eax, eax 00546B71 5A pop edx 00546B72 59 pop ecx 00546B73 59 pop ecx 00546B74 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-T2‰' | 00546B77 68846B5400 push $00546B84 00546B7C C3 ret * Reference to: System.@HandleFinally; | 00546B7D E972DFEBFF jmp 00404AF4 00546B82 EBF8 jmp 00546B7C ****** END | 00546B84 5D pop ebp 00546B85 C3 ret *) end; procedure TLoginDialog._PROC_00546B88(Sender : TObject); begin (* 00546B88 832D5432890001 sub dword ptr [$00893254], +$01 00546B8F 734A jnb 00546BDB *) end; procedure TLoginDialog._PROC_00546BDC(Sender : TObject); begin (* 00546BDC 286C5400 sub [esp+edx*2+$00], ch 00546BE0 0000 add [eax], al *) end; procedure TLoginDialog._PROC_00546C42(Sender : TObject); begin (* 00546C42 48 dec eax 00546C43 0050D4 add [eax-$2C], dl 00546C46 42 inc edx 00546C47 0008 add [eax], cl 00546C49 2D4A007CD0 sub eax, $D07C004A 00546C4E 42 inc edx 00546C4F 00F4 add ah, dh 00546C51 6B4A00D0 imul ecx, [edx+$00], $D0 00546C55 1D4A0030F6 sbb eax, $F630004A 00546C5A 48 dec eax 00546C5B 004CFB48 add [ebx+edi*8+$48], cl 00546C5F 0098FA48000C add [eax+$C0048FA], bl 00546C65 7948 jns 00546CAF 00546C67 00ACF04800E829 add [eax+esi*8+$29E80048], ch 00546C6E 4A dec edx 00546C6F 00E4 add ah, ah 00546C71 ED in eax, dx 00546C72 48 dec eax 00546C73 00547848 add [eax+edi*2+$48], dl 00546C77 005878 add [eax+$78], bl 00546C7A 48 dec eax 00546C7B 00DC add ah, bl 00546C7D 2A4A00 sub cl, byte ptr [edx+$00] 00546C80 3CA9 cmp al, $A9 00546C82 48 dec eax 00546C83 00C0 add al, al 00546C85 834800D0 or dword ptr [eax+$00], -$30 00546C89 7948 jns 00546CD3 00546C8B 004C8548 add [ebp+eax*4+$48], cl 00546C8F 00D0 add al, dl 00546C91 2C4A sub al, $4A 00546C93 009C2B4A008486 add [ebx+ebp+$8684004A], bl 00546C9A 48 dec eax 00546C9B 00482D add [eax+$2D], cl 00546C9E 4A dec edx 00546C9F 00C0 add al, al 00546CA1 A9480038EE test eax, $EE380048 00546CA6 48 dec eax 00546CA7 00F4 add ah, dh 00546CA9 EE out dx, al 00546CAA 48 dec eax 00546CAB 00F0 add al, dh 00546CAD E94800D8EE jmp EF2C6CFA 00546CB2 48 dec eax 00546CB3 00D8 add al, bl 00546CB5 1B4A00 sbb ecx, [edx+$00] 00546CB8 EC in al, dx 00546CB9 334A00 xor ecx, [edx+$00] 00546CBC 20C4 and ah, al 00546CBE 48 dec eax 00546CBF 00B0404A0010 add [eax+$10004A40], dh 00546CC5 44 inc esp 00546CC6 4A dec edx 00546CC7 00CC add ah, cl 00546CC9 42 inc edx 00546CCA 4A dec edx 00546CCB 00B8C44800BC add [eax+$BC0048C4], bh 00546CD1 C44800 les ecx, [eax+$00] 00546CD4 48 dec eax 00546CD5 45 inc ebp 00546CD6 4A dec edx 00546CD7 001CC3 add [ebx+eax*8], bl 00546CDA 48 dec eax 00546CDB 0018 add [eax], bl 00546CDD F0 lock 00546CDE 48 dec eax 00546CDF 00444C4A add [esp+ecx*2+$4A], al 00546CE3 000C02 add [edx+eax], cl 00546CE6 49 dec ecx 00546CE7 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 00546CEE 4A dec edx 00546CEF 008C154A003C18 add [ebp+edx+$183C004A], cl 00546CF6 4A dec edx 00546CF7 0038 add [eax], bh 00546CF9 52 push edx 00546CFA 4A dec edx 00546CFB 005C224A add [edx+$4A], bl 00546CFF 00D8 add al, bl 00546D01 224A00 and cl, byte ptr [edx+$00] 00546D04 7C68 jl 00546D6E 00546D06 4A dec edx 00546D07 00941F4A003C60 add [edi+ebx+$603C004A], dl 00546D0E 4A dec edx 00546D0F 001447 add [edi+eax*2], dl 00546D12 4A dec edx 00546D13 0034654A00CC2C add [$2CCC004A], dh 00546D1A 4A dec edx 00546D1B 000E add [esi], cl 00546D1D 0000 add [eax], al 00546D1F 0000 add [eax], al 00546D21 0001 add [ecx], al 00546D23 0000 add [eax], al 00546D25 00748E4B add [esi+ecx*4+$4B], dh 00546D29 0018 add [eax], bl 00546D2B 0300 add eax, [eax] 00546D2D 0007 add [edi], al 00546D2F 0029 add [ecx], ch 00546D31 6E outsb 00546D32 54 push esp 00546D33 00F8 add al, bh 00546D35 0200 add al, byte ptr [eax] 00546D37 0000 add [eax], al 00546D39 0009 add [ecx], cl 00546D3B 47 inc edi 00546D3C 726F jb 00546DAD 00546D3E 7570 jnz 00546DB0 00546D40 42 inc edx 00546D41 6F outsd 00546D42 7831 js 00546D75 00546D44 FC cld 00546D45 0200 add al, byte ptr [eax] 00546D47 0001 add [ecx], al 00546D49 00044564697400 add [$746964+eax*2], al 00546D50 0300 add eax, [eax] 00546D52 0002 add [edx], al 00546D54 0009 add [ecx], cl 00546D56 41 inc ecx 00546D57 646442 inc edx 00546D5A 7574 jnz 00546DD0 00546D5C 746F jz 00546DCD 00546D5E 6E outsb 00546D5F 0403 add al, +$03 00546D61 0000 add [eax], al 00546D63 0200 add al, byte ptr [eax] 00546D65 0C52 or al, $52 00546D67 656D insd 00546D69 6F outsd 00546D6A 7665 jbe 00546DD1 00546D6C 42 inc edx 00546D6D 7574 jnz 00546DE3 00546D6F 746F jz 00546DE0 00546D71 6E outsb 00546D72 0803 or [ebx], al 00546D74 0000 add [eax], al 00546D76 0200 add al, byte ptr [eax] 00546D78 0F52 DB $0F, $52 // 00546D7A 656D insd 00546D7C 6F outsd 00546D7D 7665 jbe 00546DE4 00546D7F 41 inc ecx 00546D80 6C insb 00546D81 6C insb 00546D82 42 inc edx 00546D83 7574 jnz 00546DF9 00546D85 746F jz 00546DF6 00546D87 6E outsb 00546D88 0C03 or al, $03 00546D8A 0000 add [eax], al 00546D8C 0200 add al, byte ptr [eax] 00546D8E 084F4B or [edi+$4B], cl 00546D91 42 inc edx 00546D92 7574 jnz 00546E08 00546D94 746F jz 00546E05 00546D96 6E outsb 00546D97 1003 adc [ebx], al 00546D99 0000 add [eax], al 00546D9B 0200 add al, byte ptr [eax] 00546D9D 0C43 or al, $43 00546D9F 61 popa 00546DA0 6E outsb 00546DA1 63656C arpl [ebp+$6C], sp 00546DA4 42 inc edx 00546DA5 7574 jnz 00546E1B 00546DA7 746F jz 00546E18 00546DA9 6E outsb 00546DAA 05001100D8 add eax, -$27FFEF00 00546DAF 6E outsb 00546DB0 54 push esp 00546DB1 000A add [edx], cl 00546DB3 45 inc ebp 00546DB4 6469744368616E6765 imul esi, fs:[ebx+eax*2+$68], $65676E61 00546DBD 1500606F54 adc eax, $546F6000 00546DC2 000E add [esi], cl 00546DC4 41 inc ecx 00546DC5 646442 inc edx 00546DC8 7574 jnz 00546E3E 00546DCA 746F jz 00546E3B 00546DCC 6E outsb 00546DCD 43 inc ebx 00546DCE 6C insb 00546DCF 69636B1800D86F imul esp, [ebx+$6B], $6FD80018 00546DD6 54 push esp 00546DD7 0011 add [ecx], dl 00546DD9 52 push edx 00546DDA 656D insd 00546DDC 6F outsd 00546DDD 7665 jbe 00546E44 00546DDF 42 inc edx 00546DE0 7574 jnz 00546E56 00546DE2 746F jz 00546E53 00546DE4 6E outsb 00546DE5 43 inc ebx 00546DE6 6C insb 00546DE7 69636B1B004870 imul esp, [ebx+$6B], $7048001B 00546DEE 54 push esp 00546DEF 001452 add [edx+edx*2], dl 00546DF2 656D insd 00546DF4 6F outsd 00546DF5 7665 jbe 00546E5C 00546DF7 41 inc ecx 00546DF8 6C insb 00546DF9 6C insb 00546DFA 42 inc edx 00546DFB 7574 jnz 00546E71 00546DFD 746F jz 00546E6E 00546DFF 6E outsb 00546E00 43 inc ebx 00546E01 6C insb 00546E02 69636B14006870 imul esp, [ebx+$6B], $70680014 00546E09 54 push esp 00546E0A 000D4F4B4275 add [$75424B4F], cl 00546E10 7474 jz 00546E86 00546E12 6F outsd 00546E13 6E outsb 00546E14 43 inc ebx 00546E15 6C insb 00546E16 69636B0F545061 imul esp, [ebx+$6B], $6150540F 00546E1D 7373 jnb 00546E92 00546E1F 776F jnbe 00546E90 00546E21 7264 jb 00546E87 00546E23 44 inc esp 00546E24 69616C6F670300 imul esp, [ecx+$6C], $0003676F 00546E2B 60 pusha 00546E2C 56 push esi 00546E2D 47 inc edi 00546E2E 00B867470000 add [eax+$4767], bh 00546E34 8E4700 mov es, word ptr [edi+$00] 00546E37 90 nop 00546E38 3C6E cmp al, $6E 00546E3A 54 push esp 00546E3B 0007 add [edi], al 00546E3D 0F54 DB $0F, $54 // 00546E3F 50 push eax 00546E40 61 popa 00546E41 7373 jnb 00546EB6 00546E43 776F jnbe 00546EB4 00546E45 7264 jb 00546EAB 00546E47 44 inc esp 00546E48 69616C6F67286C imul esp, [ecx+$6C], $6C28676F 00546E4F 54 push esp 00546E50 00D0 add al, dl 00546E52 F2 repne 00546E53 49 dec ecx 00546E54 005E00 add [esi+$00], bl 00546E57 07 pop es 00546E58 44 inc esp 00546E59 42 inc edx 00546E5A 50 push eax 00546E5B 57 push edi 00546E5C 44 inc esp 00546E5D 6C insb 00546E5E 670000 add [bx+si], al 00546E61 8D4000 lea eax, [eax+$00] 00546E64 55 push ebp 00546E65 8BEC mov ebp, esp 00546E67 83C4F8 add esp, -$08 00546E6A 53 push ebx 00546E6B 8BD8 mov ebx, eax *) end; end.