Question

求PB大神解释一下下面一段话，具体是什么意思，写这个的目的是什么？这些代码需要写在哪？

//先构建一个用户对象：
forward
global type uo_get_exename from nonvisualobject
end type
type s_process from structure within uo_get_exename
end type
end forward
type s_process from structure
unsignedlong structsize
unsignedlong usage
unsignedlong processid
unsignedlong defaultheapid
unsignedlong moduleid
unsignedlong threads
unsignedlong parentprocessid
unsignedlong calssbase
unsignedlong flags
character filename[260]
end type
global type uo_get_exename from nonvisualobject
end type
global uo_get_exename uo_get_exename
type prototypes
Function Long CreateToolhelp32Snapshot(Long Flags,Long ProcessId) Library "kernel32.dll" alias for "CreateToolhelp32Snapshot;ansi"
Function Integer Process32First(uLong Snapshot,ref s_Process Process) Library "kernel32.dll" alias for "Process32First;ansi"
Function Integer Process32Next(uLong Snapshot,ref s_Process Process) Library "kernel32.dll" alias for "Process32Next;ansi"

end prototypes
forward prototypes
public function long of_getexe (string as_exename)
end prototypes
public function long of_getexe (string as_exename);//构造对象uo_get_exename的函数of_getexe(String as_exename)

Answer 1

这是一个自定义对象uo_get_exename的source文件内容，这个对象中包含一个名为s_process的结构和一个名为of_getexe的函数，三个名为CreateToolhelp32Snapshot、Process32First、Process32Next的外部函数。
你可以新建一个同名的自定义对象，然后在edit source编辑模式下将这段代码覆盖到里面，然后就可以在编辑模式下查看这个对象。