gotoxy 命令在 pascal 中被跳过

Question

我正在做一项学校作业。在第 87 行及以下，gotoxy 不起作用，但代码起作用。这是代码的裁剪部分。

gotoxy(32,24); write(' _______________________________________________ ');
gotoxy(32,25); write('|                 PESANAN ANDA                  |');
gotoxy(32,26); writeln('|_______________________________________________|');
gotoxy(20,27); writeln('     ', nama,' ');
gotoxy(20,27); writeln('     Rp.', jumlah,',-');
gotoxy(20,28); write('     Porsi: ');
gotoxy(20,28); writeln(porsi2);
gotoxy(20,29); write('     Jenis: ');
gotoxy(20,29); writeln(lokasi);
gotoxy(20,30); write('     Total: ');
gotoxy(20,29); writeln('Rp.', total,',-');
readln;
end;

结束。

我一直在寻找类似的问题及其解决方案，但没有得到答案。

Answer 1

如果你

  write(ScreenWidth, 'x', ScreenHeight);

您可能会看到

80x25

。超出此范围的

gotoxy()

不会像人们预期的那样起作用。