0
votes
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

Statistics

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

Visits by Source

User Actions

Users who voted for this posting

Subscribe:
Contact us to advertise on DelphiFeeds.com

Community Links

Torry Firebird News

Sponsor

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