Pascal - 将背景设置为白色（不是灰色，纯白色）

Question

是否可以将Pascal中的控制台背景设置为纯白色？

我不满意

TextBackground(White);

如果改变了什么，我可以使用WinApi函数。 我知道控制台中的背景可以设置为纯白色（不是灰色）。我曾经看过程序。我认为这是批处理脚本。但我想在控制台中实现它。 任何技巧都可以。如果没有别的办法，它可能会很低。

更新。 我找到了批处理命令。

"COLOR arg"

我知道我可以使用

在C ++中使用它

System("COLOR fc");

但我在Pascal中找不到任何“系统”命令。

Answer 1

Hooch ，你是对的。

如果我致电TextBackground(White);或TextBackground(White);，这会变成灰色。

对于纯白需要写TextAttr:=$f0;，其中$ f _是背景颜色（例如白色），其中$ _ 0 是文字颜色（例如黑色。

Answer 2

您可以使用此代码

swapvectors;  exec('cmd','/c color f0');  swapvectors;

这是设置控制台窗口颜色的命令提示符

• f：浅白色：背景
• 0：黑色：文字颜色
• 您可以转到cmd，输入COLOR /？了解更多

要使用此代码，您必须使用DOS单元。

对不起我的英语，我是学生。

Answer 3

您可以将背景更改为白色，然后将文本颜色更改为闪烁并清除屏幕。

TextBackground(white); TextColor(Blink); Crt.ClrScr;

Answer 4

右键单击CMD窗口顶部 - ＆gt;属性 - ＆gt;颜色 - ＆gt;选择你想要的任何东西。

同时尝试TextBackground(15);