|
Платные хостинги
Раскрутка сайта
Книги по программированию
TChart
- С помощью правой кнопки мыщи можно двигать график. Как сделать, чтобы при этом менялся вид курсора на вид руки? Что - то в свойствах я такого не нашел.
- можно сделать так:Код var Form1: TForm1; btn:TmouseButton;implementation{$R *.dfm}procedure TForm1.Chart1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);beginbtn:=Button;end;procedure TForm1.Chart1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);beginif btn=mbRight then Chart1.Cursor:=crHandPoint;end;highlightSyntax('delphiNhMTI=','delphi');т.е. отслеживаешь события маус даун и маус мув, если нажата левая кнопка и мыш движется то курсор меняется на руку в другом случае опять стрелка.ЗЫ может есть и более простое и красивое решение но это первое что пришло в голову после трудового дня
- Как так ненашол, я только что сам посмотрел на компоненте Chart (из вкладки Additional) есть сво-во Cursor, установи его в crHandPoint, и будет тебе рука.
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|
