Subordinate browsers
Posted: Mon Oct 21, 2024 1:09 pm
Hi,
As I work, I need to subordinate one xbrowser to another. Is it possible to do this ?
As I work, I need to subordinate one xbrowser to another. Is it possible to do this ?
www.FiveTechSoft.com
https://forums.fivetechsupport.com/
Code: Select all | Expand
SetParent(oBrw2:hWnd, oBrw1:hWnd)
Code: Select all | Expand
function ParentChildBrw
field CODE
local oDlg, oChild
USE CUSTOMER NEW SHARED VIA "DBFCDX"
SET ORDER TO TAG STATE
USE STATES NEW SHARED VIA "DBFCDX"
SET RELATION TO CODE INTO CUSTOMER SCOPED
GO TOP
oChild := XBROWSER "CUSTOMER" COLUMNS "STATE","CITY","SALARY" NOMODAL
XBROWSER "STATES" SETUP ( oBrw:bChange := { || oChild:Refresh() } )
return nil