etwas an zeilenende in der Console schreiben

[turboPASCAL]

Achso, du meinst die Breite der Console...

Delphi-Quellcode:

uses
  Windows;

function ConsoleSize: TCoord;
var
  cbi: TConsoleScreenBufferInfo;
begin
  getConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE), cbi);
  result := cbi.dwSize;
end;

begin
  writeln(ConsoleSize.x);
  writeln(ConsoleSize.y);
...