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 do Sorting on Calculated fields ?
Does Kylix support Postgres?
How to Use the LzExpand functions in your applications?
How to Determine the last access time of a given file ?
How to Use the WinApi GetObject to get a bitmap?
How to Broadcast a message?
How to Simulate a mouse move in code?
How to Retrieve the line number that a memo's cursor is on?
What are the different types of inheritances present in delphi?
How to create Interbase stored procedures that return parameters with TIBQuery?
How to Customize TTrackBar?
How to use the TUpdateSQLProvider.OnUpdateRecord method ?