Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579394 Sun, 16 Jan 2005 18:21:17 +0000 Переменная процедурного типа https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579394 Я про "of object" не знал :)]]> Виталик VCL https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579385 Sun, 16 Jan 2005 18:13:57 +0000 Переменная процедурного типа https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579385
    type
      FTMyFunction = function(Command: integer; Param: Pointer): boolean of object;
     
      MyFunctionVar := MyFunction;
]]> s-mike VCL https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579380 Sun, 16 Jan 2005 18:08:14 +0000 Переменная процедурного типа https://forum.sources.ru/index.php?showtopic=79689&view=findpost&p=579380
    function TForm1.MyFunction(Command: integer; Param: Pointer): boolean;
    begin
      //...
    end;
Есть переменная процедурного типа.
    type
      FTMyFunction = function(Command: integer; Param: Pointer): boolean;
    var
      MyFunctionVar: FTMyFunction;
Как в переменную MyFunctionVar записать адрес функции/метода MyFunction? :unsure:]]> Виталик VCL