Вниз
Скачать: CL | DM;

TListView    Найти похожие ветки 

← →
Chlavik ©   (2003-06-29 16:32) [0]

Как словить скрол ListView т.е. как написать собитие которое будет возникать при скроле (горизонтальном) ListView.


← →
Song ©   (2003-06-29 16:36) [1]

Наследник + WM_HSCROLL


← →
Chlavik ©   (2003-06-29 18:12) [2]

Т.е. написать класс на основе TListView? А нельзя как то проще? а то я мне просто будет не удобно создавать экземпляр будущего класса, мне надо что бы всё было в Object Inspectore...


← →
DVM ©   (2003-06-29 18:19) [3]


> А нельзя как то проще? а то я мне просто будет не удобно
> создавать экземпляр будущего класса, мне надо что бы всё
> было в Object Inspectore...

Создай компонент и "все будет в Object Inspectore"


← →
Chlavik ©   (2003-06-29 18:27) [4]

Ясно...


← →
Chlavik ©   (2003-06-29 20:41) [5]

Написал я новый класс (компонент) на TlistView ловлю в нём WM_HSCROLL и генерю OnHScroll. Событие происходит при скроле,НО я так понял сама месага до ListView не доходит потому что он потом не хочет скролится. Как сделать так чтобы и мне и ему?


type TSharezList=class(TListView)
protected
procedure DoOnHScroll;
private
FOnHorScroll:TNotifyEvent;
procedure WMHScroll(var Message: TMessage); message WM_HSCROLL;
destructor Destroy; override;
public
constructor Create(AOwner:TComponent); override;
published
property OnHorizontalScroll:TNotifyEvent read FOnHorScroll write FOnHorScroll;
end;



← →
Chlavik ©   (2003-06-29 20:46) [6]

Вопрос снят... Я забыл про inherited...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c
1-31298
Alex_Sudakov
2003-06-26 14:42
2003.07.10
SCCI


3-31132
Frist_May
2003-06-17 18:02
2003.07.10
Oracle + Delphi


1-31330
VISA
2003-06-27 10:53
2003.07.10
TImageList


4-31573
X-RayMan
2003-05-10 22:01
2003.07.10
Atom


14-31504
Silentium!
2003-06-19 17:29
2003.07.10
процессы




   Наверх