1. คำนำ:
วิธีการวาดรูปสี่เหลี่ยมใน Delphi นั้นเหมือนกับโค้ดข้อความก่อนหน้า ความแตกต่างอยู่ที่พารามิเตอร์ "GL_QUADS" ของ glBegin() รหัสกรอบการวาดสามารถใช้รหัสในการเริ่มต้นการวาดภาพ OpenGL2d ภายใต้ Delphi ที่อยู่คือ //www.VeVB.COm/article/52141.htm ส่วนที่แก้ไขคือเนื้อหาของฟังก์ชัน Draw
2. วิธีการวาดรูปสี่เหลี่ยม:
การใช้ GL_QUADS: วาดชุดสี่จุดแยกกันซึ่งประกอบด้วยจุดยอดสี่จุด จุดยอด 4n-3, 4n-2, 4n-1 และ 4n กำหนดรูปสี่เหลี่ยมที่ n วาดรูปสี่เหลี่ยมจัตุรัส N/4 ทั้งหมด การเรียนรู้การวาดรูปสี่เหลี่ยมที่นี่คือการเตรียมตัวสำหรับการวาดบิตแมป
ชุดสี:
glColor3f(1, 0.5, 0) คุณสามารถกำหนดสีของรูปสี่เหลี่ยมได้ โดยพารามิเตอร์จะมี 3 ส่วน คือ ค่าของ R, G และ B โดยมีค่าเป็น 0 ถึง 1, 1 หมายถึง 255 และ 0.5 แสดงใน 128 ต้องการความสนใจเป็นพิเศษที่นี่!
กำหนดจุดของรูปสี่เหลี่ยม:
glVertex2f(nleft, ntop); nleft และ ntop แสดงถึงตำแหน่งพิกเซลของจุดรูปสี่เหลี่ยมขนมเปียกปูนบนหน้าต่าง ตำแหน่งของแต่ละจุดจะต้องกำหนดตามเข็มนาฬิกาหรือทวนเข็มนาฬิกา
รหัสมีดังนี้:
ขั้นตอน TForm1.Draw;var l, t, w: Integer;begin // ล้างบัฟเฟอร์ glClear(GL_COLOR_BUFFER_BIT หรือ GL_DEPTH_BUFFER_BIT); // ตั้งค่าสีของรูปสี่เหลี่ยม glColor3f(1, 0.5, 0); // วาดรูปหลายเหลี่ยมแรก ลิตร := 10; เสื้อ := 10; w := 64; glBegin(GL_QUADS); glVertex2f(l, t + w); รูปหลายเหลี่ยมที่สอง l := 80; t := 10; glBegin(GL_QUADS); glVertex2f(l, t + w); //สลับเนื้อหาของบัฟเฟอร์คู่ ซึ่งจะคัดลอกกราฟิกที่เพิ่งวาดไปที่หน้าจอ จบ;
คลิกที่นี่เพื่อดาวน์โหลดรหัสที่สมบูรณ์