Vote UpVote

Screen/Desktop grab in Delphi

Wizard Software – Ever wanted to grab all the desktop/screen in Delphi? Right, me too. I spent a lot of time searching around for different options, as usual, google is your friend. Lots of info available on the web but this code snippet works well: {------------------------------------------------------------------------------} procedure TfmMain.Grab(bm: TBitMap; gt : GrabType); var DestRect, SourceRect: TRect; h: THandle; hdcSrc : THandle; pt : TPoint; begin hdcSrc := 0 ; case(gt) of GTWINDOW, GTCLIENT : h := GetForeGroundWindow; GTSCREEN : h := GetDesktopWindow; else h := 0; end; if h <> 0 ...
Favorite? Off-Topic? Softy @ 2009-08-02 15:46


Visits: 129
Votes: 0
Favorites: 0
Off-Topic: 0

Visits by Source

User Actions

Users who voted for this posting

Contact us to advertise on DelphiFeeds.com

Community Links

Torry Firebird News


Please login or register to use this functionality.
(click on this box to dismiss)