📄 frm24cother.pas
字号:
004F6D02 FF91C8000000 call dword ptr [ecx+$00C8]
004F6D08 A168765000 mov eax, dword ptr [$00507668]
004F6D0D C60001 mov byte ptr [eax], $01
004F6D10 33D2 xor edx, edx
004F6D12 8B83F8020000 mov eax, [ebx+$02F8]
004F6D18 8B08 mov ecx, [eax]
004F6D1A FF91C8000000 call dword ptr [ecx+$00C8]
004F6D20 33D2 xor edx, edx
004F6D22 8B83FC020000 mov eax, [ebx+$02FC]
004F6D28 8B08 mov ecx, [eax]
004F6D2A FF5164 call dword ptr [ecx+$64]
004F6D2D 33D2 xor edx, edx
004F6D2F 8B8300030000 mov eax, [ebx+$0300]
004F6D35 8B08 mov ecx, [eax]
004F6D37 FF5164 call dword ptr [ecx+$64]
004F6D3A 33D2 xor edx, edx
004F6D3C 8B8304030000 mov eax, [ebx+$0304]
004F6D42 8B08 mov ecx, [eax]
004F6D44 FF5164 call dword ptr [ecx+$64]
004F6D47 5E pop esi
004F6D48 5B pop ebx
004F6D49 C3 ret
004F6D4A A168765000 mov eax, dword ptr [$00507668]
004F6D4F C60000 mov byte ptr [eax], $00
004F6D52 33D2 xor edx, edx
004F6D54 8B83F4020000 mov eax, [ebx+$02F4]
004F6D5A 8B08 mov ecx, [eax]
004F6D5C FF91C8000000 call dword ptr [ecx+$00C8]
004F6D62 B201 mov dl, $01
004F6D64 8B83F8020000 mov eax, [ebx+$02F8]
004F6D6A 8B08 mov ecx, [eax]
004F6D6C FF91C8000000 call dword ptr [ecx+$00C8]
004F6D72 B201 mov dl, $01
004F6D74 8B83FC020000 mov eax, [ebx+$02FC]
004F6D7A 8B08 mov ecx, [eax]
004F6D7C FF5164 call dword ptr [ecx+$64]
004F6D7F B201 mov dl, $01
004F6D81 8B8300030000 mov eax, [ebx+$0300]
004F6D87 8B08 mov ecx, [eax]
004F6D89 FF5164 call dword ptr [ecx+$64]
004F6D8C B201 mov dl, $01
004F6D8E 8B8304030000 mov eax, [ebx+$0304]
004F6D94 8B08 mov ecx, [eax]
004F6D96 FF5164 call dword ptr [ecx+$64]
004F6D99 5E pop esi
004F6D9A 5B pop ebx
004F6D9B C3 ret
*)
end;
procedure Tchip24cotherFrm.BitBtn1Click(Sender : TObject);
begin
(*
004F6E14 55 push ebp
004F6E15 8BEC mov ebp, esp
004F6E17 33C9 xor ecx, ecx
004F6E19 51 push ecx
004F6E1A 51 push ecx
004F6E1B 51 push ecx
004F6E1C 51 push ecx
004F6E1D 53 push ebx
004F6E1E 56 push esi
004F6E1F 8BD8 mov ebx, eax
004F6E21 33C0 xor eax, eax
004F6E23 55 push ebp
004F6E24 68C56F4F00 push $004F6FC5
***** TRY
|
004F6E29 64FF30 push dword ptr fs:[eax]
004F6E2C 648920 mov fs:[eax], esp
004F6E2F 8B83FC020000 mov eax, [ebx+$02FC]
004F6E35 8B10 mov edx, [eax]
004F6E37 FF92C4000000 call dword ptr [edx+$00C4]
004F6E3D 84C0 test al, al
004F6E3F 740A jz 004F6E4B
004F6E41 33C0 xor eax, eax
004F6E43 898318030000 mov [ebx+$0318], eax
004F6E49 EB0A jmp 004F6E55
004F6E4B C7831803000001000000 mov dword ptr [ebx+$0318], $00000001
004F6E55 8B8300030000 mov eax, [ebx+$0300]
004F6E5B 8B10 mov edx, [eax]
004F6E5D FF92C4000000 call dword ptr [edx+$00C4]
004F6E63 84C0 test al, al
004F6E65 740A jz 004F6E71
004F6E67 33C0 xor eax, eax
004F6E69 898314030000 mov [ebx+$0314], eax
004F6E6F EB0A jmp 004F6E7B
004F6E71 C7831403000001000000 mov dword ptr [ebx+$0314], $00000001
004F6E7B 8B8304030000 mov eax, [ebx+$0304]
004F6E81 8B10 mov edx, [eax]
004F6E83 FF92C4000000 call dword ptr [edx+$00C4]
004F6E89 84C0 test al, al
004F6E8B 740A jz 004F6E97
004F6E8D 33C0 xor eax, eax
004F6E8F 898310030000 mov [ebx+$0310], eax
004F6E95 EB0A jmp 004F6EA1
004F6E97 C7831003000001000000 mov dword ptr [ebx+$0310], $00000001
004F6EA1 8B83F4020000 mov eax, [ebx+$02F4]
004F6EA7 8B10 mov edx, [eax]
004F6EA9 FF92C4000000 call dword ptr [edx+$00C4]
004F6EAF 84C0 test al, al
004F6EB1 740C jz 004F6EBF
004F6EB3 C7831C03000001000000 mov dword ptr [ebx+$031C], $00000001
004F6EBD EB0A jmp 004F6EC9
004F6EBF C7831C03000002000000 mov dword ptr [ebx+$031C], $00000002
004F6EC9 83BB1C03000001 cmp dword ptr [ebx+$031C], +$01
004F6ED0 7517 jnz 004F6EE9
004F6ED2 8D45FC lea eax, [ebp-$04]
* Possible String Reference to: 'update settings set chip24caddrconf
| ig=1'
|
004F6ED5 BADC6F4F00 mov edx, $004F6FDC
* Reference to: System.@LStrLAsg(void;void;void;void);
|
004F6EDA E8D5DBF0FF call 00404AB4
004F6EDF A168765000 mov eax, dword ptr [$00507668]
004F6EE4 C60001 mov byte ptr [eax], $01
004F6EE7 EB57 jmp 004F6F40
* Possible String Reference to: 'update settings set chip24caddrconf
| ig=2,chip24ca2='
|
004F6EE9 680C704F00 push $004F700C
004F6EEE 8D55F8 lea edx, [ebp-$08]
004F6EF1 8B8318030000 mov eax, [ebx+$0318]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004F6EF7 E87826F1FF call 00409574
004F6EFC FF75F8 push dword ptr [ebp-$08]
* Possible String Reference to: ',chip24ca1='
|
004F6EFF 6848704F00 push $004F7048
004F6F04 8D55F4 lea edx, [ebp-$0C]
004F6F07 8B8314030000 mov eax, [ebx+$0314]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004F6F0D E86226F1FF call 00409574
004F6F12 FF75F4 push dword ptr [ebp-$0C]
* Possible String Reference to: ',chip24ca0='
|
004F6F15 685C704F00 push $004F705C
004F6F1A 8D55F0 lea edx, [ebp-$10]
004F6F1D 8B8310030000 mov eax, [ebx+$0310]
* Reference to: SysUtils.IntToStr(Integer):AnsiString;overload;
|
004F6F23 E84C26F1FF call 00409574
004F6F28 FF75F0 push dword ptr [ebp-$10]
004F6F2B 8D45FC lea eax, [ebp-$04]
004F6F2E BA06000000 mov edx, $00000006
|
004F6F33 E85CDEF0FF call 00404D94
004F6F38 A168765000 mov eax, dword ptr [$00507668]
004F6F3D C60002 mov byte ptr [eax], $02
004F6F40 A1B4765000 mov eax, dword ptr [$005076B4]
004F6F45 8B00 mov eax, [eax]
* Reference to control Printer : N.A.
|
004F6F47 8B4058 mov eax, [eax+$58]
* Reference to: DB.TCustomConnection.Close(TCustomConnection);
|
004F6F4A E815B3FAFF call 004A2264
004F6F4F A1B4765000 mov eax, dword ptr [$005076B4]
004F6F54 8B00 mov eax, [eax]
004F6F56 8B7060 mov esi, [eax+$60]
004F6F59 8BC6 mov eax, esi
* Reference to: DB.TDataSet.Close(TDataSet);
|
004F6F5B E88464FBFF call 004AD3E4
004F6F60 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
004F6F62 E85DCBFEFF call 004E3AC4
004F6F67 8B10 mov edx, [eax]
004F6F69 FF5244 call dword ptr [edx+$44]
004F6F6C 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
| or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
| or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
| or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
| or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
| or: DB.TObjectField.GetFields(TObjectField):TFields;
|
004F6F6E E851CBFEFF call 004E3AC4
004F6F73 8B55FC mov edx, [ebp-$04]
004F6F76 8B08 mov ecx, [eax]
004F6F78 FF5138 call dword ptr [ecx+$38]
004F6F7B 8BC6 mov eax, esi
* Reference to: ADODB.TADOQuery.ExecSQL(TADOQuery):Integer;
|
004F6F7D E86ACAFEFF call 004E39EC
004F6F82 8A8318030000 mov al, byte ptr [ebx+$0318]
004F6F88 C1E002 shl eax, $02
004F6F8B 8A9314030000 mov dl, byte ptr [ebx+$0314]
004F6F91 03D2 add edx, edx
004F6F93 02C2 add al, dl
004F6F95 028310030000 add al, byte ptr [ebx+$0310]
004F6F9B 8B159C775000 mov edx, [$0050779C]
004F6FA1 8802 mov [edx], al
004F6FA3 8BC3 mov eax, ebx
* Reference to: Forms.TCustomForm.Close(TCustomForm);
|
004F6FA5 E85EDAF6FF call 00464A08
004F6FAA 33C0 xor eax, eax
004F6FAC 5A pop edx
004F6FAD 59 pop ecx
004F6FAE 59 pop ecx
004F6FAF 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '^[嬪]⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -