منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

مثال بسيط مع انه اتعبني الا ان التعب يتم نسيانه حين اتذكر انه ربما شخص ما يحتاج معلومة موجودة بين اكوام الاكواد

رسالة خطا الوصول الى الملف لا زالت قائمة لكن تارة تذهب وتارة اخرى تعود



يتم انشاء الملف الصوتي عند اول ايقاف للتصوير ثم بعدها لن يتم الاحتياج له حيث يتم استخراج الملف الصوتي الى مجلد مؤقت temp باسم نفس الفيديو ولكن بامتداد wav  اذا نقرت على ملف بامتداد sod  وطلبك باختيار مشغل له اختر البرنامج او الملف التنفيذي الخص بنا وهذا بطبيعة الحال.
انظر لملف الاحداث Applicationevents  وانظر للاكواد حيث انه اذا تم النقر على الملف بعد تعريفه للنظام سيتم اعتبار شاشة العرض هي فورم البدء ولا تنسى ان تجعل من ضمن خصائص المشروع الاغلاق عند غلق الفورم الرئيسية بحيث لا يظهر الفورم الاساسي الا عند نقر البرنامج الاساسي

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


تحياتي

أيضا عداد الوقت فيه خطأ ويكون بعد الايقاف المؤقت ثم الاستمرار تكون القراءة الحالية اعلى من المدة الكليةSad.
المثال هو تطبيق عملي للتلغيم وتشفير النصوص او دمجها مع غيرها لكني احببت جعلها مفيدة مثل هذه الفكرة تصوير شاشة او تصوير عملك على الكمبيوتر ودمج كل الصور في ملف واحد مع ملف الصوت وكافة التفاصيل يتم استخراجها من ملف واحد وقت التشغيل.
فائدة على الطاير
كود ايقاف التسجيل للصوت مؤقتا وايضا الاستمرار:
PHP كود :
           record("pause recsound """00)
            record("resume recsound """00

في الحدث MyApplication_StartupNextInstance ضمن ملف ApplicationEvents ضع الكود:
PHP كود :
Try
 
               Dim a As String ""
 
               For Each h As String In e.CommandLine
                    a 
&= h
                Next
                If a
.Trim <> "" Then
                    If IO
.Path.GetExtension(a) <> ".sod" Then
                        MsgBox
("الامتداد غير مدعوم"MsgBoxStyle.Exclamation"تشغيل ملف")
 
                       Return
                    Else
                        normalplay 
False
                        videoname 
a
                        Call sh
()
 
                   End If
 
               End If
 
           Catch ex As Exception
            End 
Try 
المثال بعد التحديث
اضافة ميزة التوقف عن التسجيل بشكل مؤقت والاستمرار
تحويل زر امر تسجيل الى مؤشر بلونين للدلالة على انه قيد العمل او حتى متوقف مؤقتا او متوقف تماما و ذلك عبر مراقب ماSmile
قنص اي ملف يتم النقر عليه لكي يعمل مع شاشة العرض دون المرور بالواجهة الاساسية او الرئيسية

كلمة مرور فك الضغط saud 
كلمات المرور لدي احد هذه الكلمات
vb4arb
vb4arab
sarab
saud
طرأت في بالي فكرة و هي ان نخزن الصور مؤقتا ثم نحفظها مرة واحدة في الملف هل ينفع هذا؟
هل استخدامي للستريم صحيح؟
اتمنى من الخبراء الاطلاع على آخر مثال مرفق.
التحديث الان يخص اني استبدلت الحفظ الى متغير نصي وقت التشغيل بالكتابة المباشرة للملف
ارجو تجربته لمدة  طويلة لاني اجرب الان بويندوز 10 والامر الى الان لم يظهر شيء حول رسالة خطأ او غيره.
كلمة المرور sarab
بقي فقط مشكلة نفاذ الذاكرة من الكود التالي:
PHP كود :
Dim html As String My.Computer.FileSystem.ReadAllText(videoname
اذا سجلت ثم قمت بتشغيل عرض من نفس النافذة تحدث مشكلة الذاكرة بسبب الازدحام اما لو بعد التصوير اغلقت الواجهة وشغلت الملف ذا الامتداد sod فلن تحدث مشكلة بمواصفات 8 جيجا رام و 3 جيجا هرتز للمعالج.
اظن اني سادمج الافكار القديمة مع هذه الفكرة وبهذا نكون جمعنا بين كم فكرة وبنفس الوقت سلمنا من مشكلة الوصول. ومشكلة نفاذ الذاكرة للكتابة
يعني مثلا نحفظ الصور بمجلد معين  وبعد الانتهاء نبدا بالدمج صورة صورة ولكن تبقى مشكلة القراءة من الملف المدموج لا اتصور ان لها حل
و لدي استفسار ان كان هناك نوع ملف لا يمنع النظام من فتحه اكثر من مرة للكتابة.
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
الحمدلله رب العالمين الرحمن الرحيم و الصلاة والسلام على اشرف الانبياء و المرسلين نبينا محمد و على آله و صحبه اجمعين اما بعد:

مع اني بدأت بالتراجع عن هذه الفكرة بسبب ان ملف لمدة 30 ثانية فقط بحجم 200 ميجا بايت الا اني احببت ختم الموضوع برفع آخر ما توصلت له او آخر تحديث
كلمة المرور: vb4arb
شكر الله لك و بارك فيك
لكن انا استميت على فيجوال بيسك او اي لغة تتوفر فيها الامكانية لكن اذا اضطررت فلا بديل عن البحث عن تلك الملفات اقصد الـ dll