Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   Programación General (http://www.forosdelweb.com/f14/)
-   -   PASCAL - cambiar el color del texto (http://www.forosdelweb.com/f14/pascal-cambiar-color-del-texto-63683/)

riol 17/02/2002 11:14

PASCAL - cambiar el color del texto
 
¿Cómo puedo cambiar el color de un texto?
¿Puede ponerse en negrita o algo similar?
¿Y cambiar el tamaño?
Todo esto en Pascal, claro.

Nch 18/02/2002 03:59

Re: PASCAL - cambiar el color del texto
 
Que PASCAL?


riol 20/02/2002 15:02

Re: PASCAL - cambiar el color del texto
 
Turbo Pascal 7.0
¡¡¡q alguien me ayude!!!

GSMDN 20/02/2002 16:03

Re: PASCAL - cambiar el color del texto
 
En pascal puedes cambiar el color del texto con la siguiente instruccion:

textcolot(numero de color);

en el parentesis va un numero que representa el color que kieres, ves probando numeros para ir viendo los colores que tiene, tambien puedes hacer que parpadee poniendo numeros altos. Si kieres en vez de poer un numero puedes poner el color en ingles ya que reconoce bastantes, por ejemplo:

textcolor(white);

Luego hay otra instruccion para cambiar el color de fondo del texto:

textbackground(numero de color);

si pones esta instruccion despues del begin de tu programa principal y antes del clrscr el color de fondo de la pantalla cambiara

espero que te haya servido.Salu2

Nch 21/02/2002 00:17

Re: PASCAL - cambiar el color del texto
 
Tambien puedes experimentar cambiando los valores del atributo del texto que ya se encuentra en tu pantalla (En el modo DOS),

Primero debes saber que el contenido de tu pantalla inicia en una direccion de memoria conocida: $B800:0000 o $B000:0000
y que cada par de bytes forman un caracter en tu pantalla: el primer byte es el valor ascii del caracter y el segundo es el atributo (color, negrita, etc).
Para escribir "ABC"

Bmem [$B800:0000] := 65; {A}
Bmem [$B800:0001] := $FF; {Atributo}
Bmem [$B800:0000] := 66; {B}
Bmem [$B800:0000] := $CC; {Atributo}
Bmem [$B800:0000] := 67; {C}
Bmem [$B800:0000] := $0A; {Atributo}

{Cambio el atributo y no el texto de 'A'}
Bmem [$B800:0001] := $AC;

En la ayuda podras encontrar los valores que puede tomar el atributo.

Saludos

Nch 21/02/2002 00:20

Re: PASCAL - cambiar el color del texto
 
Error al copiar y pegar. Debia ser:

Bmem [$B800:0000] := 65; {A}
Bmem [$B800:0001] := $FF; {Atributo}
Bmem [$B800:0002] := 66; {B}
Bmem [$B800:0003] := $CC; {Atributo}
Bmem [$B800:0004] := 67; {C}
Bmem [$B800:0005] := $0A; {Atributo}


riol 21/02/2002 16:59

Re: PASCAL - cambiar el color del texto
 
gracias por vuestra ayuda

por cierto, el número que se relaciona con cada color, ¿es igual q en basic?


La zona horaria es GMT -6. Ahora son las 02:54.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.