Gadget ›› DateCalendarGadget

DateCalendarGadget

構文

ID= DateCalendarGadget(Number, x , y , Width , Height )

Function DateCalendarGadget(ByVal gadget As long,ByVal x As long, ByVal y As long, ByVal w As long, ByVal h As long) As HWND

説明

高度なカレンダー

SetStateCalendar 関数を使って数値へのポインタを置くことができます。

GetStateCalendar 関数を使ってガジェットから数を取得できます。

オプション

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

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

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

プラットホーム

Windows

例:

#Include "window9.bi"

OpenWindow("",10,10,300,100)
DateCalendarGadget(1,10,10,100,20)
ButtonGadget(2,120,10,130,20,"日付を設定")
Do
  var event=WaitEvent()
  If event=eventclose Then End
  If event=eventgadget Then
    If eventnumber()=2 Then
      SetStateCalendar(1,2000,10,26)
    EndIf
  EndIf

Loop

http://mneniya.ucoz.ru/