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 Create a palette with more than one entry ?
How to Get a handle on your files ?
How to Detect if the system time has been changed ?
How to create SQL queries with SQL Builder?
How to Create Non-Visual Components Without Icons ?
With what commands you can Delete a directory and all the directories with files?
What are the Color reduction techniques for graphics?
How to Change the main form of an application at runtime ?
what are the Differences between Create(Self) and Create(Application)?
How to Get user name and company info from Windows?
How to Change font color on standard win controls?
How to access more than one table with the QuickRep component?