Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отловить фокус мышки на кнопке заголовка rxDBGrid [D6]

ЮРИЙ_К © (2002-08-20 13:42:00)
Коллеги, может кто подскажет, возможно-ли такое САБЖ. Хотелось-бы, зная, на какую кнопку хочет нажать пользователь - менять форму курсора.

ЮРИЙ_К (2002-08-20 18:54:00) [1]
>> Ученик

Все, большое спасибо, сам додумал , просто нужно ешшо и GC.X проверять , за идею ешшо раз спасибо 8-)

ЮРИЙ_К (2002-08-20 18:33:00) [2]
Ученик
Класс, уже не плохо, однако мне ешшо нужно определить, над кнопкой какого поля находится. Т.Е. я могу некоторые из них блокировать

procedure TTabelFrm.DBGrid1CheckButton(Sender: TObject; ACol: Integer;
Field: TField; var Enabled: Boolean);
begin
Enabled := (Field <> nil) and ((Field.FieldName = "TabNomProp") or
(Field.FieldName = "SotrName"));
end;

вот и хочется над незаблокированными один курсор, над остальными - другой

Ученик (2002-08-20 14:36:00) [3]
procedure TForm1.RxDBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
GC : TGridCoord;
begin
if Shift = [] then begin
GC := RxDBGrid1.MouseCoord(X, Y);
if GC.Y = 0 then
Screen.Cursor := crHandPoint
else
Screen.Cursor := crDefault
end
end;

ЮРИЙ_К (2002-08-20 14:26:00) [4]
У rxGrid есть свойсто TitleButtons. После установки его в True заголовки полей грида превращаются в кнопки. Т.е. очень удобно посредством этого производить сортировку, кликая по соответствующим кнопкам полей. Вот мне и интересно, можно-ли узнать, на какую кнопку приходится клик мыши. Ну типо событие любой простой кнопки onMouseMove...

lenin (2002-08-20 13:45:00) [5]
??????????????????

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »