Delphi限制只允许运行一个实例,程序只运行一次的方法

delphi it

procedure TFrmMain.FormCreate(Sender: TObject);
var
  errno: integer;
  hmutex: hwnd;
begin

  // 判断并禁止运行多个实例程序
  hmutex := createmutex(nil, false, pchar(application.Title));
  errno := getlasterror;
  if errno = error_already_exists then
  begin
    ShowMessage('程序已经在运行了');
    application.Terminate;
  end;

  //下面这是你原来的代码
end;

相关推荐

  • dephi让程序只运行一次详解 公司开发的软件需要对串口进行*作,每次打开软件后程序自动去打开串口寻找连接到串口上的设备,但是如果用户不知道打开了两次,那么第二次打开的程序是不能正常使用的,因为对串口的*作时独占的,第一个程序独占了串口的使用权,其他程序无法再使用那一个串
  • 如何在linux嵌入式开发板上开机自动运行用户应用程序 开机后自动运行用户的应用程序或启动系统服务的命令保存在开发板根文件系统的/usr/etc/rc.local文件中。有的开发板开机后自动运行图形界面程序,需要按住ctrl+c让开发板进入到Linux的SHELL提示符界面。其实可通过注释掉rc
  • Hadoop学习全程记录——在Eclipse中运行第一个MapReduce程序 Hadoop学习全程记录——在Eclipse中运行第一个MapReduce程序博客分类:hadoopHadoopEclipseMapreduceJavaUbuntu接上一篇文章:Hadoop学习全程记录——hadoop入门这是Hadoop学
  • 实变函数,计算方法程序,康托图 计算方法程序:1、秦九韶算法2、二分法3、拉格朗日插值4、埃特金算法5、复化梯形法6、复化辛甫生算法7、二阶龙格库塔方法8、四阶龙格库塔方法 9、改进的欧拉方法 10、迭代法 11、埃特金加速方法:12、牛顿迭代法 13、追赶法 14、雅克
  • [IOS]从零开始搭建基于Xcode7的IOS开发环境和免开发者帐号真机运行第一个IOS程序HelloWorld 首先这篇文章比较长,若想了解Xcode7的免开发者帐号真机运行IOS程序的话,直接转到第五部分。转载请注明原文地址:http://www.cnblogs.com/litou/p/4843772.html本文章的内容来自于百度、谷歌得到的别人
  • winmonV4.6绿色版(可以帮助在后台记录用户运行过哪些的程序)下载,高速下载 winmonV4.6绿色版(可以帮助在后台记录用户运行过哪些的程序)软件标签:winmon软件授权:绿色版更新时间:2010-12-1408:22:53软件类型:国产软件软件大小:32.0KB软件语言:简体中文 应用平台:Win2000/W
  • VI设计的原则、方法程序及其对公司的长远影响,vi设计论文 VI设计的原则、方法程序及其对公司的长远影响,vi设计论文一、VI内涵及其对于企业的作用概述VI即VisualIdentity,即企业视觉识别系统,它是CIS即公司识别系统的重要组成部分,对于企业形象和深层次的企业理念有着最强的传播力和感染
  • 模拟农场15游戏打不开无法运行解决方法 模拟农场15作为模拟农场系列游戏的最新作品,其受欢迎程度也前所未有,最近有些玩家反映游戏打不开无法运行,遇到这种问题怎么办呢?接下来小编就为大家带来模拟农场15无法运行解决方法详解,以供参考。1.游戏安装环境不全模拟农场15对对游戏运行环境
  • 《模拟农场15》游戏打不开 无法运行解决方法 在模拟农场15游戏中,不少玩家下载安装游戏后遇到了游戏打不开无法运行的问题,这里给大家分享下这一问题的解决方法。游戏安装环境不全模拟农场15对对游戏运行环境也有要求。游戏安装程序在游戏目录_CommonRedist文件夹下。安装程序包括Di
  • 如何超度祖先亡魂、荐亡?如何安胎解厄?如何消业障集福?超度的方法程序顺序。 为什么子孙继嗣为作功德,可以超度亡魂呢?众生都是不见棺材不落泪,不到黄河心不死!活着的时候,一千个不信,一万个不信,一旦肉体的生命断绝了,此‘中阴身’的见闻觉知,和生前一样;这时处境凄凉恐怖,精神上受著很大威胁与不安!生前若闻佛法而不信者,
  • linux下weblogic服务后台运行封装方法 在linux直接使用以下命令weblogic服务始终处于前台,当我们推出前台时服务将自动关闭./startWeblogic.sh如果需要在后台运行时进行如下封装1.创建start.shnohup./startWeblogic.sh&
  • 解决64位本本WIN7改装xp3后系统运行慢的方法是什么 2011年3月,笔者新买了一款64位戴尔Inspiron14R(N4010)笔记本,将原装正版64位WIN7-HOMEBASIC,换装网上盛行的“戴尔[DeLL]笔记本&台式机GhostXP_SP3专业版V2011.04”后(非双系

你的评论

就没有什么想说的吗?

最新博客

关于我们 免责声明 移动版

©2017传客网    琼ICP备15003173号-2    

本站部分文章来源于互联网,版权归属于原作者。
本站所有转载文章言论不代表本站观点,如是侵犯了原作者的权利请发邮件联系站长(weishubao@126.com),我们收到后立即删除。
站内所有资源仅供学习与参考,请勿用于商业用途,否则产生的一切后果将由您自己承担!

X