ผู้เขียน หัวข้อ: เกี่ยวกับการใช้ InputQuery  (อ่าน 6253 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ naj

  • Hero Member
  • *****
  • กระทู้: 2,449
  • Respect: +9
    • ดูรายละเอียด
    • http://www.luangphopern-hospital.com
เกี่ยวกับการใช้ InputQuery
« เมื่อ: พฤศจิกายน 30, 2006, 05:19:16 AM »
+1
เรียนถาม อ mn
ยกตัวอย่าง เกี่ยวกับการใช้ InputQuery
begin
 GetDateRangeDialog(date1, date2);   
       ds1:=formatdatetime('yyyy-mm-dd',date1);
    ds2:=formatdatetime('yyyy-mm-dd',date2);
    fan:=InputQuery('เลือก AN ที่ต้องการ',' AN 9 หลัก เช่น 490001206'); 
            fhn :=   GetSQLStringData('select hn from ipt where an="'+fan+'"'); 

end;
เกี่ยวกับการใช้ InputQuery ครับผมอยากจะให้แสดงค่า an=490001252 เป็นค่าเริ่มต้น ใน InputQuery  ในการเรียกรายงานทุกครั้งเพื่อที่ผู้ใช้จะได้ไม่ต้องใส่ an ถึง 9 หลัก จะเปลี่ยนแค่เลขท้ายจะสะดวกกว่าไม่ทราบว่ามีวิธีอย่างไรครับ
ขอบคุณครับ
พร้อมแนบตัวอย่างนรายงานมาให้ อ mn ดูด้วยครับ
Yindee And Tan

ออฟไลน์ udomchok

  • Hero Member
  • *****
  • กระทู้: 8,357
  • Respect: +589
    • ดูรายละเอียด
    • ร.พ.สมเด็จพระสังฆราช องค์ที่ 17
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #1 เมื่อ: พฤศจิกายน 23, 2009, 00:43:33 AM »
0
เรียนถาม อ mn
ยกตัวอย่าง เกี่ยวกับการใช้ InputQuery
begin
 GetDateRangeDialog(date1, date2);   
       ds1:=formatdatetime('yyyy-mm-dd',date1);
    ds2:=formatdatetime('yyyy-mm-dd',date2);
    fan:=InputQuery('เลือก AN ที่ต้องการ',' AN 9 หลัก เช่น 490001206'); 
            fhn :=   GetSQLStringData('select hn from ipt where an="'+fan+'"'); 

end;
เกี่ยวกับการใช้ InputQuery ครับผมอยากจะให้แสดงค่า an=490001252 เป็นค่าเริ่มต้น ใน InputQuery  ในการเรียกรายงานทุกครั้งเพื่อที่ผู้ใช้จะได้ไม่ต้องใส่ an ถึง 9 หลัก จะเปลี่ยนแค่เลขท้ายจะสะดวกกว่าไม่ทราบว่ามีวิธีอย่างไรครับ
ขอบคุณครับ
พร้อมแนบตัวอย่างนรายงานมาให้ อ mn ดูด้วยครับ
น่าสนใจครับ อ.mn ยังไม่ได้ตอบครับ  :( :( :(
ทำด้วยหัวใจร.พ.สมเด็จพระสังฆราช องค์ที่ 17 อ.สองพี่น้อง จ.สุพรรณบุรี
อบรมโดย BMS Team เมื่อ พ.ย. 49 ขึ้นระบบห้องบัตรเมื่อ X'Mas 2007
2008 : X-Ray กายภาพบำบัด แพทย์แผนไทย กิจกรรมบำบัด OPD ตา
2009 : ทันตกรรม ห้องตรวจตา OPD (พยาบาลและห้องตรวจแพทย์บางห้อง)

dusit

  • บุคคลทั่วไป
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #2 เมื่อ: พฤศจิกายน 23, 2009, 06:57:42 AM »
0
GetSQLStringData(sql:string) string ;
 
ต้องแก้ไข ให้รับค่า มันรับค่าอีกอันหนึ่งป่าวคับ

GetSQLStringData(sql,defa:string) string ;

หรือใช้ฟังชั่น keyboard ที่สั่งกด keyboard ปุ่มตัวเลข 490001206 ใน on create

หรือว่าบอก use ให้คีย์ตัวเลขท้าย แล้วเราไปเติมเลขหน้าให้เองก่อนนำไปใช้

เดาเอาหน่ะคับ ...


anonymous

  • บุคคลทั่วไป
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #3 เมื่อ: พฤศจิกายน 23, 2009, 10:36:30 AM »
0
เดาด้วย อิอิ


an=490001252

InputBox('Enter data','Please enter your data','+an+');

doramon

  • บุคคลทั่วไป
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #4 เมื่อ: พฤศจิกายน 23, 2009, 12:37:29 PM »
0
เรียนถาม อ mn
ยกตัวอย่าง เกี่ยวกับการใช้ InputQuery
begin
 GetDateRangeDialog(date1, date2);   
       ds1:=formatdatetime('yyyy-mm-dd',date1);
    ds2:=formatdatetime('yyyy-mm-dd',date2);
    fan:=InputQuery('เลือก AN ที่ต้องการ',' AN 9 หลัก เช่น 490001206'); 
            fhn :=   GetSQLStringData('select hn from ipt where an="'+fan+'"'); 

end;
เกี่ยวกับการใช้ InputQuery ครับผมอยากจะให้แสดงค่า an=490001252 เป็นค่าเริ่มต้น ใน InputQuery  ในการเรียกรายงานทุกครั้งเพื่อที่ผู้ใช้จะได้ไม่ต้องใส่ an ถึง 9 หลัก จะเปลี่ยนแค่เลขท้ายจะสะดวกกว่าไม่ทราบว่ามีวิธีอย่างไรครับ
ขอบคุณครับ
พร้อมแนบตัวอย่างนรายงานมาให้ อ mn ดูด้วยครับ

download  ไม่ได้ครับ

ออฟไลน์ SrWooD

  • Hero Member
  • *****
  • กระทู้: 1,024
  • Respect: +1
    • ดูรายละเอียด
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #5 เมื่อ: พฤศจิกายน 23, 2009, 12:40:06 PM »
0
เรียนถาม อ mn
ยกตัวอย่าง เกี่ยวกับการใช้ InputQuery
begin
 GetDateRangeDialog(date1, date2);   
       ds1:=formatdatetime('yyyy-mm-dd',date1);
    ds2:=formatdatetime('yyyy-mm-dd',date2);
    fan:=InputQuery('เลือก AN ที่ต้องการ',' AN 9 หลัก เช่น 490001206'); 
            fhn :=   GetSQLStringData('select hn from ipt where an="'+fan+'"'); 

end;
เกี่ยวกับการใช้ InputQuery ครับผมอยากจะให้แสดงค่า an=490001252 เป็นค่าเริ่มต้น ใน InputQuery  ในการเรียกรายงานทุกครั้งเพื่อที่ผู้ใช้จะได้ไม่ต้องใส่ an ถึง 9 หลัก จะเปลี่ยนแค่เลขท้ายจะสะดวกกว่าไม่ทราบว่ามีวิธีอย่างไรครับ
ขอบคุณครับ
พร้อมแนบตัวอย่างนรายงานมาให้ อ mn ดูด้วยครับ

download  ไม่ได้ครับ


กระทู้มันนานแล้วนี่ครับ

 ;D ;D ;D
โรงพยาบาลโพธิ์ทอง จังหวัดอ่างทอง

doramon

  • บุคคลทั่วไป
Re: เกี่ยวกับการใช้ InputQuery
« ตอบกลับ #6 เมื่อ: พฤศจิกายน 23, 2009, 12:42:17 PM »
0
จริงด้วย   ;D ;D ;D ;D