Procedure GetTextImage(X1,Y1,X2,Y2:Word;Data:Pointer)

    Updates VX and VY       : No
    Updates Cursor Position : No

    This  is  like  Graph.GetImage.    It  gets  a  rectangular  area  of
    the screen and copies it to memory.

    Example

    Size:=TextImageSize(70,70,90,100);
    New(DataSave,Size);
    GetTextImage(70,70,90,100,DataSave);

    Caution

    When using Graph.GetImage one would use

    GetImage(70,70,90,100,DataSave^)

    but the ^ character is not used for GetTextImage.