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 Access new interfaces in a RemoteDataModule?
What is the procedure to access the database from delphi?
How to Create Non-Visual Components Without Icons ?
How do we get access to a database from Delphi?
How to Get the current line number of a TMemo?
How to Get a list of valid time zones from windows?
Where is TReport in Delphi 6?
How to avoid expanding a tree node when double-clicking on it?
How to debug an Apache Shared Module?
How to draw directly on the Windows Desktop?
How to Set a form's maxwidth in code?
How to get the date of the last day in the current month?