Gadget ›› StringGadget

プログラム言語 FreeBasic


StringGadget

構文

ID= StringGadget(Number, x , y , Width , Height , [String=""] , [Style=0] , [Style2=0])

Function StringGadget(ByVal gadget As long, ByVal x As Long, ByVal y As Long, ByVal w As Long, ByVal h As Long, ByRef text As String="", ByVal Style As Long=0, ByVal ExStyle As Long=0) As HWND

説明

テキストガジェットで、ユーザーが変更することができる文字列

ガジェット内のテキストを設定する関数 SetGadgetText

ガジェットからテキストを取得する関数 GetGadgetText

ガジェットの色を設定する関数 SetGadgetColor

ガジェットの色を取得する関数 GetGadgetColor

ガジェットのフォントを設定する関数 SetGadgetFont

オプション

ID - ガジェット・ハンドル

Number- 識別子 (正の整数 1,2,3,4 など)

x,y,Width,Height- 位置とサイズ

string - ガジェット内の任意の文字列

Style - スタイルを選択します(下記参照)

Style2 - スタイルを選択します(下記参照)


プラットホーム

Windows , Linux


例:

#Include "window9.bi"

Dim As integer hwnd,event
hwnd=OpenWindow("1",300,10,500,500)
StringGadget(1,10,10,200,20,"ブーバーブー")
StringGadget(2,10,50,200,20,"96754",ES_RIGHT Or ES_NUMBER)
StringGadget(3,10,90,200,20,"ブーバーブー",ES_PASSWORD,WS_EX_CLIENTEDGE)
StringGadget(4,10,130,200,20,"ブーバーブー",ES_CENTER,WS_EX_DLGMODALFRAME )
Do
    event=WaitEvent()
    If event=EventClose Then End
Loop


Style:

Windows と Linux:

Windows のみ:


Style2(Windowsのみ):

参考:拡張ウィンドウ スタイル
https://msdn.microsoft.com/ja-jp/library/61fe4bte.aspx
http://chokuto.ifdef.jp/urawaza/prm/extended_window_style.html


http://mneniya.ucoz.ru/

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