Можно ли из Delphi рисовать в любой части экрана или в чужом окне?

Для этого надо воспользоваться функциями API. Получить контекст чужого окна, либо всего экрана:

function GetDC(Wnd: HWnd): HDC;

где Wnd - указатель на нужное окно, или 0 для получения контекста всего экрана.

И далее, пользуясь функциями API, нарисовать все что надо.

Пример:

PROCEDURE DrawOnScreen; 
 VAR ScreenDC: hDC; 
 BEGIN 
 
 ScreenDC := GetDC(0); {получить контекст экрана} 
 Ellipse(ScreenDC, 0, 0, 200, 200); {нарисовать} 
 ReleaseDC(0,ScreenDC); {освободить контекст} 
 
END;

Поддержка сайта

Залетите на просторы мистер бит зеркало, не утрачивая потенциала испытать успех. Каждый гость портала сумеет рассчитывать на реальные деньги, заполучив победу в одном из игровых слотов. Многообразие предложений поражает даже грамотных игроков.

Последние комментарии

  • vitality ed pills cure for ed or natural ed medications treatment for erectile dysfunction or how to get amoxicillin can i buy amoxicillin over the counter or prednisone 20 mg tablets coupon prednisone 5mg coupon or vacuum pump for ed ed pills for sale
  • erectile dysfunction medication comparison of ed drugs ed cures that work otc ed pills https://canadianpharmacyvikky.com real viagra without a doctor prescription usa ed aids buy prescription drugs online without herbal remedies for ed
  • ed medications over the counter canadian pharmacy vikky best ed drugs new erectile dysfunction treatment https://canadianpharmacyvikky.com ed pills online

Счетчики