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

تعديل مساحة صندوق النص حسب مواصفات الخط

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

فكرة خطرت ببالي بالإستفادة من الأكسل

وهي تمرير النص والخط ومواصفاته لملف أكسل ثم تحجيم الخلية

وبعدها نأخذ حجم الخلية من الأكسل ونستخدم مقاساتها لصندوق النص بالأكسس

فهمتوا :D الشرح عندي مشكلة

ResizeTextBox.rar

#2

معقول أن فكرة الموضوع لم تلفت نظركم .. هناك مشكلة !

عموما أنا طورت المثال حتى نتخلص من البطء والذي سببه فتح وغلق ملف الأكسل

وكنت أود بالإستفادة من أفكاركم في كيفية الإستفادة من الفكرة

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

فهل هناك فوائد أخرى ؟ .. بانتظار مشاركاتكم

تم تعديل هذه المشاركة بواسطة Accessna في 17 يوليو 2007 في 20:51

#3

هذه آخر مشاركة لي في منتدى الأكسس

وسوف أعود إذا رأيت أن أحوال المنتدى تبدلت

باي باي

#4

السلام عليكم

طريقة ذكية جداً ومجهود رائع تشكر عليه

جزاك الله خيراً وآمل أن لا تحرمنا من خبراتك فالمنتدى بحاجة لأمثالك

زادك الله من علمه وجعل ذلك في ميزان حسناتك

والسلام عليكم

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

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

حديث حسن صحيح

#5

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

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

شخصيا لم اشاهد الموضوع الا الان

ويجب اخي الكريم ان تعذر الناس واذا لاحظت فان عدد التنزيل للملف 18 فقط حتى انزلته

ارجو اخي الكريم ان تظل معنا ولا تحرمنا افكارك

بارك الله فيك مرة اخرى وحفظك

#6

أعلى الله مقامكما أخواي

عمار زيد

و

sx1

وشكرا جزيلا لكما على مشاركتكما الكريمة و "البلسمية" وإن شاء الله أنا باقي معكم مادام هناك أمثالكما

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

#7

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

خطر ببالك طريقة أظن أنها تغني عن الخروج إلى الإكسل مع أنها طريقة مبتكرة وذكية

عن طريق len بحيث يقوم بعد الأحرف وبناءاً على عدد الأحرف وقياس الفونط يقوم بتعديل قياس الصندوق

( نعرف لكل حرف كم يكون قياس الصندوق بفرض كان 4 مم للحرف فإن كان 10 أحرف يكون القياس 10*4 مم ويضعها في حقل عرض الصندوق )

هذه كفكرة مبدئية

والسلام عليكم

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

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

حديث حسن صحيح

#8

بارك الله فيك اخي الفاضل Accessna

بصراحه مثال وفكره رائعه

ومعذرة اننا لم ننتبه لهذا الموضوع إلا الآن فقد كنت اعتبره سؤال عابر وتمت الإجابه عليه ولم اعلم ان به فكره تود طرحها او التعقيب عليها .

ختاما لك منا كل الشكر والتقدير

#9

فكرة جميلة , لكن برمجيا ممكن مباشرة باللعب :lol: مع أى الدوال التالية :

GetTextExtentPoint32

GetTextMetrics

#10

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

بارك الله فيكم اخواني

#11

ما شاء الله

شكرا لكم جميعا

لازالت رغبتي قائمة في تطوير الفكرة ، لكن .. كما قالها الأخ msayed2004 استوقفتني

فهل للأخ أن يزودنا بمثال يطبق فيه الدالتين لنفس غرض الموضوع ؟

أما اقتراح الأخ عمار زيد فهو لا يمكن تطبيقه إلا مع الخطوط التي تكون جميع حروفها بنفس العرض كخطوط نظام الدوز

#12

دالة GetTextExtentPoint32 تقدر تجيب لنا طول و عرض جملة ما و دالة GetTextMetrics تقدر تجب خواص خط ما , لو عايز مثال مفيش مشكلة بس هعمله بالـ VB6 لأن مليش فى الـ VBA و كمان مش منزل اى حاجة من الـ Office حاليا.

#13

كنت فاضى :P فعملت المثال B) .

بس VB 6 زى ما قلت :( تعاملوا أنتم بقى ( ممكن تفتحوا الفورم بالـ Notepad و يستحسن بالـ ++Notepad و ضبط اللغة على VB ).

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

اللى عايز اى قيمة ثابت ذكر فى التعليقات اللى على الـ TEXTMETRIC Structure أجبهوله ( زهقت من المشروع :wacko: و ما صدقت خلصته و مقدرتش أحط تعليقات أضافية :rolleyes: ).

بالمناسبة فى نسخة Portable Visual Basic 6 للى عايز VB6 صغير فى الحجم.

Strings_Metrics.rar

تم تعديل هذه المشاركة بواسطة msayed2004 في 25 يوليو 2007 في 22:28

#14

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

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

ويا ريت ان يستطيع احد الاخوان تحويله للاكسس

#15

الأخ msayed2004

شكرا على جهودكم ولكن لاحظت أنك لم تأخذ مقاس الخط بالحسبان

الأخ sx1

حين يقوم المثال الجديد بإداء نفس مهمة المثال الأصل تماما سأقوم بتحويله للأكسس إن شاء الله

#16
Accessna كتب:
شكرا على جهودكم ولكن لاحظت أنك لم تأخذ مقاس الخط بالحسبان

تقصد ايه بمقاس الخط ؟!

بالدالة الأولى أنت عندك عرض الجملة و أطول جزء فيه ( و ده يكفى تقريبا ).

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

تعديل : الدالتين بتعرف الخط من خلال الـ HDC.

تم تعديل هذه المشاركة بواسطة msayed2004 في 26 يوليو 2007 في 22:48

#17

أقصد الـ FONT SIZE

8

9

.

.

.

72

هل يمكن إضافتها في النموذج ؟

#18

الدالتين بياخدوا كل مواصفات الخط من الـ HDC

تم تعديل هذه المشاركة بواسطة msayed2004 في 26 يوليو 2007 في 23:06

#19

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

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

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

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