طريقة جعل نافذة ادخال اسم وكلمة المرور في بداية البرنامج

[S.FATEH]

حسنا اخي لا مشكلة اعتقد نفس الامر ينطبق على ملف lpr ...

[مهند الرسيني]

- حالة تسجيل الدخول ناجحة تقوم باخفائه Hide لا يمكن اغلاقه Close لانك ستغلق كامل البرنامج و تقوم باضهار الفورم الرئيسي عند عمل Minimize لتطبيق لاحظ ماذا يحدث التطبيق...

ههههه كلام صحيح .. غفلت عن هذه
وبالنسبة لـ lazarus فأنا أستعملها كذلك الأمر مماثل :

[rahiche]

اخي فاتح اذا قمت بجعل النموذجين يظهران في نفس الوقت و كأن الأمر نفسة أبسط كراكر يستطيع أن يتجاوز النافدة و يصل للنافذة الأخرى بدون كتابة كلمة سر لذلك يجب عدم جعله يهر معه و بالإضافة اذا في الطريقة التي ذكرتها لا يوجد مشاكل و يتم حلها جميعا
و هذا بجعل النموذج الأول هو النموذج الرئيسي في وقت التشتغيل
الكود كما توضح الصورة حيث يصبح النموذج الثاني هو النموذج الرئيسي اذا ضغطنا على الزر و نستبدلها بجواب لشرط لكي نحصل على مرادنا
مشكور على التنبيه

كود :

http://store2.up-00.com/2015-01/1422543191452.png

كود :

procedure SetAsMainForm(aForm:TForm); var P:Pointer; begin Application.MainFormOnTaskBar := False; try P := @Application.Mainform; Pointer(P^) := aForm; aForm.Show; finally Application.MainFormOnTaskBar := True; end; end; procedure TForm2.Button1Click(Sender: TObject); begin SetAsMainForm(Form1); end;

[S.FATEH]

rahiche مشكور على المشاركة الكود الذي اشرت اليه هو hack دلفي لا يسمح بتغيير الفورم الرئيسي المتغير المسؤول معرف كالـ private الذي فعلته هو الحصول على عنوان المتغير و الكتابة اليه ... اذا كان مطوري دلفي جعلوه private لماذا احاول الكتابة اليه ؟ هل لاحظت ما الذي بحصل لايقونة TaskBar عند التغيير ... بالنسبة للكراكر الحقيقة ليس هناك ما يدفعني الى التفكيير فيهم...

[rahiche]

rahiche مشكور على المشاركة الكود الذي اشرت اليه هو hack دلفي لا يسمح بتغيير الفورم الرئيسي المتغير المسؤول معرف كالـ private الذي فعلته هو الحصول على عنوان المتغير و الكتابة اليه ... اذا كان مطوري دلفي جعلوه private لماذا احاول الكتابة اليه ؟ هل لاحظت ما الذي بحصل لايقونة taskbar عند التغيير ... بالنسبة للكراكر الحقيقة ليس هناك ما يدفعني الى التفكيير فيهم...

نعم الأفضل عدم الطرق للكراكر فلا توجد طريقة لمحاربتهم و هم ناس رائعون فلولاهم لما كنت نستعمل الدلفي مجانا

[مهند الرسيني]

نعم الأفضل عدم الطرق للكراكر فلا توجد طريقة لمحاربتهم و هم ناس رائعون فلولاهم لما كنت نستعمل الدلفي مجانا

ههههههههه
بالمناسبة يوجد طريق آخرى , وهي من خلال عرض الفورم frmLogin قبل تشغيل البرنامج :

PHP كود :

RequireDerivedFormResource := True;
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmLogin, frmLogin);
  frmLogin.ShowModal; // <--
  Application.Run; 


ومن قال أنه لا توجد طريقة لمحاربتهم .. يوجد بعض البرامج التي لم يتم كسرها بعد