Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Переопределение события / 3 сообщений из 3, страница 1 из 1
02.10.2003, 16:05
    #32282249
Петр
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переопределение события
Господа, поскажите, никак не могу сообразить простую вещь.
Создаю компоненту потомок TADODataSet, как определяется конструкция которая бы выполняла некий кусок кода по событию ADODataSet.AfterOpen.
Обязательно ли оформлять это как

type
TADODataSetA = class(TADODataSet)
***
constructor TADODataSetA.Create(AOwner: TADODataSet);
begin
inherited Create(AOwner);
AOwnert.AfterOpen := AfterOpenMy;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2003, 16:32
    #32282300
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переопределение события
Тебе надо переопределить метод DoAfterOpen, объявленного в TDataSet. Примерно так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
type
  TMyADODataSet = class(TADODataSet)
    procedure DoAfterOpen; override;
  end;

...

procedure TMyADODataSet.DoAfterOpen;
begin
  //Здесь твоя обработка
  inherited DoAfterOpen;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2003, 16:54
    #32282330
Петр
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переопределение события
2pkarklin Спасибо, он самое...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Переопределение события / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]