Ngày soạn:Tiết thứ: Tiết thứ:
BÀI 19: THƯ VIỆN CHƯƠNG TRèNH CON CHUẨN (TIẾT 2)
I. Mục đớch yờu cầu:
- Về kiến thức: Biết được một số thư viện chương trỡnh con chuẩn. - Về kỹ năng:
+ Khởi động được chế độ đồ họa.
+ Sử dụng được cỏc thủ tục vẽ điểm, đường, hỡnh trũn, hỡnh elip, hỡnh chữ nhật
II. Chuẩn bị:
- GV: SGK, giỏo ỏn, mỏy chiếu Projector - HS: SGK, vở
III. Phương phỏp:
- Gợi mở, vấn đỏp - Làm việc theo nhúm
IV. Hoạt động dạy học:
1. Ổn định lớp: Kiểm tra sĩ số HS
2. Kiểm tra bài cũ: Nờu ý nghĩa và một số thủ tục của thư viện CRT ? 3. Nội dung dạy học:
* HĐ 1: Khởi động và đúng chế độ đồ họa:
Hoạt động Giỏo Viờn Hoạt động Học sinh Nội dung
- Trỡnh chiếu vớ dụ về vẽ đường trũn. Hóy chỉ ra đoạn chương trỡnh khởi động đồ họa.
- Yờu cầu học sinh nghiờn cứu SGK và vớ dụ để nờu ra cấu trỳc chung của thủ tục khởi động đồ họa.
- Giải thớch cỏc thụng số trong thủ tục.
- Muốn thoỏt khỏi chế độ đồ họa dựng thủ tục gỡ?
- Trỡnh chiếu thờm vớ dụ minh họa
- Quan sỏt vớ dụ và trả lời
- Initgraph ( driver, mode: integer, path: string)
- Closegraph - Quan sỏt
b) Khởi động đồ họa:
- Cấu trỳc chung của thủ tục khởi động đồ họa.
Initgraph (driver, mode: integer, path: string);
+ Driver: số hiệu của chương trỡnh điều khiển BGI, thường được gỏn giỏ trị 0.
+ Mode: là số hiệu của độ phõn giải.
+ Path: đường dẫn đến cỏc tệp .BGI
- Thủ tục kết thỳc đồ họa: Closegraph
*HĐ 2: Cỏc thủ tục vẽ điểm, đoạn thẳng (adsbygoogle = window.adsbygoogle || []).push({});
Hoạt động Giỏo viờn Hoạt động Học sinh Nội dung
Thủ tục Putpixel
- Trỡnh chiếu vớ dụ - Quan sỏt c.Cỏc thủ tục vẽ điểm, đoạn thẳngUse graph; Begin
- Cho HS nờu kết quả
- Gọi HS nờu cấu trỳc chung của thủ tục Putpixel
- Giải thớch cỏc thụng số trong thủ tục
- Chức năng của Putpixel là gỡ ? Thủ tục Line:
- Trỡnh chiếu vớ dụ
- Cho HS nờu kết quả
- Gọi HS nờu cấu trỳc chung của thủ tục Line
- Giải thớch cỏc thụng số trong thủ tục
- Chức năng của Line là gỡ ?
Thủ tục Lineto: - Trỡnh chiếu vớ dụ
- Cho HS nờu kết quả
- Gọi HS nờu cấu trỳc chung của thủ tục Lineto
- Giải thớch cỏc thụng số trong thủ tục
- Chức năng của Lineto là gỡ?
Thủ tục Linerel: - Trỡnh chiếu vớ dụ - HS trả lời - HS trả lời - Quan sỏt - HS trả lời - HS trả lời - Quan sỏt - HS trả lời - HS trả lời
Initgraph ( drive, mode, ‘C: TP\BGI’); Putpixel(20,40,60); Readln;
End.
- Cấu trỳc chung:
Putpixel (x, y: integer; color: word);
+ x và y là tọa độ của điểm + color là màu của điểm
- Chức năng: Vẽ một điểm màu color trờn màn hỡnh tại tọa độ (x,y)
Use graph; Begin
Drive: = 0;
Initgraph ( drive, mode, ‘C: TP\BGI’); Line (20,40,30,60); Readln; End. - Cấu trỳc chung: Line (x1,y1,x2,y2: integer) - Chức năng: Vẽ một đoạn thẳng từ điểm cú tọa độ (x1,y1) đến điểm cú tọa độ (x2,y2).
Use graph; Begin
Drive: = 0;
Initgraph ( drive, mode, ‘C: TP\BGI’) Lineto (20,20) Readln; (adsbygoogle = window.adsbygoogle || []).push({});
End.
- Cấu trỳc chung:
Lineto (x,y: integer)
- Chức năng: Vẽ một đường thẳng từ điểm hiện tại đến điểm cú tọa độ (x,y)
- Cho HS nờu kết quả
- Gọi HS nờu cấu trỳc chung của thủ tục Linerel
- Giải thớch cỏc thụng số trong thủ tục
- Chức năng của Linerel là gỡ?
Thủ tục Setcolor: - Trỡnh chiếu vớ dụ
- Cho HS nờu kết quả
- Gọi HS nờu cấu trỳc chung của thủ tục Setcolor
- Giải thớch cỏc thụng số trong thủ tục
- Chức năng của Setcolor là gỡ?
- Quan sỏt - HS trả lời - HS trả lời - Quan sỏt - HS trả lời - HS trả lời Use graph Begin Drive: = 0;
Initgraph ( drive, mode, ‘C: TP\BGI’) Linerel (10,10); Readln;
End.
- Cấu trỳc chung:
Linerel (dx,dy: integer)
- Chức năng: Vẽ một đường thẳng nối điểm hiện tại với điểm cú tọa độ bằng tọa độ hiện tại cộng với gia số (dx,dy).
Use graph; Begin
Drive: = 0;
Initgraph ( drive, mode, ‘C: TP\BGI’) Lineto (20,20); Setcolor (10); Lineto (20;-20); Readln; End. - Cấu trỳc chung:
Setcolor (color: word)
- Chức năng: Đặt màu cho nột vẽ.
*HĐ 3: Cỏc thủ tục vẽ hỡnh đơn giản và cỏc thủ tục, hàm liờn quan đến vị trớ con trỏ.
Hoạt động GV Hoạt động HS Nội dung
Trỡnh chiếu: vớ dụ - Quan sỏt d. Cỏc thủ tục vẽ hỡnh đơn giản
Use graph; Begin
Drive: = 0;
Initgraph ( drive, mode, ‘C: TP\BGI’) Circle (20, 20, 30); (adsbygoogle = window.adsbygoogle || []).push({});
Elipse (50,50,30,120,50,100); Rectangle (100,100,100,200);
- Cho HS nờu kết quả - Gọi HS nờu lần lượt cấu trỳc chung của cỏc thủ tục Circle, Ellipse, Rectange
- Giải thớch cỏc thụng số trong thủ tục - Chức năng của từng thủ tục là gỡ? Giới thiệu cỏc hàm xỏc định GTLN của màn hỡnh, thủ tục chuyển con trỏ tới tọa độ (x, y) - HS trả lời - HS trả lời - HS trả lời Readln; End. - Cấu trỳc chung: + Hỡnh trũn:
Circle (x,y: integer; r:word)
+ Elipse:
Ellipse(x,y:integer; stAngle, EndAngle, Xr, Yr: word)
+ Hỡnh chữ nhật:
Rectange(x1,y1,x2,y2:integer)
- Chức năng:
+ Circle:Vẽ một đường trũn cú tõm tại (x,y) và bỏn kớnh r.
+ Elipse : Vẽ cung của Elip cú tõm tại điểm (x,y) với trục lớn xr, trục nhỏ yr, từ gúc đầu StAngle đến gúc cuối EndAngle. + Rectange: Vẽ hỡnh chữ nhật với (x1,y1) là tọa độ của đỉnh trỏi trờn; (x2,y2) là tọa độ của đỉnh phải dưới.
e. Cỏc thủ tục và hàm liờn quan đến vị trớ con trỏ
- Hàm xỏc định GTLN cua màn hỡnh: Function GetMaxX: integer;
Function GetMaxY: integer;
- Thủ tục chuyển con trỏ tới tọa độ (x;y) Procedure MoveTo(x,y:integer);
*HĐ 4:Tỡm hiểu một số thư viện khỏc
Hoạt động GV Hoạt động HS Nội dung ghi bảng
- Hóy nờu một số thư viện khỏc trong Pascal?
- Chức năng của từng thư viện?
- Để sử dụng cỏc thủ tục và hàm chuẩn của thư viện nào đú ta phải làm gỡ? - Gọi HS nờu VD
- System, Dos, printer - HS trả lời
- Khai bỏo
- uses crt,graph;
3. Một số thư viện khỏc:
- System: chứa cỏc hàm sơ cấp và cỏc thủ tục vào ra.
- Dos: chứa cỏc thủ tục tạo thư mục, thiết lập giờ hệ thống.
- Printer: cung cấp cỏc thủ tục làm việc với mỏy in.
4. Sử dụng thư viện:
- Khai bỏo thủ tục và hàm chuẩn theo cấu trỳc:
Uses unit1, unit2,...,unit n; (adsbygoogle = window.adsbygoogle || []).push({});
*HĐ 5: Củng cố - Dặn dũ
- Biết được một số thư viện chuẩn.
- Biết được một số thủ tục đồ họa đơn giản. - Đọc thờm bài “Âm thanh”