Freeman/SDK
1
0
Fork 0
mirror of https://github.com/vapaamies/KolibriOS.git synced 2025-09-22 07:03:53 +02:00
Code Issues Actions Packages Projects Releases Wiki Activity

KoW for console applications added

Browse Source
This commit is contained in:
Владислав Джавадов
2021-01-08 18:39:17 +03:00
parent 305cd924f7
commit 5f3fca1705
29 changed files with 824 additions and 134 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Examples/Console/CharMap/CharMap.dpr
View File

@@ -7,14 +7,16 @@ var
CharLine: array[$0..$F] of KolibriChar;
Line, Ch: Byte;
begin
InitConsole('Character map');
InitConsole('CharMap', False, 20, 19, 20, 19);
con_write_asciiz(' ');
con_write_asciiz(#10);
con_write_asciiz(' ');
con_write_string(HexDigits, Length(HexDigits));
con_write_asciiz(#10);
for Line := Low(HexDigits) to High(HexDigits) do
begin
con_write_asciiz(' ');
con_write_string(@HexDigits[Line], 1);
con_write_asciiz(' ');
for Ch := Low(CharLine) to High(CharLine) do