How to draw directly on the Windows Desktop?
Through some API functions like
To draw a text
Handle := GetDesktopWindow;
Dc := GetWindowDC(Handle) ;
ACanvas := TCanvas.Create;
try
ACanvas.Handle := DC;
BeginPath(ACanvas.Handle) ;
ACanvas.Font.Color := clRed;
ACanvas.Font.Name := 'Tahoma';
ACanvas.Font.Size := 30;
SetBkMode(ACanvas.Handle, TRANSPARENT) ;
EndPath(ACanvas.Handle) ;
ACanvas.TextOut(0, 0, TextToDraw) ;
finally
ReleaseDC(Handle, ACanvas.Handle) ;
ACanvas.Free;
end;
| Is This Answer Correct ? | 2 Yes | 2 No |
How to Retrieve a users login name ?
How to Check drive ready status?
Do I have to understand object-oriented programming to use Delphi?
Explain the methods findfirst, findnext and findclose?
How to Change the font in a hint window ?
How to prevent application?s main window from showing when application loads?
How to Connect via ODBC using Delphi or C++ Builder ?
How to Change RichEdit Font styles with HotKey combinations ?
Does Delphi have an equivalent to the Visual Basic SendKeys function?
What if I do not have a CD-ROM drive?
Can we create stored procedures via Delphi or C++ Builder?
How to change Kylix directory permissions for all users when installed as root?