Ignore:
Timestamp:
Aug 3, 2008, 3:58:05 AM (16 years ago)
Author:
イグトランス (egtra)
Message:

ウィンドウ作成関数を親用のCreateFormと子用のCreateに分離。

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/Windows.ab

    r561 r575  
    101101        Dim pszMsg As PCSTR
    102102        FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER Or FORMAT_MESSAGE_FROM_SYSTEM Or FORMAT_MESSAGE_IGNORE_INSERTS,
    103             0, hr, LANG_USER_DEFAULT, VarPtr(pszMsg), 0, 0)
     103            0, hr, LANG_USER_DEFAULT, VarPtr(pszMsg) As PTSTR, 0, 0)
    104104        If pszMsg <> 0 Then
    105105            hresultToString = New String(pszMsg)
Note: See TracChangeset for help on using the changeset viewer.