بلال حمدي

شكرا seaprince46 ويبدو أن الأخ شمس متأخر عن المنتدى عسى أن يكون خيرا

ماشي أنا هافضل في حالي لكن تذكر كان هذا ردا على سؤالك وعلى فكرة أنا نفسي أتعلم دلفي لكن ماعندي البرنامج بتاعها :( وشكرا مرة أخري على الملف التنفيييذي :) وعلى فكرة رسالتك الخاصة وصلتني :rolleyes:

فكرة حلوة جاري الحل .............. يعني على عدد الملفات التي رأيتها.................. الفيجوال بيسك يعملها ببساطة وسيبك إنت من دلفي دي <_< وسلم لي على المترو B) وسلاااااااااااااااااااااام وشكرا على الملف التنفيذي :wacko:

تفضل Display.zip

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

هي نفس الدالة RegQueryValueEx ولكن API وينبغي أن تعلن عنها عموما ضع الكود الذي في المشاركة الأولي في مديول الأن تصبح لديك الدالة RegQueryValueEx وتسطيع التعامل معها سلااااااام

شكرا professional VB99

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

أعتقد أنه ليس هناك حل غير التكرار لكن سيكون تايمر واحد في الـ Form الأول طبعاً بالتوفيق سلااااااااااام

شكرا إخواني professional VB99 و vbvb999

تفضل http://www.softaward.com/download.php?id=1508&mode=primary

تفضل هذا مثال على ما أقصد Saver.zip

retrieves the type and data for a specified value Here You Are Reg.zip

بسيطة عادي خالص يعني شغل التايمر على 10000 مثلاً تمااااام وبعدين عند حركة الماوس أو ضغط كيبورد أعطة القيمة ثانية هل تفهم ما أقصد ولو تريد مثال أنا حاضر

ياراجل حرام عليك العنوان شدني والأخر ألاقيها ملفات دلفي....... من فضلك أنتظر الملف التنفيذييييييييييييييي

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

اننى ليس معى نسخة فيجوال بيزيك 5 ومعى البرنامج مقفول فهل ممكن ان اركب الفيجوال بيزيك 5 لكى يعمل البرنامج بصورة سليمة؟ إن شاء الله

Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long

الغاية تسوغ الوسيلة

مشكلة صحيح لكن على أساس أن الكلمات التي ستترجم غير مركبة إستخدم arr = Split(String, " ") ستقوم الدالة بتخزين الكلمات في المصفوفة arr العنصر الأول لها arr(0) والعنصر الأخير لها arr(UBound(arr)) وبالتوفيق