Changeset 575 for trunk/ab5.0/ablib/TestCase/UI_Sample/step5_DayTimeCheck.ab

Timestamp:

Aug 3, 2008, 3:58:05 AM (16 years ago)

Author:

イグトランス (egtra)

Message:

ウィンドウ作成関数を親用のCreateFormと子用のCreateに分離。

File:

• trunk/ab5.0/ablib/TestCase/UI_Sample/step5_DayTimeCheck.ab (modified) (2 diffs)

trunk/ab5.0/ablib/TestCase/UI_Sample/step5_DayTimeCheck.ab

@@ -62 +62 @@
 
     Sub ButtonTime_Click(sender As Object, e As Args)
-        TaskMsg(This, "今日の日付", DateTime.Now.GetDateTimeFormats("H:mm:ss"), Nothing, MB_OK)
+        TaskMsg(This, "現在時刻", DateTime.Now.GetDateTimeFormats("H:mm:ss"), Nothing, MB_OK)
     End Sub
 
@@ -71 +71 @@
 Control.Initialize(GetModuleHandle(0))
 Dim f = New DayTimeCheckForm
-f.Create()
+f.CreateForm()
 Application.Run(f)