用delphi 写得一个dll 怎么判断自身是否已经被某个进程加载了。。。高手帮忙。

。。。汗一个。。在x问的 delphi 问题 都没人回。难道叉子们都不用delphi的么。。

没试过，不知道用互斥对象可不可以。
API函数 CreateMutex 创建互斥对象，然后用GetLastError()，如果这个互斥对象已经存在，GetLastError()返回ERROR_ALREADY_EXISTS 。我不知道Delphi那个语言的语法。
互斥对象是个好东西，如果知道某个程序是用它来防止启动多个实例，并且知道这个互斥对象的名称，我们就可以编程创建一个同名的斥对象来防止这个程序启动。不过我没研究过这个东西，据说有人用这个来防止微点启动，已经实现了，真牛，比注册表映象劫持好多了。

GetCurrentProcess
和
GetCurrentProcessId

在里面加个 showmessage 不就行了  要是能弹出来的话不就是加载了么？