Лидеры

Огромная благодарность за помощь !

var CursorPos: TPointF; begin CursorPos := Edit1.Caret.Flasher.Pos; end; Это позиция каретки в локальных координатах TEdit. Если нужно в коринатах формы, то читаем О видах координат в FireMonkey и конвертации между ними

Ну если уж брать алгоритмы нахождения пересечения, то универсальные. Например этот: http://angusj.com/delphi/clipper.php

спасибо мне нужно вывести сообщения если пользователя начисляется допустим деньги

На сколько я понял, вы хотите сделать слайдер. Два года назад я писал две статьи о двух способах создания такого слайдера. Слайдер изображений своими руками при помощи FMX 2.0. Часть 1 Слайдер изображений своими руками при помощи FMX 2.0. Часть 2 Более того, раньше был рабочий пример, наглядно демонстрирующий это. Посмотрите, эти статьи, я думаю они помогут вам. Пример реализации слайдера MetropolisUIFlipViewDemo.zip Этот пример убрали из поставки среды начиная с XE6

Тут есть варианты определения пересечения 1. Проверить, что хотя бы одна из вершин контрола находится в области расположения другого. Для этого нужно: Получить абсолютные координаты вершин контрола И проверить попадание каждой вершины в область другого контрола TControl.PointInObject. Если хотя бы одна вершина будет в области другого, значит контролы пересекаются. 2. Воспользоваться известными алгоритмами поиска пересечения двух выпуклых многоугольников Например: "Пересечение: Два выпуклых многоугольника"

Попробуйте покрутить свойство Anchors (все в False, либо наоборот все в True) Думаю дело в этом