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

【问题标题】：Pascal - Set background to white (not grey, pure white)Pascal - 将背景设置为白色（不是灰色，纯白色）
【发布时间】：2012-12-30 00:01:14
【问题描述】：

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

TextBackground(White);

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

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

"COLOR arg"

我知道我可以通过 using 在 C++ 中使用它

System("COLOR fc");

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

【问题讨论】：

【解决方案1】：

Hooch，你是对的。

如果我打电话给TextBackground(White); 或TextBackground(White); 这会变成灰色。

纯白色需要写TextAttr:=$f0;，其中$f_是背景颜色（例如白色），其中$_0是文本颜色（黑色代表示例）。

【讨论】：

【解决方案2】：

您可以使用此代码

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

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

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

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

【讨论】：

【解决方案3】：

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

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

【讨论】：

【解决方案4】：

在 CMD 窗口顶部右键 -> 属性 -> 颜色 -> 选择任何你想要的。

也可以试试TextBackground(15);

【讨论】：