نجوم المشاركات

شكرا اخي جعفر على هذه النوادر الجميلة وتفضل اخي عبدالله يمكنك كتابة اي شيء على الزر Dim resalh As Integer Ok = "أكيد موافق" Cancel = "not agree" MessageBoxH Me.hwnd resalh = MsgBox("تفضل هذه الخلطة في اللغة", vbOKCancel, "رسالة")

عدم الرد من صاحب السوال جعلني ادخل مرة اخرى اواكتشف اني لم ارفق الوحدة المسؤولة عن الترجمة تفصل والصقها في صفحة وحدة نمطية جديدة Public Ok, Cancel, ABORT Public RETRY, IGNORE, YES, NO Private m_hHook As Long Private Const IDOK = 1 Private Const IDCANCEL = 2 Private Const IDABORT = 3 Private Const IDRETRY = 4 Private Const IDIGNORE = 5 Private Const IDYES = 6 Private Const IDNO = 7 Private Const WH_CBT = 5 Private Const GWL_HINSTANCE = (-6) Private Const HCBT_ACTIVATE = 5 Private Declare Function GetCurrentThreadId Lib "kernel32" () As Long Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _ (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetDlgItemText Lib "user32" Alias "SetDlgItemTextA" _ (ByVal hDlg As Long, ByVal nIDDlgItem As Long, _ ByVal lpString As String) As Long Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" _ (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, _ ByVal dwThreadId As Long) As Long Private Declare Function UnhookWindowsHookEx Lib "user32" _ (ByVal hHook As Long) As Long Public Sub MessageBoxH(hwndThreadOwner As Long) Dim hInstance As Long Dim hThreadId As Long hInstance = GetWindowLong(hwndThreadOwner, GWL_HINSTANCE) hThreadId = GetCurrentThreadId() m_hHook = SetWindowsHookEx(WH_CBT, AddressOf _ MsgBoxHookProc, hInstance, hThreadId) End Sub Private Function MsgBoxHookProc(ByVal uMsg As Long, ByVal _ wParam As Long, ByVal lParam As Long) As Long If uMsg = HCBT_ACTIVATE Then SetDlgItemText wParam, IDOK, Ok SetDlgItemText wParam, IDCANCEL, Cancel SetDlgItemText wParam, IDABORT, ABORT SetDlgItemText wParam, IDRETRY, ABORT SetDlgItemText wParam, IDIGNORE, ABORT SetDlgItemText wParam, IDYES, YES SetDlgItemText wParam, IDNO, YES UnhookWindowsHookEx m_hHook End If MsgBoxHookProc = False End Function

شرح للحل الذي وضعته 1- في الورقة رقم 2 تم وضع معادلة في العامود C لاستخرج جميع الموردين (محلي) بواسطة المعادلة التالية (صفيف) =IF(ROWS($C$2:C2)>COUNTIF(Sheet1!$A$2:$A$100,$J$1),"",INDEX(Sheet1!$B$2:$B$100,SMALL(IF(Sheet1!$A$2:$A$100=$J$1,ROW($A$2:$A$100)-ROW($A$2)+1),ROWS($C$2:C2)))) 2-من هذاالنطاق وضعت Define name اسميته (MouwaredM) بواسطة المعادلة التالية (الخلية 1$J$ تحتوي على كلمة "محلي") =$C$2:INDEX($C$2:$C$100,COUNTIF(Sheet1!$A$2:$A$100,$J$1)) 3- نفس الشيء بالنسبة للموردين (صادر) في العامود G اسميته (MouwaredT) 4- تم اخفاء الورقة 2 لعدم العبث بها غن طريق الخطأ 5- ننتقل الى الصفحة الاولى في العامود (data validation ( I غلى كل الخلايا تم وضغ المعادلة التالية =IF($H2="","",IF($H2=Sheet2!$J$1,MouwarredM,MouwaredT)) 6- في العامود J هذه المعادلة =IF($I2="","",SUMIF($B$2:$B$100,$I2,$C$2:$C$100)) مع تحياتي

شرح الحل المقدم اولا:تم عمل قائمة منسدلة فى العمود نوع المورد وهذا رابط يوضح اليك طريقى عمل القائمة المنسدلة اضغط لعرض المزيد ثانيا :تم اعداد معادلة صفيف لفرز المحلى والتصدير فى العمود فى n3 و o3 والبحث عن البيان المرتبط بالقائمة المنسدلة فقط {=IFERROR(INDEX($B$2:$B$31;SMALL(IF($A$2:$A$31=N$2;ROW($A$2:$A$31)-1;"");ROW(1:100)));"")} ثالثا : تم اعداد قائمة منسدلة ووضع هذه المعادله فىها =INDEX($N$3:$O$19;;MATCH($H2;$N$2:$O$2;0)) رابعا : فى عمود المديونية تم اعداد معادلة للبحث عن عن القيم بشرط القوائم المنسدلة {=IFERROR(VLOOKUP($H2;IF(($A$2:$A$31=$H2)*($B$2:$B$31=$I2);$A$2:$C$31;"");3;0);"")} هذا شرح مختصر وارجو ان اكون قد وفقت فى ايصال المعلومه تقبلوا منى جميعا تحياتى

جزاكم الله خيراً أخي وحبيبي في الله أبو يوسف بارك الله فيك وجعل عملك في ميزان حسناتك يوم القيامة أما بالنسبة للنقد فلن أستطيع المشاركة فيه حيث أجهل طبيعة الملف من حيث أنني أجهل طبيعة العمل ولكن لا تقلق ما أكثر النقاد في منتدانا - لا أقصد الإهانة - بل أقصد أن أشكر الله على تلك النعمة؟ تقبل تحياتي

السّلام عليكم و رحمة الله و بركاته بارك الله فيك أخي الغالي و أستاذي الحبيب " ياسر العربي " على الملف المميّز لحساب العمر على الشيت الاكسل و إثراءً للموضوع و للتّنويع ربّما يستفيد منه أحد الأعضاء ..حساب العمر بين تاريخيْن على اليوزرفورم فائق إحتراماتي حساب العمر بين تاريخين.rar

السلام عليكم ورحمة الله وبركاته إخوتي الكرام إليكم البرنامج بعد محاولة التعريب فما كان به من خير فمن الله وإن كان من خطأ أو سهو أو نسيان فمني ومن الشيطان جزاكم الله خيراً على حسن أدبكم وكلامكم الرفيع والسلام عليكم New-Userform-.rar

موضوع انشاء صفحات html بسيطة جدا ولا تحتاج لخبرة كل ما عليك تنزيل برنامج الفورنت بيج او اي برنامج لتصميم صفحات الاتش تي ام برنامج الفورنت بيج كان ينزل مع نسخ الاوفيس حتى 2003 ولكن تم اسقاطه بعد ذلك من المجموعه ويوجد بديل له اسمه Microsoft Office Publisher ولكن لم اتعامل معه التعامل مع الفورنت بيج كأنك تتعامل مع ملف وورد من كتابة وتنسيقات وجداول وارفاق صور وهكذا وتقوم بحفظ عملك على هيئة صفحة نت html طبعا بعد صنع كافة الصفحات يتم وضعها في برنامج الكتاب الالكتروني مثل وضع الصور باذن الله الموضوع سهل وهحاول اشوفلك الراوبط للبرنامج واوضحلك طريقة عمله ولكن اعذرني الان انا بالعمل والنت هنا يدوب بالفلاشة تصفح وهذه صورة توضح شكل البرنامج ومرفق الصفحة التى تم انشائها او ريح دماغك بردو واعمل شرحك في ملف وورد وحفظ باسم واحفظه بامتداد htm index.rar

قائمة بافضل المواقع شهرة وشعبية على مستوى العالم فى الاكسيل Excel حسب Alexa Ranking ========================================== وبكل اسف ولا موقع عربى فيهم . والسبب فى شهرة هذه المواقع حجم التفاعل وتبادل المعلومات والخبرات ادخل اى موقع وشاهد اى موضوع وقارن بنفسك . ولكن نحن فى العالم العربى قد نبخل حتى بعمل اعجاب او مشاركة او نخجل من وضع اراءنا ..........الخ لدينا الكثير من علماء الاكسيل العظماء فى العالم العربى اتمنى من الجميع الدعم لهؤلاء العلماء . واتمنى من مدربى الاكسيل وعلماؤه ان يقدمو ما لديهم بكل الطرق احلم بان نكون افضل من الغرب فى كل شىء .

اريد فقط ان انبه الاخ ان المشرف ادخل المعادلة =INDEX($A$1:$A$18,SMALL(IF(ISNUMBER($A$1:$A$18),ROW($A$1:$A$18)),ROWS($G$2:G2))) باستعمال ctrl+shift+entr ;)

السلام عليكم لاثراء الموضوع جرب أخى هذه المعادلة =INDEX($A$1:$A$18;SMALL(IF(ISNUMBER($A$1:$A$18);ROW($A$1:$A$18));ROWS($G$2:G2))) New Microsoft Excel Worksheet.rar

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

أخي الكريم أبو يحي جرب الكود التالي Sub Test() Dim Rng As Range On Error Resume Next Set Rng = Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row).SpecialCells(xlCellTypeConstants, 1) Rng.Copy Range("C1").PasteSpecial xlPasteValues Application.CutCopyMode = False End Sub تقبل تحياتي Use SpecialCells To Copy Numeric Values YasserKhalil.rar

بسم الله والحمد لله والصلاة والسلام على رسول الله أما بعد: السلام عليكم ورحمة الله وبركاته إخوتي وأحبتي الكرام نوابغ أوفيسنا الذي نحبه ونرتاده لننهل من علمكم جزاكم الله خيراً .. بما أن عملي محاسبة في مجال التعهدات والحفريات -أبنية وطرق - إلخ...فإنني أتعامل مع نجارين باطون وعمال بناء وحفر عملهم 1/2 يومية أو 1 يومية أو 1.5 يومية أو 2 يومية ..فقد فكرت بعمل برنامج يخص هذا المجال لأنهم غير موظفين بل يحصلون على لقاء عملهم حسب يومياتهم أرجو أن تشاهدوا برنامجي هذا وتوجهونني ليخدم هذه الشريحة بالشكل الأمثل وأتمنى على علمائنا الأجلاء التأكيد على ورقة البونات التي يجب أن تطبع وفق اليوم الحالي ليحتفظ بها ..ما أريده طباعة هذه البونات حتى ل 100 عامل مثلاً كل يوم بيومه. اسم المستخدم: admin كلمة المرور: 123 الأوراق المحمية: دون كلمة مرور بيانات تسجيل الورشة : يتم كتابتها لتضاف على الأوراق المطلوبة والسلام عليكم عمال ورشات.rar

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

رابط برنامج الفرونت بيج لتصميم صفحات ومواقع الانترنت http://almakan.net/bramj/F-Arabic.zip سيريال البرنامج Front Page 2003 Arabic Serial :WFDWY-XQXJF-RHRYG-BG7RQ-BBDHM وان شاء الله نتفرغ ونشرح ازاي نصمم الصفحات وباذن الله اشوف البرنامج اللي اشرت اليه ودائما ما يتم حفظ صفحة ال html بمرفقاتها من الصور والاستيلات وغيرها في فولدر تابع لها المهم عند اختيار الفولدر المراد تحويله الى كتاب يجب وضع كل مستلزمات الصفحات داخل هذا الفولدر بمعنى بسيط عندي صور وضايفها في الصفحات مع الاكواد مثلا والكلام لازم الصور تبقي في نفس الفولدر حتى تظهر داخل البرنامج وان لم تضيفها من داخل البرنامج مجرد اضافة صفحات النت html سيتم عرض الصور بداخلها عادي خالص وشكرا

تفضل يا سيدي Private Sub Adad_R_AfterUpdate() DoCmd.RunCommand acCmdSaveRecord DoCmd.SetWarnings False DoCmd.OpenQuery "Q1" DoCmd.SetWarnings True End Sub Private Sub Al_adad_AfterUpdate() DoCmd.RunCommand acCmdSaveRecord DoCmd.SetWarnings False DoCmd.OpenQuery "Q1" DoCmd.SetWarnings True End Sub جعفر 295.المثال.mdb.zip

اتفضل اخى الكريم حسب مافهمت انشاء_قائمه_منسدله_في_كل_خليه.rar

تفضل ربما كان المطلوب انشاء_قائمه_منسدله_في_كل_خليه salim.rar

تفضل اخي الغالي لعله المطلوب بعد اذن الغاليين نتيجة بالدرجات.rar نتيجة بالدرجات.rar

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

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

أخى محمد ماهر تفضل نسخة من شيت كنترول المرحلة الاعدادية الخاص بى افحص الملف واطلع على المعادلات فى الشيت وان شاء الله تستفيد منه حتى تتمكن من عمل الشيت الخاص بك كلمة المرور لجميع الصفحات هى officena كنترول الإعدادى رجب جاويش الإصدار 15.rar

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

السلام عليكم......أي إحراج هذا؟؟؟!!!. You are only allowed to give 20 likes per day. You cannot give any more likes today لماذا يا أوفيسنا...اكرموا علينا ببعض الرصيد حتى لا يزعلوا منا أحبابنا.. والمواضيع التي كتبناها ...أين أنت يا عبد العزيز البسكري...تشوف الحال ..أنت عندك منها ...

يا شباب نفد رصيدي من الإعجابات فاعذروني....حدا يسلفني...قرضة حسنة. تحويل --- دفع كاش --- فلّسنا.

لا أبداً لا تقنعني أنه صوتك وحش ...حتى لو كان كذلك فانظر إلى قول الإمام الشافعي رحمه الله: وكن رجلاً على الأهوال جلداً وشيمتك السماحة والسخاء يُغطى بالسماحة كلُ عيب وكم عيب يغطيه السخاء. والسلام عليكم. ربنا يبارك لك بولديك محمد وأسيل ويرزقك مثلهم ومثلهم ومثلهم ...آمين يا شباب نفد رصيدي من الإعجابات فاعذروني....حدا يسلفني...قرضة حسنة.

ودا مثال لصفحة html وتم تحويلها لكتاب yasser.rar

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

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

السلام عليكم بارك الله بكم جميعاً مساهمة مني بموضوعكم الكريم تقبلوا تحياتي العطرة.

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

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

تحت أمرك يا سيدي ياسر العربي A vos ordres monsieur YASSER غالي و الطلب رخيص

السلام عليكم ورحمة الله وبركاته هل تعني أن يكون معرباً كما في المرفق يرجى أن يرضيكم New-Userform-.rar

السلام عليكم مكتبة اكسيل باللغه العربيه تضم كتب كثيره ومفيده جدا ومجانيه لا تنسونا بصالح دعاءكم http://download-pdf-ebooks.net/49-1-library-books

السلام عليكم ورحمة الله وبركاته اساتذتى فى هذا الصرح العظيم . الساده اعضاء اوفيسنا موضوع اليوم هو استخدام دالة VLOOKUP فى البحث عن قيمه معينه فى مجموعة صفحات بشكل بسيط وسهل فقد رايت استخدامات مشابهه ولكن كانت بشكل اصعب . والان اقدمها لكم بشكلها البسيط وعلى فكرة انا اعشق هذه الداله ارجوكم لاتنسونى فى دعاؤكم اترككم مع الملف والمثال العملى vlookp.rar

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

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

اخى الفاضل اعتذر لانى لم استطع فتح ملفك الان هل تقصد مثل هذه =ROUND(IF(DATEDIF(B4;TODAY();"m")>=12;IF(DATEDIF(B5;TODAY();"y")>=10;30;21);IF(DATEDIF(B4;TODAY();"m")>=6;DATEDIF(B4;TODAY();"m")/12*IF(DATEDIF(B5;TODAY();"y")>=50;30;21);0));0) بالتوفيق اخى

أخي الكريم عبد العزيز من التبويب View اختر الأمر page Layout ستجد التعامل مع ارتفاع الصفوف وعرض الأعمدة بالسنتيمتر تقبل تحياتي

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

أخى الفاضل / محمد على العفو أخى الفاضل نحن جميعا تلاميذ فى هذه الجامعة العريقة نتعلم العلم ونعلمه لمن يحتاجه

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

قبل ان اجرب الملف احب ان ابدى اعجابى باصرارك الدائم وماتزعلش المره الجايه هجبلك الملفات بسيطه وسهله علشان متتعبش حبيبى ههههههههههههههههههه احببت مراجعت المعادله للتاكد فقط واكيد الكود من ايدك احلى يا ابو البراء جزاك الله كل خير سوف اقوم بفتح الملف والاطلاع وارجعلك يااغالى تسلم ايدك ياغالى على هذه الروائع جزاك الله كل خير وبارك الله لك فى وقتك وعملك لا اجد ما اقوله بجد الحمد لله الذى بفضله تتم الصالحات

من يفيدنى مثل اوفيسنا هو افضل موقع فى العالم لى

فى رأى الشخصى إن تأخر ترتيب المواقع العربية للإيكسيل يرجع لسببين : 1. أن المواقع العربية قلما يكون بها شرح مرتب إلا ما يتم طلبه وغالباً يكون جزء صغير وليس من الألف للياء 2. أن المواقع العربية معظمها منتديات و المنتدى ترتيبه يكون متأخراً عن الموقع لأنه يتطلب التسجيل بينما المواقع يمكن زيارته و التفاعل به بدون تسجيل ولكنى أرى كذلك أن عالمنا العربى بوجه عام و هذا المنتدى بشكل خاص به و دون ذكر أسماء خوفاً من نسيان أحد فجميعهم يستحقون أن يكونوا فى صدارة مبرمجين الإيكسيل وببعض التعاون و التكاتف و إختيار برنامج معين زمنياً ونوعياً قد نتمكن من اللحاق بالركب العالمى فى مجال الإيكسيل وفقكم الله لما فيه الخير إخوانى

احلم بان اجد اوفيسنا فى الصداره او اى موقع عربى

ثالثا :- التعرف على خصائص الــ Frame من شاشة الخصائص اثناء عملية التصميم لمشاهدة خصائص الــ Frame شاهد الصوره التاليه وهذه صوره مكبره لخصائص الفريم هنمسك اهم الخصائص والاكثر شيوعا فى الاستخدام ونبدا نشرح بالتفصيل الخاصيه (Name) :- Name هو اسم الـ Frame المستخدم فى الاكواد وعند انشاء اى Frameيقوم الفيجوال بيسك بأعطاء اسم افتراضى له Frame1واذا قمنا بعمل Frame ثانى فأن الفيجوال بيسك يعطى له اسم افتراضى Frame2 وانا افضل عدم تغيير اسماء Frameالافتراضيه التى عرفها الفيجوال بيسك فعندما نريد كتابه كود خاص بالعنصر Frame فيجب علينا الالتزام بالاسم الموجود فى الخاصيه Name --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Back Color):- هذه الخاصيه تتيح للمستخدم تغيير لون خلفية الـ Frame على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار اللون المناسب كما يحلو لك لا نحتاج الى ارفاق صوره للتوضيح لانه نفس الشرح اللى عملناه قبل كدا فى شرح الليبل والتكس بوكس والكمبوبوكس --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Border Color):- هذه الخاصيه تتيح للمستخدم تغيير لون حدود الـ Frame على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار اللون المناسب كما يحلو لك --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Caption ):- هذه الخاصيه تتيح للمستخدم كتابة عنوان للـــ Frame --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Enabled ):- هذه الخاصيه تحمل خيارين true و False عند اختيارك true سوف يكون الــ Frame والعناصر بداخله متاحه امام المستخدم عند عمل الفورم وهو الاختيار الافتراضى للفيجوال عند اختيارك False سوف يكون الــ Frame والعناصر بداخله غير متاحه امام المستخدم عند عمل الفورم يعنى هيكون محمى --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( Font ):- هذه الخاصيه تتيح للمستخدم تغيير نوع وحجم وسماكة الخط لعنوان الـ Frame ( الذى يتم كتابته بالخاصيه Caption ) على اليسار يوجد سهم اضغط عليه ستظهر لك قائمة يمكنك من خلالها اختيار نوع وحجم وسماكة الخط كما يحلو لك --------------------------------------------------------------------------------------------------------------------------- الخاصيه ( ForeColor ):- هذه الخاصيه تتيح للمستخدم لون الخط لعنوان الـ Frame ( الذى يتم كتابته بالخاصيه Caption ) ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Height ):- هذه الخاصيه تتيح للمستخدم التحكم فى ارتفاع الـ Frame فيمكنك أما من خلال التصميم السحب بالماوس للاسفل لتحديد الارتفاع للـ Frameأو كتابة رقم للارتفاع فى الخاصيه Height ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Left ):- هذه الخاصيه تتيح للمستخدم التحكم فى بعد الـ Frame عن الضلع الايسر من الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Top ):- هذه الخاصيه تتيح للمستخدم التحكم فى بعد الـ Frame عن الضلع الاعلى من الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Width ):- هذه الخاصيه تتيح للمستخدم التحكم فى عرض الـ Frame فيمكنك أما من خلال التصميم السحب بالماوس يميناً أو يساراً لتحديد عرض الـ Frameأو كتابة رقم للعرض فى الخاصيه Width ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( Visible ):- وهذه الخاصيه تتيح للمستخدم التحكم فى ظهور او عدم ظهور الــ Frame عند عرض الفورم وعند الضغط على السهم المجاور لها ستجد لها خيارين True و False عندد اختيار True سوف يظهر الـ Frame على الفورم عند فتحه ( وهذا هو الخيار الافتراضى من الفيجوال بيسك ) وعند اختيار False ٍسوف يختفى الـ Frame على الفورم عند فتحه يعنى هيكون غير ظاهر ومخفى لا يراه المستخدم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِSpecial Effect ):- هذه الخاصيه للـ Frame تعطى اشكال مبهره ومميزه للـ Frame على اليسار ستجد سهم اضغط عليه ستظهر لك قائمة وبها خمس خيارات جرب الخيارات ثم اختر الشكل المناسب لذوقك ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollBars ):- هذه الخاصيه من أهم الخصائص للـ Frame لانها تتيح للمستخدم عمل سكرول بار رأسى أو أفقى أو رأسى وأفقى أو بدون سكرول بار نهائيا شاهد الصوره التاليه الاختيار الاول : - fmScrollBarsNone وهو الاختيار الافتراضى للفيجوال وهو جعل الـ Frame بدون سكرول بار لا رأسى ولا أوفقى الاختيار الثانى:- fmScrollBarsHorizontal وهو جعل الـ Frame باسكرول بار افقى الاختيار الثالث:- fmScrollBarsVertical وهو جعل الـ Frame باسكرول بار راسى الاختيار الرابع:- fmScrollBarsBoth وهو جعل الـ Frame باسكرول بار رأسى و أفقى ( الاتنين معا ) ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollHeight ):- عند اختيارك من الخاصيه ScrollBars الاختيار الثالث fmScrollBarsVertical أو الاختيار الرابع fmScrollBarsBoth فيجب تحديد ارتفاع الاسكرول بار بكتابة رقم فى الخاصيه ScrollHeight ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollWidth ):- عند اختيارك من الخاصيه ScrollBars الاختيار الثانى fmScrollBarsVertical أو الاختيار الرابع fmScrollBarsBoth فيجب تحديد عرض الاسكرول بار بكتابة رقم فى الخاصيه ScrollWidth ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollLeft ):- هذه الخاصيه مرتبطه بالخاصيه ScrollWidth تتيح لنا تحديد كم يبعد الاسكرول بار الافقى عن عن الضلع الايسر للفريم عند فتح الفورم ------------------------------------------------------------------------------------------------------------------------ الخاصيه ( ٍِScrollTop ):- هذه الخاصيه مرتبطه بالخاصيه ScrollHeight فهى تتيح لنا تحديد كم يبعد الاسكرول بار الراسىعن عن الضلع الاعلى للفريم عند فتح الفورم ------------------------------------------------------------------------------------------------------------------------ طبعا انا عارف ان الخاصيه ScrollWidth & ScrollLeft & ScrollHeight & ScrollTop غير واضحه لكم لذالك هنقوم بشرح مثال عملى حتى تتضح لنا الصوره كامله عن هذه الخصائص فى عمل اسكرول بار والتحكم فيه مثال 1 :- عمل اسكرول بار رأسى والتحكم فى شريط التمرير فى هذه الصوره نريد عما اسكرول بار رأسى للفريم شاهد اول خطوه لماذا لم يظهر شريط التمريرداخل الاسكرول بار ؟؟؟؟؟ سامع ياسر العربى بيرد عليا وبيقول لان الخاصيه ScrollHeight = 0 هقوله برافوووووووووو طيب يالا نكتب رقم ارتفاع الاسكرول بار وليكن 100 الترجمه الحرفيه لكلمة ScrollHeight تعنى ارتفاع شريط التمرير شاهد الصوره بعد ما نكتب رقم ارتفاع الاسكرول ارتفاعه =100 للاسف يا عم ياسر كتبنا ارتفاعه 100 ومازال لا يوجد شريط تمرير ترى ما السبب ؟؟ رد عليا الاخ عبدالعزيز البسكرى قاعد صاحى معانا ومركز وقال لان ارتفاع الفريم فى الخاصيه Height = 270 وارتفاع شريط التمرير 100 برافووووو فأرتفاع الفريم اكبر من ارتفاع شريط التمرير لذالك لا يظهر الفايده من شريط التمرير الوصول الى المساحه اللى اكبر من ارتفاع الفريم نفسة لانها غير ظاهره فتعالو نكتب ارتفاع شريط التمرير وليكن 270 ونشوف ايه اللى هيحصل شاهد الصوره شاهد الصوره ارتفاع الفريم يساوى ارتفاع شريط التمرير = 270 لذالك ظهر شريط التمرير لكن لما تيجى تحركه مفيش مساحه مساحه هيتحرك فيها جرب تضغط على السهم اللى بالاعلى او الاسهم اللى بالاسفل اللى موجود بالاسكرول بار ستجد ان الشريط لا يتحرك لانه مساوى للفريم بالارتفاع فمش قادر يتحرك مفيش مساحه يتحرك فيها طيب تعالو نكتب ارتفاع شريط التمرير وليكن 300 ونشوف ايه اللى هيحصل شاهد الصوره طيب كدا عرفنا ازاى نعمل اسكرول بار راسى من الخاصيه ScrollBars وذالك من خلال اختيار fmScrollBarsVertical وعرفنا ايضا ازاى نتحكم فى ارتفاع الشريط من الخاصيه ScrollHeight عايزين نعرف ازاى نتحكم فى موضوع الشريط عند فتح الفورم يعنى فين تكون بدايته هنا تاتى اهمية الخاصيه ScrollTop تعالو نشوف الصوره دى كدا انتهينا من المثال الاول وعرفنا ازاى نعمل اسكرول بار رأسى ونتحكم فى ارتفاع شريط التمرير وكمان نتحكم فى بداية الشريط عند فتح الفورم ---------------------------------------------------------------------------------------------------------------- مثال 2 :- عمل اسكرول بار أفقى والتحكم فى شريط التمرير فى هذه الصوره نريد عما اسكرول بار رأسى للفريم شاهد اول خطوه لماذا لم يظهر شريط التمريرداخل الاسكرول بار ؟؟؟؟؟ سامع ابويوسف بيرد عليا وبيقول لان الخاصيه ScrollWidth = 0 هقوله برافوووووووووو طيب يالا نكتب رقم ارتفاع الاسكرول بار وليكن 200 الترجمه الحرفيه لكلمة ScrollWidth تعنى عرض شريط التمرير شاهد الصوره بعد ما نكتب رقم العرض للاسكرول عرضه = 200 للاسف يا ابويوسف كتبنا عرض 200 ومازال لا يوجد شريط تمرير ترى ما السبب ؟؟ رد عليا الاخ ابوالبراء قاعد صاحى معانا ومركز وقال لان عرض الفريم فى الخاصيه Width = 360 وعرض شريط التمرير 200 برافووووو فعرض الفريم اكبر من عرض شريط التمرير لذالك لا يظهر الفايده من شريط التمرير الوصول الى المساحه اللى اكبر من عرض الفريم نفسة لانها غير ظاهره فتعالو نكتب عرض شريط التمرير وليكن 360 ونشوف ايه اللى هيحصل شاهد الصوره شاهد الصوره عرض الفريم يساوى عرض شريط التمرير = 360 لذالك ظهر شريط التمرير لكن لما تيجى تحركه مفيش مساحه مساحه هيتحرك فيها جرب تضغط على السهم اللى بالايمن او الاسهم اللى بالايسر اللى موجود بالاسكرول بار ستجد ان الشريط لا يتحرك لانه مساوى للفريم بالعرض فمش قادر يتحرك مفيش مساحه يتحرك فيها طيب تعالو نكتب عرض شريط التمرير وليكن 450 ونشوف ايه اللى هيحصل شاهد الصوره طيب كدا عرفنا ازاى نعمل اسكرول بار افقى من الخاصيه ScrollBars وذالك من خلال اختيار fmScrollBarsHorizontal وعرفنا ايضا ازاى نتحكم فى ارتفاع الشريط من الخاصيه ScrollWidth عايزين نعرف ازاى نتحكم فى موضوع الشريط عند فتح الفورم يعنى فين تكون بدايته هنا تاتى اهمية الخاصيه ScrollLeft تعالو نشوف الصوره دى كدا انتهينا من المثال الثانى وعرفنا ازاى نعمل اسكرول بار افقى ونتحكم فى عرض شريط التمرير وكمان نتحكم فى بداية الشريط عند فتح الفورم ---------------------------------------------------------------------------------------------------------------- محلوظه مهمه جدا : انا شرحت على الصوره التاليه وهى كما نرى لا تحتاج عمل اسكرول بار لان كافه العناصر اللى بالفريم ظاهره وعرض الفريم مناسب لها لذالك انصح بأنه لا نلجأ لعمل سكرول بار سواء افقى او راسى او الاتنين معا الا اذا كان العناصر بالفريم كتيره وانا مش عايز اكبر حجم الفريم حتى لا يأخذ مساحه على الفورم فوقتها نلجأ للاسكرول بار **************************************************************************************** الى لقاء اخر من حلقات سلسلة علمنى كيف اصطاد ان شاء الله هيكون عن التعامل مع خصائص الــ Frame فى لغة البرمجه انتظرونا تقبلوا تحياتى

جزيت خير الجزاء أخي الحبيب الغالي ياسر فتحي تقبل الله منا ومنكم وعوداً حميداً