เอาโค้ดนี้ไปลองดูครับ
memo1.lines.text := GetListFromQuery('select concat(l.lab_items_name," = ",o.lab_order_result) as name from lab_head h,lab_order o,lab_items l where h.vn="'+ DBPipeline['vn']+
'" and h.lab_order_number = o.lab_order_number and o.lab_items_code = l.lab_items_code and o.confirm="Y" and (l.check_user<>"Y" or l.check_user IS NULL) ');