Font ›› SetGadgetFont
Gadget ›› SetGadgetFont

SetGadgetFont

構文

SetGadgetFont(gadget, font)

Function SetGadgetFont(ByVal gadget As Long = -1 ,ByVal Font As integer=-1) As Integer

説明

ガジェットにフォントを設定します。
この関数で、ガジェット番号を指定せずに、後のパラメーター(フォント)だけを指定すると、このフォントは、このコマンドの後に読み込まれるすべてのガジェットに対して、デフォルトとして定義されます。
パラメータを指定せずにこの関数を使うと、システムフォントがプログラムのデフォルトに設定されます。

Buttongadget
Editorgadget
Textgadget
StringGadget
SpinGadget
Calendargadget
Checkboxoxadget
OptionGadget
HyperLinkGadget
Listboxoxadget
Groupgadget
ListViewGadget (GTK2 を使う Linux では、フォントは行にのみ設定され、列のフォントの変更はサポートされません)
Treeviewgadget
PanelGadget
ComboBoxGadget (on Linux, changing the font for this gadget is not supported)
ComboBoxImageGadget (on Linux, changing the font for this gadget is not supported)
ExplorerListGadget (not supported on Linux)
GadgetToolTip (on Linux, changing the font for this gadget is not supported)
StatusBarGadget

オプション

gadget - ガジェット番号

Font - フォント・ハンドル

プラットホーム

Windows , Linux

例:

#Include "window9.bi"
OpenWindow("",10,10,200,600)
StringGadget(1,10,10,100,20,"button")
SetGadgetFont(,LoadFont("arial",36)) 'デフォルトのフォント
OptionGadget(2,10,70,200,40,"option 1")
CheckBoxGadget(3,10,140,170,40,"BlaBla")

TextGadget(4,10,200,100,30,"button")
SetGadgetFont(4,LoadFont("arial",22)) 'ガジェットのフォント
ButtonGadget(5,10,250,200,200,"Button",BS_LEFT Or BS_BOTTOM)
SetGadgetFont(5,LoadFont("Courier New",30,45,,,1))
SetGadgetFont()'既定のシステムフォント
EditorGadget(6,10,460,100,100,"システムフォント")
Do
  Var event=WaitEvent
  Select Case event
    Case EventClose
      End
  End Select
Loop

http://mneniya.ucoz.ru/