إقتباس : - حالة تسجيل الدخول ناجحة تقوم باخفائه Hide لا يمكن اغلاقه Close لانك ستغلق كامل البرنامج و تقوم باضهار الفورم الرئيسي عند عمل Minimize لتطبيق لاحظ ماذا يحدث التطبيق...
ههههه كلام صحيح .. غفلت عن هذه
وبالنسبة لـ lazarus فأنا أستعملها كذلك الأمر مماثل :
29-01-2015, 03:54 PM (آخر تعديل لهذه المشاركة: 29-01-2015, 05:36 PM بواسطة S.FATEH.)
اخي فاتح اذا قمت بجعل النموذجين يظهران في نفس الوقت و كأن الأمر نفسة أبسط كراكر يستطيع أن يتجاوز النافدة و يصل للنافذة الأخرى بدون كتابة كلمة سر لذلك يجب عدم جعله يهر معه و بالإضافة اذا في الطريقة التي ذكرتها لا يوجد مشاكل و يتم حلها جميعا
و هذا بجعل النموذج الأول هو النموذج الرئيسي في وقت التشتغيل
الكود كما توضح الصورة حيث يصبح النموذج الثاني هو النموذج الرئيسي اذا ضغطنا على الزر و نستبدلها بجواب لشرط لكي نحصل على مرادنا
مشكور على التنبيه
كود :
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;
rahiche مشكور على المشاركة الكود الذي اشرت اليه هو hack دلفي لا يسمح بتغيير الفورم الرئيسي المتغير المسؤول معرف كالـ private الذي فعلته هو الحصول على عنوان المتغير و الكتابة اليه ... اذا كان مطوري دلفي جعلوه private لماذا احاول الكتابة اليه ؟ هل لاحظت ما الذي بحصل لايقونة TaskBar عند التغيير ... بالنسبة للكراكر الحقيقة ليس هناك ما يدفعني الى التفكيير فيهم...
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
كل من 1 user says قال شكرا ل S.FATEH على المشاركة المفيدة1 user says Thank You to S.FATEH for this post • annabil23
s.fateh كتب :rahiche مشكور على المشاركة الكود الذي اشرت اليه هو hack دلفي لا يسمح بتغيير الفورم الرئيسي المتغير المسؤول معرف كالـ private الذي فعلته هو الحصول على عنوان المتغير و الكتابة اليه ... اذا كان مطوري دلفي جعلوه private لماذا احاول الكتابة اليه ؟ هل لاحظت ما الذي بحصل لايقونة taskbar عند التغيير ... بالنسبة للكراكر الحقيقة ليس هناك ما يدفعني الى التفكيير فيهم...
نعم الأفضل عدم الطرق للكراكر فلا توجد طريقة لمحاربتهم و هم ناس رائعون فلولاهم لما كنت نستعمل الدلفي مجانا