ابلحس مخكم في عالم البرمجه

[هوازن]

محبين الفيجوال بيسك


احبتي انتم تشاهدون ان فيه برامج لها وقت زمني يعني إذا انتها الزمن المحدد
يتوقف البرنامج عن العمل وتطلع لك رسالة نص الرسالة (( يمكنك شراء البرنامج تعرفون هذه الطريقة
طيب مع هوازن هنا الحل لكي تنشاء برنامج بهذه الحركة كي يشتغل برنامج وانت تحدد الوقت 00/00
تابع بدقة
كود يقوم بحماية برنامجك حيث يعمل عدد من المرات (تحددها بنفسك) ثم يتوقف نهائيا عن العمل

كود :
Private Sub Form_Load()
retvalue = GetSetting("A", "0", "Runcount")
GD$ = Val(retvalue) + 1
SaveSetting "A", "0", "RunCount", GD$
If GD$ > 3 Then ' الرقم (3) يحدد عدد مرات التشغيل
MsgBox "انتهت مدة تشغيل البرنامج .. عليك بشراء النسخة الاصلية"
Unload FRM '
End If
End Sub

حتى يظهر الكود بشكل سليم يمكنك لصقة في notepad
Runcount غير الكلمة هذي على شان ما يكشفه وحد ويلعب به
حط بداله أي كلمة مهو مهم أهمشي تحط كلمه
والسلام ياهوووووووو

[نواف العصيمي]

يعطيك العافيه

وبيني وبينها تار قديم :)
الفيجوال بسيك

ولك التقدير والإحترام

[هوازن]

هههههههههههههههههههههههه

[بندر الحافي]

والله ما فهمت من شرحك شي


انا عندي بالجهاز برنامج انتهاء وقت التجربه

له وكل ما دخلت يقول اشتر البرنامج انتهاء مدة التجربه

ابغا اكسر حاجز التوقيت كيف ؟

[عبدالله هادي ناشي الفليت.]

؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[نواف العصيمي]

هذا كود مكتوب بلغة الفيجوال بيسك وينفذ أوامر محدد

لكن أين يوضع :) فكما قلت بيني وبينها تار قديم لونها أسهل وحده

لكن الي حاول يفهمني اللغه كان ثور :( وجلعني أصاب بالعقده

لكن على حسب إطلاعي أنه كود للمبرمجين مثلا برنامج المقاهي إذا صمم بالفيجوال

تضع هذا معه .. إذا كان لتجربه الخ ..