BMS-HOSxP Community
HOSxP => นอกเรื่อง => ข้อความที่เริ่มโดย: niyomstd ที่ กันยายน 22, 2010, 14:48:03 PM
-
สามารถดึงผล LAB ที่ลงแล้ว มาโชว์ที่ UE ได้เปล่าครับ
มีวิธีอย่างไรครับ สอบถามผู้รู้หน่อย
ขอบคุณครับ :) :) :)
-
ขอตัวอย่างสัก 1 ตัวอย่างครับ
ดึงเฉพาะ bp มาก้อได้ครับ :) :)
-
สามารถดึงผล LAB ที่ลงแล้ว มาโชว์ที่ UE ได้เปล่าครับ
มีวิธีอย่างไรครับ สอบถามผู้รู้หน่อย
ขอบคุณครับ :) :) :)
------------UE Data---------------
ใน Script Event OnLoad เราสามารถใส่โค้ดเข้าไปตรงนี้ได้ครับ
แล้วก็เขียนคำสั่ง Set ค่าให้กับ Object เช่น Scr1.text := 'test';
แต่ในที่นี้เราจะ set ค่าที่ได้จากการดึงในฐานข้อมูล ซึ่งเราดึงผ่าน TClicentDataset
ลองเอาตัวอย่างโค๊ดนี้ไปศึกษาดูครับ
var tc : TClientDataset; // ประกาศตัวแปรเป็น TClientDataset
begin
tc := TClientDataset.create(nil); // Initial
tc.data:=hosxp_getdataset('select count(*) as cc from patient'); // Query Data
Scr1.text := tc.fieldbyname('cc').asstring; // Set ค่าให้กับ Object
showmessage('Count Patient= '+tc.fieldbyname('cc').asstring); // Showmessage
tc.free;
end;
-
ขอบคุณครับจะลองทดสอบดูครับ ;) ;)