You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Next »

[ |../../index.htm#lansa/l4wdev03_0405.htm]
現在地:

カレンダー

フィールド名
ADateTime(Datetime, 28)
説明
フィールドをフォーム上にカレンダーとして表示します。
フィールドのソース
BEGIN_COM ROLE(*EXTENDS #PRIM_OBJT)
 
BEGIN_COM ROLE(*Visual #PRIM_EVDT) NAME(#VisualDateTime) HEIGHT(19) WIDTH(370)
 
END_COM
 
BEGIN_COM ROLE(*Visual #PRIM_EVMC) NAME(#VisualCalendar) DEFAULTVISUAL(True) HEIGHT(156) MARGINLEFT(183) USEPICKLIST(False) WIDTH(366)
 
END_COM
END_COM 
フォームのソース
Function Options(*DIRECT)
 
BEGIN_COM ROLE(*EXTENDS #PRIM_FORM) CLIENTHEIGHT(251) CLIENTWIDTH(492) HEIGHT(278) LEFT(467) TOP(163)
DEFINE_COM CLASS(#ADATETIME.Visual) NAME(#ADATETIME) DISPLAYPOSITION(1) LEFT(40) PARENT(#COM_OWNER) TABPOSITION(1) TOP(24)
 
End_Com
 
外観

[ |../../index.htm#lansa/l4wdev03_0405.htm]

  • No labels