uses Graphics, Classes, WinProcs, SysUtils; type TGxBitmap = class( TBitmap ) <<<<<<<<требуется тип класса |
В Delphi 2.0 ссылка на WinProcs в действительности является ссылкой на модуль Windows. Модуль Windows практически является комбинацией модулей WinTypes и WinProcs. В нем определен тип с именем TBitmap и, поскольку WinProcs указан после Graphics, тип TBitmap в приведенном примере реально определяется в модуле Windows, а не Graphics.
Это работало в Delphi 1.0, поскольку вы должны были ссылаться на WinTypes для получения декларации TBitmap, но вы не делали этого.
Решение проблемы: в списке uses разместите Graphics после WinProcs.
- Pat Ritchey [000915]