APIs and External Function not working correcting...

For questions and postings not covered by the other forums
ConvertFromOldNGs
Posts: 5321
Joined: Wed Aug 05, 2009 5:19 pm

Re: APIs and External Function not working correcting...

Postby ConvertFromOldNGs » Fri Aug 07, 2009 12:53 pm

by Jared >> Tue, 7 Feb 2006 9:12:53 GMT

Hi Van, i tried what you said, but still no luck. Anymore ideas?




constants
SRCCOPY : Integer = 13369376;
vars
hWndDesk : Integer;
hDCDesk : Integer;
leftDesk : Integer;
topDesk : Integer;
widthDesk : Integer;
heightDesk : Integer;
result : Boolean;
begin
leftDesk := 0;
topDesk := 0;
widthDesk := 1024;
heightDesk := 768;

write picture1.picture.length;

hWndDesk := call jGetDesktopWindow();
hDCDesk := call jGetWindowDC(picture1.hwnd());

result := call jBitBlt(hDCDesk, 0, 0, widthDesk, heightDesk, hDCDesk, leftDesk, topDesk, SRCCOPY);

call jReleaseDC(picture1.hwnd(), hDCDesk);

write "result: " & result.String;
write picture1.picture.length;

end;


Return to “General Discussion”

Who is online

Users browsing this forum: No registered users and 19 guests