PC Toledo

... oRtf:NewLine()

aTblMerge := { ;
{ {1, 2}, {3, 4} }, ;
{} ;
}

aHeadersA := { ;
{ "Product Meta Diagnostics", "", "Financial Metrics Control", "" }, ;
{ "SKU ID", "Item Description Data", "Cost (USD)", "Retail (USD)" } ;
}

// nTblHdColor (23rd param) = 2 -> Navy background on header ...

Olá!

Fernando Almeida escreveu: 09 Set 2026 10:43 no gerenciador de Projeto, no Tabelador de nome RECURSOS, faço desta forma:

O que é um "tabelador"?

Seria uma aba ou página ou tab do controle Tab Control ?

... method – corrected `SetWindow()` call
to pass the parent window (`::oParent`) instead of `Self`, and removed
invalid `::Super:Init()` call (HControl does not have an Init method).

2026-09-06 03:28 UTC-0300 Itamar Lins <itamarlins at gmail.com>
### Fixed
- **window.c**: fixed 64-bit ...

... the fallback.
- s_CreateDlgTemplate(), new s_FixupLargeCaptions(): the Windows
DLGTEMPLATE is a native 16-bit (WORD-addressed) structure; a
control caption larger than HWG_MAX_INLINE_CAPTION (2000 wide
chars) could overflow/corrupt the template buffer and make
DialogBoxIndirectParam ...

Olá!
Coisas primárias mesmo.
Navegação dentro dos controles da DIALOG.
Leiaute das colunas no browse.
E não tinha as DUAS barras SCROLL no EDIT MULTLINE e BROWSE.
Falta OBEDECER ir até o final do DBF/ARRAY, o "arrastar" do cursor da barra VERTICAL até o final do Browse.(TODO/Para fazer)

2026-08-12 ...

Olá!

Bom trabalho, parabéns aos envolvidos!

Seguindo esta linha de melhorias no controle Tab, perguntei para a IA do Google como implementar as funcionalidades que eu gostaria que este controle oferecesse.

Meu prompt:
eu uso a linguagem harbour junto com a biblioteca gráfica hwgui.
gostaria de ...

... failed
- IA__gtk_main_quit: assertion 'main_loops != NULL' failed

2026-08-08 20:45 UTC-0300 Itamar Lins <itamarlins at gmail.com>
* source/gtk/control.c
* source/gtk/htab.prg
- Add Tab Control Enable/Disable support and cross-platform compatibility layer. Linux/GTK OS.
Fixed edge-clicking ...

Olá!
Adicionado a opção Enable/Disable na (Tab Control)
Creio que foram "comitadas" todas as contribuições oferecidas pelo Deivid no SVN da Hwgui.
Falta essa opção no Linux, em adamento. Pq não é só mudar no fonte, tem que testar também.

2026-08-08 12:39 UTC-0300 Itamar Lins <itamarlins at gmail.com ...

... https://pctoledo.org/download/file.php?id=15060
2026-08-06 18:30 UTC+0300 Itamar M. Lins Jr. <itamarlins at gmail.com>
* source/winapi/control.c:
- Fixed HB_FUNC( HWG_INITSTATUS ) to perform proper cumulative
calculation of status bar right-edge parts coordinates (SB_SETPARTS ...

... Fix for compiling UNICODE(UTF8) Windows OS.
* \hwgui\source\winapi\hmonthc.prg
* \hwgui\source\common\editor\hcedit_w.c
* \hwgui\source\winapi\control.c
* \hwgui\source\winapi\draw.c
* \hwgui\source\winapi\registry.c


ATENÇÃO!
Não esquecer de HABILITAR o arquivo(s) para mudar para UNICODE ...

... oDoctoRel := oPago:FindFirst( "pago20:DoctoRelacionado" )
HPDF_Page_SetFont( oPage, oFontNorm, 7 )

DO WHILE oDoctoRel != NIL
IF nY < 180 // Control de Salto de Pagina
oPage := HPDF_AddPage( oPdf )
nY := 750
ImprimirEncabezadoTabla( oPage, oFontBold, @nY )
HPDF_Page_SetFont( oPage ...

... TEMPLATE PARENT Pedido_de_Vendas AT 25 , 317 WIDTH"
e na rotina Pedido_de_Vendas_OnIni coloco o procedimento que vai verificar se já existe o control, e se não existir, faço o LOAD desta forma:
IF !IswindowDefined( "PanelArtigos" )
LOAD WINDOW PanelFamilias AT 131 , 4 WIDTH 161 HEIGHT 580 ...

... e faço a leitura na matriz. Encontrando esse nome de botão de grupo na matriz ele vai a função carregaBotões e ai faz essa operação Form.Control.Visible :=.t.. Também existe outra função que verifica se é para desligar o visible quando o botão de grupo vai ser substituido por outro.
Se não ...

... não perca tempo tentando me explicar, só vou colocar alguns pontos que talvez não saiba;

você pode testar/atribuir/inverter a visibilidade de um controle qualquer assim;

form.control.visible := !form.control.visible

Se ainda assim precisa guardar nome antigo que ainda não compreendo a utilidade ...

A instrução IsControlDefined(xNomeBotao, "PanelArtigos") não está a cumprir para o que é determinado.
Vou lhe mostrar a rotina que cria os botões dos artigos correspondentes ao grupo escolhido.
Como não está a fazer o pretendido, dá um erro na verificação da existencia do control.
Imprimi o valor de ...