najy_zl
خبير دلفي و مشرف سابق
- كيف أضيف امر تحت الامر هذا المجود بصورة المرفق؟
السلام عليكم... بعد إذن أخينا العقدة، و للفائدة أرفق لكم تصميم و كود نافذة حوار مخصصة. تحتوي المرفقات على وحدة برمجية (Module) و نافذة (Form) لعرض رسالة مخصصة، حيث يمكن: * تغيير عناوين الأزرار (بدل "موافق" و "إلغاء الأمر" ... إلخ). * استعمال رمز مخصص للرسالة ب…
- الكتابه باللغه العربيه داخل الكود ف الفيجوال بيسك 6
السلام عليكم... من القائمة Tools اختر الأمر Options. في نافذة الـ Option اختر الصفحة Editor Format. في خانة الـ Font اختر Courier New (Arabic نرجو الاستفادة و السلام.
- كيف أضيف امر تحت الامر هذا المجود بصورة المرفق؟
السلام عليكم... يا أخي إسلام... كلام أخينا العقدة صحيح. عندما تريد عرض نافذة مشروطة (Modal) و هي التي لا يستطيع المستخدم التحول منها إلى نافذة أخرى إلا بإغلاقها، فإنك لا تحتاج إلا إلى سطر واحد: Dialog.Show 1' أوDialog.Show vbModal حيث vbModal ثابت معرف في VB و…
- كيف أضيف امر تحت الامر هذا المجود بصورة المرفق؟
السلام عليكم... من ناحية المبدأ الأمر بسيط، فالصيغة الكاملة للدالة MsgBox كالتالي: MsgBox prompt, style, caption, helpfile, helpcontextid فالبارامتر الثالث (Help File) يحدد اسم (و مسار) ملف التعليمات المحتوي على الموضوع الذي تريد عرضه، و البارامتر الأخير (Help…
- هل يوجد برنامج مجاني لإصلاح ملفات MDF المعطوبة؟
السلام عليكم... ثلاثة أيام من البحث في الإنترنت و لم أحصل على المطلوب! و المطلوب هو برنامج مجاني يقوم بإصلاح و استعادة (recovery) ملف قاعدة البيانات (ملف MDF) المعطوب (Corrupted). وجدت العشرات من البرامج التي يمكنها القيام بهذه العملية بنجاح (مثل Kernel for SQ…
- برنامج كشف نقاط
السلام عليكم ورحمة الله تعالى وبركاته... ما المقصود بـ "كشف النقاط" ؟ ما هو عمل البرنامج؟ سلام.
- كيفية تحديد أفضل إجابة
السلام عليكم... أتساءل عن كيفية تحديد أفضل إجابة من بين المشاركات في موضوع ما !!!! منذ مدة وجدت أن أفضل إجابة هي المشاركة التي يقوم فيها صاحب السؤال بشكر صاحب الإجابة المطلوبة! و قلت حينها لا شك أن الأمر وقع سهواً أو خطأً. اليوم وجدت نفس الأمر في هذا الموضوع. …
- طباعة الفورم بأكملها على الورقة مهما كانت أبعادها
السلام عليكم... * احذف الكود المذكور سابقاً في الحدث Form_Load حيث نقلناه إلى هنا. Private Sub Command1_Click() Dim OldMode As ScaleModeConstants Dim WidthPixels As Long Dim HeightPixels As Long ' هنا قم بإخفاء المكونات التي لا تريد إظهارها عند الطباعة With pb…
- طباعة الفورم بأكملها على الورقة مهما كانت أبعادها
السلام عليكم... 1. أضف إلى الـ Form مكون PictureBox و اضبط اسمه (الخاصية Name) على pbxImageHolder. لا يهم حجمه و لا مكانه لأنه لن يظهر أثناء التشغيل و لا أثناء الطباعة، و إنما سنستعمله كمخزن مؤقت للصورة. 2. ضع التصريحات التالية في قسم التصريحات العام: Private …
- مشكله لا علم لي بحلها
السلام عليكم... المشكلة في استعمال العامل OR في جملة SELECT. لا تنس أن OR تعني "أو". إذا كانت لدي البيانات التالية مثلاً: محمد أحمد محمود: 12345. سالم سليم سلمان: 98765. هدى الهادي المهدي: 95100. عامر عمر عمران: 10203. فإن جملة: SELECT * FROM ContactTB WHERE F…
- سؤال حول عرض التقارير
السلام عليكم... السؤال الأول: يمكنك إنشاء أعمدة في الـ QuickReport بتوسيع الخاصية Page حيث تجد تحتها الخاصية Columns التي تحدد عدد الأعمدة بالصفحة، و قيمتها الافتراضية = 1. كما توجد تحتها أيضاً الخاصية ColumnSpace التي تحدد المسافة بين الأعمدة بالمليمتر. بالنس…
- منع التكرار في دالة الإختيار العشوائي
السلام عليكم... أرجو الاطلاع على هذا الموضوع . سلام.
- الحصول على نطاق من القيم الملخبطة
السلام عليكم... هذا في الحقيقة إجابة عن سؤال لأحد الإخوة في مشاركة أخرى، و لكن أحببت أن أضعه في موضوع لوحده حتى يكون كالمرجع. في المرفقات وحدة برمجية (Module) باسم MShuffling - ضمن مشروع مثال - تحتوي على إجراء و دالتين للحصول على نطاق من القيم الملخبطة (مرتبة …
- اضافة عدد ايام إلى تاريخ ما
السلام عليكم... مرحباً بك على كل حال... 1. جملة Dim هي جملة للتصريح عن متغير و تحديد نوعه. و صيغتها العامة المختصرة كالتالي: Dim اسم_المتغير As نوع_المتغير مثلاً: Dim Salary As Single Dim Interval As Long Dim MyVar1 As Variant Dim MyVar2 فالجملة الأولى تعرف مت…
- اضافة عدد ايام إلى تاريخ ما
السلام عليكم... إجابة السؤال الثاني: ضع على الـ Form ثلاث Labels بجانب بعضها: Label1 للثواني، Label2 للدقائق، Label3 للساعات. و أضف 2 من الـ CommandButtons. و أخيراً أضف Timer و اضبط الخاصية Enabled له على False و الخاصية Interval على 1000. انسخ الكود التالي و…
- اضافة عدد ايام إلى تاريخ ما
السلام عليكم... إجابة السؤال الأول: نفرض أنه توجد 3 مربعات نص: Text1 للتاريخ، Text2 لعدد الأيام المضافة (أو المطروحة)، Text3 للناتج. Private Sub Command1_Click() Dim MyDate As Date Dim Interval As Long If Not IsDate(Text1.Text) Then MsgBox "الرجاء إدخال التاري…
- التعديل على كود
السلام عليكم... أعتقد أن أخانا VB_Coder قد قام بتعديل المثال في هذه المشاركة . سلام.
- مشكلة فى التعامل مع الاداوات فى الفيجوال بيسك 6
السلام عليكم... السبب بسيط ! بالتأكيد أنك رسمت الزر على سطح الـ Form ثم سحبته بالفأرة فوق الـ Tabbed Dialog. بهذا الشكل سيبدو الزر فوق الـ Tab و لكنه ليس داخله . الصحيح هو أن تختار الـ Tab الذي تريد وضع الأداة داخله، ثم ترسم الأداة داخله. سلام.
- مساعدة في المقارنة بين صورتين في الفحوال 6
السلام عليكم... مقارنة الصور على أساس بكسل ببكسل في حلقات تعتبر طريقة غير عملية خاصة إذا كان حجم الصورة كبير (من ناحية الأبعاد) و قدتجعل البرنامج غير مستجيب. هناك طريقة أسرع، و هي باستعمال دوال API الخاصة بمعالجة الرسوميات (GDI)، و هي أيضاً أقل في الكود: Priva…
- ارجو المساعده في حل هذه المشكله
السلام عليكم... ما هو إجراء dda ؟ و إذا أمكن إرفاق مشروع صغير يحتوي على إجراء dda لرسم المربع داخل الـ PictureBox. سلام.