Declare Function CAllocate cdecl ( ByVal num_elements As Integer, ByVal size As Integer = 1 ) As Any Ptr

result = CAllocate( num_elements [, size ] )

num_elements
size

Если успешно, то возвращается адрес начала выделяемой памяти. Если безуспешно, то будет возвращён нулевой (пустой) (0) указатель.

CAllocate инициализирует выделенную память, заполняя её нулями. Следовательно CAllocate может быть также напрямую использована с String или Udt, содержащими строковую переменную (string), так как строковый дескриптор сначала ощищается (устанавливается на 0).

' Выделяем и инициализируем место в памяти для 10 элементов типа integer.
Dim p As Integer Ptr = CAllocate(10, SizeOf(Integer))

' Заполняем эту память целочисленными (integer) значениями.
For index As Integer = 0 To 9
    p[index] = (index + 1) * 10
Next

' Выводим на экран эти значения.
For index As Integer = 0 To 9
    Print p[index] ;
Next

' Освобождаем этот блок памяти.
Deallocate(p)

Результат:

 10 20 30 40 50 60 70 80 90 100

• Для данной процедуры безопасность потока не гарантированна.
  
  

• Не доступна в диалекте -lang qb если только нет ссылки через alias __Callocate.
  
  

• Новая в FreeBASIC
  
  

• Allocate
  
• Deallocate
  
• Reallocate