วิธีสลับสีแถวข้อความใน Crystal Report เมื่อมีการจัด Group

if row mod 2 = 0 then   //ตรวจสอบว่าแถวนั้นเป็นแถวคู่หรือไม่

   color(240,240,240)    //ถ้าใช่แสดงสี

else crNocolor             //ถ้าไม่ใช่ไม่ต้องแสดงสี

1. เพิ่ม Formula Fields
   1. ตัวที่ 1 ตั้งชื่อว่า ffRowCount เขียน Code ภายในดังนี้
      

      shared numbervar
      rowcnt;rowcnt := rowcnt+1;

   2. ตัวที่ 2 ตั้งชื่อว่า ffRowReset เขียน Code ภายในดังนี้
      

      shared numbervar
      rowcnt:rowcnt := 0;
      

2. นำตัวที่ 1.1 ใส่ไว้ในส่วนของ Details และเลือก Suppress
3. นำตัวที่ 1.2 ใส่ไว้ในส่วนของ Group 2(คณะ) เนื่องจากต้องการให้มีการ reset เมื่อมีการเปลี่ยน Group และเลือก Suppress
4. ส่วนของ Details ให้จัดการดังนี้
   1. Click ขวา เลือก Section Expert
   2. Click เลือก Tab Color
   3. ทำเครื่องหมาย / หน้า Background Color
   4. กดปุ่ม x-2 หลักช่องสี
   5. เขียน Code ดังนี้
      

      shared numbervar rowcnt;
      if remainder(rowcnt,2) = 0 then
         color(240,240,240)
      else crNocolor

5. จากนั้นลอง run ผลลัพธ์ดังรูป
   

จะเห็นได้ว่า ข้อมูลที่มีเพียง 1 record นั้นจะไม่มีสี

ผู้เขียนหวังว่าบทความนี้จะเป็นประโยชน์ไม่มากก็น้อยสำหรับผู้อ่านนะคะ

แล้วพบกันใหม่ตอนหน้าค่ะ