Help:
I've written a EXE called PrintScreen.exe in Delphi 5. This VFP program file is invoked by Shift-F5 combination from within my VFP 6.0 sp5 app. Compiled as an EXE, but run as do MRM in the command window, everything works as expected. When I run MRM.exe from Windows 2000, the PrintScreen.exe app, generates an error "Cannot open file 56347638.bmp". I'm using Steve Ruhl's ScrnPrint utilities from the files section and Ed Rauh's API_AppRun utility.
I'm guessing that the BMP files isn't quite closed when PrintScreen tries to load it. After the error message, I can dbl-click on it on the HD and my Futuris Imager app, loads it just fine.
TIA,
Mike Timpe
Micro Vane, Inc.
* BEGIN PRINTSCR.PRG()
* Description:
* Parameters: -
* -
* Returns: -
* Notes: 1.
* 2.
* Revisions: 07/11/2001 - MWT
* - Created
local lnSelect
local lcProcedures
local lcImageFileName
lcProcedures = SET( "PROCEDURE" )
lnSelect = select()
create cursor PrintScreen (ScreenPrt G, Notes M)
select PrintScreen
append blank
SET PROCEDURE TO appmeth additive
lcImageFileName = SaveasBitmap()
SET PROCEDURE TO (lcProcedures)
oRunit = newobject("Api_AppRun", "Process.vcx")
oRunit.icCommandline = "PrintScreen.exe " + (lcImageFileName)
oRunit.LaunchAppAndWait()
oRunit = .NULL.
Delete File lcImageFileName
select (lnSelect) && Restore to the original work area
* END PRINTSCR.PRG()
Mike