グラフィックス関数:現在のグラフィックスの色指標を設定します。
モジュール:USE DFLIB
形式
result = SETCOLOR (color)
color
(入力) INTEGER(2)。現在のグラフィックス色として設定する色指標。
結果
結果の型は INTEGER(2) です。成功すれば,結果は以前の色指標で,そうでなければ -1 です。
SETCOLOR 関数は,現在のグラフィックス色指標を設定します。この色指標は,ELLIPSE のようなグラフィックス関数で使用されます。背景の色指標は,SETBKCOLOR で設定します。背景色上のテキストの色指標は,SETTEXTCOLOR で設定します。これらの非 RGB 色関数は,True Color 値ではなく色指標を使用し,パレットにユーザーが指定した色に制限されます。最大 256 です。すべてのシステム色を参照するには,SETBKCOLORRGB,SETCOLORRGB,および SETTEXTCOLORRGB を使用します。
互換性
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
GETCOLOR,REMAPPALETTERGB,SETBKCOLOR,SETCOLORRGB,SETPIXEL,SETPIXELS,SETTEXTCOLOR
例
! QuickWin または Standard Graphics アプリケーションでビルドします。 USE DFLIB INTEGER(2) color, oldcolor LOGICAL status TYPE (windowconfig) wc status = GETWINDOWCONFIG(wc) color = wc%numcolors - 1 oldcolor = SETCOLOR(color) END