Abstract Error
Страницы:
<
1
2
>
2Wish © (2006-01-18 18:38:00)
for i:= ControlCount - 1 downto 0 do
if controls[i] is TImage then
if (controls[i] as TImage).tag <> 0 then
begin
if (Controls[i] as TImage).Left = m.Left then
if (Controls[i] as TImage).Top = m.Top + 64 then
(controls[i] as TImage).Free;
if (Controls[i] as TImage).Left = m.Left then
if (Controls[i] as TImage).Top = m.Top - 64 then
(controls[i] as TImage).Free;
if (Controls[i] as TImage).Left = m.Left - 64 then
if (Controls[i] as TImage).Top = m.Top then
(controls[i] as TImage).Free;
if (Controls[i] as TImage).Left = m.Left + 64 then
if (Controls[i] as TImage).Top = m.Top then
(controls[i] as TImage).Free;
end;
Здаствуйте, подскажите пожалуйста, что мне делать, это мой
код, свою работу он выполнает, но почему-то вызывает Abstarct
Error. У меня собственно два вопроса:
1. Что значит этот Abstarct Error? (В хелпе к Delphi ничего
про него нет.)
2. Как от него избавится?
Джо (2006-01-18 18:45:00) [21]
> 1. Что значит этот Abstarct Error? (В хелпе к Delphi ничего
> про него нет.)
EAbstractError is the exception class for attempts to call an
abstract method.
Unit
SysUtils
Description
EAbstractError is raised when an application tries to call an
Object Pascal abstract method. It is also raised at design time
when a component with an Object Pascal abstract method is placed on
a form.
Abstract methods are declared with the abstract directive and
must be overridden in descendant classes before an instance object
can be created.
(c) Delphi Help.
Страницы:
<
1
2
>
Наверх 
ЧАТ |
Орешник |
|
