Выполнение процедуры по адресу

Previous  Top  Next

    
 

 

 

Code:

var F: procedure(x, y: double);

 

@F := GetProcAddress(hDLL, 'SOMEPROC');

F(3, 4);

 

 

Ключом здесь является использование оператора @, располагаемого с левой части процедурной переменной. Он говорит компилятору: "Не волнуйтесь здесь о совместимости типов, просто присвойте полученный в правой части выражения адрес переменной в левой части выражения (и процедурные переменные являются переменными-указателями).

 

- Peter Below

©Drkb::00116

Взято из Советов по Delphi от Валентина Озерова

Сборник Kuliba