互斥对象的使用示例
2006-07-20 17:18
447 查看
var
hMutex: HWND;
Ret: integer;
begin
Application.Initialize;
Application.Title := '神迹之光-免费测试版';
hMutex := CreateMutex(nil, False, '传奇外挂 酷酷神仙版');
Ret := GetLastError;
if Ret <> ERROR_ALREADY_EXISTS then
begin
Application.CreateForm(TFrmMain, FrmMain);
Application.Run;
end
else
ReleaseMutex(hMutex);
end.
hMutex: HWND;
Ret: integer;
begin
Application.Initialize;
Application.Title := '神迹之光-免费测试版';
hMutex := CreateMutex(nil, False, '传奇外挂 酷酷神仙版');
Ret := GetLastError;
if Ret <> ERROR_ALREADY_EXISTS then
begin
Application.CreateForm(TFrmMain, FrmMain);
Application.Run;
end
else
ReleaseMutex(hMutex);
end.
相关文章推荐
- 使用XStream是实现XML与Java对象的转换(1)--简介及入门示例
- asp中Scripting.Dictionary字典对象使用示例
- Django框架中的对象列表视图使用示例
- 《GOF设计模式》—原型(Prototype)—Delphi源码示例:基于类的原型管理器(使用TList和TObject对象服务实现)
- Node.js 使用jQuery取得Nodejs http服务端返回的JSON对象示例
- NTDSUTIL清理活动目录对象使用技术示例
- 下面的示例演示如何使用传递到事件处理方法的 GridViewCommandEventArgs 对象确定引发事件的按钮的命令名。
- php使用变量动态创建类的对象用法示例
- 互斥对象,事件对象,临界区的使用比较
- 需要License的控件使用示例:创建带License的MSChart对象
- 使用命令对象代替switch语句的写法示例
- php示例代码之使用mysqli对象
- JS使用Date对象实时显示当前系统时间简单示例
- SignalR代理对象异常:Uncaught TypeError: Cannot read property 'client' of undefined 推出的结论 SignalR 简单示例 通过三个DEMO学会SignalR的三种实现方式 SignalR推送框架两个项目永久连接通讯使用 SignalR 集线器简单实例2 用SignalR创建实时永久长连接异步网络应用程序
- 使用.Net Reflection 反射机制 动态获取对象字段内容的示例
- asp中Scripting.Dictionary字典对象使用示例
- 使用XStream注解实现Java对象与XML互相转换的代码示例
- python使用内存zipfile对象在内存中打包文件示例
- jquery分页对象使用示例
- 使用外键对象示例