Ignore:
Timestamp:
Mar 12, 2008, 9:54:46 PM (16 years ago)
Author:
イグトランス (egtra)
Message:

実験として書いていたControlクラスを追加（せめてコミット前に既存のContorolに混ぜようとしたがコンパイルできなかった）。
ほかForms, Drawing及びGDI+の修正。

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Include/Classes/System/Console.ab

    r435 r473  
    3636    */
    3737    Static Function ReadLine() As String
    38         Dim lock = enter()
    39         Try
    40             ReadLine = in.ReadLine()
    41         Finally
    42             lock.Leave()
    43         End Try
     38        ReadLine = in.ReadLine()
    4439    End Function
    4540
    … …  
    5045    */
    5146    Static Function Read() As Long
    52         Dim lock = enter()
    53         Try
    54             Read = in.Read()
    55         Finally
    56             lock.Leave()
    57         End Try
     47        Read = in.Read()
    5848    End Function
    5949Private
Note: See TracChangeset for help on using the changeset viewer.