Вывод надписи поверх всех окон
Вывод надписи поверх всех окон
Вывод надписи поверх всех окон Для того чтобы написать или нарисовать что-то поверх всех окон нужно узнать дескриптор экрана. Это можно сделать так: ScreenDC:= GetDC(0); Теперь, зная его, можно рисовать на экране все, что угодно, поверх всех окон: procedure HelloWorld; var ScreenDC : HDC; begin ScreenDC:= GetDC(0); TextOut(ScreenDC, 100, 100, 'Hellow, world!', 13); end; Правда, есть минус - при перемещении окон, если они пересекают наш текст, он подтирается.
