[ Foro de Pascal ]

Color de fondo en freepascal

22-Feb-2013 21:44
Antonio Martin
5 Respuestas

Hola. Colegas
Mi problema esta en el color de fondo en freepascal. Que no tengo forma de conseguirlo.
Va por delante mi agradecimiento a todos.
Un saludo.
Antonio.


23-Feb-2013 00:07
Nacho Cabanes (+31)

Si te refieres a cómo cambiar el color de fondo del texto, usando FreePascal en modo "consola" (texto puro, no "ventanitas", como en Delphi o Lazarus), deberías poder hacer igual que en Turbo Pascal, es decir:

uses crt;
...
TextBackground( Blue );


Tienes más detalles aquí:

http://www.aprendeaprogramar.com/mod/resource/view.php?id=153


23-Feb-2013 03:30
Luis Torres (+12)

Para complementar la respuesta del prof. Nacho Cabanes, te puedo decir que deberás agregar la sentencia ClrScr al código, después de la línea TextBackgroud(Blue). Así, el código debería ser:

 
uses Crt;
.
.
.
BEGIN
  TextBackgroud(1);
  ClrScr;
  .
  .
  .
END.
 



Eso es todo.
Saludos.


23-Feb-2013 20:23
Antonio Martin

Hola. Nuevamente:
Espero me perdoneis. Pues me quedé corto al explicar el tema del
color de fondo en FREEPASCAL. Así pues, me refería al color de fondo en MODO GRAFICO; que la funcion para ello es SETBKCOLOR(X) y que amí no me funciona. Es posible, como apunta uno de Vds, que esté en la función de limpiar pantalla que para FREEPASCAL  en MODO GRAFICO es CLEARDEVICE.
Con todo esto, muy agradecido por la colaboracion.
Antonio


24-Feb-2013 01:02
Nacho Cabanes (+31)

Pues debería funcionar. En modo gráfico, el color de fondo se cambia con SetBkColor y a continuación se debería borrar la pantalla con ClearDevice (si no borras la pantalla, no se apreciará ese nuevo color de fondo, salvo quizá al dibujar líneas discontínuas).

http://www.freepascal.org/docs-html/rtl/graph/setbkcolor.html

http://www.freepascal.org/docs-html/rtl/graph/cleardevice.html


24-Feb-2013 11:19
Antonio Martin

Efectivamente. Agregando CLEARDEVICE a continuacion de SETBKCOLOR se estable el color de fondo indicado; cosa que yo ignoraba.
Muy agradecido.
Antonio.






(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)