Player на Delphi

@TTEMMA · Регистрация: 08.02.2013

Author24 — интернет-сервис помощи студентам

Как реализовать появление GroupBox(к примеру) при наведение на его мышкой(Сам GroupBox скрыт), а при уведения мышки с границ GroupBox должен проподать.
Как такое сделать?

@cotseec · 18.03.2013, 21:51

Delphi

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
  Pt:TPoint;
begin
  Pt.X:=x;
  Pt.Y:=Y;
  GroupBox1.Visible:=PtInRect(GroupBox1.BoundsRect,Pt);
end;

@mss · 18.03.2013, 23:29

Если бы не Player, то "наведения-уведения-проподания" для автора, видимо, проблемой не является.
То есть проблема именно в том что сотворяется именно Player.

Восхитительно.

@TTEMMA 0 / 0 / 0 Регистрация: 08.02.2013 Сообщений: 14
		1
	Player на Delphi 18.03.2013, 19:11. Показов 997. Ответов 2 Метки нет (Все метки) Как реализовать появление GroupBox(к примеру) при наведение на его мышкой(Сам GroupBox скрыт), а при уведения мышки с границ GroupBox должен проподать. Как такое сделать? 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	18.03.2013, 23:29	3
	Если бы не Player, то "наведения-уведения-проподания" для автора, видимо, проблемой не является. То есть проблема именно в том что сотворяется именно Player. Восхитительно. 0

Player на Delphi

Решение