Написание компонент и TDataLink [D6]
ton2 © (2002-11-14 12:52:00)
Пишу свой компонент который содержит поле Edit в котором
отображается номер текущей записи датасета, Label показывающий
число записей в датасете и кнопки навигации. связываю мой новый
компонент с датасетом через TDataLink. чтоб отловить момент когда
изменяется положение курсора в датасете пытаюсь использовать
DataSetChanged, вот так:
FDataLink := TDataLink.Create;
FDataLink.DataSetChanged:=DSChange;
где DSChange - моя процедура обработки события. когда пытаюсь
откомпилировать - говорит DataSetChanged - необъявленый
идентификатор хотя в TDataLink имеется этот метод, говорится в
хелпе. если не через DataSetChanged как еще можно отловить
изменение датасета?
Skier (2002-11-14 13:05:00) [1]
>ton2
Тебе нужно написать свой потомок
от TDataLink и уже в нём перекрыть
метод DataSetChanged
Примерно так :
TYourComponentDataLink = class(TDataLink)
private
FYourComponent : TYourComponent;
protected
procedure DataSetChanged; override;
public
constructor Create(AYourComponent: TYourComponent);
destructor Destroy; override;
end;//TYourComponentDataLink
Если хочешь подробно разобраться, то
посмотри как реализован класс TNavDataLink
в DBCtrls.pas
Наверх 
ЧАТ |
Орешник |
|
