📄 selstock.pas
字号:
|
006E56F7 C7808000000070246E00 mov dword ptr [eax+$0080], $006E2470
* Reference to control Tsel_stock.N11 : TMenuItem
|
006E5701 8B83A0030000 mov eax, [ebx+$03A0]
* Reference to field Tsel_stock.OFFS_03BC
|
006E5707 8B93BC030000 mov edx, [ebx+$03BC]
* Reference to field TMenuItem.OFFS_0084
|
006E570D 899084000000 mov [eax+$0084], edx
* Reference to field TMenuItem.OnClick : TNotifyEvent
|
006E5713 C78080000000E4246E00 mov dword ptr [eax+$0080], $006E24E4
* Reference to control Tsel_stock.Memo1 : TMemo
|
006E571D 8B83AC030000 mov eax, [ebx+$03AC]
* Reference to field Tsel_stock.OFFS_03BC
|
006E5723 8B93BC030000 mov edx, [ebx+$03BC]
* Reference to field TMemo.OFFS_019C
|
006E5729 89909C010000 mov [eax+$019C], edx
* Reference to field TMemo.OnEnter : TNotifyEvent
|
006E572F C7809801000040256E00 mov dword ptr [eax+$0198], $006E2540
* Reference to control Tsel_stock.ComboBox1 : TComboBox
|
006E5739 8B83EC020000 mov eax, [ebx+$02EC]
* Reference to field Tsel_stock.OFFS_03BC
|
006E573F 8B93BC030000 mov edx, [ebx+$03BC]
* Reference to field TComboBox.OFFS_0234
|
006E5745 899034020000 mov [eax+$0234], edx
* Reference to field TComboBox.OnChange : TNotifyEvent
|
006E574B C7803002000060256E00 mov dword ptr [eax+$0230], $006E2560
* Reference to control Tsel_stock.ComboBox2 : TComboBox
|
006E5755 8B8318030000 mov eax, [ebx+$0318]
* Reference to field Tsel_stock.OFFS_03BC
|
006E575B 8B93BC030000 mov edx, [ebx+$03BC]
* Reference to field TComboBox.OFFS_0234
|
006E5761 899034020000 mov [eax+$0234], edx
* Reference to field TComboBox.OnChange : TNotifyEvent
|
006E5767 C7803002000088256E00 mov dword ptr [eax+$0230], $006E2588
* Reference to control Tsel_stock.ComboBox3 : TComboBox
|
006E5771 8B8320030000 mov eax, [ebx+$0320]
* Reference to field Tsel_stock.OFFS_03BC
|
006E5777 8B93BC030000 mov edx, [ebx+$03BC]
* Reference to field TComboBox.OFFS_0234
|
006E577D 899034020000 mov [eax+$0234], edx
* Reference to field TComboBox.OnChange : TNotifyEvent
|
006E5783 C7803002000050276E00 mov dword ptr [eax+$0230], $006E2750
006E578D 5E pop esi
006E578E 5B pop ebx
006E578F C3 ret
*)
end;
procedure Tsel_stock.FormDestroy(Sender : TObject);
begin
(*
006E5994 53 push ebx
006E5995 56 push esi
006E5996 57 push edi
006E5997 55 push ebp
006E5998 51 push ecx
006E5999 8BD8 mov ebx, eax
* Reference to control Tsel_stock.ListView1 : TListView
|
006E599B 8B83B8030000 mov eax, [ebx+$03B8]
* Reference to field TListView.Items : TListItems
|
006E59A1 8B800C020000 mov eax, [eax+$020C]
* Reference to: comctrls.TListItems.GetCount(TListItems):Integer;
|
006E59A7 E8907FD9FF call 0047D93C
006E59AC 85C0 test eax, eax
006E59AE 7473 jz 006E5A23
* Reference to control Tsel_stock.ListView1 : TListView
|
006E59B0 8B83B8030000 mov eax, [ebx+$03B8]
* Reference to field TListView.Items : TListItems
|
006E59B6 8B800C020000 mov eax, [eax+$020C]
* Reference to: comctrls.TListItems.GetCount(TListItems):Integer;
|
006E59BC E87B7FD9FF call 0047D93C
006E59C1 8BF8 mov edi, eax
006E59C3 4F dec edi
006E59C4 6685FF test di, di
006E59C7 725A jb 006E5A23
006E59C9 47 inc edi
006E59CA 33F6 xor esi, esi
006E59CC 0FB7EE movzx ebp, si
006E59CF 8BD5 mov edx, ebp
* Reference to control Tsel_stock.ListView1 : TListView
|
006E59D1 8B83B8030000 mov eax, [ebx+$03B8]
* Reference to field TListView.Items : TListItems
|
006E59D7 8B800C020000 mov eax, [eax+$020C]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
006E59DD E88A7FD9FF call 0047D96C
* Reference to field TListItems.OFFS_000C
|
006E59E2 83780C00 cmp dword ptr [eax+$0C], +$00
006E59E6 7435 jz 006E5A1D
006E59E8 8BD5 mov edx, ebp
* Reference to control Tsel_stock.ListView1 : TListView
|
006E59EA 8B83B8030000 mov eax, [ebx+$03B8]
* Reference to field TListView.Items : TListItems
|
006E59F0 8B800C020000 mov eax, [eax+$020C]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
006E59F6 E8717FD9FF call 0047D96C
* Reference to field TListItems.OFFS_000C
|
006E59FB 8B400C mov eax, [eax+$0C]
* Reference to: system.@FreeMem;
|
006E59FE E87DCED1FF call 00402880
006E5A03 8BD5 mov edx, ebp
* Reference to control Tsel_stock.ListView1 : TListView
|
006E5A05 8B83B8030000 mov eax, [ebx+$03B8]
* Reference to field TListView.Items : TListItems
|
006E5A0B 8B800C020000 mov eax, [eax+$020C]
* Reference to: comctrls.TListItems.GetItem(TListItems;Integer):TListItem;
|
006E5A11 E8567FD9FF call 0047D96C
006E5A16 33D2 xor edx, edx
* Reference to: comctrls.TListItem.SetData(TListItem;Pointer);
|
006E5A18 E8537AD9FF call 0047D470
006E5A1D 46 inc esi
006E5A1E 66FFCF dec di
006E5A21 75A9 jnz 006E59CC
* Reference to control Tsel_stock.TvwTips : TTreeView
|
006E5A23 8B8384030000 mov eax, [ebx+$0384]
* Reference to field TTreeView.Items : TTreeNodes
|
006E5A29 8B8054020000 mov eax, [eax+$0254]
006E5A2F 33D2 xor edx, edx
* Reference to: comctrls.TTreeNodes.GetNodeFromIndex(TTreeNodes;Integer):TTreeNode;
|
006E5A31 E8C215D9FF call 00476FF8
006E5A36 890424 mov [esp], eax
006E5A39 8BC4 mov eax, esp
* Reference to: Unit_0073FBC3.Proc_00740C18
|
006E5A3B E8D8B10500 call 00740C18
* Reference to pointer to GlobalVar_007991B0
|
006E5A40 A1B4D07700 mov eax, dword ptr [$0077D0B4]
006E5A45 833800 cmp dword ptr [eax], +$00
006E5A48 7415 jz 006E5A5F
* Reference to pointer to GlobalVar_007991B0
|
006E5A4A A1B4D07700 mov eax, dword ptr [$0077D0B4]
006E5A4F 8B00 mov eax, [eax]
* Reference to: system.TObject.Free(TObject);
|
006E5A51 E876D8D1FF call 004032CC
* Reference to pointer to GlobalVar_007991B0
|
006E5A56 A1B4D07700 mov eax, dword ptr [$0077D0B4]
006E5A5B 33D2 xor edx, edx
006E5A5D 8910 mov [eax], edx
* Reference to field Tsel_stock.OFFS_03BC
|
006E5A5F 8B83BC030000 mov eax, [ebx+$03BC]
006E5A65 85C0 test eax, eax
006E5A67 740D jz 006E5A76
* Reference to: system.TObject.Free(TObject);
|
006E5A69 E85ED8D1FF call 004032CC
006E5A6E 33C0 xor eax, eax
* Reference to field Tsel_stock.OFFS_03BC
|
006E5A70 8983BC030000 mov [ebx+$03BC], eax
* Reference to field Tsel_stock.OFFS_0448
|
006E5A76 8B8348040000 mov eax, [ebx+$0448]
006E5A7C 85C0 test eax, eax
006E5A7E 740D jz 006E5A8D
* Reference to: system.TObject.Free(TObject);
|
006E5A80 E847D8D1FF call 004032CC
006E5A85 33C0 xor eax, eax
* Reference to field Tsel_stock.OFFS_0448
|
006E5A87 898348040000 mov [ebx+$0448], eax
* Reference to field Tsel_stock.OFFS_03C8
|
006E5A8D 8B83C8030000 mov eax, [ebx+$03C8]
006E5A93 85C0 test eax, eax
006E5A95 7405 jz 006E5A9C
* Reference to: system.@FreeMem;
|
006E5A97 E8E4CDD1FF call 00402880
* Reference to field Tsel_stock.OFFS_03EF
|
006E5A9C 8D93EF030000 lea edx, [ebx+$03EF]
006E5AA2 A118CB7700 mov eax, dword ptr [$0077CB18]
006E5AA7 8B00 mov eax, [eax]
* Reference to: Unit_0070F7F0.Proc_0071AEBC
|
006E5AA9 E80E540300 call 0071AEBC
* Reference to field Tsel_stock.OFFS_0438
|
006E5AAE 8D9338040000 lea edx, [ebx+$0438]
006E5AB4 A118CB7700 mov eax, dword ptr [$0077CB18]
006E5AB9 8B00 mov eax, [eax]
* Reference to: Unit_0070F7F0.Proc_0071AC18
|
006E5ABB E858510300 call 0071AC18
* Reference to field Tsel_stock.OFFS_03D0
|
006E5AC0 8D93D0030000 lea edx, [ebx+$03D0]
006E5AC6 A118CB7700 mov eax, dword ptr [$0077CB18]
006E5ACB 8B00 mov eax, [eax]
* Reference to: Unit_0070F7F0.Proc_0071AC18
|
006E5ACD E846510300 call 0071AC18
006E5AD2 5A pop edx
006E5AD3 5D pop ebp
006E5AD4 5F pop edi
006E5AD5 5E pop esi
006E5AD6 5B pop ebx
006E5AD7 C3 ret
*)
end;
procedure Tsel_stock.Button10Click(Sender : TObject);
begin
(*
* Reference to: forms.TCustomForm.Close(TCustomForm);
|
006E5AD8 E8DF05D7FF call 004560BC
006E5ADD C3 ret
*)
end;
procedure Tsel_stock.MindButtonClick(Sender : TObject);
begin
(*
006E5AE0 55 push ebp
006E5AE1 8BEC mov ebp, esp
006E5AE3 83C4F8 add esp, -$08
006E5AE6 53 push ebx
006E5AE7 56 push esi
006E5AE8 33C9 xor ecx, ecx
006E5AEA 894DF8 mov [ebp-$08], ecx
006E5AED 8BD8 mov ebx, eax
006E5AEF 33C0 xor eax, eax
006E5AF1 55 push ebp
* Possible String Reference to: '閩扪⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -