📄 zbsystest.pas
字号:
00703575 880C02 mov [edx+eax], cl
00703578 8B55E8 mov edx, [ebp-$18]
0070357B 668B4DEC mov cx, word ptr [ebp-$14]
0070357F 66894C0201 mov [edx+eax+$01], cx
00703584 46 inc esi
00703585 FF4DCC dec dword ptr [ebp-$34]
00703588 75A1 jnz 0070352B
0070358A 8B45FC mov eax, [ebp-$04]
* Reference to: system.TObject.Free(TObject);
|
0070358D E83AFDCFFF call 004032CC
00703592 0FB7838C050000 movzx eax, word ptr [ebx+$058C]
00703599 8945C0 mov [ebp-$40], eax
0070359C DB45C0 fild dword ptr [ebp-$40]
0070359F 83C4F8 add esp, -$08
007035A2 DD1C24 fstp qword ptr [esp]
007035A5 9B wait
* Reference to control TSysTest.DateTimePicker1 : TDateTimePicker
|
007035A6 8B8308030000 mov eax, [ebx+$0308]
* Reference to: comctrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
007035AC E81B6BD8FF call 0048A0CC
007035B1 0FB7838E050000 movzx eax, word ptr [ebx+$058E]
007035B8 8945C0 mov [ebp-$40], eax
007035BB DB45C0 fild dword ptr [ebp-$40]
007035BE 83C4F8 add esp, -$08
007035C1 DD1C24 fstp qword ptr [esp]
007035C4 9B wait
* Reference to control TSysTest.DateTimePicker2 : TDateTimePicker
|
007035C5 8B8310030000 mov eax, [ebx+$0310]
* Reference to: comctrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime);
|
007035CB E8FC6AD8FF call 0048A0CC
007035D0 33D2 xor edx, edx
* Reference to control TSysTest.PageControl1 : TPageControl
|
007035D2 8B83D0020000 mov eax, [ebx+$02D0]
* Reference to: comctrls.TPageControl.SetActivePageIndex(TPageControl;Integer);
|
007035D8 E84B18D7FF call 00474E28
* Reference to control TSysTest.TabControl1 : TTabControl
|
007035DD 8BB3EC020000 mov esi, [ebx+$02EC]
007035E3 8BD3 mov edx, ebx
* Reference to field TTabControl.OFFS_0224
|
007035E5 8B8624020000 mov eax, [esi+$0224]
* Possible reference to virtual method TTabControl.OFFS_0220
|
007035EB FF9620020000 call dword ptr [esi+$0220]
* Reference to field TSysTest.OFFS_05A4 : Byte
|
007035F1 8A93A4050000 mov dl, byte ptr [ebx+$05A4]
007035F7 80F201 xor dl, $01
* Reference to control TSysTest.CheckBox1 : TCheckBox
|
007035FA 8B8318030000 mov eax, [ebx+$0318]
00703600 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
00703602 FF91B8000000 call dword ptr [ecx+$00B8]
00703608 33D2 xor edx, edx
* Reference to field TSysTest.OFFS_0590 : Byte
|
0070360A 8A9390050000 mov dl, byte ptr [ebx+$0590]
* Reference to control TSysTest.ComboBox6 : TComboBox
|
00703610 8B833C030000 mov eax, [ebx+$033C]
* Reference to: stdctrls.TCustomComboBox.SetItemIndex(TCustomComboBox;Integer);
|
00703616 E8C1D5D2FF call 00430BDC
* Reference to control TSysTest.ComboBox6 : TComboBox
|
0070361B 8BB33C030000 mov esi, [ebx+$033C]
00703621 8BD3 mov edx, ebx
* Reference to field TComboBox.OFFS_0234
|
00703623 8B8634020000 mov eax, [esi+$0234]
* Possible reference to virtual method TComboBox.OFFS_0230
|
00703629 FF9630020000 call dword ptr [esi+$0230]
0070362F 8D45BC lea eax, [ebp-$44]
00703632 50 push eax
00703633 D98394050000 fld dword ptr [ebx+$0594]
00703639 DB7DA8 fstp tbyte ptr [ebp-$58]
0070363C 9B wait
0070363D 8D45A8 lea eax, [ebp-$58]
00703640 8945B4 mov [ebp-$4C], eax
00703643 C645B803 mov byte ptr [ebp-$48], $03
00703647 8D55B4 lea edx, [ebp-$4C]
0070364A 33C9 xor ecx, ecx
* Possible String Reference to: '%.2f'
|
0070364C B8B43D7000 mov eax, $00703DB4
* Reference to: Unit_00409434.Proc_0040B918
|
00703651 E8C282D0FF call 0040B918
00703656 8B55BC mov edx, [ebp-$44]
* Reference to control TSysTest.IvsFigEdit : TEdit
|
00703659 8B8350030000 mov eax, [ebx+$0350]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0070365F E81C64D3FF call 00439A80
00703664 33D2 xor edx, edx
* Reference to field TSysTest.OFFS_0598 : Byte
|
00703666 8A9398050000 mov dl, byte ptr [ebx+$0598]
* Reference to control TSysTest.ComboBox7 : TComboBox
|
0070366C 8B8348030000 mov eax, [ebx+$0348]
* Reference to: stdctrls.TCustomComboBox.SetItemIndex(TCustomComboBox;Integer);
|
00703672 E865D5D2FF call 00430BDC
* Reference to control TSysTest.ComboBox7 : TComboBox
|
00703677 8BB348030000 mov esi, [ebx+$0348]
0070367D 8BD3 mov edx, ebx
* Reference to field TComboBox.OFFS_0234
|
0070367F 8B8634020000 mov eax, [esi+$0234]
* Possible reference to virtual method TComboBox.OFFS_0230
|
00703685 FF9630020000 call dword ptr [esi+$0230]
0070368B 8D45A4 lea eax, [ebp-$5C]
0070368E 50 push eax
0070368F D9839C050000 fld dword ptr [ebx+$059C]
00703695 DB7DA8 fstp tbyte ptr [ebp-$58]
00703698 9B wait
00703699 8D45A8 lea eax, [ebp-$58]
0070369C 8945B4 mov [ebp-$4C], eax
0070369F C645B803 mov byte ptr [ebp-$48], $03
007036A3 8D55B4 lea edx, [ebp-$4C]
007036A6 33C9 xor ecx, ecx
* Possible String Reference to: '%.2f'
|
007036A8 B8B43D7000 mov eax, $00703DB4
* Reference to: Unit_00409434.Proc_0040B918
|
007036AD E86682D0FF call 0040B918
007036B2 8B55A4 mov edx, [ebp-$5C]
* Reference to control TSysTest.IncDecEdit : TEdit
|
007036B5 8B835C030000 mov eax, [ebx+$035C]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
007036BB E8C063D3FF call 00439A80
* Reference to field TSysTest.OFFS_05A0 : Byte
|
007036C0 8A93A0050000 mov dl, byte ptr [ebx+$05A0]
* Reference to control TSysTest.CheckBox2 : TCheckBox
|
007036C6 8B8360030000 mov eax, [ebx+$0360]
007036CC 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
007036CE FF91B8000000 call dword ptr [ecx+$00B8]
007036D4 8D55A0 lea edx, [ebp-$60]
007036D7 0FB783A2050000 movzx eax, word ptr [ebx+$05A2]
* Reference to: Unit_00409434.Proc_0040A564
|
007036DE E8816ED0FF call 0040A564
007036E3 8B55A0 mov edx, [ebp-$60]
* Reference to control TSysTest.IgnCirEdit : TEdit
|
007036E6 8B8364030000 mov eax, [ebx+$0364]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
007036EC E88F63D3FF call 00439A80
* Reference to field TSysTest.OFFS_050C : Byte
|
007036F1 8A930C050000 mov dl, byte ptr [ebx+$050C]
* Reference to control TSysTest.RevertCon1 : TCheckBox
|
007036F7 8B83D4030000 mov eax, [ebx+$03D4]
007036FD 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
007036FF FF91B8000000 call dword ptr [ecx+$00B8]
* Reference to field TSysTest.OFFS_050D : Byte
|
00703705 8A930D050000 mov dl, byte ptr [ebx+$050D]
* Reference to control TSysTest.RevertCon2 : TCheckBox
|
0070370B 8B83DC030000 mov eax, [ebx+$03DC]
00703711 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
00703713 FF91B8000000 call dword ptr [ecx+$00B8]
* Reference to field TSysTest.OFFS_050E : Byte
|
00703719 8A930E050000 mov dl, byte ptr [ebx+$050E]
* Reference to control TSysTest.RevertCon3 : TCheckBox
|
0070371F 8B83E4030000 mov eax, [ebx+$03E4]
00703725 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
00703727 FF91B8000000 call dword ptr [ecx+$00B8]
* Reference to field TSysTest.OFFS_050F : Byte
|
0070372D 8A930F050000 mov dl, byte ptr [ebx+$050F]
* Reference to control TSysTest.RevertCon4 : TCheckBox
|
00703733 8B83EC030000 mov eax, [ebx+$03EC]
00703739 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
0070373B FF91B8000000 call dword ptr [ecx+$00B8]
* Reference to field TSysTest.OFFS_0510 : Byte
|
00703741 8A9310050000 mov dl, byte ptr [ebx+$0510]
* Reference to control TSysTest.RevertCon5 : TCheckBox
|
00703747 8B83F8030000 mov eax, [ebx+$03F8]
0070374D 8B08 mov ecx, [eax]
* Reference to method TCheckBox.SetChecked(Boolean)
|
0070374F FF91B8000000 call dword ptr [ecx+$00B8]
* Reference to field TSysTest.OFFS_050C : Byte
|
00703755 80BB0C05000000 cmp byte ptr [ebx+$050C], $00
0070375C 741C jz 0070377A
0070375E 8D559C lea edx, [ebp-$64]
* Reference to field TSysTest.OFFS_0514
|
00703761 8B8314050000 mov eax, [ebx+$0514]
* Reference to: Unit_00409434.Proc_0040A564
|
00703767 E8F86DD0FF call 0040A564
0070376C 8B559C mov edx, [ebp-$64]
* Reference to control TSysTest.AfCirEdit : TEdit
|
0070376F 8B83D8030000 mov eax, [ebx+$03D8]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00703775 E80663D3FF call 00439A80
* Reference to field TSysTest.OFFS_050D : Byte
|
0070377A 80BB0D05000000 cmp byte ptr [ebx+$050D], $00
00703781 7435 jz 007037B8
00703783 8D4598 lea eax, [ebp-$68]
00703786 50 push eax
00703787 D98318050000 fld dword ptr [ebx+$0518]
0070378D DB7DA8 fstp tbyte ptr [ebp-$58]
00703790 9B wait
00703791 8D45A8 lea eax, [ebp-$58]
00703794 8945B4 mov [ebp-$4C], eax
00703797 C645B803 mov byte ptr [ebp-$48], $03
0070379B 8D55B4 lea edx, [ebp-$4C]
0070379E 33C9 xor ecx, ecx
* Possible String Reference to: '%.2f'
|
007037A0 B8B43D7000 mov eax, $00703DB4
* Reference to: Unit_00409434.Proc_0040B918
|
007037A5 E86E81D0FF call 0040B918
007037AA 8B5598 mov edx, [ebp-$68]
* Reference to control TSysTest.ProGoalEdit : TEdit
|
007037AD 8B83E0030000 mov eax, [ebx+$03E0]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
007037B3 E8C862D3FF call 00439A80
* Reference to field TSysTest.OFFS_050E : Byte
|
007037B8 80BB0E05000000 cmp byte ptr [ebx+$050E], $00
007037BF 7435 jz 007037F6
007037C1 8D4594 lea eax, [ebp-$6C]
007037C4 50 push eax
007037C5 D9831C050000 fld dword ptr [ebx+$051C]
007037CB DB7DA8 fstp tbyte ptr [ebp-$58]
007037CE 9B wait
007037CF 8D45A8 lea eax, [ebp-$58]
007037D2 8945B4 mov [ebp-$4C], eax
007037D5 C645B803 mov byte ptr [ebp-$48], $03
007037D9 8D55B4 lea edx, [ebp-$4C]
007037DC 33C9 xor ecx, ecx
* Possible String Reference to: '%.2f'
|
007037DE B8B43D7000 mov eax, $00703DB4
* Reference to: Unit_00409434.Proc_0040B918
|
007037E3 E83081D0FF call 0040B918
007037E8 8B5594 mov edx, [ebp-$6C]
* Reference to control TSysTest.MaxLossEdit : TEdit
|
007037EB 8B83E8030000 mov eax, [ebx+$03E8]
* Reference to: controls.TControl.SetText(TControl;TCaption);
|
007037F1 E88A62D3FF call 00439A80
* Reference to field TSysTest.OFFS_050F : Byte
|
007037F6 80BB0F05000000 cmp byte ptr [ebx+$050F], $00
007037FD 7451 jz 00703850
007037FF 8D5590 lea edx, [ebp-$70]
* Reference to field TSysTest.OFFS_0520
|
00703802 8B8320050000 mov eax, [ebx+$0520]
* Reference to: Unit_00409434.Proc_0040A564
|
00703808 E8576DD0FF call 0040A564
0070380D 8B5590 mov edx, [ebp-$70]
* Reference to control TSysTest.BackDownCirEdit : TEdit
|
00703810 8B83F0030000 mov eax, [ebx+$03F0]
* Reference to: controls.TControl.⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -