การใช้งาน Array 2D ในภาษา Delphi Object Pascal แบบง่ายๆ

การโปรแกรมมิ่งเป็นการจัดการกับข้อมูลที่หลากหลาย และในบางครั้งเราก็ต้องการที่จะทำงานกับข้อมูลในรูปแบบที่เป็นระเบียบมากยิ่งขึ้น ในภาษา Delphi Object Pascal เรามีโอกาสที่จะใช้งาน "Array 2D" ซึ่งจะทำให้เราจัดการกับข้อมูลที่เป็นแบบตาราง (Table) ง่ายขึ้นมาก

Array 2D คืออะไร?

Array 2D (Two-Dimensional Array) เป็น Array ที่มีสองมิติ ได้แก่ แถว (Row) และคอลัมน์ (Column) โดยคุณสมบัติของมันจะสามารถจัดเก็บข้อมูลในรูปแบบตาราง เช่น ค่าตัวเลขที่เป็นคะแนนผลสอบของนักเรียน แต่ควรจะทราบว่า Array 2D จะมีการจัดเก็บค่าตัวแปรหรือข้อมูลประเภทต่างๆ ในแถวและคอลัมน์ที่เราเลือก

การประกาศและการใช้งาน Array 2D ใน Delphi

ในการประกาศ Array 2D ใน Delphi จะใช้การระบุขนาดของแถวและคอลัมน์พร้อมกับการตั้งชื่อ Array ตัวอย่างการประกาศมีดังนี้:

 var
  Scores: array[1..3, 1..4] of Integer;

ในตัวอย่างนี้ เราได้สร้าง Array 2D ที่มี 3 แถวและ 4 คอลัมน์ ข้อมูลที่เราสามารถเก็บใน Array นี้จะเป็นประเภท Integer ซึ่งอาจจะใช้ในการเก็บคะแนนของนักเรียนใน 4 วิชา

การกำหนดค่าให้กับ Array 2D

เพื่อกำหนดค่าให้กับ Array 2D เราจะสามารถทำได้ด้วยการเข้าถึงตำแหน่งของแถวและคอลัมน์ตามที่เราต้องการ ตัวอย่าง:

 begin
  Scores[1, 1] := 85;  // คะแนนนักเรียนคนที่ 1 วิชา 1
  Scores[1, 2] := 90;  // คะแนนนักเรียนคนที่ 1 วิชา 2
  Scores[2, 1] := 78;  // คะแนนนักเรียนคนที่ 2 วิชา 1
  Scores[2, 2] := 88;  // คะแนนนักเรียนคนที่ 2 วิชา 2
end;

การนำข้อมูลใน Array 2D มาแสดงผล

เมื่อเรากำหนดค่าต่างๆ ให้กับ Array 2D แล้ว เราสามารถใช้ลูป (Loop) เพื่อนำข้อมูลใน Array มาทำการแสดงผลได้ โดยตัวอย่างของการใช้ลูปคือ:

 var
  i, j: Integer;
begin
  for i := 1 to 2 do // สำหรับนักเรียน 2 คน
  begin
    for j := 1 to 2 do // สำหรับวิชา 2 วิชา
    begin
      WriteLn('คะแนนนักเรียนคนที่ ', i, ' วิชา ', j, ': ', Scores[i, j]);
    end;
  end;
end;

Use Case ในโลกจริง

การใช้งาน Array 2D มีตัวอย่างที่หลากหลาย โดยเฉพาะในด้านการจัดการข้อมูล เช่น การเก็บคะแนนนักเรียน การจัดการตารางเวลา หรือแม้กระทั่งการพัฒนาเกมที่ต้องมีการเก็บตำแหน่งต่างๆ ในตาราง

ตัวอย่างของการใช้งานในโลกจริงคือการเก็บตารางคะแนนการแข่งขันกีฬา ซึ่งเราสามารถสร้าง Array 2D ขึ้นมาเก็บข้อมูลทีมที่เข้าร่วมการแข่งขันและคะแนนที่ได้ในแต่ละประเภทกีฬา

ตัวอย่าง Code สำหรับการเก็บคะแนนในกีฬา:

 var
  Scores: array[1..3, 1..3] of Integer;  // 3 ทีม และ 3 กีฬา
begin
  // กำหนดค่าคะแนน
  Scores[1, 1] := 10; // ทีม 1 คะแนนกีฬาประเภท 1
  Scores[1, 2] := 20;
  Scores[1, 3] := 15;
  Scores[2, 1] := 5;  // ทีม 2 คะแนนกีฬาประเภท 1
  Scores[2, 2] := 10;
  Scores[2, 3] := 12;
  Scores[3, 1] := 15; // ทีม 3 คะแนนกีฬาประเภท 1
  Scores[3, 2] := 8;
  Scores[3, 3] := 20;

  // แสดงคะแนน
  for i := 1 to 3 do
  begin
    WriteLn('คะแนนของทีม ', i, ': ', Scores[i, 1], ', ', Scores[i, 2], ', ', Scores[i, 3]);
  end;
end;

สรุป

Array 2D ใน Delphi Object Pascal เป็นเครื่องมือที่ทรงพลังสำหรับการจัดการข้อมูลแบบตาราง โดยเฉพาะในการเก็บและประมวลผลข้อมูลที่เกี่ยวข้องกับจำนวนหรือคะแนน นักพัฒนาสามารถใช้งาน Array 2D ในโปรแกรมได้อย่างง่ายดาย และลดความซับซ้อนในการเข้าถึงข้อมูล

หากคุณสนใจศึกษาเพิ่มเติมเกี่ยวกับการใช้ภาษา Delphi หรือการเขียนโปรแกรมอย่างมีประสิทธิภาพ เรายินดีต้อนรับคุณทุกคนให้มาเรียนรู้กันที่ EPT (Expert-Programming-Tutor) เรามีคอร์สเรียนที่ออกแบบมาอย่างดีเพื่อเตรียมความพร้อมให้กับนักศึกษาที่ต้องการเป็นโปรแกรมเมอร์ในอนาคต

เพราะการโปรแกรมไม่ใช่แค่การเรียนรู้ทฤษฎี แต่คือการลงมือทำ และที่ EPT เราช่วยให้คุณทำได้!

หมายเหตุ: ข้อมูลในบทความนี้อาจจะผิด โปรดตรวจสอบความถูกต้องของบทความอีกครั้งหนึ่ง บทความนี้ไม่สามารถนำไปใช้อ้างอิงใด ๆ ได้ ทาง EPT ไม่ขอยืนยันความถูกต้อง และไม่ขอรับผิดชอบต่อความเสียหายใดที่เกิดจากบทความชุดนี้ทั้งทางทรัพย์สิน ร่างกาย หรือจิตใจของผู้อ่านและผู้เกี่ยวข้อง