السلام عليكم
كيف الكتابة عموديا بطريقة منسقة
حيث هناك طريقة للكتابة حرف تحت حرف وهذه الطريقة غير مجدية
أبغي الكتابة على التقارير باللغة العربية بشكل عمودي ومنسق
هل هناك إمكانية وكأنك عملت رتيت أي تدوير لـ : LABLE
:monster2:
السلام عليكم ورحمة الله وبركاته ،
أظنك تبحث عن مكون يقوم بالخدمة التالية :
![[صورة: mini_091010042240408754.jpg]](http://nsa11.casimages.com/img/2009/10/10/mini_091010042240408754.jpg)
أهديك هذا المكون الخاص ب QuickReport
و أيضا مكون آخر يقوم برسم مستطيل دائري الجوانب ، إذا أعجبك لا تنسانا من دعواتك.
دمت في رعاية الله وحفظه.
:monster1:
جازاك الله عنا كل خير أخي الكريم
وأطال الله عمرك في الطاعات وخير الأعمال
وربي يفتح عليك بالخير والبركات آمين ياربي العالمين
وجاري التثبيت والتجربة إن شاء الله
شكرا جزيلا
جازاك الله عنا كل خير أخي الكريم
وأطال الله عمرك في الطاعات وخير الأعمال
وربي يفتح عليك بالخير والبركات آمين ياربي العالمين
والله لقد أخجلتموني ،
جزاكما الله خيرا في الدارين.
:wub::o
شكرا على هذه المكونات وجزيت خيرا
السلام عليكم
كود :
var
lf : TLogFont;
tf : TFont;
begin
tf := TFont.Create;
tf.Assign(tqrdbtext(sender).Font);
GetObject(tf.Handle, sizeof(lf), @lf);
lf.lfEscapement := 900;
lf.lfOrientation := 900;
tf.Handle := CreateFontIndirect(lf);
tqrdbtext(sender).font.assign(tf);
tf.free;
end;