Cách Lập Trình Chữ Nhấp Nháy Trong Pascal - Lanus Coder

Trang chủ » Cách Sử Dụng Lệnh Textcolor Trong Pascal » Cách Lập Trình Chữ Nhấp Nháy Trong Pascal - Lanus Coder

Có thể bạn quan tâm

Trong lập trình Pascal, thông thường nếu muốn thể hiện chữ nhấp nháy, chúng ta sẽ sử dụng lệnh textcolor (màu + blink). Ví dụ: textcolor (yellow + blink) sẽ thể hiện chữ nhấp nháy màu vàng. Nhưng cách này có 2 nhược điểm:

1. Không thể hiện được chữ nhấp nháy trên một số máy tính và smartphone ( nếu bạn lập trình Pascal bằng điện thoại ).

2. Bạn không thể kiểm soát được tần suất nhấp nháy của chữ.

Bởi thế, trong bài viết này mình sẽ hướng dẫn các bạn lập trình chương trình để thể hiện chữ nhấp nháy trong Pascal với lệnh clrscr. Toàn bộ chương trình như sau (Chương trình này cũng có hiệu nghiệm với bản Pascal trên Android) :

uses crt; begin clrscr; // Xóa màn hình của lần chạy trước repeat delay (1000); // làm trễ 1s write('Xin chao'); // in ra chữ 'Xin chao' delay(1000); // làm trễ 1s clrscr; // xóa màn hình until keypressed; // vòng lặp sẽ kết thúc khi bạn nhấn một phím bất kì end.

Giải thích cách hoạt động của chương trình:

Chương trình này có cách hoạt động đơn giản dựa trên vòng lặp như sau: In ra kí tự, xóa kí tự, in lại kí tự,… và cứ tiếp diễn như vậy cho đến khi người dùng nhấn phím bất kì trên bàn phím để kết thúc vòng lặp. Tuy nhiên, do các hành động in và xóa này diễn ra quá nhanh nên người dùng sẽ khó để thấy hiệu ứng nhấp nháy. Bởi vậy, mình đã bổ sung 2 lệnh delay() trước khi in kí tự và trước khi xóa kí tự. Nhờ đó mà hiệu ứng nhấp nháy được rõ ràng đồng thời chúng ta có thể kiểm soát được tần suất nhấp nháy của kí tự.

Kết quả của chương trình:

Đó là cách để in ra chữ nhấp nháy trong Pascal. Nếu các bạn có re-up bài viết thì vui lòng ghi nguồn: Lanus Coder nhé!

Share this:

  • X
  • Facebook
Like Loading...

Related

Từ khóa » Cách Sử Dụng Lệnh Textcolor Trong Pascal