28-11-2016, 11:41 AM
السلام عليكم ورحمة الله وبركاته ،
قام أحد الإخوة في هذا المنتدى المبارك بطرح سؤال حول الكتابة في الريجستري ، و عرض كود لاستخراج الرقم الفزيائي الحقيقي للقرص الصلب (الذي لا يتغير بالفرمتة) ، الكود يشتغل على دلفي 7 ، بعد التعديلات الخفيفة و الخاصة ب : Pchar و Char
فعوضا عن Pchar نستخدم PWideChar
و عوضا عن Char نستخدم AnsiChar
و أصبح الكود يعمل بشكل جيد حتى في دلفي برلين Delphi Berlin .
جربت الكود في لازاريس 1.6.2 و كانت النتيجة رائعة .
لمن يبحث عن الكود الخاص بالازاراس ، يجده في المرفقات .
قام أحد الإخوة في هذا المنتدى المبارك بطرح سؤال حول الكتابة في الريجستري ، و عرض كود لاستخراج الرقم الفزيائي الحقيقي للقرص الصلب (الذي لا يتغير بالفرمتة) ، الكود يشتغل على دلفي 7 ، بعد التعديلات الخفيفة و الخاصة ب : Pchar و Char
فعوضا عن Pchar نستخدم PWideChar
و عوضا عن Char نستخدم AnsiChar
و أصبح الكود يعمل بشكل جيد حتى في دلفي برلين Delphi Berlin .
جربت الكود في لازاريس 1.6.2 و كانت النتيجة رائعة .
لمن يبحث عن الكود الخاص بالازاراس ، يجده في المرفقات .
اللهم اجعلني من أهل القرآن ، الذين هم أهلك و خاصتك.
تذكر بأن الوقت الذي تلهو فيه ، غيرك يبني مجده فيه.
تذكر بأن الوقت الذي تلهو فيه ، غيرك يبني مجده فيه.


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)