void __fastcall TMyImage::OnMouseMove(int x, int y)
{
if (x<a && y<b)
Hint->Text = "blabla1";
if (x=a && y=b)
Hint->Text = "blabla2";
}
Всплывающие сообщения на Image
В общем у меня на Image строится график с выделенными точками, как сделать так чтобы при наводе мышкой на эту точку у меня появлялось всплывающее сообщения допустим с координатами или с каким либо другим текстом? :confused:
ловить перемещение мыши (WM_MOUSEMOVE), и в зависимости от координат присваивать определенное значение хинту
Заранее благодарю.
Код:
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
if (X<100 && Y<100)
Image1->Hint = "blabla1";
if (X=100 && Y=100)
Image1->Hint = "blabla2";
}
Hint->Text: Такого свойства у Hint вообще нет(или я просто не нашёл)
Если поставить Image1->ShowHint=true; то будет появляться пояснение, но в любом месте Image. Как быть, чтобы тока над точкой всплывало?
Цитата: Overmax2
Если поставить Image1->ShowHint=true; то будет появляться пояснение, но в любом месте Image. Как быть, чтобы тока над точкой всплывало?
Application::ActivateHint(...);
GIZMO если можно то по подробней пожалуйста и с примером, так мало понятно как это работает.
Цитата: Overmax2
GIZMO если можно то по подробней пожалуйста и с примером, так мало понятно как это работает.
Application->ActivateHint( TPoint( X, Y ) );
Вот как делаю я (hint не показывается):
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Application->ActivateHint( TPoint( X, Y ));
if (X<100 && Y<100) {Image1->Hint = "blabla1";}
if (X==100 && Y==100) {Image1->Hint = "blabla2";}
}
во-вторых, логичнее было бы сначала почитать справку по ActivateHint прежде, чем городить огород и спрашивать примеры элементарных вещей (именно элементарных, потому что вы уже получили имена ф-й для решения вашей проблемы и, я так полагаю, можете заглянуть в справочку ;)). как думаете?
ps: только справку читайте внимательно, а то порой бывают приписочки мелким шрифтом ;)