BMS-HOSxP Community
HOSxP => Development => ข้อความที่เริ่มโดย: manoi ที่ สิงหาคม 21, 2007, 16:16:35 PM
-
ใน version นี้ทำสำหรับผู้ที่ยังต้องการรูปแบบเมนูแบบเดิมครับ
และเพิ่มความสามารถใหม่ในการพิมพ์ Sticker ยา (ระบบห้องจ่ายยา Mode 2) เนื่องจากแต่เดิม HOSxP จะมีการพิมพ์ Sticker 2 วิธีครับ วิธีแรกคือการพิมพ์ผ่าน Print Server และวิธีที่สอง คือพิมพ์ผ่าน Local Printer โดยออกแบบ Sticker เอง
ปัญหาที่พบคือ มีบาง รพ. ที่ไม่อยากใช้ Print Server และเมื่อหันมาใช้ระบบ Sticker ที่ออกแบบเองก็พิมพ์ได้ไม่ค่อยสวยและพิมพ์กระโดดบ่อย (น่าจะเกิดจาก Report engine ที่ออกแบบเองไม่เหมาะกับการพิมพ์ Sticker) ผมจึงได้พัฒนาระบบพิมพ์ Sticker แบบที่ 3 คือเอาระบบพิมพ์ Sticker ไปไว้ใน DLL แล้วสั่ง Dynamic load function ใน dll ขึ้นมาทำการพิมพ์ ซึ่งจะช่วยแก้ปัญหาที่ว่านี้ได้ครับ แต่จะต้องใช้ Delphi ออกแบบและ compile เป็น DLL เอง
Download HOSxP 3.50.8.21 Old UI ได้จากที่นี่ครับ ( ftp://ftp.hosxp.net/pub/HOSxP_Upgrade_3.50.8.21_OldUI.exe )
-
การเปิดการใช้งาน อันดับแรกต้องเลือกไม่ใช้ Print Server ก่อนครับ
แล้วเลือก Local Printer เอาไว้อย่าให้ว่าง (ถัดจาก Print Server)
ดังรูป
-
ถัดมาให้คลิกขวาตรงรายการยา แล้ว Check ตรง Use external sticker engine เอาไว้ครับดังรูป
-
นี่เป็น Source Code ของตัว StickerPrint.dll ครับ
Component ที่ใช้
FastMM4 (comment ออกได้)
FastCode (comment ออกได้)
FastMove (comment ออกได้)
Eurekalog (comment ออกได้)
TJvNavPanelHeader (JVCL) (ลบออกได้)
ReportBuilder
DataSnap (DCOMConnection)
การรับส่งข้อมูลกับ HOSxP จะใช้ COM (Component Object Model (http://en.wikipedia.org/wiki/Component_Object_Model)) ครับ
-
ส่วนนี่เป็น StickerPrint.DLL ที่ compile แล้ว เอาไปไว้ใน Folder HOSxP ครับ
ออกแบบสำหรับ Sticker สูง 2 นิ้ว กว้าง 4 นิ้วครับ
-
สุดยอด
-
...ใน Ribbon UI ด้วยนะครับ... :D...
...คลิกขวาตรงรายการยา แล้ว Check ตรง Use external sticker engine ใน 3.50.8.3.18 ยังไม่มีครับ.....
-
ทดสอบแล้วครับใช้ได้ดีเลยครับ
-
ถ้าเป็นไปได้อยากให้กำหนดแบบนี้ได้ที่ printer server ครับ
-
รอ version หน้านะครับ ;)
-
ทดสอบใน 3.50.8.22 Ribbon UI นะครับ
-
ขอบคุณครับอาจารย์