Hi,
The browser is expanded to full screen. Is it possible to determine the screen coordinates of a browser page ?
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Coordinates of a browser page
Dear Yuri,
Do you mean using WebView ?
Since there is no FW with WebView support yet, I use PowerShell 
And what do you do from powershell ?
Please explain it 
From my FW program, I do a screen grabber via PS. Everything works. But when creating a screenshot via .CopyFromScreen I would like to receive only the working application window/browser page (without title, menu, frames, etc.)
> From my FW program, I do a screen grabber via PS. Everything works.
How you do it ? please explain it
> But when creating a screenshot via .CopyFromScreen I would like to receive only the working application window/browser page (without title, menu, frames, etc.)
What is CopyFromScreen ? Is it a PS command ? Please explain it in detail so we can help
Through Enum I get a list of visible application windows and through WMI the process name for each window.
In the loop, I bring the windows to the foreground and maximize them. At this moment I am executing a PS script in which by means of the PS method .CopyFromScreen I take a screenshot, which I save to a file
could you please copy the code here to test it ?
Sorry Antonio, I didn't understand - the code of what.. PS-script ?
hi
i do use VK_SNAPSHOT
---
to get Result of PowerShell i use " | CLIP "
i do use VK_SNAPSHOT
System.EmptyClipboard
SENDKEY( VK_SNAPSHOT )
// Wait to get hBitmap
hBitmap1 := 0
DO WHILE hBitmap1 = 0---
to get Result of PowerShell i use " | CLIP "
LOCAL cStep1 := "Get-SmbServerConfiguration "
LOCAL cClip := " | CLIP "
LOCAL cRun := "PowerShell.EXE "
LOCAL cPara := "-ExecutionPolicy Bypass -Command "
LOCAL cFile1 := HB_DirBase() + "GETSMB.PS1"
nHandle := FCREATE( cFile1, FC_NORMAL )
IF nHandle == - 1
MsgInfo( "Error create File : " + cFile1, STR( FERROR() ) )
RETURN
ELSE
FWRITE( nHandle, cStep1 + cClip )
FWRITE( nHandle, CRLF + "EXIT" )
FCLOSE( nHandle )
ENDIF
cMore := cPara + cFile1
IF ShellExecute( 0, "open", cRun, cMore,, SW_HIDE ) > 32
nCount := 0
DO WHILE EMPTY( System.Clipboard )greeting,
Jimmy
Jimmy
Dear Yuri,
> Sorry Antonio, I didn't understand - the code of what.. PS-script ?
Yes, all the process you are doing, to reproduce it here and see how we can help you