📄 routemanage.pas
字号:
unit RouteManage;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls
type
TfrmRouteManage=class(TForm)
GroupBox1: TGroupBox;
ListViewRoute: TListView;
ButtonEdit: TButton;
ButtonDelete: TButton;
ButtonOK: TButton;
ButtonAddRoute: TButton;
Label1: TLabel;
procedure ButtonDeleteClick(Sender : TObject);
procedure _PROC_004D8AA4(Sender : TObject);
procedure _PROC_004D8CB5(Sender : TObject);
procedure _PROC_004D8CE0(Sender : TObject);
procedure _PROC_004D8D34(Sender : TObject);
procedure _PROC_004D8E41(Sender : TObject);
procedure _PROC_004D8ED1(Sender : TObject);
procedure _PROC_004D9055(Sender : TObject);
procedure _PROC_004D9084(Sender : TObject);
procedure _PROC_004D908C(Sender : TObject);
procedure _PROC_004D9112(Sender : TObject);
private
{ Private declarations }
public
{ Public declarations }
end ;
var
frmRouteManage: TfrmRouteManage;
{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}
implementation
{$R *.DFM}
procedure TfrmRouteManage.ButtonDeleteClick(Sender : TObject);
begin
(*
004D8C54 53 push ebx
004D8C55 8BDA mov ebx, edx
004D8C57 3B9804030000 cmp ebx, [eax+$0304]
004D8C5D 7507 jnz 004D8C66
* Reference to : TfrmRouteManage._PROC_004D8CE0()
|
004D8C5F E87C000000 call 004D8CE0
004D8C64 5B pop ebx
004D8C65 C3 ret
004D8C66 3B98FC020000 cmp ebx, [eax+$02FC]
004D8C6C 7507 jnz 004D8C75
|
004D8C6E E83D000000 call 004D8CB0
004D8C73 EB39 jmp 004D8CAE
004D8C75 3B980C030000 cmp ebx, [eax+$030C]
004D8C7B 7507 jnz 004D8C84
* Reference to : TfrmRouteManage._PROC_004D8D34()
|
004D8C7D E8B2000000 call 004D8D34
004D8C82 EB2A jmp 004D8CAE
004D8C84 3B9800030000 cmp ebx, [eax+$0300]
004D8C8A 7507 jnz 004D8C93
|
004D8C8C E8A3010000 call 004D8E34
004D8C91 EB1B jmp 004D8CAE
004D8C93 3B9808030000 cmp ebx, [eax+$0308]
004D8C99 7513 jnz 004D8CAE
|
004D8C9B E830020000 call 004D8ED0
004D8CA0 A1DC824E00 mov eax, dword ptr [$004E82DC]
004D8CA5 8B00 mov eax, [eax]
004D8CA7 8BD3 mov edx, ebx
* Reference to : TFrmDBSrv.BtnReloadAddrClick()
|
004D8CA9 E8E6520000 call 004DDF94
004D8CAE 5B pop ebx
004D8CAF C3 ret
*)
end;
procedure TfrmRouteManage._PROC_004D8AA4(Sender : TObject);
begin
(*
004D8AA4 55 push ebp
004D8AA5 8BEC mov ebp, esp
004D8AA7 83C4C4 add esp, -$3C
004D8AAA 53 push ebx
004D8AAB 56 push esi
004D8AAC 57 push edi
004D8AAD 33D2 xor edx, edx
004D8AAF 8955DC mov [ebp-$24], edx
004D8AB2 8955E0 mov [ebp-$20], edx
004D8AB5 8955E4 mov [ebp-$1C], edx
004D8AB8 8955E8 mov [ebp-$18], edx
004D8ABB 8955F0 mov [ebp-$10], edx
004D8ABE 8945FC mov [ebp-$04], eax
004D8AC1 33C0 xor eax, eax
004D8AC3 55 push ebp
004D8AC4 68318C4D00 push $004D8C31
***** TRY
|
004D8AC9 64FF30 push dword ptr fs:[eax]
004D8ACC 648920 mov fs:[eax], esp
004D8ACF 8B45FC mov eax, [ebp-$04]
004D8AD2 8B80FC020000 mov eax, [eax+$02FC]
004D8AD8 8B10 mov edx, [eax]
004D8ADA FF92D8000000 call dword ptr [edx+$00D8]
004D8AE0 8B45FC mov eax, [ebp-$04]
004D8AE3 8B8000030000 mov eax, [eax+$0300]
004D8AE9 33D2 xor edx, edx
004D8AEB 8B08 mov ecx, [eax]
004D8AED FF5164 call dword ptr [ecx+$64]
004D8AF0 8B45FC mov eax, [ebp-$04]
004D8AF3 8B8004030000 mov eax, [eax+$0304]
004D8AF9 33D2 xor edx, edx
004D8AFB 8B08 mov ecx, [eax]
004D8AFD FF5164 call dword ptr [ecx+$64]
004D8B00 C745F814000000 mov dword ptr [ebp-$08], $00000014
004D8B07 A160814E00 mov eax, dword ptr [$004E8160]
004D8B0C 8945EC mov [ebp-$14], eax
004D8B0F 8B45EC mov eax, [ebp-$14]
004D8B12 8945F4 mov [ebp-$0C], eax
004D8B15 8B45F4 mov eax, [ebp-$0C]
004D8B18 83780400 cmp dword ptr [eax+$04], +$00
004D8B1C 0F84EC000000 jz 004D8C0E
004D8B22 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrClr(void;void);
|
004D8B25 E8CEBEF2FF call 004049F8
004D8B2A 8B45FC mov eax, [ebp-$04]
004D8B2D 8B80FC020000 mov eax, [eax+$02FC]
004D8B33 8B802C020000 mov eax, [eax+$022C]
* Reference to: ComCtrls.THeaderSections.Add(THeaderSections):THeaderSection;
| or: ComCtrls.TListItems.Add(TListItems):TListItem;
| or: ScktComp.TCustomWinSocket.ReceiveLength(TCustomWinSocket):Integer;
|
004D8B39 E8AA11F7FF call 00449CE8
004D8B3E 8BF8 mov edi, eax
004D8B40 8B55F4 mov edx, [ebp-$0C]
004D8B43 8BC7 mov eax, edi
* Reference to: ComCtrls.TListItem.SetData(TListItem;Pointer);
|
004D8B45 E8EE0CF7FF call 00449838
004D8B4A 8D55E8 lea edx, [ebp-$18]
004D8B4D 8B45F4 mov eax, [ebp-$0C]
004D8B50 8B00 mov eax, [eax]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D8B52 E8AD24F3FF call 0040B004
004D8B57 8B55E8 mov edx, [ebp-$18]
004D8B5A 8BC7 mov eax, edi
* Reference to: ComCtrls.TListItem.SetCaption(TListItem;AnsiString);
|
004D8B5C E8270CF7FF call 00449788
004D8B61 8D45E4 lea eax, [ebp-$1C]
004D8B64 8B55F4 mov edx, [ebp-$0C]
004D8B67 83C208 add edx, +$08
* Reference to: System.@LStrFromString(String;String;ShortString;ShortString);
| or: System.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
004D8B6A E8EDC0F2FF call 00404C5C
004D8B6F 8B55E4 mov edx, [ebp-$1C]
004D8B72 8B4708 mov eax, [edi+$08]
004D8B75 8B08 mov ecx, [eax]
004D8B77 FF5138 call dword ptr [ecx+$38]
004D8B7A 8D55E0 lea edx, [ebp-$20]
004D8B7D 8B45F4 mov eax, [ebp-$0C]
004D8B80 8B4004 mov eax, [eax+$04]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004D8B83 E87C24F3FF call 0040B004
004D8B88 8B55E0 mov edx, [ebp-$20]
004D8B8B 8B4708 mov eax, [edi+$08]
004D8B8E 8B08 mov ecx, [eax]
004D8B90 FF5138 call dword ptr [ecx+$38]
004D8B93 8B45F4 mov eax, [ebp-$0C]
004D8B96 8B7004 mov esi, [eax+$04]
004D8B99 4E dec esi
004D8B9A 85F6 test esi, esi
004D8B9C 7C55 jl 004D8BF3
004D8B9E 46 inc esi
004D8B9F 33DB xor ebx, ebx
004D8BA1 8D45DC lea eax, [ebp-$24]
004D8BA4 50 push eax
004D8BA5 8B45F0 mov eax, [ebp-$10]
004D8BA8 8945C4 mov [ebp-$3C], eax
004D8BAB C645C80B mov byte ptr [ebp-$38], $0B
004D8BAF 8BC3 mov eax, ebx
004D8BB1 03C0 add eax, eax
004D8BB3 8B55F4 mov edx, [ebp-$0C]
004D8BB6 8D44C218 lea eax, [edx+eax*8+$18]
004D8BBA 8945CC mov [ebp-$34], eax
004D8BBD C645D004 mov byte ptr [ebp-$30], $04
004D8BC1 8B45F4 mov eax, [ebp-$0C]
004D8BC4 8B849898000000 mov eax, [eax+ebx*4+$0098]
004D8BCB 8945D4 mov [ebp-$2C], eax
004D8BCE C645D800 mov byte ptr [ebp-$28], $00
004D8BD2 8D55C4 lea edx, [ebp-$3C]
004D8BD5 B902000000 mov ecx, $00000002
* Possible String Reference to: '%s %s:%d '
|
004D8BDA B8488C4D00 mov eax, $004D8C48
|
004D8BDF E8A834F3FF call 0040C08C
004D8BE4 8B55DC mov edx, [ebp-$24]
004D8BE7 8D45F0 lea eax, [ebp-$10]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
004D8BEA E8A1BEF2FF call 00404A90
004D8BEF 43 inc ebx
004D8BF0 4E dec esi
004D8BF1 75AE jnz 004D8BA1
004D8BF3 8B4708 mov eax, [edi+$08]
004D8BF6 8B55F0 mov edx, [ebp-$10]
004D8BF9 8B08 mov ecx, [eax]
004D8BFB FF5138 call dword ptr [ecx+$38]
004D8BFE 8145ECB8000000 add dword ptr [ebp-$14], $000000B8
004D8C05 FF4DF8 dec dword ptr [ebp-$08]
004D8C08 0F8501FFFFFF jnz 004D8B0F
004D8C0E 33C0 xor eax, eax
004D8C10 5A pop edx
004D8C11 59 pop ecx
004D8C12 59 pop ecx
004D8C13 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '_^[嬪]⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -