نکات برنامه نویسی در دلفی

[babak_delphi]

برای اینکه بعد از اجرای برنامه اگر کاربر روی آیکن برنامه کلیک کرد ، همزمان چند نسخه از اون اجرا نشه می تونیم فایل DPR پروژه رو بصورت زیر تغییر بدیم

uses 

  windows;

var

hmutex : THandle;

begin

hmutex := CreateMutex(nil,false,'OneCopyMutex');

if waitforsingleobject(hmutex, 0) <> wait_timeout then

begin

  Application.Initialize;

.

.

.

  Application.Run;

end;

end.