kamlesh patel
unread,Nov 4, 2025, 7:40:31 AM (3 days ago) Nov 4Sign in to reply to author
Sign in to forward
You do not have permission to delete messages in this group
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to harbou...@googlegroups.com
Hello,
Below code working fine no error but windows 10 is fast replay and
Windows 11 is slow replay.
Any idea.
PROCEDURE Main()
LOCAL cData := "Hello World"
LOCAL cEXE := "ChildProc.exe"
LOCAL nBytes, nChild, nError, nStdIN, nStdOUT, nStdERR
CLS
? "Opening child process:", cEXE
nChild := HB_OpenProcess( cEXE, @nStdIN, @nStdOUT, @nStdERR )
IF nChild < 0
? "Error:", FError()
QUIT
ENDIF
? "Reading errors : "
cData := Space( 1000 )
nBytes := Fread( nStdERR, @cData, Len(cData) )
?? Left( cData, nBytes )
? "Waiting for end :", HB_ProcessValue( nChild )
FClose( nChild )
FClose( nStdIN )
FClose( nStdOUT )
FClose( nStdERR )
RETURN
Regards
Kamlesh