Changeset 319 for trunk/Include/Classes/System/Windows

Timestamp:

Aug 29, 2007, 1:49:36 PM (17 years ago)

Author:

dai

Message:

System.Windows.Forms.Applicationクラスを追加
MessageBox.Showの一つがコンパイルエラーを起こしていたのでコメントアウトしておいた

Location:

trunk/Include/Classes/System/Windows/Forms

Files:

• Application.ab (added)
• MessageBox.ab (modified) (1 diff)
• index.ab (modified) (1 diff)

trunk/Include/Classes/System/Windows/Forms/MessageBox.ab

@@ -90 +90 @@
 
     Static Function Show(owner As IWin32Window, text As String, caption As String, buttons As MessageBoxButtons, icon As MessageBoxIcon, defaultButtion As MessageBoxDefaultButton, options As MessageBoxOptions) As DialogResult
-        Show = ActiveBasic.Windows.Detail._System_MessageBox(owner.Handle, StrPtr(text), StrPtr(caption), buttons As DWord Or icon As DWord Or defaultButtion As DWord Or options As DWord) As DialogResult
+        'Show = ActiveBasic.Windows.Detail._System_MessageBox(owner.Handle, StrPtr(text), StrPtr(caption), buttons As DWord Or icon As DWord Or defaultButtion As DWord Or options As DWord) As DialogResult
     End Function
 

trunk/Include/Classes/System/Windows/Forms/index.ab

@@ -5 +5 @@
 
 #require <Classes/System/Windows/Forms/misc.ab>
+#require <Classes/System/Windows/Forms/Application.ab>
 #require <Classes/System/Windows/Forms/Control.ab>
 #require <Classes/System/Windows/Forms/Message.ab>