FreeBasic
Главная
Вход
Регистрация
Среда, 09.10.2024, 10:47Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Пример указателя на функцию
haavДата: Вторник, 18.12.2012, 09:18 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 1363
Репутация: 49
Статус: Offline
Пример указателя на функцию


Code
Declare Function MyFunction(ByVal a As Integer) As Integer

Dim myFunctionPointer As Function(ByVal a As Integer) As Integer
myFunctionPointer = @MyFunction

'Calling from a function pointer
Print myFunctionPointer(12)

Function MyFunction(ByVal a As Integer) As Integer
      Return a + 1
End Function
sleep


Вы сохраняете власть над людьми покуда оставляете им что-то…Отберите у человека все, и этот человек уже будет неподвластен вам…
 
  • Страница 1 из 1
  • 1
Поиск: