Ignore:
Timestamp:
Oct 24, 2007, 12:32:20 AM (17 years ago)
Author:
イグトランス (egtra)
Message:

FormatFloatFを実装

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/bin/SubOperation/dx/main_exe_directx.abp

    r187 r364  
    22
    33
    4 Dim ScreenX=640 As Long 'ディスプレイの幅  (ピクセル単位)
    5 Dim ScreenY=480 As Long 'ディスプレイの高さ(ピクセル単位)
     4Dim ScreenX = 640 As Long   'ディスプレイの幅  (ピクセル単位)
     5Dim ScreenY = 480 As Long   'ディスプレイの高さ(ピクセル単位)
    66
    77' TODO: この位置にグローバル変数を定義してください。
    88
    99
    10 Function InitProc() As BOOL
     10Function InitProc() As Boolean
    1111    'DirectXを初期化
    12     If dx_Init(hMainWnd,ScreenX,ScreenY,FALSE)=0 Then
    13         InitProc=0
     12    If dx_Init(hMainWnd, ScreenX, ScreenY, FALSE)=0 Then
     13        InitProc=False
    1414        Exit Function
    1515    End If
     
    2020    ' TODO: この位置にアプリケーションの初期化コードを記述してください。
    2121
    22     InitProc=1
     22    InitProc = True
    2323End Function
    2424
     
    4949'------------------------------------------------
    5050
    51 If InitProc()=0 Then
     51If InitProc() = False Then
    5252    MessageBox(0,"初期化に失敗しました。","Error",MB_OK or MB_ICONEXCLAMATION)
    5353    ExitProcess(0)
     
    104104
    105105QuitProc()
    106 ExitProcess(msgMain.wParam)
     106System.Environment.ExitCode = msgMain.wParam As Long
     107End
Note: See TracChangeset for help on using the changeset viewer.