어떻게 Perl과 Curses를 사용하여 투명한 배경을 지정할 수 있습니까?

Question

배경이 검은 색이 아닌 표준 터미널 색을 얻으려고하고 있지만 알아낼 수없는 것 같습니다. use_default_colors()을 사용할 때 표준은 색상을 사용하지 않는 것과 같지만 배경색이 아닌 전경색을 변경하고 싶습니다. 내가 init_color_pair(1, COLOR_RED, COLOR_BLACK);를 사용하지만, 그것은 나에게 내가 원하지 않는 검은 배경을 준다.

Answer 1

투명 배경을 가지려면 앱 사용자가 자신의 .Xdefaults 또는 유사한 것으로 지정해야합니다. 사용자가 이미 투명한 배경을 가지고 있다면, 다음과 같이 기본 배경을 사용하는 것입니다.

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