GHOST2010

الشرح مش وحش لكن الموضوع هو اللى صعب ياهانى , ماتستعجلش على الردود :rolleyes:

هو انت ماوصلتكش رسالة خاصة قبل نقل الموضوع؟؟ :unsure:

الاداة تملك خاصية RightToLeft اذا لم تجدها فضع الاسم الصحيح للاداة

ياراجل حرام عليك , انت لقيت الموضوع ده فين :wacko:

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

حسناً , فى انتظار رأى باقى المشرفين ابراهيم الطيب عبدالله فتحى prof_1982

عزيزى ابراهيم اقترح ان تقوم الادارة بتعديل المنتدى بحيث يقبل احدث 100 صفحة وباقى الصفحات تنقل أو تحذف تلقائياً

السلام عليكم ورحمة الله وبركاته عدد صفحات المنتدى وصل الى 212 صفحة وطبعاً معظمها بلا فائدة فأقترح تقليص العدد الى 100 وحذف الباقى او نقلها الى قسم جديد باسم (صفحات قديمة) أو (صفحات ممزقة) مثلاً فما رأيكم :rolleyes:

تسلم ياشادى :lol:

السلام عليكم ورحمة الله وبركاته الاعلان عن الدالة اذا كان بالكلمة Private فيوضع داخل الفورم الذى سيستخدم الدالة اما اذا كنت تريد استخدام الدالة على المستوى العام او فى اى مكان فى البرنامج فغير كلمة Private الى Public ولكن يتم الاعلان فى هذه الحالة داخل وحدة نم…

تسلم ياغالى :rolleyes:

السلام عليكم ورحمة الله وبركاته قم بالاعلان عن الدالة ShellExecute كما يلى Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByV…

السلام عليكم ورحمة الله وبركاته أريد رابط لتحميل اخر اصدار من برنامج OLLY لو سمحتم لان الاصدار الموجود عندى قديم وفى احد مواضيع الاخ jaas رأيت صورة لاصدار احدث :rolleyes:

لقد تأكدت ان الكود يعمل بدون أى اخطاء , راجع كتابته مرة أخرى عليك ان تمرر اسم الاداة الى الاجراء SetRtoL فى حدث تحميل الفورم Private Sub Form_Load() SetRtoL TreeView1 End Sub

اخى الكريم لقد جربته قبل ان اضعه , راجع انت الكود ربما اخطأت عند كتابته وانا سأتأكد مرة اخرى :rolleyes:

نرحب بك اخ وصديق جديد لنا ونحن نتشرف بذلك بعد اذنك ياهانى تحدثت بالنيابة عنك :rolleyes:

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

بس هو فى مكانه الطبيعى ياهانى :rolleyes:

شكراً هانى وبطريقة اخرى Private Sub Form_Unload (Cancel As Integer) Dim F As Form For Each F In Forms Unload F Set F = Nothing Next End End Sub

ارجح كلام الصاروخ وده كود التكرار للاداة ميديا بلايير الموجودة عندى MediaPlayer1.Settings.PlayCount = LoopTimes وفى بعض الاصدارات يمكنك التحكم فى خاصية التكرار من خلال الـPropertyPage للاداة والتى تجدها فى الخاصية Custom فى صندوق الخصائص للاداة :rolleyes: