📄 jerect.pas
字号:
00635EC7 8B4610 mov eax, [esi+$10]
* Reference to: graphics.TPen.SetColor(TPen;TColor);
|
00635ECA E8D984DEFF call 0041E3A8
* Reference to control FindButton : N.A.
|
00635ECF 8B9300030000 mov edx, [ebx+$0300]
00635ED5 03D7 add edx, edi
00635ED7 4A dec edx
00635ED8 8B4DF4 mov ecx, [ebp-$0C]
00635EDB 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635EDD E81E90DEFF call 0041EF00
00635EE2 8B4DF4 mov ecx, [ebp-$0C]
* Reference to control FindButton : N.A.
|
00635EE5 8B8300030000 mov eax, [ebx+$0300]
00635EEB 03C8 add ecx, eax
00635EED 49 dec ecx
00635EEE 8BD0 mov edx, eax
00635EF0 03D7 add edx, edi
00635EF2 4A dec edx
00635EF3 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635EF5 E8A68FDEFF call 0041EEA0
00635EFA 8B4DF4 mov ecx, [ebp-$0C]
00635EFD 038B00030000 add ecx, [ebx+$0300]
00635F03 49 dec ecx
00635F04 8BD7 mov edx, edi
00635F06 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635F08 E8F38FDEFF call 0041EF00
00635F0D 8B4DF4 mov ecx, [ebp-$0C]
* Reference to control FindButton : N.A.
|
00635F10 8B8300030000 mov eax, [ebx+$0300]
00635F16 03C8 add ecx, eax
00635F18 49 dec ecx
00635F19 8BD0 mov edx, eax
00635F1B 03D7 add edx, edi
00635F1D 4A dec edx
00635F1E 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635F20 E87B8FDEFF call 0041EEA0
00635F25 E9A9000000 jmp 00635FD3
00635F2A 33D2 xor edx, edx
* Reference to field TfrmJE.OFFS_0010
|
00635F2C 8B4610 mov eax, [esi+$10]
* Reference to: graphics.TPen.SetColor(TPen;TColor);
|
00635F2F E87484DEFF call 0041E3A8
00635F34 8B4DF4 mov ecx, [ebp-$0C]
00635F37 8BD7 mov edx, edi
00635F39 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635F3B E8C08FDEFF call 0041EF00
* Reference to control FindButton : N.A.
|
00635F40 8B9300030000 mov edx, [ebx+$0300]
00635F46 03D7 add edx, edi
00635F48 8B4DF4 mov ecx, [ebp-$0C]
00635F4B 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635F4D E84E8FDEFF call 0041EEA0
00635F52 8B4DF4 mov ecx, [ebp-$0C]
00635F55 8BD7 mov edx, edi
00635F57 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635F59 E8A28FDEFF call 0041EF00
00635F5E 8B4DF4 mov ecx, [ebp-$0C]
00635F61 038B00030000 add ecx, [ebx+$0300]
00635F67 8BD7 mov edx, edi
00635F69 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635F6B E8308FDEFF call 0041EEA0
00635F70 BAFFFFFF00 mov edx, $00FFFFFF
* Reference to field TfrmJE.OFFS_0010
|
00635F75 8B4610 mov eax, [esi+$10]
* Reference to: graphics.TPen.SetColor(TPen;TColor);
|
00635F78 E82B84DEFF call 0041E3A8
* Reference to control FindButton : N.A.
|
00635F7D 8B9300030000 mov edx, [ebx+$0300]
00635F83 03D7 add edx, edi
00635F85 4A dec edx
00635F86 8B4DF4 mov ecx, [ebp-$0C]
00635F89 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635F8B E8708FDEFF call 0041EF00
00635F90 8B4DF4 mov ecx, [ebp-$0C]
* Reference to control FindButton : N.A.
|
00635F93 8B8300030000 mov eax, [ebx+$0300]
00635F99 03C8 add ecx, eax
00635F9B 49 dec ecx
00635F9C 8BD0 mov edx, eax
00635F9E 03D7 add edx, edi
00635FA0 4A dec edx
00635FA1 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635FA3 E8F88EDEFF call 0041EEA0
00635FA8 8B4DF4 mov ecx, [ebp-$0C]
00635FAB 038B00030000 add ecx, [ebx+$0300]
00635FB1 49 dec ecx
00635FB2 8BD7 mov edx, edi
00635FB4 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.MoveTo(TCanvas;Integer;Integer);
|
00635FB6 E8458FDEFF call 0041EF00
00635FBB 8B4DF4 mov ecx, [ebp-$0C]
* Reference to control FindButton : N.A.
|
00635FBE 8B8300030000 mov eax, [ebx+$0300]
00635FC4 03C8 add ecx, eax
00635FC6 49 dec ecx
00635FC7 8BD0 mov edx, eax
00635FC9 03D7 add edx, edi
00635FCB 4A dec edx
00635FCC 8BC6 mov eax, esi
* Reference to: graphics.TCanvas.LineTo(TCanvas;Integer;Integer);
|
00635FCE E8CD8EDEFF call 0041EEA0
00635FD3 8D4701 lea eax, [edi+$01]
00635FD6 8945D0 mov [ebp-$30], eax
* Reference to control FindButton : N.A.
|
00635FD9 8B8300030000 mov eax, [ebx+$0300]
00635FDF 8BD0 mov edx, eax
00635FE1 03D7 add edx, edi
00635FE3 4A dec edx
00635FE4 8955D8 mov [ebp-$28], edx
00635FE7 8B55F4 mov edx, [ebp-$0C]
00635FEA 42 inc edx
00635FEB 8955D4 mov [ebp-$2C], edx
00635FEE 8B55F4 mov edx, [ebp-$0C]
00635FF1 03D0 add edx, eax
00635FF3 4A dec edx
00635FF4 8955DC mov [ebp-$24], edx
00635FF7 8B45F8 mov eax, [ebp-$08]
00635FFA 8D04C0 lea eax, [eax+eax*8]
00635FFD 8D0483 lea eax, [ebx+eax*4]
00636000 8B55FC mov edx, [ebp-$04]
00636003 8B849020030000 mov eax, [eax+edx*4+$0320]
0063600A 8D55F0 lea edx, [ebp-$10]
* Reference to: Unit_00409434.Proc_0040A564
|
0063600D E85245DDFF call 0040A564
* Reference to control Button2 : N.A.
|
00636012 8B8BFC020000 mov ecx, [ebx+$02FC]
00636018 D1F9 sar ecx, 1
0063601A 7903 jns 0063601F
0063601C 83D100 adc ecx, +$00
0063601F 8B45FC mov eax, [ebp-$04]
00636022 2BC1 sub eax, ecx
00636024 99 cdq
00636025 33C2 xor eax, edx
00636027 2BC2 sub eax, edx
00636029 8945EC mov [ebp-$14], eax
0063602C 8B45F8 mov eax, [ebp-$08]
0063602F 2BC1 sub eax, ecx
00636031 99 cdq
00636032 33C2 xor eax, edx
00636034 2BC2 sub eax, edx
00636036 8945E8 mov [ebp-$18], eax
00636039 8B830C030000 mov eax, [ebx+$030C]
0063603F 3B45FC cmp eax, [ebp-$04]
00636042 751A jnz 0063605E
00636044 8B8310030000 mov eax, [ebx+$0310]
0063604A 3B45F8 cmp eax, [ebp-$08]
0063604D 750F jnz 0063605E
0063604F BAFFFFFF00 mov edx, $00FFFFFF
* Reference to field TfrmJE.Tag : Longint
|
00636054 8B460C mov eax, [esi+$0C]
* Reference to: graphics.TFont.SetColor(TFont;TColor);
|
00636057 E8607EDEFF call 0041DEBC
0063605C EB0A jmp 00636068
0063605E 33D2 xor edx, edx
* Reference to field TfrmJE.Tag : Longint
|
00636060 8B460C mov eax, [esi+$0C]
* Reference to: graphics.TFont.SetColor(TFont;TColor);
|
00636063 E8547EDEFF call 0041DEBC
00636068 8B45EC mov eax, [ebp-$14]
0063606B 3B45E8 cmp eax, [ebp-$18]
0063606E 7537 jnz 006360A7
00636070 8B830C030000 mov eax, [ebx+$030C]
00636076 3B45FC cmp eax, [ebp-$04]
00636079 751D jnz 00636098
0063607B 8B8310030000 mov eax, [ebx+$0310]
00636081 3B45F8 cmp eax, [ebp-$08]
00636084 7512 jnz 00636098
00636086 BA00FFFF00 mov edx, $00FFFF00
* Reference to field TfrmJE.OFFS_0014
|
0063608B 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
0063608E E82586DEFF call 0041E6B8
00636093 E98C000000 jmp 00636124
00636098 BAFF000000 mov edx, $000000FF
* Reference to field TfrmJE.OFFS_0014
|
0063609D 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
006360A0 E81386DEFF call 0041E6B8
006360A5 EB7D jmp 00636124
* Reference to control Button2 : N.A.
|
006360A7 8B83FC020000 mov eax, [ebx+$02FC]
006360AD D1F8 sar eax, 1
006360AF 7903 jns 006360B4
006360B1 83D000 adc eax, +$00
006360B4 3B45FC cmp eax, [ebp-$04]
006360B7 7405 jz 006360BE
006360B9 3B45F8 cmp eax, [ebp-$08]
006360BC 7534 jnz 006360F2
006360BE 8B830C030000 mov eax, [ebx+$030C]
006360C4 3B45FC cmp eax, [ebp-$04]
006360C7 751A jnz 006360E3
006360C9 8B8310030000 mov eax, [ebx+$0310]
006360CF 3B45F8 cmp eax, [ebp-$08]
006360D2 750F jnz 006360E3
006360D4 BA80808000 mov edx, $00808080
* Reference to field TfrmJE.OFFS_0014
|
006360D9 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
006360DC E8D785DEFF call 0041E6B8
006360E1 EB41 jmp 00636124
006360E3 BAFFFF0000 mov edx, $0000FFFF
* Reference to field TfrmJE.OFFS_0014
|
006360E8 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
006360EB E8C885DEFF call 0041E6B8
006360F0 EB32 jmp 00636124
006360F2 8B830C030000 mov eax, [ebx+$030C]
006360F8 3B45FC cmp eax, [ebp-$04]
006360FB 751A jnz 00636117
006360FD 8B8310030000 mov eax, [ebx+$0310]
00636103 3B45F8 cmp eax, [ebp-$08]
00636106 750F jnz 00636117
00636108 BA00008000 mov edx, $00800000
* Reference to field TfrmJE.OFFS_0014
|
0063610D 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
00636110 E8A385DEFF call 0041E6B8
00636115 EB0D jmp 00636124
00636117 BA0F000080 mov edx, $8000000F
* Reference to field TfrmJE.OFFS_0014
|
0063611C 8B4614 mov eax, [esi+$14]
* Reference to: graphics.TBrush.SetColor(TBrush;TColor);
|
0063611F E89485DEFF call 0041E6B8
00636124 6A00 push $00
00636126 8B45F0 mov eax, [ebp-$10]
* Reference to: system.@LStrLen:Integer;
|
00636129 E862E2DCFF call 00404390
0063612E 50 push eax
0063612F 8B45F0 mov eax, [ebp-$10]
* Reference to: system.@LStrToPChar;
|
00636132 E81DE4DCFF call 00404554
00636137 50 push eax
00636138 8D45D0 lea eax, [ebp-$30]
0063613B 50 push eax
0063613C 6A06 push $06
* Reference to control FindButton : N.A.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -