Farebný text v konzoly, vysvetlenie "argumentu"

Zdravím, Chcel by som sa opýtať či neexistuje alternatíva pre TextColor(); v knižnici SysUtils alebo inej ktorá sa nachádza v Delphi/Lazarusi.
Ďakujem za odpovede.

//EDIT: Chcel by som sa opýtať čo robí to čo je zvýraznené: writeln(' ',m[i]:6,' ',e[i]:20,' ',k[i]);
pretože dnes mi to povedal učiteľ že to mám použiť ale nepovedal mi čo to má robiť ale keď som spustil program tak to tie stringy dalo do "stlpcov"

K druhej otazke - nikdy som nerobil v Delph/Lazarus, ale predpokladam, ze to je pocet miest rezervovanych na vypis premennej (ak premenna m[i] zabera napr. 3 miesta, zvysne 3 sa doplnia prazdnym miestom)

@buci - dík.

tie dvojbodky môžeš používať aj na formátovanie desatinných čísiel: cislo:4:2
4 -> celková šírka, vrátane čiarky
2 -> počet desatinných miest

Pouzi escape sekvencie, nie si tak odkazany na ziadnu kniznicu:


----HOWTO----

Ten kód nefunguje. Použil som základnú knižnicu SysUtils v Delphi 7.

Nenapisal si nic ohladom operacneho systemu, tak som ti dal najjednoduchsi univerzalny sposob. Funguje to iba v konzolach, ktore podporuju ANSI escape sekvencie, neviem presne od ktoreho windowsu to nefunguje. V tom pripade pouzi funkciu SetConsoleTextAttribute, s nasledovnymi parametrami---> https://msdn.microsoft.com/en-us/library/windows/desktop/ms682088(v=vs.85).aspx#_win32_character_attributes

Napr, cerveny text:


// nemam to kde vyskusat, tak hadam to nerobi problemy

@Fico - ďakujem za pomoc. PS: Testoval som to na Windows 7