2007年7月22日
防止再次运行同一个应用程序
摘要： 防止同时打开多个应用程序的实例，也就是同时只有一个程序在运行，再运行同一个程序时，会自动关闭，以下代码放在项目的.dpr(项目文件)中的Application.Initialize;上面。 代码如下 var hMutex: DWORD; Ret: Integer;{以上代码要放在begin..end上}hMutex := 0; try hMut... 阅读全文
posted @ 2007-07-22 15:46 sonicit 阅读(318) 评论(0) 推荐(0) 编辑
关于TList操作及释放的问题
摘要： 大家都知道TList即可用于链表，又可用于数组，最近在做项目时遇到点小问题（可能是我对指针了解的不透彻吧），造成了不大不小的问题，下面就说说是怎么回事。 首先我先定义了Record及对应的指针类型。 PGoodsInfo = ^GoodsInfo; GoodsInfo = record ID : string; Name : stri... 阅读全文
posted @ 2007-07-22 08:41 sonicit 阅读(1024) 评论(0) 推荐(0) 编辑