delphi4arab منتديات دلفي للعرب
كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ (/showthread.php?tid=3744)



كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ - iNjECTOR - 31-12-2011

أخوتى كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟
كيف يمكننا عمل هذه الاكواد التى نراها تحت بيئة الاسيمبلىSetne و sete ؟
تحيتى للجميع


كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ - me_delphi - 01-01-2012

السلام عليكم

لم افهم اخي ماتعنيه بالضبط لكن :

لاستعمال الأسمبلي ستستعمل البلوك
asm
//assembly code
end;

للحماية يمكنك قراءة احد الكتب في قسم كتب دلفي بعنوان كيف تجعل برنامجك أصعب في الكسر
....وهناك عدة طرق اخرى


كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ - iNjECTOR - 02-01-2012

أشكرك وجارى الاطلاع
-
أعلم التصريح بإستخدام الاسيمبلى داخل بيئة دلفى ولكن ما قصدته للتعليمتان SETE and STENE
اراهم داخل برنامج Ollydbg أثناء التنقيح فهم يختبران ما إذا كانت قيم احد المسجلات 1 أو 0
فقط ما هى طريقة محاكة لهاتان التعليمتان اثناء البرمجة

دمت بود


كيف يمكننا تقوية بلوك الحماية الخاصة بدلفى ؟ - me_delphi - 03-01-2012

إقتباس :ما قصدته للتعليمتان
SETE and STENE
اراهم داخل برنامج Ollydbg أثناء التنقيح فهم يختبران ما إذا كانت قيم احد المسجلات 1 أو 0

نعم اخي الكريم فهاتان التعليمتان تأتران على المسجلات او المتغيرات حسب القيمة الوجودة في مسجل الرايات Flags Register

STENE = Set if not equal
SETE = Set if equal

وهناك غيرها ك SETNA و SETA و...

ويمكنك استعمالها في دلفي على المتغيرات لحفظ قيمة فيها (0 أو 1) بعد عملية المقارنة ..أو حسب الرغبة

وهدا مثال

PHP كود :
procedure TForm1.FormCreate(Sender: TObject);
var 
Bool: Boolean;
begin
  asm
     MOV EAX
, 1
     CMP EAX
, 26
     SETE Bool
  end
;
  
ShowMessage(FloatToStr(Abs(StrtoFloat(BoolToStr(Bool)))));
end;