AkelPad.MemAlloc (+ActiveX)

Выделить память.

MemAlloc(nSize)

Параметры

nSize

Размер в байтах.

Возвращаемое значение

Число. Указатель на выделенную память.

Пример

var hMainWnd = AkelPad.GetMainWnd();
var oSys = AkelPad.SystemFunction();
var pMessage = "MyMessage";
var pCaption = "MyCaption";
var lpMessageBuffer;
var lpCaptionBuffer;

if (lpMessageBuffer = AkelPad.MemAlloc(256)) {
    AkelPad.MemCopy(lpMessageBuffer, pMessage.substr(0, 255), 0 /*DT_ANSI*/ );

    if (lpCaptionBuffer = AkelPad.MemAlloc(256)) {
        AkelPad.MemCopy(lpCaptionBuffer, pCaption.substr(0, 255), 0 /*DT_ANSI*/ );

        oSys.Call("user32::MessageBoxA", hMainWnd, lpMessageBuffer, lpCaptionBuffer, 64 /*MB_ICONINFORMATION*/ );

        AkelPad.MemFree(lpCaptionBuffer);
    }
    AkelPad.MemFree(lpMessageBuffer);
}