ถามคับ เรื่อง getuserparameter รับค่าวันที่

[yokyai]

ทำยังไงให้แสดงผล ค.ศ. เป็น พ.ศ. คับ ขอบคุณคับ

[James011]

     

โค๊ด: Delphi

1.  Value := ISO2Date(GetUserParameter(0), 'dd/mm/yyyy');    

[yokyai]

ยังไม่ได้คับ

[James011]

    Preview Report by  HOSxP  ดูได้จาก Report ตัวอย่างครับ

[usa0823]

Value := ISO2Date(GetUserParameter(0), 'd mmmm eeee');
แต่รู้สึกว่าจะมีปัญหากับ windows 7
อาจารย์ก็เลยเพิ่มฟังชั่นมาแก้ปัญหา
รู้สึกว่า thaidateformat ประมาณนี้ครับ 

[James011]

  ;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
     
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน   
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน   

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ

[James011]

;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
     
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน   
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน   

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ

[udomchok]

  Preview Report by  HOSxP  ดูได้จาก Report ตัวอย่างครับ

;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
    
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน  
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน  

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ

ตามนี้แหละครับ

[yokyai]

ขอบคุณทุกท่านคับ

[pitaya]

อ.เจมส์ตอบเคลียร์ดีมากเลยครับ มือใหม่อ่านแล้วหายสงสัย ขอบคุณมากครับ

[wiphusit]

Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ

[James011]

Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ

   

โค๊ด: Delphi

1.   Value:=FormatThaiDate('dd/mm/yyyy', GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ')) ;
2.    

[armds]

เอาแบบ  Preview  ด้วยก็ต้องแบบนี้ครับ

โค๊ด: [Select]

Value := ISO2Date(GetUserParameter(0),'dd mmmm ')+
  inttostr(strtoint(ISO2Date(GetUserParameter(0),'yyyy'))+543);

[wiphusit]

Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ

   

โค๊ด: Delphi

1.   Value:=FormatThaiDate('dd/mm/yyyy', GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ')) ;
2.    

ขอบคุณครัย

[udomchok]

ขอบคุณครัย

แล้ว วิภู จะขอบคุณใครล่ะครับ