Color ›› GetGadgetColor
Gadget ›› GetGadgetColor

プログラム言語 FreeBasic


GetGadgetColor

構文

GetGadgetColor(gadget, flag)

Function GetGadgetColor(byval gadget as Long ,ByVal flag as Long ) As Integer

説明

指定されたガジェットの色の値を取得します。
サポートされているガジェット:

Buttongadget -(制限:Linuxのみ。テキストの色だけが返されます)
TextGadget
StringGadget -(Linuxでは、gtk3を使用すると、テキストの色とマウスでの選択の色が返されます)
EditorGadget
CheckBoxGadget -(Linuxではgtk2、テキストの色のみ)
ComboBoxGadget -(制限:Windowsのみ)
ListBoxGadget
ListViewGadget
GadgetToolTip -(制限:Windowsのみ)
OptionGadget -(Linuxではgtk2を使用、テキストの色のみ)
TrackBarGadget -(制限:WindowsおよびLinuxでgtk3を使用のみ)
SpinGadget -(Linuxでは、gtk3を使用すると、テキストの色とマウスでの選択の色が返されます)
GroupGadget-(Linuxでは、gtk2を使用すると、テキストの色のみが返されます)
ScrollBarGadget -(制限:Windowsのみ)
ProgressBarGadget -(制限:gtk2を使用するWindowsおよびLinuxのみ)
ExplorerListGadget -(制限:Windowsのみ)

オプション

gadget - ガジェット番号

flag - 指定できます:

1 - 背景色

2 - テキストの色


プラットホーム

Windows , Linux


例:

#Include "window9.bi"
OpenWindow("",10,10,240,150)
EditorGadget(1,20,20,100,40,"Editor")
SetGadgetColor(1,50000,0,1)
ButtonGadget(2,10,70,150,30,"色 Editor を取得")
TextGadget(3,150,20,45,17,"",SS_CENTER)
SetGadgetColor(3,255,16777215,3)

Do
  var event=WaitEvent()
  If event=EventGadget Then
    Select case EventNumber
      Case 2
        SetGadgetText(3,Str(GetGadgetColor(1,1)))
    End Select
  ElseIf event=Eventclose Then
    End
  EndIf
Loop


http://mneniya.ucoz.ru/

←リンク元に戻る Window9 トップに戻る FreeBASIC マニュアル トップに戻る
ロシア語オリジナル:https://users.freebasic-portal.de/freebasicru/window9lib/window9.html