更改控制台大小开发者社区

link管理

链接快照平台

输入网页链接，自动生成快照
标签化管理网页链接

相关文章推荐

苦闷的奔马 · Xcode打印不出任何东西 || ...· 3 月前 ·

爱跑步的口罩 · ios ...· 3 月前 ·

奔跑的茄子 · C# ...· 3 月前 ·

完美的排球 · 如何创建以及删除PolarDB ...· 1 月前 ·

酒量小的柳树 · vscode查看变量小技巧_vscode ...· 3 周前 ·

鬼畜的回锅肉 · 学校办公室党委办公室校长办公室 -中央美术学院· 7 月前 ·

鬼畜的钢笔 · 给救了爷爷的七个大小姐报恩牧歌-西瓜视频· 10 月前 ·

越狱的鸵鸟 · dart uri add query ...· 1 年前 ·

强悍的鸵鸟 · 伟大的征程 ...· 1 年前 ·

睿智的荒野 · eclipse ...· 1 年前 ·

腾讯云

开发者社区

文档意见反馈控制台

首页 TVP

文章/答案/技术大牛

发布

uses
  Windows;
  Rect: TSmallRect;
  Coord: TCoord;
begin
  Rect.Left := 1;
  Rect.Top := 1;
  Rect.Right := 80;
  Rect.Bottom := 60;
  Coord.X := Rect.Right + 1 - Rect.Left;
  Coord.y := Rect.Bottom + 1 - Rect.Top;
  SetConsoleScreenBufferSize(GetStdHandle(STD_OUTPUT_HANDLE), Coord);
  SetConsoleWindowInfo(GetStdHandle(STD_OUTPUT_HANDLE), True, Rect);
end;

procedure SetConsoleWindow(NewWidth : integer;NewHeight : integer);
  Rect: TSmallRect;
  Coord: TCoord;
  begin { SetConsoleWindow }
  Coord.X := NewWidth;
  Coord.y := NewHeight;
  SetConsoleScreenBufferSize(GetStdHandle(STD_OUTPUT_HANDLE), Coord);

推荐文章

苦闷的奔马 · Xcode打印不出任何东西 || 打印过多信息_xcode控制台打印信息不显示

3 月前

爱跑步的口罩 · ios 控制台不显示printf_mob64ca12ed4084的技术博客_

3 月前

奔跑的茄子 · C# 在winform或者wpf中显示控制台窗口 - qqnihao

3 月前

完美的排球 · 如何创建以及删除PolarDB PostgreSQL版（兼容Oracle）引擎数据库_云原生数据库 PolarDB(PolarDB)-阿里云帮助中心

1 月前

酒量小的柳树 · vscode查看变量小技巧_vscode 变量查看器

3 周前

鬼畜的回锅肉 · 学校办公室党委办公室校长办公室 -中央美术学院

7 月前

鬼畜的钢笔 · 给救了爷爷的七个大小姐报恩牧歌-西瓜视频

10 月前

越狱的鸵鸟 · dart uri add query parameters-掘金

1 年前

强悍的鸵鸟 · 伟大的征程不朽的史诗——“‘不忘初心、牢记使命’中国共产党历史展览”巡礼 - 中国军网

1 年前

睿智的荒野 · eclipse 项目引入关联项目_eclipse两个项目怎么互相关联-CSDN博客

1 年前

回答 2

Stack Overflow用户

Stack Overflow用户