2012-12-30 246 views
1

是否可以在Pascal中将控制台背景设置为纯白色? 我不是满意Pascal - 将背景设置为白色(不是灰色,纯白色)

TextBackground(White); 

我可以用WINAPI函数,如果改变任何东西。 我知道在控制台中的背景可以设置为纯白色(而不是灰色)。我曾经看过它的程序。我认为这是批处理脚本。但我想在控制台中实现它。 任何诡计都可以做到。如果没有其他方法,它可能会很低。

UPDATE。 我找到了批处理命令。

"COLOR arg" 

我知道我可以通过使用

System("COLOR fc"); 

使用它在C++中,但我无法找到任何帕斯卡尔“系统”命令。

回答

-1

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

也可以尝试TextBackground(15);

+0

我想从我的程序里面做。 – Hooch

+0

你试过15个参数吗? – SergeyS

+0

是的。白= 15。我也尝试输入“15”。它仍然是灰色的。不是纯白的。 – Hooch

0

霍赫,你说得对。

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

对于纯白色需要编写TextAttr:=$f0;,其中$ ˚F _是背景色(白色例如),并且其中$ _ 是文本颜色(黑例如)。

0

您可以使用此代码

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

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

  • F:浅白色:背景
  • 0:黑色:文本颜色
  • 你可以去cmd,输入COLOR /?了解更多

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

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