Changeset 337


Ignore:
Timestamp:
Sep 22, 2007, 12:32:25 PM (17 years ago)
Author:
dai
Message:

index.abを一つにまとめた。

Location:
trunk
Files:
5 added
13 deleted
8 edited

Legend:

Unmodified
Added
Removed
  • trunk/Include/Classes/ActiveBasic/Windows/CriticalSection.ab

    r335 r337  
    11'Classes/ActiveBasic/Windows/CriticalSection.ab
    2 
    3 #require <Classes/System/index.ab>
    42
    53Namespace ActiveBasic
  • trunk/Include/Classes/System/Environment.ab

    r268 r337  
    22
    33#require <api_psapi.sbp>
    4 #require <Classes/System/OperatingSystem.ab>
    5 #require <Classes/ActiveBasic/Windows/index.ab>
    64
    75Declare Function _System_SetEnvironmentVariable Lib "kernel32" Alias _FuncName_SetEnvironmentVariable (lpName As LPCTSTR, lpValue As LPTSTR) As BOOL
  • trunk/Include/Classes/System/IO/Directory.ab

    r327 r337  
    2626    End Function
    2727
    28     Static Function GetAccessControl(path As String, includeSections As AccessControlSections) As DirectorySecurity
     28    Static Function GetAccessControl(path As String, includeSections As System.Security.AccessControl.AccessControlSections) As DirectorySecurity
    2929    End Function
    3030
  • trunk/Include/Classes/System/IO/FileStream.ab

    r336 r337  
    297297    End Sub
    298298
    299     Override Function Read(ByRef buffer[] As Byte, offset As Long, count As Long) As Long
     299    Override Function Read( buffer As *Byte, offset As Long, count As Long) As Long
    300300        If This.CanRead() Then
    301301            Dim ret As DWord
     
    316316    End Function
    317317
    318     Override Function ReadByte() As Long
    319         Dim b As Byte
    320         Dim ret = Read(b, 0, 1)
    321         If ret <> 0 Then
    322             Return b As Long
    323         Else
    324             Return -1
    325         End If
    326     End Function
    327318/*  ReferenceEquals*/
    328319
     
    388379    End Sub
    389380
    390     Override Sub Write(ByRef buffer[] As Byte, offset As Long, count As Long)
     381    Override Sub Write(buffer As *Byte, offset As Long, count As Long)
    391382        If This.CanWrite() Then
    392383            Dim ret As DWord
     
    405396    End Sub
    406397
    407     Override Sub WriteByte(b As Byte)
    408         Write(b, 0, 1)
    409     End Sub
    410 
    411398Protected
    412399    Override Function CreateWaitHandle() As System.Threading.WaitHandle
  • trunk/Include/Classes/System/IO/Stream.ab

    r271 r337  
    4646    Virtual Sub EndWrite(ByRef asyncResult As System.IAsyncResult): End Sub
    4747    Abstract Sub Flush()
    48     Abstract Function Read(ByRef buffer[] As Byte, offset As Long, count As Long) As Long
     48    Abstract Function Read(buffer As *Byte, offset As Long, count As Long) As Long
    4949
    5050    Virtual Function ReadByte() As Long
    5151        Dim b As Byte
    52         Dim ret = Read(b, 0, 1)
     52        Dim ret = Read(VarPtr(b), 0, 1)
    5353        If ret <> 0 Then
    5454            Return b
     
    6060    Abstract Function Seek(offset As Int64, origin As SeekOrigin) As Long
    6161    Abstract Sub SetLength(value As Int64)
    62     Abstract Sub Write(ByRef buffer[] As Byte, offset As Long, count As Long)
     62    Abstract Sub Write(buffer As *Byte, offset As Long, count As Long)
    6363
    6464    Virtual Sub WriteByte(b As Byte)
    65         Write(b, 0, 1)
     65        Write(VarPtr(b), 0, 1)
    6666    End Sub
    6767Protected
  • trunk/Include/Classes/index.ab

    r275 r337  
    1 ' コンパイルに最低限必要なファイル
    2 
    3 #require "./ActiveBasic/index.ab"
    4 #require "./System/index.ab"
     1#require "./ActiveBasic/Core/TypeInfo.ab"
     2#require "./ActiveBasic/Math/Math.ab"
     3#require "./ActiveBasic/Strings/SPrintF.ab"
     4#require "./ActiveBasic/Strings/Strings.ab"
     5#require "./ActiveBasic/Windows/CriticalSection.ab"
     6#require "./ActiveBasic/Windows/WindowHandle.sbp"
     7#require "./ActiveBasic/Windows/Windows.ab"
     8#require "./System/Blittable.ab"
     9#require "./System/DateTime.ab"
     10#require "./System/Delegate.ab"
     11#require "./System/Environment.ab"
     12#require "./System/Math.ab"
     13#require "./System/misc.ab"
     14#require "./System/Object.ab"
     15#require "./System/OperatingSystem.ab"
     16#require "./System/String.ab"
     17#require "./System/TimeSpan.ab"
     18#require "./System/TypeInfo.ab"
     19#require "./System/Version.ab"
     20#require "./System/Collections/ArrayList.ab"
     21#require "./System/Collections/misc.ab"
     22#require "./System/Collections/Generic/Dictionary.ab"
     23#require "./System/Collections/Generic/List.ab"
     24/*
     25#require "./System/Data/Odbc/Odbc.ab"
     26*/
     27#require "./System/Diagnostics/base.ab"
     28#require "./System/Diagnostics/Debug.ab"
     29#require "./System/Diagnostics/Trace.ab"
     30#require "./System/Diagnostics/TraceListener.ab"
     31#require "./System/Diagnostics/TraceListenerCollection.ab"
     32/*
     33#require "./System/Drawing/CharacterRange.ab"
     34#require "./System/Drawing/Color.ab"
     35#require "./System/Drawing/Font.ab"
     36#require "./System/Drawing/Graphics.ab"
     37#require "./System/Drawing/Image.ab"
     38#require "./System/Drawing/misc.ab"
     39#require "./System/Drawing/Point.ab"
     40#require "./System/Drawing/PointF.ab"
     41#require "./System/Drawing/Rectangle.ab"
     42#require "./System/Drawing/RectangleF.ab"
     43#require "./System/Drawing/Size.ab"
     44#require "./System/Drawing/SizeF.ab"
     45#require "./System/Drawing/Drawing2D/Matrix.ab"
     46#require "./System/Drawing/Drawing2D/misc.ab"
     47#require "./System/Drawing/Imaging/MetafileHeader.ab"
     48#require "./System/Drawing/Imaging/misc.ab"
     49#require "./System/Drawing/Text/misc.ab"
     50*/
     51#require "./System/IO/Directory.ab"
     52#require "./System/IO/DirectoryInfo.ab"
     53#require "./System/IO/DirectorySecurity.ab"
     54#require "./System/IO/DriveInfo.ab"
     55#require "./System/IO/File.ab"
     56#require "./System/IO/FileInfo.ab"
     57#require "./System/IO/FileStream.ab"
     58#require "./System/IO/FileSystemInfo.ab"
     59#require "./System/IO/misc.ab"
     60#require "./System/IO/Path.ab"
     61#require "./System/IO/Stream.ab"
     62#require "./System/IO/StreamReader.ab"
     63#require "./System/IO/StreamWriter.ab"
     64#require "./System/Media/SystemSound.ab"
     65#require "./System/Media/SystemSounds.ab"
     66#require "./System/Runtime/InteropServices/GCHandle.ab"
     67#require "./System/Security/AccessControl/misc.ab"
     68#require "./System/Text/StringBuilder.ab"
     69#require "./System/Threading/Thread.ab"
     70#require "./System/Threading/WaitHandle.ab"
     71#require "./System/Windows/Forms/Application.ab"
     72#require "./System/Windows/Forms/Control.ab"
     73#require "./System/Windows/Forms/CreateParams.ab"
     74#require "./System/Windows/Forms/Message.ab"
     75#require "./System/Windows/Forms/MessageBox.ab"
     76#require "./System/Windows/Forms/misc.ab"
     77#require "./System/Windows/Forms/PaintEventArgs.ab"
  • trunk/Include/api_sql.sbp

    r300 r337  
    1414TypeDef SQLINTEGER     = Long
    1515TypeDef SQLUINTEGER    = DWord
     16TypeDef SQLSMALLINT    = Integer
     17TypeDef SQLUSMALLINT   = Word
    1618#ifdef _WIN64
    1719TypeDef SQLLEN         = Int64
  • trunk/TestCase/SimpleTestCase/SPrintFTest.ab

    r335 r337  
    22' Test case of SPrintF Function and etc...
    33'--------------------------------------------------------------------
    4 
    5 #require <Classes/ActiveBasic/Strings/SPrintF.ab>
    64
    75Imports ActiveBasic.Strings
Note: See TracChangeset for help on using the changeset viewer.