LỜI CẢM ƠN : Để hoàn thành đợt thực tập này, ngoài sự cố gắng nổ lực của bảnthân, đã được sự hướng dẫn tận tình giúp đỡ của Thầy giáo Th.s ĐẶNGHỒNG LĨNH , và một số đóng góp trao đổi ý k
Trang 1LỜI CẢM ƠN :
Để hoàn thành đợt thực tập này, ngoài sự cố gắng nổ lực của bảnthân, đã được sự hướng dẫn tận tình giúp đỡ của Thầy giáo Th.s ĐẶNGHỒNG LĨNH , và một số đóng góp trao đổi ý kiến của các bạn đồngnghiệp
Vì thời gian và trình độ có hạn nên không tránh khỏi những thiếusót, kính mong sự đón nhận ý kiến đóng góp của các Thầy Cô và cácbạn
Em xin chân thành cảm ơn Thầy giáo Thạc Sỹ ĐẶNG HỒNGLĨNH đã hướng dẫn nhiệt tình và giúp đỡ trong quá trình làm đề tài
Trang 2LỜI NÓI ĐẦU
Ngày nay, công nghệ thông tin đã trở thành một công cụ đắc lựcgiúp con người trong công việc hàng ngày và là một phương tiện khôngthể thiếu trong một xã hội hiện đại
Một vấn đề được đặt ra là làm thế nào để khai thác tối đa tính năngtác dụng của máy tính Sinh viên khoa CNTT phải không ngừng họchỏi , cập nhật những cái mới và biết ứng dụng những kiến thức đã họcvào thực tế của đời sống đợt thực tập này là bước đầu đi sâu vào tìmhiểu CNTT, nhất là ứng dụng một số ngôn ngữ lập trình trên cơ sởnhững kiến thức đã được học trong những năm qua
Trong phạm vi đề tài chúng em đã tìm hiểu học hỏi những vấn đềnhư yêu cầu của đề bài, đã phần nào mở ra sự hiểu biết hơn, cũng nhưtập cho nình rèn luyện bước đầu làm quen với phần mềm ứng dụng vàokhoa học, ngoài ra tìm hiểu kỹ hơn về kỹ thuật đồ hoạ, về ngôn ngữ lậptrình
Trang 3
I - YÊU CẦU ĐỀ TÀI :
- Viết chương trình giao diện màn hình PASCAL
- Bằng ngôn ngữ C , hoÆc C ++
Trang 5if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 7if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
Trang 8{ case 0: ; /*goi thu tuc tuong ung */
Trang 9if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
Trang 10{ case 0: ; /*goi thu tuc tuong ung */
outtextxy(x+15,95,"Go to line number");
outtextxy(x+15,115,"Show last compiler error");
Trang 12else
if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 14}
menucompiler1(i);
}
else
if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 16if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 17line(x+(width -3),29,x+(width -3),height-3);
Trang 18if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 19line(x+(width -3),29,x+(width -3),height-3);
Trang 20if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 22if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
}
thoat: { cleardevice();
Trang 24if(c1==0) /* keypress la phim mo rong */
if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: ; /*goi thu tuc tuong ung */
Trang 27if(c1==13) /*keypress = enter */
{ switch(i) /* kiem tra vi tri menu */
{ case 0: menufile(); /*goi menu c2 file */
Trang 28 HƯỚNG PHÁT TRIỂN ĐỀ TÀI :
Trong đợt thực tập này, vì thời gian còn hạn chế nên chương trìnhgiao diện cho PASCAL chúng em mới chỉ đưa ra được phần thông tinchính là : nền màn hình giao diện , và các menu chức năng cho màn hìnhpascal trong hướng nghiên cứu sắp tới chúng em sẽ cố gắng phát triểnchương trình này với nhiều chức năng khác
Rất mong được sự góp ý , giúp đỡ của các Thầy Cô giáo và cácbạn
Trang 29TÀI LIỆU THAM KHẢO :
1 Phạm Văn Ất - Kỹ Thuật lập Trình C NXB Thống Kê, 2003.
2 Phạm Văn Ất - C ++ & Lập Trình Hướng Đối Tượng NXB
4 Phan Hữu Phúc, Cơ Sở Đồ Hoạ Máy Tính, NXBGD, 2002.
5 Lương Chi Mai_ Huỳnh Thị Thanh Bình, Nhập Môn Đồ hoạ
Máy Tính, NXB ĐHKT, 2002
6 Lê Tấn Hùng, Kỹ Thuật Đồ Hoạ, NXB KHKT, 2002.
7 Trang Web : http: // WWW ebook.edu.vn
Trang 30MỤC LỤC
TRANG
Lời cảm ơn 1
Lời nói đầu 2
Yêu cầu đề tài 3
Chương trình 4
Tài liệu tham khảo 29
Mục lục 30