📄 viewrcd.pas
字号:
0049B949 8B80DC020000 mov eax, [eax+$02DC]
0049B94F 668B15E4B94900 mov dx, word ptr [$0049B9E4]
0049B956 F7D2 not edx
0049B958 66239030020000 and dx, word ptr [eax+$0230]
* Reference to FrmFDBViewer
|
0049B95F 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.UseMagicGrid : TStringGrid
|
0049B962 8B80DC020000 mov eax, [eax+$02DC]
* Reference to: grids.TCustomGrid.SetOptions(TCustomGrid;TGridOptions);
|
0049B968 E8FB96FFFF call 00495068
* Reference to FrmFDBViewer
|
0049B96D 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.SaveItemGrid : TStringGrid
|
0049B970 8B80E0020000 mov eax, [eax+$02E0]
0049B976 668B15E4B94900 mov dx, word ptr [$0049B9E4]
0049B97D F7D2 not edx
0049B97F 66239030020000 and dx, word ptr [eax+$0230]
* Reference to FrmFDBViewer
|
0049B986 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.SaveItemGrid : TStringGrid
|
0049B989 8B80E0020000 mov eax, [eax+$02E0]
* Reference to: grids.TCustomGrid.SetOptions(TCustomGrid;TGridOptions);
|
0049B98F E8D496FFFF call 00495068
0049B994 BA05000080 mov edx, $80000005
* Reference to FrmFDBViewer
|
0049B999 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.HumanGrid : TStringGrid
|
0049B99C 8B80D4020000 mov eax, [eax+$02D4]
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0049B9A2 E84565F9FF call 00431EEC
0049B9A7 BA05000080 mov edx, $80000005
* Reference to FrmFDBViewer
|
0049B9AC 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.BagItemGrid : TStringGrid
|
0049B9AF 8B80D8020000 mov eax, [eax+$02D8]
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0049B9B5 E83265F9FF call 00431EEC
0049B9BA BA05000080 mov edx, $80000005
* Reference to FrmFDBViewer
|
0049B9BF 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.UseMagicGrid : TStringGrid
|
0049B9C2 8B80DC020000 mov eax, [eax+$02DC]
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0049B9C8 E81F65F9FF call 00431EEC
0049B9CD BA05000080 mov edx, $80000005
* Reference to FrmFDBViewer
|
0049B9D2 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.SaveItemGrid : TStringGrid
|
0049B9D5 8B80E0020000 mov eax, [eax+$02E0]
* Reference to: controls.TControl.SetColor(TControl;TColor);
|
0049B9DB E80C65F9FF call 00431EEC
0049B9E0 59 pop ecx
0049B9E1 59 pop ecx
0049B9E2 5D pop ebp
0049B9E3 C3 ret
*)
end;
procedure TFrmFDBViewer.BtnApplyClick(Sender: TObject);
begin
(*
0049BA08 55 push ebp
0049BA09 8BEC mov ebp, esp
0049BA0B 83C4DC add esp, -$24
0049BA0E 8955DC mov [ebp-$24], edx
0049BA11 8945FC mov [ebp-$04], eax
* Reference to FrmFDBViewer
|
0049BA14 8B45FC mov eax, [ebp-$04]
0049BA17 051C030000 add eax, +$0000031C
0049BA1C 8945F4 mov [ebp-$0C], eax
* Reference to FrmFDBViewer
|
0049BA1F 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.HumanGrid : TStringGrid
|
0049BA22 8B80D4020000 mov eax, [eax+$02D4]
0049BA28 8945F0 mov [ebp-$10], eax
* Reference to FrmFDBViewer
|
0049BA2B 8B45FC mov eax, [ebp-$04]
0049BA2E 05E4040000 add eax, +$000004E4
0049BA33 8945EC mov [ebp-$14], eax
* Reference to FrmFDBViewer
|
0049BA36 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.BagItemGrid : TStringGrid
|
0049BA39 8B80D8020000 mov eax, [eax+$02D8]
0049BA3F 8945E8 mov [ebp-$18], eax
0049BA42 55 push ebp
0049BA43 8B55EC mov edx, [ebp-$14]
0049BA46 B801000000 mov eax, $00000001
* Reference to: viewrcd.Proc_0049B9E8
|
0049BA4B E898FFFFFF call 0049B9E8
0049BA50 59 pop ecx
0049BA51 55 push ebp
0049BA52 8B45EC mov eax, [ebp-$14]
0049BA55 8D5018 lea edx, [eax+$18]
0049BA58 B802000000 mov eax, $00000002
* Reference to: viewrcd.Proc_0049B9E8
|
0049BA5D E886FFFFFF call 0049B9E8
0049BA62 59 pop ecx
0049BA63 55 push ebp
0049BA64 8B45EC mov eax, [ebp-$14]
0049BA67 8D5048 lea edx, [eax+$48]
0049BA6A B803000000 mov eax, $00000003
* Reference to: viewrcd.Proc_0049B9E8
|
0049BA6F E874FFFFFF call 0049B9E8
0049BA74 59 pop ecx
0049BA75 55 push ebp
0049BA76 8B45EC mov eax, [ebp-$14]
0049BA79 8D5060 lea edx, [eax+$60]
0049BA7C B804000000 mov eax, $00000004
* Reference to: viewrcd.Proc_0049B9E8
|
0049BA81 E862FFFFFF call 0049B9E8
0049BA86 59 pop ecx
0049BA87 55 push ebp
0049BA88 8B45EC mov eax, [ebp-$14]
0049BA8B 8D5078 lea edx, [eax+$78]
0049BA8E B805000000 mov eax, $00000005
* Reference to: viewrcd.Proc_0049B9E8
|
0049BA93 E850FFFFFF call 0049B9E8
0049BA98 59 pop ecx
0049BA99 55 push ebp
0049BA9A 8B45EC mov eax, [ebp-$14]
0049BA9D 8D9090000000 lea edx, [eax+$0090]
0049BAA3 B806000000 mov eax, $00000006
* Reference to: viewrcd.Proc_0049B9E8
|
0049BAA8 E83BFFFFFF call 0049B9E8
0049BAAD 59 pop ecx
0049BAAE 55 push ebp
0049BAAF 8B45EC mov eax, [ebp-$14]
0049BAB2 8D90A8000000 lea edx, [eax+$00A8]
0049BAB8 B807000000 mov eax, $00000007
* Reference to: viewrcd.Proc_0049B9E8
|
0049BABD E826FFFFFF call 0049B9E8
0049BAC2 59 pop ecx
0049BAC3 55 push ebp
0049BAC4 8B45EC mov eax, [ebp-$14]
0049BAC7 8D90C0000000 lea edx, [eax+$00C0]
0049BACD B808000000 mov eax, $00000008
* Reference to: viewrcd.Proc_0049B9E8
|
0049BAD2 E811FFFFFF call 0049B9E8
0049BAD7 59 pop ecx
0049BAD8 33C0 xor eax, eax
0049BADA 8945F8 mov [ebp-$08], eax
0049BADD 55 push ebp
0049BADE 8B45F8 mov eax, [ebp-$08]
0049BAE1 8D0440 lea eax, [eax+eax*2]
0049BAE4 8B55EC mov edx, [ebp-$14]
0049BAE7 8D94C2D8000000 lea edx, [edx+eax*8+$00D8]
0049BAEE 8B45F8 mov eax, [ebp-$08]
0049BAF1 83C009 add eax, +$09
* Reference to: viewrcd.Proc_0049B9E8
|
0049BAF4 E8EFFEFFFF call 0049B9E8
0049BAF9 59 pop ecx
0049BAFA FF45F8 inc dword ptr [ebp-$08]
0049BAFD 837DF82E cmp dword ptr [ebp-$08], +$2E
0049BB01 75DA jnz 0049BADD
* Reference to FrmFDBViewer
|
0049BB03 8B45FC mov eax, [ebp-$04]
0049BB06 050C0A0000 add eax, +$00000A0C
0049BB0B 8945E4 mov [ebp-$1C], eax
* Reference to FrmFDBViewer
|
0049BB0E 8B45FC mov eax, [ebp-$04]
* Reference to control TFrmFDBViewer.UseMagicGrid : TStringGrid
|
0049BB11 8B80DC020000 mov eax, [eax+$02DC]
0049BB17 8945E0 mov [ebp-$20], eax
0049BB1A 8BE5 mov esp, ebp
0049BB1C 5D pop ebp
0049BB1D C3 ret
*)
end;
procedure TFrmFDBViewer.ResetPositionClick(Sender: TObject);
begin
(*
0049BB20 55 push ebp
0049BB21 8BEC mov ebp, esp
0049BB23 83C4F8 add esp, -$08
0049BB26 8955F8 mov [ebp-$08], edx
0049BB29 8945FC mov [ebp-$04], eax
* Reference to FrmFDBViewer
|
0049BB2C 8B45FC mov eax, [ebp-$04]
* Reference to field TFrmFDBViewer.OFFS_0354
|
0049BB2F 66C780540300000000 mov word ptr [eax+$0354], $0000
* Reference to FrmFDBViewer
|
0049BB38 8B45FC mov eax, [ebp-$04]
* Reference to field TFrmFDBViewer.OFFS_0388
|
0049BB3B C6808803000000 mov byte ptr [eax+$0388], $00
* Reference to TFrmFDBExplore instance
|
0049BB42 A18CC14A00 mov eax, dword ptr [$004AC18C]
0049BB47 8B00 mov eax, [eax]
* Reference to : TFrmFDBExplore._PROC_004A5944()
|
0049BB49 E8F69D0000 call 004A5944
0049BB4E 59 pop ecx
0049BB4F 59 pop ecx
0049BB50 5D pop ebp
0049BB51 C3 ret
*)
end;
procedure TFrmFDBViewer.ShowHumData();
//0x0049A054
begin
if HumanGrid.Visible then ShowHumanInfo();
if BagItemGrid.Visible then ShowBagItems();
if UseMagicGrid.Visible then ShowUseMagic();
if SaveItemGrid.Visible then ShowSaveItem();
end;
procedure TFrmFDBViewer.sub_49A0C0();
begin
HumanGrid.Cells[0, 1] := '索引号';
HumanGrid.Cells[1, 1] := 'ChrName';
HumanGrid.Cells[2, 1] := 'Map';
HumanGrid.Cells[3, 1] := 'CX';
HumanGrid.Cells[4, 1] := 'CY';
HumanGrid.Cells[5, 1] := 'Dir';
HumanGrid.Cells[6, 1] := 'Job';
HumanGrid.Cells[7, 1] := 'Sex';
HumanGrid.Cells[8, 1] := 'Hair';
HumanGrid.Cells[9, 1] := 'Gold';
HumanGrid.Cells[10, 1] := 'Dear';
HumanGrid.Cells[11, 1] := 'Home';
HumanGrid.Cells[0, 3] := 'HomeX';
HumanGrid.Cells[1, 3] := 'HomeY';
HumanGrid.Cells[2, 3] := 'Lvl';
HumanGrid.Cells[3, 3] := 'AC';
HumanGrid.Cells[4, 3] := 'MAC';
HumanGrid.Cells[5, 3] := 'Reserved1';
HumanGrid.Cells[6, 3] := 'DC/1';
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -