الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

بشرى سارة التحكم بالارتفاع الرأسي للتقرير الجدولي

مغلق
بدأه مفرج في 25 يوليو 2007 · 14 رد · 2,151 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الحمدلله تم عمل هذا البرنامج بعد ما رأيت كثرت الطلبات

الأن مثلنا مثل تقارير الكريستال

دعواتكم

_________________________________.rar

من سار على الدرب وصل

#2

بارك الله فيك أخي مفرج

مثال وطريقة مبدعة حقا وقد تكون الأول من نوعها فلم ارى مثل هذه إلا من خلال اناملك

لك مني كل الشكر والتقدير ومزيدا من الإبداع

#3

يعطيك العافية وبارك الله فيك أخي الكريم مفرج

#4

بسم الله الرحمن الرحيم

بارك الله فيك اخي الكريم وحفظك وزاد من علمك

#5

الف شكر اخي الغالي على المثال الرائع

تسلموا ويعطيك العافية

من يتهيب صعود الجبال _ _ _ _ _

compu.gif_ _ _ _ _ يعش أبد الدهر بين الحفر
#6

فعلا لا مستحيل في عالم البرمجة، اخي مفرج بارك الله فيك، عمل رائع.. جدا..

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#7

السلام عليكم

الله يجزاك الف خير أخي مفرج

لقد فرجت عنا عناء طالما حلمنا بوجود حل له

الله يفرجها عليك .. لك التحية

EKSEER

#8

جزاك الله الف خير وجعله في ميزان حسناتك

#9

بارك الله فيك وجزاك الله خير

اتق الله حيث ماكنت

#10

بــــــــــــــــــــــــــــــ الله فيك ـــــــــــــــــــــارك..

مبدع.

#11

السلام عليكم

طريقة تفكير رائعة الله يزيدك من فضله

قالَ رَسُولُ الله صلى الله عليه وسلم:

"مَنْ لم يَشْكُرِ النّاسَ لَمْ يَشكُرِ الله "

حديث حسن صحيح

#13

عمل يا أخي رائع جدا وهو الذي أريد أن أفعله في استفساري الذي أنزلته في المنتدى

لكن كيف عملته ؟

وكيف أستفيد منه ؟

وأهم سؤال (( ولا تضحك علي ))

كيف أظهر قائمة الأكواد التي تستخدم في البرنامج ؟

#14

وعليكم السلام ورحمة الله

يمكن اختصار ذلك بالكود التالي

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
   Dim cpt As Integer
   cpt = 30
			Me!id.Height = 360 * (Len(Me!Name) / cpt)
			Me!Name.Height = 360 * (Len(Me!Name) / cpt)
			Me!Number.Height = 360 * (Len(Me!Name) / cpt)
			Me!Job.Height = 360 * (Len(Me!Name) / cpt)

	Me.Detail.Height = 0
End Sub

حيث Name هو اسم الحقل الذي نريد أن يتغير ارتفاع الحقول حسب تغير ارتفاعه

وDetail هو اسم جزء التفصيل

cpt هو متغير نضع فيه كم عدد حروف الإسم في كل سطر

AHMED2ALL/at\Hotmail.com

#15

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

جزء التفصيل ما أدري وش المقصود منه

متغير الحروف كم العدد المناسب له

وأهم شيء : وين أدرج هذا الكود وكيف

أعرف إنه يتم تصميمه في الوحدة النمطية ويحفظ باسم معين لكن كيف أستدعيه

ولك شكري وتقديري

هذا الموضوع مغلق.

مواضيع مشابهة