procedure Init(PRec:PParamRec; var ed:pointer; DTools:PDrawTools); cdecl;
где DTools есть вот эта структура
TDrawTools = object
public
CreateBitmap:function (PRec:PPParamRec):cardinal; cdecl;
DrawBitmap:procedure (Bmp:cardinal; DC:HDC; X,Y:integer); cdecl;
DeleteBitmap:procedure (Bmp:cardinal); cdecl;
end;
PDrawTools = ^TDrawTools;
Унаследованные поля этой переменной -- CreateBitmap, DrawBitmap и DeleteBitmap есть методы. Так вот, где находится исполняемый код этих методов, я предполагаю, что в HiAsm'e
------------ Дoбавленo:
Версия 2.60
Добавлено смещение времени и одноименный модуль draw-отрисовки в designtime (для этого файл Clock.dll необходимо поместить в папку draw)
Поиск
Друзья
Администрация