الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

Peek & Poke

مغلق
بدأه PCBat في 9 نوفمبر 2002 · 2 رد · 544 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم و رحمة الله و بركاته

فقد الفيجوال بيسك مجموعة أوامرة مهمة و أساسية كانت متوفرة في سلفه البيسك فهل من بيديل عن PEEK , POKE

من المعلوم انها غير متوفرة في الفيجوال و لكن هل توجد مكتبات تتعامل مع فيجوال 6 يمكن من خلالها الوصول غلى التعامل السلس مع الرام

و هل يحتوي الفيجوال بيسك نت مثل هذه الأوامر ؟

و لكم جزيل الشكر

#2

السلام عليكم و رحمة الله و بركاته

والله ذكرتني يا اخي بإيام زمان . ايام الكومودور والزد اكس

فيك اخي تعمل اللي بدك ياه بالفيجوال بيسك ..

هي اول مشاركة إلي بالمنتدى , و دورت على قوانين القسم و ما لئيتا .

مشان هيك رح اكتيلك الكود هون . انسخو الى مودول ضمن برنامجك و بصير فيك تستخدم ال بيك و البوك بسهولة ضمن الفيجوال بيسك ...

' API تصريح

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Long, Source As Long, ByVal Length As Long)

Private Declare Sub CopyMemoryByte Lib "kernel32" Alias "RtlMoveMemory" (Destination As Byte, Source As Long, ByVal Length As Long)

Private Declare Sub CopyMemoryFromByte Lib "kernel32" Alias "RtlMoveMemory" (Destination As Long, Source As Byte, ByVal Length As Long)

'

'تصريح الوظائف

Public Function Peek(Address As Long) As Long

Call CopyMemory(Peek, ByVal Address, Len(Address))

End Function

Public Function PeekByte(Address As Long) As Byte

Call CopyMemoryByte(PeekByte, ByVal Address, Len(PeekByte))

End Function

Public Function Poke(Address As Long, Value As Long)

CopyMemory ByVal Address, Value, LenB(Value)

End Function

Public Function PokeByte(Address As Long, Value As Byte)

CopyMemoryFromByte ByVal Address, Value, LenB(Value)

End Function

#3

السلام عليكم مجددا

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

هذا الموضوع مغلق.

مواضيع مشابهة