نوع غريب من الطباعة في دلفي

بدأه saiddsa3980 في 9 أكتوبر 2009 · 8 رد · 1,693 مشاهدة · في لغة Delphi

#19 أكتوبر 2009 في 21:35 صاحب الموضوع

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

السلام عليكــم ورحمـة الله وبركاتــه ،،

وجد أحد الأشخاص عامل برنامج أجور فريد من نوعه بحيث يمكن للمستخدم إضافة أعمدة في جدول الأجور وطريقة التي تحسب بها هذه الأعمدة مثال : أي ( العمود 10 = العمود 1+العمود 2) وكل هذا يستطيع المستخدم القيام به والبرنامج في حالة تنفيذ ولكني عندما سألت هذا الشخص قلت له أي نوع من الطباعة تستعمل فقال لي أستعمل الكود البرمجي في الطباعة canvas ولكنه عامل ملفات خارجية إمتدادها AR مثل Virement.AR وقمت بفتح هذا الملف بواسطة المفكرة فوجدت مكتوب فيه الكود الأتي :

ORIENTATION=PORTRAIT

LEFTMARGIN=25

TOPMARGIN=100

RIGHTMARGIN=25

BOTTOMMARGIN=100

PAPERSIZE=0

PAGESIZE

NAME=------

WIDTH=2100

HEIGHT=2790

ENDPAGESIZE

FONTNAME=ARIAL

FONTSIZE=10

FONTCOLOR=0

FONTCHARSET=1

OBJECTLIST

...=0

OBJECT 1=0

OBJECT 2=0

OBJECT 3=0

OBJECT 4=0

AAA=0

NEW OBJECT1=0

NEW OBJECT2=0

NEW OBJECT3=0

NEW OBJECT4=0

(...)=0

OBJECT_1=0

OBJECT_2=0

OBJECT_3=0

OBJECT_4=0

ENDOBJECTLIST

BAND

NAME=H1

HEIGHT=60

CELL

FONTNAME=Tahoma

FONTSIZE=16

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=الجمهورية الجزائرية الديمقراطية الشعبية

HALIGN=2

VALIGN=2

WIDTH=750

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=H2

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=14

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=[ADMIN1]

HALIGN=1

VALIGN=2

WIDTH=750

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=H3

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=14

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=[ADMIN2]

HALIGN=1

VALIGN=2

WIDTH=750

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=T1

HEIGHT=100

CELL

FONTNAME=Tahoma

FONTSIZE=16

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=كشف الدفع

HALIGN=2

VALIGN=2

WIDTH=750

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=E1

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[rptDate]

HALIGN=2

VALIGN=2

WIDTH=250

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=تاريخ

HALIGN=2

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=10

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[numMandat]

HALIGN=2

VALIGN=2

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=رقم الحوالة

HALIGN=2

VALIGN=2

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=10

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=10

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[NumPg]

HALIGN=2

VALIGN=2

WIDTH=80

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=رقم

HALIGN=2

VALIGN=2

WIDTH=90

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=S1

HEIGHT=10

CELL

FONTNAME=ARIAL

FONTSIZE=10

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=E2

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[Periode]

HALIGN=2

VALIGN=2

WIDTH=250

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=الشهر

HALIGN=2

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=10

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[Ord]

HALIGN=2

VALIGN=2

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=القسم

HALIGN=2

VALIGN=2

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=10

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[Annee]

HALIGN=2

VALIGN=2

WIDTH=80

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=السنة

HALIGN=2

VALIGN=2

WIDTH=90

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=S2

HEIGHT=10

CELL

FONTNAME=ARIAL

FONTSIZE=10

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=E3

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[libModeP]

HALIGN=2

VALIGN=2

WIDTH=250

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=طريقة المخالصة

HALIGN=2

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=10

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[LibCatProf]

HALIGN=2

VALIGN=2

WIDTH=290

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=الصنف

HALIGN=2

VALIGN=2

WIDTH=90

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=S3

HEIGHT=10

CELL

FONTNAME=ARIAL

FONTSIZE=10

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=0

WIDTH=100

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=ET1

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=الصافي للدفع

HALIGN=2

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=رقم الحساب

HALIGN=2

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=اللقب

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=الإسم

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=رقم

HALIGN=2

VALIGN=2

WIDTH=40

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=D1

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[mnt]

HALIGN=1

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[ncpt]

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[Nom]

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[Prenom]

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[lnNum]

HALIGN=2

VALIGN=2

WIDTH=40

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=DV

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=

HALIGN=1

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=

HALIGN=1

VALIGN=2

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=

HALIGN=2

VALIGN=2

WIDTH=40

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=ST1

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[TotPg]

HALIGN=1

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=مجموع الصفحة

HALIGN=2

VALIGN=2

WIDTH=640

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=TG

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=[totG]

HALIGN=1

VALIGN=2

WIDTH=110

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMELEFT=1,0

FRAMERIGHT=1,0

FRAMETOP=1,0

FRAMEBOTTOM=1,0

FRAMECOLOR=0

FRAMEWIDTH=1

COLOR=16777215

VALUE=المجموع العام

HALIGN=2

VALIGN=2

WIDTH=640

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=F1

HEIGHT=40

CELL

FONTNAME=Tahoma

FONTSIZE=12

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=أوقفت هذه الحالة على المبلغ التالي

HALIGN=1

VALIGN=2

WIDTH=750

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=F2

HEIGHT=25

CELL

FONTNAME=Tahoma

FONTSIZE=14

FONTCOLOR=0

TEXTANGLE=0

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=[TotLettre]

HALIGN=1

VALIGN=2

WIDTH=700

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

BAND

NAME=F3

HEIGHT=50

CELL

FONTNAME=Tahoma

FONTSIZE=14

FONTCOLOR=0

TEXTANGLE=0

BOLD

FRAMECOLOR=0

FRAMEWIDTH=0

COLOR=16777215

VALUE=الأمر بالصرف

HALIGN=1

VALIGN=1

WIDTH=200

WORDWRAP=1

OBJECTTYPE=

AUTOSTRETCH=1

ENDCELL

ENDBAND

الرجاء من لديه فكرة عن هذا النوع من الطباعة وشكراً

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#210 أكتوبر 2009 في 04:38

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

لا أعتقد أن هنالك رابط أساسي بين هذه الملفات وبين نوع الطباعة ممكن تكون ملفات لتحميل قيم معينة أم بالنسبة للطباعة بواسطة ال Canvas فهي بسيطة

مثلا إذا أردنا طباعة الفورم يمكن عمل ذلك بسهولة وليس فورم برنامجنا فقط بل أي فورم أخر على الشاشة بواسطة Canvas

uses Printer;

procedure TForm1.Button1Click(Sender: TObject);
var
 bmp: TBitMap;
begin
  bmp:= TBitMap.Create;
  bmp.Height:= Form1.Height;
  bmp.Width:= Form1.Width;
  bmp.Canvas.Handle:= GetWindowDC(Form1.Handle);
  Printer.BeginDoc;
  Printer.Canvas.Draw(0,0,bmp);
  Printer.EndDoc;
end;

أرحو التصحيح إن كان هنالك خطأ

اقتباس
وجد أحد الأشخاص عامل برنامج أجور فريد من نوعه بحيث يمكن للمستخدم إضافة أعمدة في جدول الأجور وطريقة التي تحسب بها هذه الأعمدة مثال : أي ( العمود 10 = العمود 1+العمود 2) وكل هذا يستطيع المستخدم القيام به والبرنامج في حالة تنفيذ

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

Way.rar

#310 أكتوبر 2009 في 12:46

أأكد لك أن هناك رابط أساسي بين هذه الملفات ونوع الطباعة بدليل أن هذا الشخص عامل مجلد داخل المجلد الموجود فيه البرنامج إسمه Reports وواضع مجموعة من الملفات إمتدادها AR ، وبخصوض هذا الإمتداد أظن أنه عامله لكي لايتعرف عليه أحد وكذلك عندما سألته عن الطباعة قال لي أني أعملها في ملفات خارجية فيها معلومات الصفحة (' الجمهورية الجزائرية الديمقراطية الشعبية ' و ' حوالة رقم ' ... إلخ )

شكراً

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#414 أكتوبر 2009 في 17:59

لقد بحثت في google ووجدت الروابط التالبة لها علاقة ولكن لم أعرف كيف الإتصال من الدلفي إلى ملف طباعة بإمتداد AR

http://www.rexrealty.bb/getattachment?id=%...ent=CUSTLIST.AR

http://nonni.bondi.is/kappi/utg15/Nidurstada_Allt_Motid.AR

http://nonni.bondi.is/kappi/utg15/Dompallur_2.ar

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#515 أكتوبر 2009 في 15:22

السلام عليكم...

لا علاقة لتلك الملفات بالطباعة. هي فقط ملفات لحفظ تصاميم (مواصفات و محتويات) التقارير، و يمكن أن تكون بأي امتداد. هذه الملفات إما أنه تتم قراءتها بمكون (Component) جاهز، أو - ببساطة - بكتابة إجراء (Procedure) يقوم بقراءة الملف و إنشاء الـ Bands و الـ Cells و ضبط خصائصها أثناء التشغيل حسب ما هو وارد في الملف.

لقد أعدت هنا ترتيب جزء من المحتوى المذكور ليكون التركيب أوضح:

// مواصفات صفحة التقرير
ORIENTATION=PORTRAIT
LEFTMARGIN=25
TOPMARGIN=100
RIGHTMARGIN=25
BOTTOMMARGIN=100
PAPERSIZE=0
PAGESIZE
	NAME=------
	WIDTH=2100
	HEIGHT=2790
ENDPAGESIZE
FONTNAME=ARIAL
FONTSIZE=10
FONTCOLOR=0
FONTCHARSET=1
OBJECTLIST
	...=0
	OBJECT 1=0
	OBJECT 2=0
	OBJECT 3=0
	OBJECT 4=0
	AAA=0
	NEW OBJECT1=0
	NEW OBJECT2=0
	NEW OBJECT3=0
	NEW OBJECT4=0
	(...)=0
	OBJECT_1=0
	OBJECT_2=0
	OBJECT_3=0
	OBJECT_4=0
ENDOBJECTLIST
// بداية منطقة في التقرير
BAND
	NAME=H1
	HEIGHT=60
	// بداية خلية
	CELL
		FONTNAME=Tahoma
		FONTSIZE=16
		FONTCOLOR=0
		TEXTANGLE=0
		BOLD
		FRAMECOLOR=0
		FRAMEWIDTH=0
		COLOR=16777215
		VALUE=الجمهورية الجزائرية الديمقراطية الشعبية
		HALIGN=2
		VALIGN=2
		WIDTH=750
		WORDWRAP=1
		OBJECTTYPE=
		AUTOSTRETCH=1
	ENDCELL	// نهاية خلية
ENDBAND		// نهاية منطقة
// x بدابة منطقة أخرى
BAND
	NAME=E1
	HEIGHT=25
	CELL
		FONTNAME=Tahoma
		FONTSIZE=12
		FONTCOLOR=0
		TEXTANGLE=0
		FRAMELEFT=1,0
		FRAMERIGHT=1,0
		FRAMETOP=1,0
		FRAMEBOTTOM=1,0
		FRAMECOLOR=0
		FRAMEWIDTH=1
		COLOR=16777215
		VALUE=[rptDate]
		HALIGN=2
		VALIGN=2
		WIDTH=250
		WORDWRAP=1
		OBJECTTYPE=
		AUTOSTRETCH=1
	ENDCELL
		// بداية خلية أخرى
	CELL
		FONTNAME=Tahoma
		FONTSIZE=12
		FONTCOLOR=0
		TEXTANGLE=0
		FRAMELEFT=1,0
		FRAMERIGHT=1,0
		FRAMETOP=1,0
		FRAMEBOTTOM=1,0
		FRAMECOLOR=0
		FRAMEWIDTH=1
		COLOR=16777215
		VALUE=تاريخ
		HALIGN=2
		VALIGN=2
		WIDTH=110
		WORDWRAP=1
		OBJECTTYPE=
		AUTOSTRETCH=1
	ENDCELL
	CELL
		FONTNAME=Tahoma
		FONTSIZE=12
		FONTCOLOR=0
		TEXTANGLE=0
		FRAMECOLOR=0
		FRAMEWIDTH=0
		COLOR=16777215
		VALUE=
		HALIGN=2
		VALIGN=0
		WIDTH=10
		WORDWRAP=1
		OBJECTTYPE=
		AUTOSTRETCH=1
	ENDCELL
ENDBAND

أنا شخصياً أستعمل طريقة تشبه هذه الطريقة من خلال برنامج صممته بدلفي 7 منذ حوالي 4 سنوات و أسميته "معالج تصميم رؤوس المستندات" و أقوم بإرفاقه مع البرامج التجارية التي أصممها حتى يتمكن المستخدم من تصميم رؤوس المستندات (الفواتير و التقارير مثلاً) بالشكل الذي يناسبه إذا لم يعجبه التصميم الافتراضي الموجود في البرنامج. و هو يستعمل طريقة ملفات التهيئة (INI) لحفظ بيانات تصميم رأس التقرير، و هذه عينة من أحد تلك الملفات:

[REPORT]
PageDir=1
RightMargin=10
LeftMargin=10
TopMargin=10
BottomMargin=10
[TITLEBAND]
Height=214
Color=16777215
FrameColor=0
FrameRight=1
FrameLeft=1
FrameTop=1
FrameBottom=1
[LABEL1]
FontName=Arabic Transparent
FontSize=16
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=الجماهيرية الليبية
SpecialCaption=0
GetInputMsg=
Width=388
Height=29
Left=329
Top=12
Color=16777215
Alignment=0
Transparent=1
WordWrap=0
Frame=0
[LABEL2]
FontName=Arabic Transparent
FontSize=16
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=الهيئة العامة لتخطيط الرعاية الصحية
SpecialCaption=0
GetInputMsg=
Width=388
Height=29
Left=329
Top=52
Color=16777215
Alignment=0
Transparent=1
WordWrap=0
Frame=0
[LABEL3]
FontName=Arabic Transparent
FontSize=16
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=الشركة الوطنية للمعدات الطبية و الكهروميكانيكية
SpecialCaption=0
GetInputMsg=
Width=388
Height=29
Left=329
Top=94
Color=16777215
Alignment=0
Transparent=1
WordWrap=0
Frame=0
[IMAGE4]
Width=127
Height=120
Left=179
Top=4
Stretch=1
Center=1
Frame=0
Picture=E:\Delphi7Apps\HeaderTemplates\BrandMotionIMAGE4.rhdpic
EnterpriseLogo=0
[LABEL5]
FontName=Arabic Transparent
FontSize=12
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=%DD%
SpecialCaption=8
GetInputMsg=
Width=94
Height=20
Left=35
Top=128
Color=16777215
Alignment=0
Transparent=0
WordWrap=0
Frame=0
[LABEL6]
FontName=Arabic Transparent
FontSize=16
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=%DID%
SpecialCaption=9
GetInputMsg=
Width=540
Height=29
Left=253
Top=151
Color=16777215
Alignment=0
Transparent=1
WordWrap=0
Frame=0
[LABEL7]
FontName=Arabic Transparent
FontSize=12
FontColor=-16777208
FontBold=1
FontItalic=0
FontUnderline=0
FontStrikeout=0
RightToLeft=1
Caption=%CN%
SpecialCaption=10
GetInputMsg=
Width=388
Height=20
Left=329
Top=184
Color=16777215
Alignment=0
Transparent=1
WordWrap=0
Frame=0

و يتم حفظ تلك الملفات بالامتداد rhd (اختصاراً من Report Header Design).

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

*** منذ مدة أفكر في طرح بعض الدروس حول هذا الأمر (إنشاء معالج تصميم - Design Wizard) لكن للأسف لم يتوفر الوقت لذلك، و أرجو أن يكون ذلك قريباً.

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

وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ

صدق الله العظيم

#615 أكتوبر 2009 في 21:22

السلام عليكــم ورحمـة الله وبركاتــه ،،

بارك الله فيك أخي على الرد ولكن ياريت تعطينا درس كامل عن هذه الطريقة لكي نستفيد منها جميعاً

وشكرأ مرة ثانية في إنتضار الرد .

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#718 أكتوبر 2009 في 09:45

وين الرد أخي najy_zl وشكراً

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#826 أكتوبر 2009 في 20:27

إخواني من عنده الإجابة ينيرنا بها فلا يجوز إحتكار العلم !

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

#911 ديسمبر 2010 في 15:45

السلام عليكم هل من جديد في هذا الموضوع

قال الحسن البصري : يا إبن آدم إنما أنت أيام إذا ذهب يومك ذهب بعضك

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

فتح صورة من نوع png في دلفي3 رد · 27 يونيو 2006
الطباعة في دلفي 20090 رد · 2 مارس 2009
كيف يمكن تحديد نوع الصفحة اثناء الطباعة برمجيا2 رد · 18 أغسطس 2006
كيف اجعل نوع خط الطباعة علي ملف PDF خط عربي0 رد · 5 يوليو 2010
طباعة ملف من نوع RTF عن طريق كريستال ريبورت0 رد · 8 يناير 2007
شيء غريب يحدث معي عند طباعة التقرير1 رد · 22 مايو 2009