+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : مصادر دلفي مفتوحة تعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=14)
+--- الموضوع : مشروع تفعيل البرنامج عبر الانترنت (/showthread.php?tid=4987)
الصفحات:
1
2
مشروع تفعيل البرنامج عبر الانترنت - onexite - 07-03-2013
السلام عليكم
ساتناول في هذا الموضوع طريقة تفعيل البرنامج باستخدام رقم الفريد
ويمكنكم بهذه الطريقة تحديد عدد مستخدمي برامجكم او ارسال رسالة للمستخدم تخبرهم انه يوجد تحديث او تبقى لك xxx يوم لينتهي التفعيل
صورة مبداية عن المشروع
![[صورة: 20130307193716.png]](http://img11.imageshack.us/img11/4006/20130307193716.png)
البقية ستكون في الردود والايام التالية اذا كنا من الحيين
وسابدا المشروع من 0 اي سنبدا بملف html كمشروع البوت نات وكذلك البرنامج المبرمج بالدلفي باستخدام مكونات indy
مشروع تفعيل البرنامج عبر الانترنت - DAMAX2010 - 07-03-2013
و الله فكرة رائعة جدا ان شاء الله نصل الى نهاية المشروع اذا احتجت أي شيء فأنا هنا ان شاء الله
مشروع تفعيل البرنامج عبر الانترنت - onexite - 08-03-2013
هذه تصاميم اولية من هنا وهناك
![[صورة: 20130308085819.png]](http://img17.imageshack.us/img17/6585/20130308085819.png)
يوجد المزيد في المرفقات
مشروع تفعيل البرنامج عبر الانترنت - onexite - 08-03-2013
السلام عليكم
هذه فكرة عامة عن البرنامج والطريقة المستخدمة
اذا كانت لدينا رسالة بالطبع ستكون لها عنوان ومحتوى ..
ولذلك قمت بتقسيم الامر
PHP كود :
MSG|Hello world|5 day left|'
اذن لنبرمج سكربت بسيط هدفه ارجاع الامر
PHP كود :
<?php
if (isset($_GET['hdd'])){
echo 'MSG|Hello world|5 day left|';
}
?>اذن لنقم بارسال الامر باستخدام الدلفي بفتح هذا الرابط حيث الرقم الفريد = 123
PHP كود :
http://127.0.0.1/exemple_02/active.php?hdd=123
PHP كود :
type
TDynamicSA= array of string;
//-----------------
function split(text,delimiter :string): TDynamicSA ;
label 1 ;
var
i,j:Integer;
begin
j:=0 ;
for i:=0 to Length(text)-1 do begin
1:
if Pos(delimiter,text)<>0 then
begin
SetLength(Result,Length(Result)+1);
Result[j]:=Copy(text,1,Pos(delimiter,text)-1);
Delete(text,1,Pos(delimiter,text));
j:=j+1;
goto 1;
end;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var test:TDynamicSA;
begin
test:=split(IdHTTP1.Get('http://127.0.0.1/exemple_02/active.php?hdd=123'),'|');
ShowMessage(test[2]);
end;
![[صورة: 20130308140859.png]](http://img199.imageshack.us/img199/3839/20130308140859.png)
ولتحسين الكود اكثر
PHP كود :
if test[0]='MSG' then
ShowMessage(test[2]);
مشروع تفعيل البرنامج عبر الانترنت - ALmuhhnad - 08-03-2013
الفكرة جيدة جداً ... وقد كسرت برناامج يعمل بنفس الطريقة ... لذلك انتبه اي تضع كودك وكيف تضعه
في إنتظار البقية
مشروع تفعيل البرنامج عبر الانترنت - onexite - 09-03-2013
لا جديد يذكر الا اني دخلت مرحلة التكرار الممل
تم تعديل الواجهة الرئيسية html فقط
![[صورة: 20130309104649.png]](http://img854.imageshack.us/img854/3281/20130309104649.png)
واما بخصوص التفعيل
![[صورة: 20130309105332.png]](http://img189.imageshack.us/img189/408/20130309105332.png)
اذا كان رقم hdd=123456 اذن مرحبا والا الوداع
PHP كود :
<?php
if (isset($_GET['hdd'])){
if ($_GET['hdd']=="123456")
echo 'MSG|Hello world|5 day left|';
else echo 'DSC|BEY|0 day left|';
}
?>مشروع تفعيل البرنامج عبر الانترنت - ALmuhhnad - 09-03-2013
لدي سؤال
... كيف ستخبر البرنامج ان الصفحه اعادة "0 day left" او "5 day left" ؟بالنسبة للواجهه الرئيسية .. يوجد خطا صغير ... قم بتغصير حجم نافذة المتصفح وانت على صحفة الواجهه الرئيسية .. ستجد بعض المكونات تخرج من مكانها وتدداخل ببعض
مشروع تفعيل البرنامج عبر الانترنت - onexite - 09-03-2013
ALmuhhnad كتب :كيف ستخبر البرنامج ان الصفحه اعادة "0 day left" او "5 day left" ؟الم تلاحظ ان البرنامج سيرسل امرا وفيه الرقم الفريد ?hdd=11111 واعلم ان البرنامج عند كل تشغيل سيسجل نفسه ان كان غير موجود وان كان موجود يبحث هل يوجد امر ليطبقه ساعالج ذلك بقاعدة بيانات ولو اطلعت على سورس البوت نت لفهمت الموضوع جيدا
اما عن الصفحة فهل ممكن تضع صورة لفهم المشكل
مشروع تفعيل البرنامج عبر الانترنت - onexite - 09-03-2013
أهم الاضافات
- لاول مرة استخدمت java_script في هذا السكربت لاختيار الكل والعكس
- تم اضافة نظام دخول
- اضافة مهمة
- اضافة مشاهدة المهمات
- اضافة بحث
![[صورة: 20130309194036.png]](http://img441.imageshack.us/img441/7421/20130309194036.png)
مشروع تفعيل البرنامج عبر الانترنت - ALmuhhnad - 10-03-2013
إقتباس :لو اطلعت على سورس البوت نت لفهمت الموضوع جيداانا لا اعرف لغة الـ PHP ... لكني افهم بعض الاكواد من اسمها .. فقط
إقتباس : اذا كان رقم hdd=123456 اذن مرحبا والا الوداعهنا مربط الفرس
... حيث اي كرااكر غير محترف ... يستطيع عكس هذا الشرط او ابطاله .. ويصبح نظام التفعيل لا فائدة لهاتكلم من ناحية الحماية ... بما ان الفكرة تتكلم عن تفعيل البرنامج من خلال النترنت .. إذا لابد انها لعدم نسخ البرنامج بشكل
غير قانوني
هذه الصورة :
كود :
http://store2.up-00.com/Nov12/rB175276.jpg