Custom Printing Settings ใน HOSxP Report Designer

[naj]

มีน้อง Admin ถามมาเรื่องการทำ Custom Printing Settings ใน HOSxP Report Designer เช่น คำสั่ง

โค๊ด: Delphi

1. procedure GlobalOnCreate;
2.  
3. var s:string;
4.  
5. begin
6.  
7.   s:=  InputQuery('Copy', 'Copy');
8.  
9.   if trim(s)='' then s:='1';
10.  
11.   Report.PrinterSetup.copies:=strtoint(s);
12.  
13. end;
14.  

ซึ่งใช้ควบคุมการสั่งพิมพ์
ขอเวลาสักครู่ รอให้เจ้ายินดีหลับก่อน แล้วจะมาอธิบายการสร้างและการใช้ต่อครับ

[jdadmin1]

ขอเวลาสักครู่ รอให้เจ้ายินดีหลับก่อน แล้วจะมาอธิบายการสร้างและการใช้ต่อครับ

อัตราต่อรองขึ้นมาที่ 3 : 1 แล้วครับ ว่าพ่อน้องยินดีหลับก่อน...55555555....

[naj]

เป็นอย่างที่น้าบอก ขอโทษด้วยครับ ตื่นมาอีกที สว่างแล้ว

[SrWooD]

ซู๊ดยอดดดด....อีกแล้่ว อ.naj

 

[naj]

ปรกติ การพิมพ์เราสามารถที่จะสั่งผ่านเมนูดังรูปที่ s1  s2  แต่ถ้าหากต้องการที่จะเขียนคำสั่งเพื่อควบคุมตามที่เราตองการก็ทำได้เช่น ต้องการสั่ง print จำนวน 10 ชุด โดยให้อยู่ในแนวนอน (Landscape)

[naj]

วิธีการก็ไม่ยุ่งยากนักครับ แต่อาจจะต้อง รู้ก่อนว่า Property ที่จะใช้มีอะไรบ้าง และอยุ่ส่วนไหนของ Report Designer(RD)
ยกตัวอย่าง ผมต้องการให้พิมพ์ จำนวน 3 ชุด แนวตั้ง(Portrait) และเป็นขนาด A4

[naj]

ผมเลือก BeforPrint หมายถึง ก่อนการพิมพ์ให้ทำตาม Code ที่สั่งก่อน

[naj]

ผมเลือก Properties
copies = จำนวนชุดที่ต้องการพิมพ์ (ต้องเป็นเลขจำนวนเต็ม,integer)
Orientation = รูปแบบการพิมพ์ แนวตั้ง(poPortrait),แนวนอน(poLandScape)
PaperName= ขนาดกระดาษ เช่น A4

[naj]

ต่อเลยครับ

[naj]

นอกจากนี้ เราสามารถที่จะ เขียน code ไว้ใน Event ก็ได้ครับ

[naj]

สุดท้ายเราจะไปผูกไว้กับคำสั่งอื่น หรือลูกเล่นต่างๆก็แล้วแต่จะจินตนาการครับ

[thannawe]

เยี่ยมครับ

[Khuad]

....thank thank thank ....

....ให้ไปหลาย thank เลย   เดี๋ยวกะลังหาแบงค์พันชนิดพิเศษอยู่ครับ  จะเก็บไว้ให้ 'จารย์นาจแทน thank ....    ....

  อัตราต่อรองขึ้นมาที่ 3 : 1 แล้วครับ ว่าพ่อน้องยินดีหลับก่อน...55555555....

.... อิ อิ   300 : 1  ก็รองไม่ได้ครับ ป๋า jdadmin1   เพราะทราบผลล่วงหน้าแล้ว ...      ....

[naj]

ขอบคุณครับ ขอแค่ทำงานตามที่รับปากห้องฟันให้เสร็จก็พอแล้วครับ
รักน้อยๆๆๆ แต่ขอนานๆๆๆ

[manoi]

ขอบคุณครับ ขอแค่ทำงานตามที่รับปากห้องฟันให้เสร็จก็พอแล้วครับ
รักน้อยๆๆๆ แต่ขอนานๆๆๆ

เอ อ.นาจมีอะไรกับห้องฟันหรือเปล่าครับ   

[wiphusit]

ขอบคุณครับ ขอแค่ทำงานตามที่รับปากห้องฟันให้เสร็จก็พอแล้วครับ
รักน้อยๆๆๆ แต่ขอนานๆๆๆ

เอ อ.นาจมีอะไรกับห้องฟันหรือเปล่าครับ   

;Dขอบคุณครับอาจารย์