Đổi Màu Chữ Trong Pascal

• Bài viết
• Hỏi đáp

Tạo bài viết Đăng ký Đăng nhập Code24h.com 01/10/2018, 13:57 Đổi màu chữ trong pascal

Chào Mọi Người

Lần Đầu Mình Vào Group Nên Không Biết Viết Tiêu Đề Sao Cho Đúng

Tình Hình Là Mình Viết Chữ Chạy Có Màu Ở Pascal Nhưng Mình Đang Gặp 1 Vài Vấn Đề Nhỏ

Code:uses aVibrate, crt;

var i : integer; begin for i := 1 to 1 do begin writeln(‘Hello Minh Huynh’); vibrate(200); delay(500); textColor(1) end;

for i := 1 to 1 do begin writeln(‘Welcome IT’); vibrate(200); delay(500); textColor(3) end;

readln; {Stop} cancelVibrate; end.

Mình Muốn Chạy Chữ Có Màu Vd: -Hello Minh Huynh(Màu Xanh) -Welcome IT(Màu Đỏ) Nhiều Dòng Chữ nhưng 1 Dòng 1 màu Và Mình Muốn Các Bạn Chỉ Mình Cách Rút Code Luôn Ạ dài Quá Mình Cũng Mệt Mà Phải Sửa Số Màu Nữa

phamvandung viết 16:11 ngày 01/10/2018

https://www.freepascal.org/docs-html/rtl/crt/textcolor.html

Program Example12; uses Crt; { Program to demonstrate the TextColor function. } begin WriteLn('This is written in the default color'); TextColor(Red); WriteLn('This is written in Red'); TextColor(White); WriteLn('This is written in White'); TextColor(LightBlue); WriteLn('This is written in Light Blue'); end.

markdown không có pascal thì phải

nhét code vào như này

Trần Minh Huynh viết 16:08 ngày 01/10/2018

Cảm ơn bạn,Mình sẽ Thử Ngay.Mấy Hôm Nay Tìm Hiểu Mà Không ra

HK boy viết 16:09 ngày 01/10/2018

Không cần phải viết hoa mỗi từ đâu. Trông không phù hợp với ngữ pháp tiếng Việt đâu.

Bạn đưa các màu vào 1 mảng

const color = array[1..max] of integer = (3, 2, 9, 4,...);

rồi với mỗi dòng bạn gọi màu

textcolor(color[i]); writeln(line[i]); Trần Minh Huynh viết 16:05 ngày 01/10/2018

chắc mình đang tim code này

Huỳnh Đặng Thùy Linh viết 17:28 ngày 28/03/2020

cho mình hỏi

cái này:

Program Example12; uses Crt; { Program to demonstrate the TextColor function. } begin WriteLn('This is written in the default color'); TextColor(Red); WriteLn('This is written in Red'); TextColor(White); WriteLn('This is written in White'); TextColor(LightBlue); WriteLn('This is written in Light Blue'); end. dùng để làm gì vậy ạ Bình luận về bài viết này Chia sẻ tin đăng đến bạn bè Gửi Messenger Copy link Bài liên quan

Trần Minh Huynh

0 chủ đề

0 bài viết

Tác giả nổi bật

• Son Dong
• Hoa Nguyen
• Pham Dat
• Nguyễn Dũng
• Đào Đăng Sơn

Từ khóa nổi bật AngularJS Blog Bootstrap C / C++ Cấu trúc dữ liệu & Giải thuật Cơ sở dữ liệu Codeigniter Công cụ lập trình CSS CSS cơ bản CSS3 Học Excel HTML HTML cơ bản HTML5 Java Javascript jQuery Json Lập trình mobile Laravel Linux MongoDB MySQL NodeJS Oracle Pascal PHP PHP cơ bản PHP nâng cao Python React Native ReactJS Ruby SEO SQL Server Swift Visual Basic VueJS WordPress XML Chủ đề nổi bật

• 1 Cài đặt phần mềm cần thiết cho học lập trình web
• 2 Tự Học HTML Cơ Bản Online Miễn Phí Từ A đến Z
• 3 Seo website dành cho dân IT
• 4 REACT NATIVE
• 5 sdfdsf
• 6 Lập trình di động với React Native
• 7 Vue.js
• 8 Kiếm thức cơ bản HTML CSS
• 9 So sánh count() và sizeof() 2 phần tử đếm mảng
• 10 Toán tử và biểu thức của php

0 Các chủ đề đang được quan tâm phần mềm lập trình php | lập trình web php + mysql | khóa học lập trình php | tự học lập trình php | học php cơ bản thachpham | Bộ đôi thùng rác 120l và 240 lít giá rẻ tại cần thơ- thùng rác công cộng-lh 0911082000 | MMOexp Monopoly Go: Master the Multiplier and Conquer the Board | gkxgll | Code24h | Cho thuê phòng trọ hà nội | Cho thuê phòng trọ bình thạnh | Cho thuê phòng trọ | Cho thuê nhà trọ Đăng ký

Đăng ký nhận thông báo

Các bài học thú vị sẽ được gửi đến inbox của bạn

HỖ TRỢ HỌC VIÊN

• Các câu hỏi thường gặp
• Điều khoản sử dụng
• Chính sách và quy định
• Chính sách bảo mật thanh toán
• Hỗ trợ học viên: [email protected]
• Báo lỗi bảo mật: [email protected]

VỀ CODE24H

• Giới thiệu Code24h
• Cơ hội nghề nghiệp
• Liên hệ với chúng tôi

HỢP TÁC VÀ LIÊN KẾT

• Đăng ký giảng viên
• Giải pháp e-learning
• Chương trình đại lý
• Chương trình Affiliate

KẾT NỐI VỚI CHÚNG TÔI

TẢI ỨNG DỤNG TRÊN ĐIỆN THOẠI

CCode 24h, code mọi lúc, mọi nơi

© Copy right 2018 - 2025