Gadget ›› ContainerGadget
ContainerGadget
構文
ContainerGadget(Number, x , y , Width , Height , [Style=0])
Function ContainerGadget(ByVal gadget As Long, ByVal x As Long,ByVal y As Long,ByVal w As Long, ByVal h As Long, ByVal parameter As Long=0) As HWND
説明
複数のガジェット用のコンテナです。 ガジェットのグループを、状況により、すべてサイズを変更したり、非表示にするときに、便利です。
ガジェットの色を設定する関数 SetGadgetColor
ガジェットの色を取得する関数 GetGadgetColor
オプション
Number- 識別子 (正の整数 1,2,3,4 など)
x,y,Width,Height- サイズと位置
Style - 選択可能なスタイル (下記参照) Window のみ
プラットホーム
Windows , Linux
例:
#Include "window9.bi"
Dim Shared As HWND ph
ph=OpenWindow("",10,10,500,500)
ContainerGadget(4,100,0,300,300)
ButtonGadget(1,10,10,100,20)
ButtonGadget(2,10,40,100,30)
ImageGadget(3,200,200,100,100,Load_image("E:\WINDOWS\system32\oobe\images\merlin.gif",&hf0f0f0))
Sub tt
Static As Integer x,y
x=Rnd*200
y=Rnd*200
Resizegadget(4,x,y)
SetGadgetColor(4,x*Rnd*100000,0,1)
End Sub
SetTimer(ph,1,500,@tt)
Do
Var ev=WindowEvent
If ev=EventClose Then End
Loop
Style:
- WS_EX_ACCEPTFILES - このスタイルで作成されたウィンドウは、"ドラッグ・アンド・ペースト" 情報技術の助けを借りてファイルを受け入れることを指定します。
- WS_EX_APPWINDOW - ウィンドウが最小化されたとき、タスクバーの最上位ウィンドウをアクティブにします。
- WS_EX_CLIENTEDGE - ウィンドウに、エッジが深いフレームを持つことを指定します。
- WS_EX_CONTEXTHELP - ウィンドウのタイトルバーに疑問符を表示します。
ユーザーが疑問符をクリックすると、カーソルが、疑問符のポインタに、変化します。
ユーザーが子ウィンドウをクリックすると、子ウィンドウは、WM_HELP メッセージを受信します。
子ウィンドウは、コマンドHELP_WM_HELPを使用して、WinHelpを呼び出して、親ウィンドウプロシージャにメッセージを渡します。
アプリケーションは通常、子ウィンドウのヘルプが含まれているポップアップヘルプウィンドウを表示します。
WS_EX_CONTEXTHELP は、スタイル WS_MAXIMIZEBOX または WS_MINIMIZEBOX では使用できません。
- WS_EX_CONTROLPARENT - ユーザーが[Tab]キーを使用して、メインウィンドウの子ウィンドウ間を移動することができます。
- WS_EX_DLGMODALFRAME - 二重枠を持つウィンドウを作成します。ウィンドウは、オプションで、パラメータ・スタイルの WS_CAPTION の dwStyle を識別するタイトルを作成することができます。
- WS_EX_LEFT - ウィンドウは、一般的に"左揃え"のプロパティを使用しています。これは、デフォルトです。
- WS_EX_LEFTSCROLLBAR - シェル言語が、ヘブライ語、アラビア語や読み取り順序をサポートしています他の言語である場合、垂直スクロールバーは、(もしあれば)ワークスペースの左側に表示されます。
他の言語については、スタイルは無視され、エラーにはなりません。
- WS_EX_LTRREADING - テキストボックスは、左から右への読み取り順序を使用して、表示されます。 これは、デフォルトです。
- WS_EX_MDICHILD - MDI子ウィンドウを作成します。
- WS_EX_NOPARENTNOTIFY - このスタイルで作成された子ウィンドウは、親ウィンドウが作成または破棄されるとき、メッセージ WM_PARENTNOTIFY 親ウィンドウを送信しないことを指定します。
- WS_EX_OVERLAPPEDWINDOW - スタイルと、WS_EX_CLIENTEDGE、WS_EX_WINDOWEDGEをマージします。
- WS_EX_PALETTEWINDOW - スタイルの、WS_EX_WINDOWEDGE、WS_EX_TOOLWINDOW と WS_EX_TOPMOSTをマージします。
- WS_EX_RIGHT - ウィンドウは、一般のプロパティに使用される"右揃え"をします。
これは、ウィンドウクラスに依存します。
このスタイルは、シェル言語がヘブライ語、アラビア語や、読書のための配置、別の手順をサポートしている他の言語の場合にのみ効果があります。それ以外の場合、スタイルは無視され、エラーとして扱われません。
- WS_EX_RIGHTSCROLLBAR - (もしあれば)垂直スクロールバーは、ワークスペースの右側になります。これは、デフォルトです。
- WS_EX_RTLREADING - シェル言語が、ヘブライ語、アラビア語やリーダーで別の順序の整列をサポートしている他の言語である場合、ウィンドウに表示されるテキストは、読みの順序で、右から左のプロパティを使用します。
他の言語については、スタイルは無視され、エラーとして扱われません。
- WS_EX_STATICEDGE - ユーザーが入力した情報を取得しない項目には、三次元スタイルを使用したフレームでウィンドウを作成します。
- WS_EX_TOOLWINDOW - ウィンドウをフローティングツールバーとして使うツールボックスを作成します。
ツールウィンドウは、タイトルバーを持っていて、小さいフォントを使って、通常のタイトルバーよりも短いタイトルバーが、表示されます。
ツールウィンドウは、タスクバーで、またはユーザーが Alt + Tabキーを押し、表示されるダイアログボックスで、表示されません。
- WS_EX_TOPMOST - ウィンドウが非アクティブにされている場合でも、このスタイルで作成されたウィンドウは、すべての非最上位ウィンドウの上に配置され、その上にとどまることを指定します。
このスタイルを追加または削除するには、SetWindowPos を使用します。
- WS_EX_TRANSPARENT - このスタイルで作成されたウィンドウが、透明であることを指定します。
つまり、窓から飛び出し、任意のウィンドウを、このウインドウは隠しません。
このスタイルで作成されたウィンドウは、その下のすべての介添えボックスが変更された後にのみ WM_PAINT メッセージを受け取ります。
- WS_EX_WINDOWEDGE - ウィンドウが、凸縁のフレームを持つことを指定します。
http://mneniya.ucoz.ru/
ロシア語オリジナル:https://users.freebasic-portal.de/freebasicru/window9lib/window9.html