Провести линию в любом месте на экране

[Belfigor]

Как можно реализовать это в Дельфи? Я пробовал через LineTo но нарисованная таким образом линия исчезает проходя через некоторые окна
По сути мне нужно нарисовать прямоугольную рамку произвольных размеров с толщиной линии 1 пиксель, от 3х3 пикселя до 2560х1600. Думал LineTo поможет, но не тут-то было

[W0LF]

Пример во вложении...

[Belfigor]

Спасибо за пример, но способ используемый в нем мне не подходит. Фигуры рисуются, но на тех местах где они пересекаются с клиентской частью приложения поверх которого я хочу рисовать они тут же исчезают . Раньше я пользовался скриптовым языком AutoIt, там я решил эту проблему тем, что просто поверх целевого окна создавались окошки шириной или высотой 1 пиксель и тем самым формировали рамку. Но я не смог найти примеров создания окон в Delphi по средством CreateWindow

[W0LF]

Потому что ваше (или не ваше) приложение перерисовываеться... Поробуйте поставить рисование в таймер

[Belfigor]

Спасибо, буду пытаться.

[BOBAH13]

Если память не подводит, уже было уйма вопросов как рисовать на экране. В одном мы четко расписали несколько вариантов решения поставленной задачи. Поищите не поленитесь.