ปัญหาวันที่ Windows 7 ครับ

[P1005]

เครื่องคอมซื้อมาใหม่เป็น Windows 7 ครับ เวลาพิมพ์ OPD Card หรือฟอร์มอื่น รูปแบบวันที่ มันขึ้นเป็นปี คศ. ดังรูปครับ ไม่ทราบแก้ไขยังไง จริง แล้วมีคนเคยถามแล้วแหล่ะครับ แต่ผมหาคำตอบไม่เจอ รบกวนตอนให้อีกรอบนะครับ หรือส่งลิงค์ให้อีกหน   ขอบคุณครับ

[poramat]

เข้าไปแก้ไขรายงานครับ วางตัวแปรตามนี้ครับ
Value := FormatThaiDate('d mmmm yyyy', DBPipeline['vstdate'])

สำหรับ form อื่นๆ
แก้รูปแบบวันที่ใน win7
Value := FormatThaiDate('d mmmm yyyy',DBPipeline['birthday'])
Value := FormatThaiDate('d mmmm yyyy', DBPipeline['vstdate'])
Value := FormatThaiDate('d mmmm yyyy',DBPipeline['expiredate'])
Value := FormatThaiDate('d mmmm yyyy', DBPipeline['regdate'])
Value := FormatThaiDate('d mmmm yyyy',DBPipeline['DOB'])
Value := FormatThaiDate('d mmmm yyyy',CurrentDate)

[armds]

เพิ่มเติม จากพี่ปิ๊ก นะครับ

FormatThaiDate    และ  formatthaidate

ใช้งานไม่เหมือนกันนะครับ  ถ้าให้ดีทั้ง xp และ win7  ให้ใช้  FormatThaiDate  ครับ

[ismailsa]

ถามต่อนะคับ ในรายงานที่เขียนโดย pascal script เช่น
 st1:=formatdatetime('d mmm eeee',getsqldata('select birthday from patient where hn="'+fcds2['hn']+'"'));
   fcds['name4']:= st1;
ถ้าต้องการคิวรี่ออกมาเป็นปี พ.ศ. เลยได้ไหมครับ มี function หรือปล่าวคับ ลองใช้ function FormatThaiDate ก็ไม่ได้ เพราะตอนนี้ในใบ summary ถ้าปริ้นโดยWin 7 จะยัง ค.ศ อยู่

[chk]

   แค่เปลี่ยน y เป็น e  สำหรับ WIN 7  นะขอรับ 

[ismailsa]

ถามต่อนะคับ ในรายงานที่เขียนโดย pascal script เช่น
 st1:=formatdatetime('d mmm eeee',getsqldata('select birthday from patient where hn="'+fcds2['hn']+'"'));
   fcds['name4']:= st1;
ถ้าต้องการคิวรี่ออกมาเป็นปี พ.ศ. เลยได้ไหมครับ มี function หรือปล่าวคับ ลองใช้ function FormatThaiDate ก็ไม่ได้ เพราะตอนนี้ในใบ summary ถ้าปริ้นโดยWin 7 จะยัง ค.ศ อยู่

ลองเปลี่ยนแล้วไม่ได้ครับ จากคำสั่งข้างบน แต่ได้มาเป็น ค.ศ. แทน

[udomchok]

ถามต่อนะคับ ในรายงานที่เขียนโดย pascal script เช่น
 st1:=formatdatetime('d mmm eeee',getsqldata('select birthday from patient where hn="'+fcds2['hn']+'"'));
   fcds['name4']:= st1;
ถ้าต้องการคิวรี่ออกมาเป็นปี พ.ศ. เลยได้ไหมครับ มี function หรือปล่าวคับ ลองใช้ function FormatThaiDate ก็ไม่ได้ เพราะตอนนี้ในใบ summary ถ้าปริ้นโดยWin 7 จะยัง ค.ศ อยู่

ลองเปลี่ยนแล้วไม่ได้ครับ จากคำสั่งข้างบน แต่ได้มาเป็น ค.ศ. แทน

Query ผลลัพธ์จะออกมาเป็น คศ. อยู่แล้วครับ
เวลาแสดงผลก็ไปใช้ FormatThaiDate จัดรูปแบบครับ

[Guitar-hero]

ผมอยากทราบว่าถ้าผมต้องการกำหนดดังนี้
Value := FormatThaiDate('d mmmm yyyy',DBPipeline['birthday'])

เพื่อให้ windows7 พิมพ์ ค.ศ. เป็นภาษาไทย ผมจะต้องเอา code นี้
ไปวางตรงส่วนไหนของรายงาน ครับ

[udomchok]

ผมอยากทราบว่าถ้าผมต้องการกำหนดดังนี้
Value := FormatThaiDate('d mmmm yyyy',DBPipeline['birthday'])

เพื่อให้ windows7 พิมพ์ ค.ศ. เป็นภาษาไทย ผมจะต้องเอา code นี้
ไปวางตรงส่วนไหนของรายงาน ครับ

ศึกษาจาก http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=26640.0 นะครับ