S
santgan
Unregistered / Unconfirmed
GUEST, unregistred user!
3x very much
Y
YB_unique
Unregistered / Unconfirmed
GUEST, unregistred user!
GetModuleFileName() ???
G
gxcooo
Unregistered / Unconfirmed
GUEST, unregistred user!
可执行文件?
T
tseug
Unregistered / Unconfirmed
GUEST, unregistred user!
The GetModuleFileName function retrieves the full path and filename for the <br>executable file containing the specified module. <br><br>Windows 95: The GetModuleFilename function will return long filenames when an <br>application's version number is greater than or equal to 4.00 and the long <br>filename is available. Otherwise, it returns only 8.3 format filenames.<br><br>DWORD GetModuleFileName(<br> HMODULE hModule, // handle to module to find filename for <br> LPTSTR lpFilename, // pointer to buffer for module path <br> DWORD nSize // size of buffer, in characters <br>  
; <br> <br><br>Parameters<br><br>hModule<br><br>Identifies the module whose executable filename is being requested. If this <br>parameter is NULL, GetModuleFileName returns the path for the file used to <br>create the calling process. <br><br>lpFilename<br><br>Points to a buffer that is filled in with the path and filename of the given <br>module. <br><br>nSize<br><br>Specifies the length, in characters, of the lpFilename buffer. If the length o<br>f the path and filename exceeds this limit, the string is truncated. <br><br> <br><br>Return Values<br><br>If the function succeeds, the return value is the length, in characters, of <br>the string copied to the buffer.<br>If the function fails, the return value is zero. To get extended error <br>information, call GetLastError. <br><br>Remarks<br><br>If a module is loaded in two processes, its module filename in one process may <br>differ in case from its module filename in the other process.<br><br>
; <br> <br><br>Parameters<br><br>hModule<br><br>Identifies the module whose executable filename is being requested. If this <br>parameter is NULL, GetModuleFileName returns the path for the file used to <br>create the calling process. <br><br>lpFilename<br><br>Points to a buffer that is filled in with the path and filename of the given <br>module. <br><br>nSize<br><br>Specifies the length, in characters, of the lpFilename buffer. If the length o<br>f the path and filename exceeds this limit, the string is truncated. <br><br> <br><br>Return Values<br><br>If the function succeeds, the return value is the length, in characters, of <br>the string copied to the buffer.<br>If the function fails, the return value is zero. To get extended error <br>information, call GetLastError. <br><br>Remarks<br><br>If a module is loaded in two processes, its module filename in one process may <br>differ in case from its module filename in the other process.<br><br>
V
vine
Unregistered / Unconfirmed
GUEST, unregistred user!
可以自己看看这个例子：<br><br>uses TLHelp32；<br>function GetAppName(const AWindowHandle: THandle): string;<br>var<br> PI: DWORD;<br> ContinueLoop:BOOL;<br> SnapshotHandle:THandle;<br> ProcessEntry32:TProcessEntry32;<br>begin<br> Result := '';<br> GetWindowThreadProcessId(AWindowHandle, @PI);<br><br> SnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);<br> ProcessEntry32.dwSize := Sizeof(ProcessEntry32);<br> ContinueLoop := Process32First(SnapshotHandle,ProcessEntry32);<br> while ContinueLoop do<br> begin<br> if ProcessEntry32.th32ProcessID = PI then<br> begin<br> Result := ProcessEntry32.szExeFile;<br> break;<br> end;<br> ContinueLoop:=Process32Next(SnapshotHandle, ProcessEntry32);<br> end;<br> CloseHandle(SnapshotHandle);<br>end;<br><br>
S
santgan
Unregistered / Unconfirmed
GUEST, unregistred user!
re tseug:<br>这个API我用过了，在Win2000下一直返回NULL，而且我通过任务列表确认我的调用<br>参数中ProcessID是正确的。
V
vine
Unregistered / Unconfirmed
GUEST, unregistred user!
我的那个不行么？
F
Fermi
Unregistered / Unconfirmed
GUEST, unregistred user!
TLHelp32只能在win9X中使用，在2000/XP下对应的是PSAPI，相应的信息，请查询DELPHI5开发人员<br>指南，其中有详细的注释
S
santgan
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。