311 lines
11 KiB
ObjectPascal
311 lines
11 KiB
ObjectPascal
unit RM_DlgFind;
|
||
|
||
interface
|
||
|
||
uses
|
||
Windows, Messages, SysUtils, Classes, Graphics,
|
||
Controls, Forms, Dialogs, StdCtrls
|
||
type
|
||
TRMPreviewSearchForm=class(TForm)
|
||
Label1: TLabel;
|
||
edtSearchTxt: TEdit;
|
||
btnOK: TButton;
|
||
btnCancel: TButton;
|
||
GroupBox1: TGroupBox;
|
||
chkCaseSensitive: TCheckBox;
|
||
GroupBox2: TGroupBox;
|
||
rdbFromFirst: TRadioButton;
|
||
rdbFromCursor: TRadioButton;
|
||
chkWholewords: TCheckBox;
|
||
procedure FormShow(Sender : TObject);
|
||
procedure FormCreate(Sender : TObject);
|
||
procedure _PROC_006F70F0(Sender : TObject);
|
||
procedure _PROC_006F7120(Sender : TObject);
|
||
procedure _PROC_006F7128(Sender : TObject);
|
||
private
|
||
{ Private declarations }
|
||
public
|
||
{ Public declarations }
|
||
end ;
|
||
|
||
var
|
||
RMPreviewSearchForm: TRMPreviewSearchForm;
|
||
|
||
{This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer}
|
||
|
||
implementation
|
||
|
||
{$R *.DFM}
|
||
|
||
procedure TRMPreviewSearchForm.FormShow(Sender : TObject);
|
||
begin
|
||
(*
|
||
006F70C8 53 push ebx
|
||
006F70C9 8BD8 mov ebx, eax
|
||
|
||
* Reference to control TRMPreviewSearchForm.edtSearchTxt : TEdit
|
||
|
|
||
006F70CB 8B83FC020000 mov eax, [ebx+$02FC]
|
||
006F70D1 8B10 mov edx, [eax]
|
||
|
||
* Reference to method TEdit.SetFocus()
|
||
|
|
||
006F70D3 FF92C4000000 call dword ptr [edx+$00C4]
|
||
|
||
* Reference to control TRMPreviewSearchForm.edtSearchTxt : TEdit
|
||
|
|
||
006F70D9 8B83FC020000 mov eax, [ebx+$02FC]
|
||
|
||
* Reference to: StdCtrls.TCustomEdit.SelectAll(TCustomEdit);
|
||
|
|
||
006F70DF E83456D8FF call 0047C718
|
||
006F70E4 5B pop ebx
|
||
006F70E5 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TRMPreviewSearchForm.FormCreate(Sender : TObject);
|
||
begin
|
||
(*
|
||
|
||
|
|
||
006F70E8 E857FEFFFF call 006F6F44
|
||
006F70ED C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TRMPreviewSearchForm._PROC_006F70F0(Sender : TObject);
|
||
begin
|
||
(*
|
||
006F70F0 55 push ebp
|
||
006F70F1 8BEC mov ebp, esp
|
||
006F70F3 33C0 xor eax, eax
|
||
006F70F5 55 push ebp
|
||
|
||
* Possible String Reference to: '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>]Ë<><C38B>-`9<>'
|
||
|
|
||
006F70F6 6815716F00 push $006F7115
|
||
|
||
***** TRY
|
||
|
|
||
006F70FB 64FF30 push dword ptr fs:[eax]
|
||
006F70FE 648920 mov fs:[eax], esp
|
||
006F7101 FF0560398900 inc dword ptr [$00893960]
|
||
006F7107 33C0 xor eax, eax
|
||
006F7109 5A pop edx
|
||
006F710A 59 pop ecx
|
||
006F710B 59 pop ecx
|
||
006F710C 648910 mov fs:[eax], edx
|
||
|
||
****** FINALLY
|
||
|
|
||
|
||
* Possible String Reference to: ']Ë<><C38B>-`9<>'
|
||
|
|
||
006F710F 681C716F00 push $006F711C
|
||
006F7114 C3 ret
|
||
|
||
|
||
* Reference to: System.@HandleFinally;
|
||
|
|
||
006F7115 E9DAD9D0FF jmp 00404AF4
|
||
006F711A EBF8 jmp 006F7114
|
||
|
||
****** END
|
||
|
|
||
006F711C 5D pop ebp
|
||
006F711D C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TRMPreviewSearchForm._PROC_006F7120(Sender : TObject);
|
||
begin
|
||
(*
|
||
006F7120 832D6039890001 sub dword ptr [$00893960], +$01
|
||
006F7127 C3 ret
|
||
|
||
*)
|
||
end;
|
||
|
||
procedure TRMPreviewSearchForm._PROC_006F7128(Sender : TObject);
|
||
begin
|
||
(*
|
||
006F7128 2C71 sub al, $71
|
||
006F712A 6F outsd
|
||
006F712B 0008 add [eax], cl
|
||
006F712D 1354524D adc edx, [edx+edx*2+$4D]
|
||
006F7131 42 inc edx
|
||
006F7132 65666F outsw
|
||
006F7135 7265 jb 006F719C
|
||
006F7137 53 push ebx
|
||
006F7138 686F775265 push $6552776F
|
||
006F713D 706F jo 006F71AE
|
||
006F713F 7274 jb 006F71B5
|
||
006F7141 0001 add [ecx], al
|
||
006F7143 0807 or [edi], al
|
||
006F7145 61 popa
|
||
006F7146 52 push edx
|
||
006F7147 65706F jo 006F71B9
|
||
006F714A 7274 jb 006F71C0
|
||
006F714C 07 pop es
|
||
006F714D 54 push esp
|
||
006F714E 4F dec edi
|
||
006F714F 626A65 bound ebp, qword ptr [edx+$65]
|
||
006F7152 637400B0 arpl [eax+eax-$50], si
|
||
006F7156 114000 adc [eax+$00], eax
|
||
006F7159 8D4000 lea eax, [eax+$00]
|
||
006F715C 60 pusha
|
||
006F715D 716F jno 006F71CE
|
||
006F715F 0011 add [ecx], dl
|
||
006F7161 022E add ch, byte ptr [esi]
|
||
006F7163 320400 xor al, byte ptr [eax+eax]
|
||
006F7166 0000 add [eax], al
|
||
|
||
006F7168 0000 add [eax], al
|
||
|
||
006F716A 0000 add [eax], al
|
||
|
||
006F716C 0300 add eax, [eax]
|
||
006F716E 0000 add [eax], al
|
||
|
||
006F7170 54 push esp
|
||
006F7171 104000 adc [eax+$00], al
|
||
006F7174 0A524D or dl, byte ptr [edx+$4D]
|
||
006F7177 5F pop edi
|
||
006F7178 50 push eax
|
||
006F7179 7265 jb 006F71E0
|
||
006F717B 7669 jbe 006F71E6
|
||
006F717D 657790 jnbe 006F7110
|
||
006F7180 CC int 3
|
||
006F7181 716F jno 006F71F2
|
||
006F7183 0000 add [eax], al
|
||
|
||
006F7185 0000 add [eax], al
|
||
|
||
006F7187 0000 add [eax], al
|
||
|
||
006F7189 0000 add [eax], al
|
||
|
||
006F718B 0098726F00DC add [eax+$DC006F72], bl
|
||
006F7191 726F jb 006F7202
|
||
006F7193 0000 add [eax], al
|
||
|
||
006F7195 0000 add [eax], al
|
||
|
||
006F7197 0000 add [eax], al
|
||
|
||
006F7199 0000 add [eax], al
|
||
|
||
006F719B 00AA726F00CA add [edx+$CA006F72], ch
|
||
006F71A1 726F jb 006F7212
|
||
006F71A3 005802 add [eax+$02], bl
|
||
006F71A6 0000 add [eax], al
|
||
|
||
006F71A8 204244 and [edx+$44], al
|
||
006F71AB 0028 add [eax], ch
|
||
006F71AD D4 aam
|
||
006F71AE 42 inc edx
|
||
006F71AF 00B4454000D8CC add [ebp+eax*2+$CCD80040], dh
|
||
006F71B6 42 inc edx
|
||
006F71B7 00BC454000F8CA add [ebp+eax*2+$CAF80040], bh
|
||
006F71BE 48 dec eax
|
||
006F71BF 00E4 add ah, ah
|
||
006F71C1 42 inc edx
|
||
006F71C2 40 inc eax
|
||
006F71C3 0000 add [eax], al
|
||
|
||
006F71C5 43 inc ebx
|
||
006F71C6 40 inc eax
|
||
006F71C7 0028 add [eax], ch
|
||
006F71C9 0D49001CFB or eax, $FB1C0049
|
||
006F71CE 48 dec eax
|
||
006F71CF 00C0 add al, al
|
||
006F71D1 C24800 ret $0048
|
||
|
||
006F71D4 B83C420040 mov eax, $4000423C
|
||
006F71D9 A7 cmpsd
|
||
006F71DA 48 dec eax
|
||
006F71DB 00987A480074 add [eax+$7400487A], bl
|
||
006F71E1 AF scasd
|
||
006F71E2 48 dec eax
|
||
006F71E3 00D8 add al, bl
|
||
006F71E5 83480050 or dword ptr [eax+$00], +$50
|
||
006F71E9 D4 aam
|
||
006F71EA 42 inc edx
|
||
006F71EB 0084D042007CD0 add [eax+edx*8+$D07C0042], al
|
||
006F71F2 42 inc edx
|
||
006F71F3 0058D4 add [eax-$2C], bl
|
||
006F71F6 42 inc edx
|
||
006F71F7 00D4 add ah, dl
|
||
006F71F9 786F js 006F726A
|
||
006F71FB 0030 add [eax], dh
|
||
006F71FD F64800 DB $F6, $48, $00 // byte ptr [eax+$00]
|
||
006F7200 746D jz 006F726F
|
||
006F7202 44 inc esp
|
||
006F7203 0098FA48000C add [eax+$C0048FA], bl
|
||
006F7209 7948 jns 006F7253
|
||
006F720B 00ACF04800CCF0 add [eax+esi*8+$F0CC0048], ch
|
||
006F7212 48 dec eax
|
||
006F7213 00E4 add ah, ah
|
||
006F7215 ED in eax, dx
|
||
006F7216 48 dec eax
|
||
006F7217 00547848 add [eax+edi*2+$48], dl
|
||
006F721B 005878 add [eax+$78], bl
|
||
006F721E 48 dec eax
|
||
006F721F 0010 add [eax], dl
|
||
006F7221 A948003CA9 test eax, $A93C0048
|
||
006F7226 48 dec eax
|
||
006F7227 00C0 add al, al
|
||
006F7229 834800D0 or dword ptr [eax+$00], -$30
|
||
006F722D 7948 jns 006F7277
|
||
006F722F 004C8548 add [ebp+eax*4+$48], cl
|
||
006F7233 00C4 add ah, al
|
||
006F7235 844800 test [eax+$00], cl
|
||
006F7238 D88748008486 fadd dword ptr [edi+$86840048]
|
||
006F723E 48 dec eax
|
||
006F723F 0094C94800C0A9 add [ecx+ecx*8+$A9C00048], dl
|
||
006F7246 48 dec eax
|
||
006F7247 0038 add [eax], bh
|
||
006F7249 EE out dx, al
|
||
006F724A 48 dec eax
|
||
006F724B 00F4 add ah, dh
|
||
006F724D EE out dx, al
|
||
006F724E 48 dec eax
|
||
006F724F 00F0 add al, dh
|
||
006F7251 E94800D8EE jmp EF47729E
|
||
006F7256 48 dec eax
|
||
006F7257 00E0 add al, ah
|
||
006F7259 6B440080B6 imul eax, [eax+eax-$80], $B6
|
||
006F725E 48 dec eax
|
||
006F725F 0020 add [eax], ah
|
||
006F7261 C44800 les ecx, [eax+$00]
|
||
006F7264 E467 in al, $67
|
||
006F7266 44 inc esp
|
||
006F7267 0008 add [eax], cl
|
||
006F7269 C1480038 ror dword ptr [eax+$00], $38
|
||
006F726D BF4800B8C4 mov edi, $C4B80048
|
||
006F7272 48 dec eax
|
||
006F7273 00BCC4480074C3 add [esp+eax*8+$C3740048], bh
|
||
006F727A 48 dec eax
|
||
006F727B 001CC3 add [ebx+eax*8], bl
|
||
006F727E 48 dec eax
|
||
006F727F 0018 add [eax], bl
|
||
006F7281 F0 lock
|
||
006F7282 48 dec eax
|
||
006F7283 00780D add [eax+$0D], bh
|
||
006F7286 49 dec ecx
|
||
006F7287 00A06D440094 add [eax+$9400446D], ah
|
||
006F728D EC in al, dx
|
||
006F728E 48 dec eax
|
||
006F728F 0084EF4800C481 add [edi+ebp*8+$81C40048], al
|
||
006F7296 6F outsd
|
||
006F7297 000E add [esi], cl
|
||
006F7299 0000 add [eax], al
|
||
|
||
*)
|
||
end;
|
||
|
||
end. |