Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Save the screen to a file, how?

Posted on 1997-09-27
3
Medium Priority
?
202 Views
Last Modified: 2010-04-04
Instead of printing the text and picture to printer
in the run time, how can I save them to a file in Word
or some other packedges so that I can print them out
from Word or the other packedges?
0
Comment
Question by:zhuhail
3 Comments
 
LVL 4

Accepted Solution

by:
erajoj earned 150 total points
ID: 1346362
I'm shooting in the dark here, since your question is slightly
ambiguous, however:
If you're just going to capture the screen from time to time,
use the "Print Scrn" button on the keyboard to get the whole screen or Alt+"Print Scrn" to get the window that currently has
the focus. Then just paste the image into Word.
No real use in doing it programmatically, unless you intend to;
either do it more often, or if it has to, for some reason, be
integrated into an application.

/// John

0
 

Expert Comment

by:Daveyboy
ID: 1346363
To start I concur with John about the use of such an appliaction But, if you really do need to do this then i would recomend One of two Functions that I have used before.
1: CopyRect.{This will allow you to copy a rectangle of a given canvas to another rectangle on another Canvas}.  the Code is easy to create:  Simply create a Bitmap i.e MyBit := TBitmap.create then use copyrect to create a copy of the screen to you Bitmap i.e.
CopyRect(Dest: TRect; Canvas: TCanvas; Source: TRect);
CopyRect(Trect(Bitmap.left,Bitmap.right etc.),Screen,Trect(0,0,Screen.width,Screen.height));

then just do a MyBit.savetofile('Filename');

Using Copyrect is the easiest but a little Slow
Try using the BitBlt function if you need to do this faster

////dave
0
 

Author Comment

by:zhuhail
ID: 1346364
Thanks to John and Dave.
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This Micro Tutorial will teach you how to add a cinematic look to any film or video out there. There are very few simple steps that you will follow to do so. This will be demonstrated using Adobe Premiere Pro CS6.
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
Suggested Courses

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question