Erro estranho ao atualizar o harbour

[janio]

Boa tarde,

Atualiazei o harbour32 para uma compilação de Fev/2018 e ao recompilar um de meus sistemas aparece a msg anexa

O estranho eh que EM LUGAR NENHUM eu faço referencia a essa msg e nao sei de onde esta vindo. Não consigo nem debugar pra ver a origem

Janio

[janio]

Acabei de descobrir que o problema não tem a ver com a atualização do harbour.

O que ocorreu eh que como atualizei o harbour, mandei um rebuild para re-compilar todos os fontes e daí o problema apareceu.

Mas mesmo na versão anterior do harbour que eu tinha se eu fizer um rebuild nos meus fontes, da o mesmo problema.

Ou seja: tem alguma coisa esquisita em algum dos meus fontes e so descobrir agora pq dei um rebuild.

O dificil eh descobrir qual é esse fonte pq na mensagem de erro nao ha qualquer pista

[JoséQuintas]

A saída vai ser colocar mensagens em pontos estratégicos pra tentar reduzir a área de busca.

O debug com GTWVG é que fica muito louco em multithread.
Imagine usar debug em várias partes do aplicativo... ao mesmo tempo... e isso enquanto outros módulos continuam normalmente....
Só atrapalham as imagens, mas tudo bem.... rs
É um debug por thread, mas somente se acionar o debug naquela thread.

[JoséQuintas]

Aqui em multithread. abri cadastro de clientes 2 vezes, e o menu.

Não tinha percebido antes, mas fora do aplicativo é de outra cor, até mais simpático.

[alxsts]

Olá!

Pesquisando a mensagem de erro no Google, tem vários relatos do mesmo erro em diversos aplicativos. Houve atualização recente do Windows?

Talvez ajude colocar alguns Try...Catch...End ou Begin Sequence...Recover...End Sequence e no Catch/Recover exibir os dados do objeto error.

[JoséQuintas]

Inclusive já relatei outro bug no Windows...

Fica uma merd. de usar Edge ou Skype de vez em quando, porque redimensiona janela, ele aumenta a janela mas não ajusta o conteúdo.
O conteúdo continua usando a janela do tamanho anterior, e ficamos sem ver todo restante.
Algo como olhar por um buraco da fechadura... rs

Também tem os travamentos em mídia... ou MediaMonkey tocando música, ou vídeos no Edge...
Quando digo travamento... é travamento mesmo... do tipo ter que apertar o RESET para máquina reiniciar.

Tá complicado isso....

[janio]

Pesquisando a mensagem de erro no Google, tem vários relatos do mesmo erro em diversos aplicativos. Houve atualização recente do Windows?

Também andei pesquisando e vi varias ocorrências dessa mesma mensagem e em situações diversas de habour. Parece ser algo do windows mesmo, alguma atualização... o dificil eh descobrir, sabe pq? Pq não entra em debug e não é processado nada no sistema. Mesmo que eu coloque um hb_alert() na PRIMEIRA linha do sistema, não é mostrado! Ao executar o sistema ja mostra logo aquele erro e pronto.

Ta difícil... Mas como tenho os .obj antigo, vou compilando apenas as novas modificações nos fontes e vou levando até que... eu modifique o fonte causador do problema.

O sistema é mediano, com mais de uma centena de prgs e com milhares de linhas cada. Não tenho como ir vendo um a um qual tem o problema (se for problema em fonte)

[alxsts]

Olá!

- o sistema roda em modo de segurança?
- o sistema roda em outra máquina?
- já analisou o log de eventos do Windows?

[janio]

- o sistema roda em modo de segurança?
- o sistema roda em outra máquina?
- já analisou o log de eventos do Windows?

Irei realizar esses testes hoje, Alexandre

[JoséQuintas]

Arquivo manifest talvez?

[JoséQuintas]

No caso do teclado virtual, eu também o chamava pelo aplicativo.
Depois de um tempo, não estava mais disponível via aplicativo.
Isso foi depois de alguma atualização do Windows.
Mas isso não impedia o aplicativo de funcionar, apenas não abria o aplicativo de teclado virtual.

Ainda acho que no caso dele pode ser manifest, ou até antivírus.

Teste básico: execute como administrador pra ver se funciona.

[gilbertosilverio]

Ola Janio,

Nao sei se e o caso, mais da uma olhada aqui:

https://www.youtube.com/watch?v=DOeNGIlyw-E

[Jairo Maia]

janio, verifique também seus arquivos .CH. Pode ser algo que você colocou em algum deles.

[janio]

Arquivo manifest talvez?

BINGO!

Jamais me passou pela cabeça que poderia ser o arquivo de manifest.

O primeiro teste que fiz foi rodar o mesmo executavel em outro computador com windows7. Rodou beleza. Sem erros.

O segundo teste foi, seguindo a dica do Quintas, compilar sem manifest. XABLAU! Deu certinho

Meu manifest era esse:

Código: Selecionar todos

<?xml version="1.0" encoding="UTF-8" standalone="yes"?><assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
    <security>
      <requestedPrivileges>
        <requestedExecutionLevel level="asInvoker" uiAccess="true"/>
      </requestedPrivileges>
    </security>
  </trustInfo>
</assembly>

Substitui por esse aqui em baixo:

Código: Selecionar todos

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly 
  xmlns="urn:schemas-microsoft-com:asm.v1"
  manifestVersion="1.0">
<assemblyIdentity
    name="HwGUI"
    processorArchitecture="x86"
    version="5.1.0.0"
    type="win32"/>
<description>Windows Shell</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="x86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>

Muito obrigado a todos. Realmente eu não fazia ideia do que estava ocasionando o problema e já estava DESANIMADO e PREOCUPADO

[JoséQuintas]

O HBMK2 inclui opção de gerar manifest, mas acabei nunca usando porque já tinha o meu.
À primeira vista, precisava liberar os "controles modernos" para o aplicativo.

O que uso atualmente é este:

Código: Selecionar todos

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
	<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
		<security>
			<requestedPrivileges>
				<requestedExecutionLevel
               level="asInvoker"
               uiAccess="false"
            />
			</requestedPrivileges>
		</security>
	</trustInfo>
   <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
      <application>
         <!-- Windows 10 -->
         <supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}"/>
         <!-- Windows 8.1 -->
         <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}"/>
         <!-- Windows Vista -->
         <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>
         <!-- Windows 8 -->
         <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"/>
         <!-- Windows 7 -->
         <supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}"/>
         <!-- Windows Vista and Windows Server 2008 R2 -->
         <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"/>
         <!-- Windows XP ignores this section -->
      </application>
   </compatibility>
	<dependency>
		<dependentAssembly>
			<assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="*"
            publicKeyToken="6595b64144ccf1df"
            language="*" />
		</dependentAssembly>
	</dependency>
</assembly>