无法获得控制台处理(Dev-Pascal)

时间:2014-10-21 23:23:28

标签: console pascal handle

我已经为我的练习尝试了简单的程序,但是如果我编译了,它就会发出消息“无法获得控制台处理”(Dev-Pascal)。

这是我的代码:

program square;
uses crt;

var
side,circumference,broad:real;

begin
    write('Input the side value of the square: ');
    readln(side);

    circumference := 4 * side;
    broad := side * side;

    writeln('The circumference value of the square = ', circumference);
    writeln('The abroad value of the square = ', broad);
    writeln();

    write('Press any key...');
    readkey();
end.
谢谢你的帮助和教导 我很感激

3 个答案:

答案 0 :(得分:0)

Dev-pascal带有10年以上的Free Pascal版本。我真的不知道。尝试在cmdline上运行示例,以查看dev-pascal是否是原因或其他原因。暂时禁用安全软件也可能需要尝试。

答案 1 :(得分:0)

我想,您已经创建了 Window Skeleton 项目。 它有它的描述:一个Windows骨架应用程序(没有窗口)

在这种情况下,虽然代码编译会导致此错误(我的代码也出现了此错误)。

尝试创建 Console Application 项目,该项目具有自己的描述:基于标准控制台(MS-DOS)的应用程序(您的代码已编译,该计划也有效。)

P.S。无法说明究竟发生了什么 - 无法在Dev-Pas(1.9.2)中找到任何有关错误的文档。 我的假设是,当控制台应用程序时, skeleton 程序并不意味着执行程序的控制台窗口。

答案 2 :(得分:0)

关闭项目,然后重新打开pascal源文件(.pas)。也许放在" readln;"就在"结束之前。"。