Consultor Eletrônico



Kbase P96749: How to open an image file with IrfanView graphic viewer using Progress 4GL?
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   08/11/2005
Status: Unverified

GOAL:


How to open an image file with IrfanView graphic viewer using Progress 4GL?

GOAL:

How run IrfanView graphic viewer from Progress 4GL?

FACT(s) (Environment):

Windows

FIX:

Use the windows WinExec API call as per the following sample code:
DEFINE VARIABLE iReturnResult AS INTEGER NO-UNDO.
DEFINE VARIABLE cProgramName AS CHARACTER NO-UNDO.
DEFINE VARIABLE cFileName AS CHARACTER NO-UNDO.
cProgramName = "C:\Program Files\IrfanView\i_view32.exe".
cFileName = "C:\wrk91d\ChristopherVasko.jpg".
RUN WinExec (INPUT cProgramName + CHR(32) + cFileName , INPUT 1, OUTPUT iReturnResult).
PROCEDURE WinExec EXTERNAL "KERNEL32.DLL":
DEFINE INPUT PARAMETER ProgramName AS CHARACTER.
DEFINE INPUT PARAMETER VisualStyle AS LONG.
DEFINE RETURN PARAMETER StatusCode AS LONG.
END PROCEDURE.