Показать сообщение отдельно

  #1224  
Старый 26.03.2008, 17:04
desTiny
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
С нами: 10139366

Репутация: 1502


По умолчанию

А вот и у меня вопрос возник Это конечно не критично, но всё же:

Как получить указатель на функцию из стандартных модулей, например, на функцию sin?

Я делал так:
Код:
type
num = Extended;
TFunc = function(x: num):num;
var
p: TFunc;

......
function sinus(x: num):num;
begin
  result := sin(x);
end;
......
  p := @sinus;
А хочется чего-нибудь типа
Код:
p := @System.sin;
,но так оно не работает.
__________________
Bedankt euch dafür bei euch selbst.

H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
 
Ответить с цитированием