| T O P I C R E V I E W |
| pierrotsc |
Posted - Apr 17 2018 : 10:24:53
How do you make that disappear when your cursor is off the imageen boundaries ? Right now, the hint just stay there and does not move.
I am using
xx := ImageEnView1.XScr2Bmp(X);
yy := ImageEnView1.yscr2bmp(Y);
if (xx >= 0) and (xx < ImageEnView1.IEBitmap.Width) and (yy >= 0) and (yy < ImageEnView1.IEBitmap.Height) then
begin
ImageEnView1.SetInteractionHint(Format('%d %d', [xx, yy]), X, Y, '0000 0000');
ImageEnView1.Paint();
end
else....What do i need to write here ?
Thanks
|
| 3 L A T E S T R E P L I E S (Newest First) |
| xequte |
Posted - Apr 22 2018 : 20:22:00
I'll improve the documentation.
Nigel
Xequte Software
www.imageen.com
|
| pierrotsc |
Posted - Apr 17 2018 : 10:42:48
Super. the code below did it
ImageEnVect.SetInteractionHint('', X, Y, '');
ImageEnVect.Paint();
Did not think about that
Best |
| w2m |
Posted - Apr 17 2018 : 10:35:13
Are you getting XY correctly?
iX := ImageEnView.Layers[ImageEnView.LayersCurrent].ConvXScr2Bmp(X);
iY := ImageEnView.Layers[ImageEnView.LayersCurrent].ConvYScr2Bmp(Y);
or
iX := ImageEnView.XScr2Bmp(X);
iY := ImageEnView.YScr2Bmp(Y);
in else block try setting hint to ''.
else
begin
ImageEnView1.SetInteractionHint(Format('%d %d', [xx, yy]), iX, iY, ' ');
ImageEnView1.Paint();
end;
Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development |
|
|
Search
