PDA

View Full Version : سوال در خصوص تعداد اجرای exe



Kamyar.Kimiyabeigi
سه شنبه 10 اردیبهشت 1387, 12:01 عصر
با سلام
من میخوام exe برنامه در کامپیوتر کاربر فقط یک بار اجرا بشه و وقتی کاربر خواست دفعه بعد هم اجراش کنه نتونه فقط و فقط یک بار اجرا بشه. برای این موضوع چه کار باید بکنم؟ ممنون

nouri2015
سه شنبه 10 اردیبهشت 1387, 12:11 عصر
قبلا بحثش شده بود، search کنید پیدا می کنید

Kamyar.Kimiyabeigi
سه شنبه 10 اردیبهشت 1387, 13:45 عصر
من جستجو کردم ولی چیزی پیدا نکردم. اگربراتون مقدوره لینکش روبرام بذارین

dkhatibi
سه شنبه 10 اردیبهشت 1387, 18:27 عصر
http://barnamenevis.org/forum/showthread.php?t=101167

Kamyar.Kimiyabeigi
چهارشنبه 11 اردیبهشت 1387, 08:19 صبح
http://barnamenevis.org/forum/showthread.php?t=101167

ممنون از توجهتون. ولی من نمیخوام تا زمانی که برنامه در حال اجرا هست دیگه کاربر نتونه دوباره برنامه رو اجرا کنه بلکه میخوام برنامه کلا" فقط یک بار برای همیشه اجرا بشه.

m-khorsandi
چهارشنبه 11 اردیبهشت 1387, 08:35 صبح
Allow Only One Application Execution Per Windows Session (http://barnamenevis.org/forum/showthread.php?t=103814)

A.Nemati
چهارشنبه 11 اردیبهشت 1387, 09:17 صبح
وقتي برنامه اجرا شد، در يه كليد تو رجيستري مثلا يك كد يا تاريخ اجراي برنامه را بنويس، دفعه بعد كه برنامه خواست اجرا بشه برو ببين در اون كليد رجيستري، تاريخ يا كد مورد نظر نوشته شده يا نه، اگه بود، برنامه را قبل از باز شدن Destroy كن.

hadisalahi2
چهارشنبه 11 اردیبهشت 1387, 14:02 عصر
نوشتن داخل رجیستری

var s:String;
keygood:Boolean;
begin
reg:=TRegistry.Create;
try
reg.OpenKey('HKEY_LOCAL_MACHINE',true);
reg.WriteInteger('count',1);
finally;
end;
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXX

خواندن از رجیستری

REG:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
try
keygood:=reg.OpenKey('HKEY_LOCAL_MACHINE',false);
if keygood then begin
s:=reg.ReadString('count');
end;
finally
reg.Free;