 Wysłany: Nie 0:49, 10 Lut 2008 Temat postu: zmiana koloru tekstu |
|
| Składnia: TextColor(kolor:byte); CRT
Black = 0 - czarny Blue = 1 - niebieski Green = 2 - zielony Cyan = 3 - turkusowy Red = 4 - czerwony Magenta = 5 - karmazynowy Brown = 6 - brązowy LightGray = 7 - jasnoszary DarkGray = 8 - ciemnoszary LightBlue = 9 - jasnoniebieski LightGreen = 10 - jasnozielony LightCyan = 11 - jasnoturkusowy LightRed = 12 - jasnoczerwony LightMagenta = 13 - jasnokarmazynowy Yellow = 14 - żółty White = 15 - biały Można wykonać również kolor migoczący, uzyskuje się poprzez dodanie do wybranego koloru liczby 128 ( Blink ) np. program kolor; Uses CRT;{ pozwalają na kontrolę trybów ekranu, rozszerzonymi kodami i klawiatury, kolorami, oknami i dźwiękiem} Begin TextColor(Blue); Write('Napis Niebieski'); TextColor(8); Write('Napis Ciemnoszary'); TextColor(Red+Blink); Write('Napis Czerwony mrugajacy'); TextColor(15+128); { TextColor(143); } Write('Napis Biały mrugający'); End. Chyba nic nie trzeba wyjasniac odnosnie programu bo jest oczywisty:D |
|
