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