TAB inside PAGE is it possible?

[José Quintas]

José M. C. Quintas

[Grigory Filatov]

Hi Jose,

> TAB inside PAGE is it possible?

No, it is not possible (as shown in your picture).

But we have a clever workaround that uses the TBROWSE control as the sheet container.

Please see the following images from the example in the MiniGUI distribution.

and so on for next sheets.

Hope this is useful.

Grigory

суббота, 17 мая 2025 г. в 05:39:20 UTC+2, jmcqu...@gmail.com:

[José Quintas]

Thanks

For the work I want to do, window panel will be better than tab.

José M. C. Quintas

[José Quintas]

Could you help me ?

When several names (10), right arrow do not update browse, but left arrow ok.

José M. C. Quintas

[José Quintas]

forgot this function:

STATIC FUNCTION ze_name( cTipo )

   STATIC nIndex := 0

   nIndex += 1

   RETURN cTipo + Ltrim( Str( nIndex ) )

José M. C. Quintas

[José Quintas]

And how to get the object?

   oBrw := GetProperty( xDlg, xBrowse )

José M. C. Quintas

[Grigory Filatov]

> how to get the object?

FUNCTION GetBrowseObj( cBrw, cParent )          

  LOCAL oBrw, i

  If ( i := GetControlIndex( cBrw, cParent ) ) > 0
     oBrw := _HMG_aControlIds [ i ]
  EndIf

RETURN oBrw

воскресенье, 18 мая 2025 г. в 11:45:34 UTC+2, jmcqu...@gmail.com:

[José Quintas]

my test

dembutton.prg compiled alone

demobutton.prg compiled together with demo.prg, inside a tabpage (simulated by browse)

same with demobrowse10.prg

Changed demobrowse10.prg partial because fake oop is bad to do this.

On image, 3 level of tabs.

Note: need extra code for 2 level of tabs.(browse)

José M. C. Quintas