PC Toledo

Nada feito.
Isso tudo é pra TAB, que tem TABPAGES que são janelas reais.
Não se aplica a SysTabControl32.

Possibilidades:
Talvez criar panel em cada tabpage, pros GETs ficarem numa janela real
Refazer tudo pra existirem janelas reais pra tabpage.

Complicou pra solução, não sei como era na hwgui 2.17.

... topics page.
Admin Configuration: As an administrator, you can ensure this feature is enabled for specific forums.
Go to the Administrator Control Panel (ACP).
Navigate to the "Forums" tab, then "Manage Forums".
Edit a specific forum (click the green gear icon or edit link).
Set the option "Display ...

... HMG_PrinterMetaFileDC
* _HMG_SYSDATA [ 503 ] -> #xtranslate --> _HMG_FindReplaceOptions
* _HMG_SYSDATA [ 504 ] -> {x,y,w,h} --> Position of Panel Window

* _HMG_SYSDATA [ 505 ] -> PrintPreview NotSaveButton --> .T. or .F.
* _HMG_SYSDATA [ 506 ] -> PrintPreview Dialog cFileName
* _HMG ...

... HMG_SYSDATA [ 67 ] , FormHandle )
aAdd ( _HMG_SYSDATA [ 68 ] , .f. )
aAdd ( _HMG_SYSDATA [ 69 ] , cType )
aAdd ( _HMG_SYSDATA [ 70 ] , If ( panel , Parenthandle , 0 ) )
aAdd ( _HMG_SYSDATA [ 71 ] , ReleaseProcedure )
aAdd ( _HMG_SYSDATA [ 72 ] , InitProcedure )
aAdd ( _HMG_SYSDATA [ 73 ...

... aWinData, _HMG_SYSDATA [ 68 ] [k] ) // .f.
AADD ( aWinData, _HMG_SYSDATA [ 69 ] [k] ) // cType
AADD ( aWinData, _HMG_SYSDATA [ 70 ] [k] ) // If ( panel , Parenthandle , 0 )
AADD ( aWinData, _HMG_SYSDATA [ 71 ] [k] ) // ReleaseProcedure
AADD ( aWinData, _HMG_SYSDATA [ 72 ] [k] ) // InitProcedure ...

... seria multithread mesmo.

Em HWGUI e FIVEWIN teve a vantagem de OOP e tab dentro de tab, com restrição pra DIALOG.
Em HMG teve a vantagem de WINDOW PANEL, que aceita qualquer coisa.
Qual é melhor ? sei lá... todas fizeram o que era pra ser feito.

O detalhe de atualização da minigui é pesquisar como ...

... se clique em alguma, aí aparece o nome.
Acho que precisa alguma rotina a mais no clique da aba.
NÃO É TAB, é um BROWSE simulando as tabs, e WINDOW PANEL simulando as tabpages.
Está tudo funcionando, exceto essa falha de atualização.

demo.zip

Sem usar OOP, sem usar MACRO, sem usar variável PUBLIC ...

/*
demolenta2.prg
*/

// Lenta and panels, used as a replacement of a colorized tab
#include "hwgui.ch"

#define CLR_LIGHTGRAY_2 0xaaaaaa
#define CLR_BROWN_1 0x154780
#define CLR_BROWN_2 0x396eaa
#define CLR_BROWN_3 0x6a9cd4
#define CLR_BROWN_4 0x9dc7f6
#define CLR_DLGBACK 0x154780

FUNCTION ...

Tem uma coisa interessante nisso....

O fonte tava bom pra dialog.
O fonte tava bom pra tab.
Mas chegou na hora do panel, fez falta o "OF oDlg".

Como eu já disse, é testar todas as situações que poderiam acontecer num aplicativo.
Esse negócio de reutilizar exemplo tá ajudando a testar isso mais ...

FOR nCont = 1 TO Len( aPaneList )
@ 20, 150 PANEL aPaneList[nCont] SIZE 600, 200 STYLE SS_OWNERDRAW BACKCOLOR NextBackColor() ON SIZE { || .T. }
aPaneList[ nCont ]:oFont := oFont
aCaptionList[ nCont ] := Chr( 64 + nCont )
aPaneList[ nCont ]:Hide()
NEXT

aCaptionList[ 1 ] := "One"
@ 20, 16 ...

Como eu já disse, automático é comigo mesmo kkkkk

Aba1

@ 20, 150 PANEL oPane1 SIZE 360, 200 STYLE SS_OWNERDRAW BACKCOLOR CLR_BROWN_3 ON SIZE { || .T. }
AAdd( aChildList, oPane1 )
oPane1:oFont := oFont
@ 20, 16 EDITBOX "Pyotr" OF oPane1 SIZE 200, 26
@ 20, 46 EDITBOX "Ilyich" OF oPane1 SIZE 200 ...

PANEL em DIALOG
Olhei o tutorial, SS_OWNERDRAW resolveu

Nos demais casos não.

... hwg_IsCheckedMenuItem( , 1002 ) )
MENUITEM "Tabpage 2" ID 1003 ;
ACTION hwg_CheckMenuItem( , 1003, ! hwg_IsCheckedMenuItem( , 1003 ) )
MENUITEM "Panel" ID 1004 ;
ACTION hwg_CheckMenuItem( , 1004, ! hwg_IsCheckedMenuItem( , 1004 ) )
MENUITEM "MDI" ID 1005 ;
ACTION hwg_CheckMenuItem( , 1005 ...

... hwg_IsCheckedMenuItem( , 1001 ) )
MENUITEM "Tabpage" ID 1002 ;
ACTION hwg_CheckMenuItem( , 1002, ! hwg_IsCheckedMenuItem( , 1002 ) )
MENUITEM "Panel" ID 1003 ;
ACTION hwg_CheckMenuItem( , 1003, ! hwg_IsCheckedMenuItem( , 1003 ) )
MENUITEM "MDI" ID 1004 ;
ACTION hwg_CheckMenuItem( , 1004 ...

... hwg_IsCheckedMenuItem( , 1001 ) )
MENUITEM "Tabpage" ID 1002 ;
ACTION hwg_CheckMenuItem( , 1002, ! hwg_IsCheckedMenuItem( , 1002 ) )
MENUITEM "Panel" ID 1003 ;
ACTION hwg_CheckMenuItem( , 1003, ! hwg_IsCheckedMenuItem( , 1003 ) )
MENUITEM "MDI" ID 1004 ;
ACTION hwg_CheckMenuItem( , 1004 ...