Bài 19 - Thư viện chương trình con chuẩn (t1)

Bµi 19 Bµi 19 . . KiÕn thøc cñ Unit crt Bµi tËp cñng cè Unit graph Kiểm tra Kiến thức củ Hãy cho biết thủ tục CLRSCR dùng để thực hiện công việc nào d!ới đây? Xuất kết quả ra màn hình Xóa màn hình Xóa bộ nhớ tạm Nhận giá trị từ bàn phím Hoan hô bạn đã trã lời đúng ! Rất tiết bạn đã trã lời sai ! Program Vidu1; Var a: integer; Begin Clrscr; a:= 7 + 5; Writeln(5 + 7 = , a:3); Readln; End. Kiểm tra Kiến thức củ Hãy quan sát đoạn ch!ơng trình sau và cho biết khi cho ch! ơng trình chạy điều sẽ gì xảy ra? Xuất ra màn hình: 5 + 7 = a Xuất ra màn hình: 5 + 7 = 12 Xuất ra màn hình: 5 + 7 = 4 Ch!ơng trình báo lỗi Hoan hô bạn đã trã lời đúng ! Rất tiết bạn đã trã lời sai ! Nghiên cứu SGK cho biết th! viện CRT liên quan đến những công việc nào trong lập trình Pascal ? 1. Unit crt CRT: là th viện chứa các thủ tục liên quan đến việc quản lý màn hình, bàn phím và âm thanh. Một số thủ tục trong th! viện CRT : - Thủ tục CLRSCR; - Thủ tục TextColor(color); - Thủ tục TextBackGround(color); - Thủ tục GotoXY(x,y); - Xóa màn hình. - Chọn màu cho chữ. - Chọn màu nền cho chữ. - Đa con trỏ đến tọa độ (x,y). Program mauVB; Uses CRT; Begin Clrscr; GotoXY(50,15); TextColor(15); TextBackGround(green); Writeln(THPT Giong Rieng); Readln; End. THPT Giong Rieng x = 50 y = 15 GotoXY(50,15); TextColor(15); TextBackGround(green); Writeln(THPT Giong Rieng); (50,15) (1,1) (80,1) (1,25) (80,25) 2. Unit graph GRAPH: là th viện chứa các thủ tục, hàm liên quan đến chế độ đồ họa của các loại màn hình khác nhau, cho phép thực hiện các thao tác đồ họa cơ bản. 2. Unit graph Màn hình có thể làm viêc ở hai chế độ : - Chế độ văn bản: - Chế độ đồ họa : a. Các thiết bị và ch!ơng trình hổ trợ đồ họa Đơn vị cơ sở là ký tự. Đơn vị cơ sở là điểm ảnh (Pixel) (0,0) (640,0) (640,480) (0,480) x y PIXEL Độ phân giải VGA: 640x480 (x, y) 2. Unit graph a. Các thiết bị và ch!ơng trình hổ trợ đồ họa - Bảng mạch điều khiển màn hình: Là thiết bị đảm bảo t ơng tác giữa bộ xử lý và màn hình để thực hiện chế độ phân giải và màu sắc. - Tên của bảng mạch điều khiển màn hình thờng trùng với loại màn hình: VGA, SVGA, - Chơng trình điều khiển đồ hoạ nằm trong các tệp *.BGI, ngầm định để trong th mục BGI. 2. Unit graph b. Khởi tạo đồ họa Thủ tục khởi tạo đồ họa: Procedure InitGraph(driver, mode: Integer; path: string); - driver : là số hiệu của trình điều khiển, thờng gán là 0. - mode : là số hiệu của độ phân giải. - path : là đờng dẫn đến các tệp .BGI Thủ tục kết thúc chế độ đồ họa: CloseGraph; Ví dụ: Driver := 0; InitGraph(driver, mode, C:\TP\BGI ); c. Các thủ tục vẽ điểm, đoạn thẳng: - Thủ tục đặc màu nét vẽ: Procedure SetColor(Color: word); - Thủ tục vẽ điểm: Procedure PutPixel(x, y: integer; Color: word); - Vẽ đoạn thẳng qua hai điểm (x1, y1) và (x2, y2): Procedure line(x1, y1, x2, y2: integer); - Vẽ đoạn thẳng nối điểm hiện tại với điểm có tọa độ (x, y): Procedure lineTo(x, y : integer); - Vẽ đoạn 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 số gia (dx, dy) Procedure lineRel(dx, dy : integer); 2. Unit Graph x1 y 1 (0,0) (640,0) (0,480) x2 y 2 d y d x [...]...2 Unit graph d Các thủ tục và hàm liên quan đến vị trí con trỏ: Các hàm xác định tọa độ lớn nhất của X, Y: Function GetMaxX: integer; Function GetMaxY: integer; Thủ tục chuyển con trỏ đến tọa độ (x, y): Procedure MoveTo(x, y: integer); BàI TậP CủNG Cố Thảo luận nhóm trong 2 phút để thực hiện yêu cầu : Viết các câu lệnh cơ bản để vẽ đọan thẳng nối . trong th! viện CRT : - Thủ tục CLRSCR; - Thủ tục TextColor(color); - Thủ tục TextBackGround(color); - Thủ tục GotoXY(x,y); - Xóa màn hình. - Chọn màu cho chữ. - Chọn màu nền cho chữ. - Đa con trỏ. InitGraph(driver, mode: Integer; path: string); - driver : là số hiệu của trình điều khiển, thờng gán là 0. - mode : là số hiệu của độ phân giải. - path : là đờng dẫn đến các tệp .BGI Thủ tục. sát đoạn ch!ơng trình sau và cho biết khi cho ch! ơng trình chạy điều sẽ gì xảy ra? Xuất ra màn hình: 5 + 7 = a Xuất ra màn hình: 5 + 7 = 12 Xuất ra màn hình: 5 + 7 = 4 Ch!ơng trình báo lỗi Hoan