Benutzer-Werkzeuge

Webseiten-Werkzeuge


laz:start

Inhaltsverzeichnis

Free Pascal

Windows 10

Konsole

Konsolenprogramme unter Windows haben das Problem, dass die Darstellung von Sonderzeichen wie ä ö ü nicht richtig funktioniert. Die Konsole (cmd) arbeitet mit ANSI-Strings, der Rest von Windows 10 ist UTF codiert. Also muss man auf Sonderzeichen verzichten, oder wandelt für die Ausgabe die Strings einfach um. Anbei ein Beispielprogramm mit einer eigenen Prozedur namens cWriteln.

program project1;
 
{$mode objfpc}{$H+}
 
uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes
  { you can add units after this };
 
  // Diese Prozedur übersetzt den Inhalt eines UTF8Strings
  // in den Zeichensatz der Konsole (Ansi)
  procedure cWriteln(strUebergabe: string);
  begin
    Writeln(Utf8ToAnsi(strUebergabe));
  end;
 
 
begin
  cWriteln('Das ist FreePascal und Lazarus');
  cWriteln('Taste drücken zum beenden.');
  Readln;
end.
laz/start.txt · Zuletzt geändert: 2018/02/24 23:53 von jayway