根据运行中的窗体，寻找源文件路径 [问题点数：50分，结帖人llfguest]
-
本版专家分：31结帖率 99.24% -
我想问，如果已经有一个程序在系统里运行那么我在 delphi 中想要根据已经运行的窗体或者进程，来找到这个已经在运行的程序的源文件路径该怎么写代码？（比如：已经有一个名称为 servermagic 窗体在运行，然后，我想在程序中，根据这个运行中的窗体 servermagic ，来找到这个窗体的源文件的路径 c:\pqmagic\servernt.exe ）
有些地方说是用 getmodulefilename 但我还是不知道怎么用，能不能给个最简单的例子问题点数：50分
-
本版专家分：60266
-
-
铜牌
2003年9月 总版技术专家分月排行榜第三
2003年8月 总版技术专家分月排行榜第三
-
- 红花 2003年8月 .NET技术大版内专家分月排行榜第一
-
- 黄花 2003年9月 .NET技术大版内专家分月排行榜第二
-
- 蓝花 2003年7月 .NET技术大版内专家分月排行榜第三
-
-
Process[] prs = Process.GetProcesses();
if(prs != null)
{
foreach(Process ps in prs)
{
if(ps.MainWindowTitle.IndexOf("servermagic") != -1)
{
MessageBox.Show(ps.MainModule.FileName);
}
}
}
-
本版专家分：31
-
有没有高手，将它改成 VB.net 或 delphi 代码？
-
本版专家分：1053 -
Dim prs() as Process=Process.GetProcesses()
If Not prs Is Nothing Then
Dim ps As Process
For Each ps In prs
If ps.MainWindowTitle.IndexOf("servermagic")<>-1 Then
MessageBox.Show(ps.MainModule.FileName)
End If
Next
End If
