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

link之家

链接快照平台

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

相关文章推荐

讲道义的鸡蛋面 · StackEdit——Markdown ...· 5 月前 ·

急躁的围巾 · 用于自动驾驶视觉图像处理的五大开源AI解决方 ...· 10 月前 ·

坚强的碗 · 使用 ffi/lib 对象 — CFFI ...· 10 月前 ·

细心的茶叶 · 九寨魯能希爾頓花園酒店-2025年最新九寨溝 ...· 1 年前 ·

豪气的荔枝 · Photoshop Engine ...· 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);

推荐文章

讲道义的鸡蛋面 · StackEdit——Markdown 编辑器的功能介绍 - 洛谷专栏

5 月前

急躁的围巾 · 用于自动驾驶视觉图像处理的五大开源AI解决方案_汽车技术__汽车测试网

10 月前

坚强的碗 · 使用 ffi/lib 对象 — CFFI 1.14.5 文档

10 月前

细心的茶叶 · 九寨魯能希爾頓花園酒店-2025年最新九寨溝訂房優惠、評論|ezTravel易遊網

1 年前

豪气的荔枝 · Photoshop Engine Instability - Pipeline Integrations - Community @ Flow Production Tracking

1 年前

回答 2

Stack Overflow用户

Stack Overflow用户