Come è possibile specificare uno sfondo trasparente utilizzando Perl e maledizioni?

Question

Sto cercando di ottenere lo sfondo il colore terminale standard invece di nero, ma io non riesco a capirlo. Quando uso use_default_colors() le norme è come non usare colori, ma mi piacerebbe cambiare il colore di primo piano e non il colore di sfondo. Io uso init_color_pair(1, COLOR_RED, COLOR_BLACK); ma che mi dà uno sfondo nero, quello che non voglio.

Answer 1

al fine di avere sfondo trasparente, l'utente della vostra applicazione avrebbe dovuto precisare nei loro .Xdefaults o qualcosa di simile. Se l'utente ha già uno sfondo trasparente, tutto quello che dovete fare, è quello di utilizzare lo sfondo predefinito in questo modo:

use Curses;
#...some init here...
# colors:
use_default_colors;  # mandatory, we want to use the default background which is transparent
init_pair 1, COLOR_BLUE, -1;  # -1 mandatory, again, we want *default* background
init_pair 2, -1, COLOR_WHITE;  # you can use the default foreground color if you like