Changeset 335 for trunk/Include/Classes


Ignore:
Timestamp:
Sep 18, 2007, 12:10:41 AM (17 years ago)
Author:
イグトランス (egtra)
Message:

SPrintF関連の追加。関数FloatToChars, FormatFloatE, FormatIntegerUと列挙体FormatFlags。

Location:
trunk/Include/Classes
Files:
1 added
7 edited

Legend:

Unmodified
Added
Removed

  • trunk/Include/Classes/ActiveBasic/Windows/CriticalSection.ab

    r303 r335  
    5353
    5454    /*Override*/ Sub Dispose()
    55 '       Dim p = ActiveBasic.Windows.Detail.InterlockedExchangeAnyPointer(pcs, 0)
    56         Dim p = InterlockedExchangePointer(pcs As VoidPtr, 0) As *CRITICAL_SECTION
    57         If p <> 0 Then
    58             LeaveCriticalSection(ByVal p)
     55'       Dim pcsOld = ActiveBasic.Windows.Detail.InterlockedExchangeAnyPointer(pcs, 0)
     56        Dim pcsOld = InterlockedExchangePointer(pcs As VoidPtr, 0) As *CRITICAL_SECTION
     57        If pcsOld <> 0 Then
     58            LeaveCriticalSection(ByVal pcsOld)
    5959        End If
    6060    End Sub

  • trunk/Include/Classes/ActiveBasic/index.ab

    r275 r335  
    11#require "./Core/index.ab"
     2#require "./Windows/index.ab"

  • trunk/Include/Classes/System/Diagnostics/TraceListener.ab

    r291 r335  
    141141                ' デバッグビューへ出力
    142142                Dim tempStr = GetIndentString() + message
    143                 OutputDebugString( tempStr )
     143                OutputDebugString( ToTCStr(tempStr) )
    144144
    145145                ' デバッグログへ書き込む

  • trunk/Include/Classes/System/Drawing/Color.ab

    r303 r335  
    44#define __SYSTEM_DRAWING_COLOR_AB__
    55
    6 #include <Classes/System/Math.ab>
     6'#include <Classes/System/Math.ab>
    77#include <Classes/System/Drawing/Imaging/misc.ab>
    88
    … …  
    7676        ToCOLORREF = RGB(R, G, B)
    7777    End Function
    78 
     78/*
    7979    Function ToArgb() As ARGB
    80         Return argb
    81     End Function
    82 
     80        ToArgb = argb
     81    End Function
     82*/
    8383    Static Function FromArgb(argb As ARGB) As Color
    8484        Return New Color(argb)

  • trunk/Include/Classes/System/Drawing/Rectangle.ab

    r303 r335  
    44#define __SYSTEM_DRAWING_RECTANGLE_AB__
    55
    6 #require <Classes/System/Math.ab>
     6'#require <Classes/System/Math.ab>
    77#require <Classes/System/Drawing/RectangleF.ab>
    88#require <Classes/System/Drawing/Point.ab>

  • trunk/Include/Classes/System/Drawing/RectangleF.ab

    r303 r335  
    44#define __SYSTEM_DRAWING_RECTANGLEF_AB__
    55
    6 #include <Classes/System/Math.ab>
     6'#include <Classes/System/Math.ab>
    77#include <Classes/System/Drawing/PointF.ab>
    88#include <Classes/System/Drawing/SizeF.ab>

  • trunk/Include/Classes/System/Drawing/Size.ab

    r303 r335  
    44#define __SYSTEM_DRAWING_SIZE_AB__
    55
    6 #include <Classes/System/Math.ab>
     6'#include <Classes/System/Math.ab>
    77#include <Classes/System/Drawing/SizeF.ab>
    88
Note: See TracChangeset for help on using the changeset viewer.