Clipper On Line • Ver Tópico - Congelamento do programa no windows 10

Congelamento do programa no windows 10

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

Congelamento do programa no windows 10

Mensagempor Itamar M. Lins Jr. » 06 Mai 2022 16:21

Olá!
para outra linguagem realmente aí é tudo mas tudo mesmo, dai estou entre a Minigui já no mesmo meio xbase,

Minigui, Hwgui, Fivewin, não são linguagens. São LIBS gráficas do Harbour.
Nossa visão de como a COISA funciona na GUI que precisa AUMENTAR. Temos que aprender o conceito GUI para AUMENTAR a visão de INÚMERAS possibilidades.
Basicamente os READ'S são as JANELAS! e por ai vai...

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6956
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 312 vezes
Mens.Curtidas: 508 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 06 Mai 2022 17:02

Boa tarde Itamar.
"Programadores xBase das antigas como eu somos FRONT END e BACK END, analista, modelador dos dados, contador."
Sei bem é desta forma mesmo, sou até contador formado tbem com crc e tudo. rsrsrs.

Blz, vou estudar os casos e ver pra onde vou partir. rsrsrs
valeu
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 06 Mai 2022 17:05

Itamar,
"Minigui, Hwgui, Fivewin, não são linguagens. São LIBS gráficas do Harbour."

Verdade, me expressei mal realmente.
vou estudar o caso para qual lib gráfica devo migrar, visto que muda a forma de programar ela no harbour.

Valeu
Um xaBraço
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 06 Mai 2022 19:21

O que realmente usa da GTWVW ?
Se for pegar os exemplos da GTWVG vai ficar doido.

Dependendo do que usar, pode ter uma alternativa mais interessante dentro da própria GTWVG.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 06 Mai 2022 19:47

Tentou com manifest?
A parte mais importante:

<requestedExecutionLevel level="asInvoker" uiAccess="false">


Esquecemos de uma coisa:
O Windows 10 tem a opção de executar em modo de compatibilidade com W7/XP
É uma alternativa pra ganhar tempo.

Sobre o arquivo anexo:
A parte mais simples é renomear com o nome do EXE.
Se o EXE é tatu.exe, renomeia o manifest pra tatu.exe.manifest e deixa na mesma pasta do EXE.
Depois pode embutir, mas pra teste assim serve.
Anexos
manifest.zip
(743 Bytes) Baixado 28 vezes
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 06 Mai 2022 19:53

w10.png
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 07 Mai 2022 11:39

Bom dia Quintas.

Sobre
<requestedExecutionLevel level="asInvoker" uiAccess="false">
Sim, já esta desta forma e nada.

Sobre
O Windows 10 tem a opção de executar em modo de compatibilidade com W7/XP
Não to lembrado se este teste já fiz, vou verificar.

Sobre
Se o EXE é tatu.exe, renomeia o manifest pra tatu.exe.manifest e deixa na mesma pasta do EXE.
Já fiz tambem desta forma e nada

Sobre
O que realmente usa da GTWVW ?
Muita coisa mesmo, praticamente tudo sobre desenho de telas no sistema ao todo mas puxando de uma biblioteca.

Sobre
Se for pegar os exemplos da GTWVG vai ficar doido.
Realmente, é bem diferente da GTWVW, foi por isto que escolhi a GTWVW ao invés da GTWVG quando comecei a migrar de console para grafico.

Sobre
Dependendo do que usar, pode ter uma alternativa mais interessante dentro da própria GTWVG.
Que tipo de alternativa para mudar de biblioteca grafica de forma, tipo sem dor, da noite pro dia rsrsrs

Valeu.
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 08 Mai 2022 09:22

leandrolinauer escreveu:Sobre
O que realmente usa da GTWVW ?
Muita coisa mesmo, praticamente tudo sobre desenho de telas no sistema ao todo mas puxando de uma biblioteca.

Sobre
Se for pegar os exemplos da GTWVG vai ficar doido.
Realmente, é bem diferente da GTWVW, foi por isto que escolhi a GTWVW ao invés da GTWVG quando comecei a migrar de console para grafico.

Sobre
Dependendo do que usar, pode ter uma alternativa mais interessante dentro da própria GTWVG.
Que tipo de alternativa para mudar de biblioteca grafica de forma, tipo sem dor, da noite pro dia rsrsrs


Sendo Harbour, a primeira coisa é:
testou se a GTWVW do Harbour 3.4 tem o mesmo problema?

A GTWVG tem algumas formas diferentes de ser usada, pode misturar as formas também.
Pode sacrificar parte das mudanças, pra fazer mais rápido.

1) Pra janelas, pode usar wvgCrt() ou multithread, ou, se for pra usar uma janela de cada vez, nem faz sentido ficar abrindo janelas especiais, pode usar a tradicional do console.

2) Pra desenhos, pode ser estilo CUI ou estilo GUI.
No estilo CUI é parecido com os exemplos, uma função WVT_Paint() vai ficar repintando os desenhos.
No Estilo GUI é igual as LIBs GUI, vai criar o controle e ele vai ficar lá na tela até ser destruído, mesmo que limpe a tela.

A única coisa da GTWVW que eu gostaria de ter na GTWVG seria poder escolher o espacejamento entre linhas.
Se usa essa opção, é o que vai perder: pra uma linha ficar mais longe da outra

Conforme o estilo/recursos que escolher usar, o trabalho vai ser diferente.

A sugestão é não abusar de recursos, visto que pode trocar de lib gráfica depois, e pra não ficar preso.

Ficar criando janelas, se o usuário não vai poder trocar de janela em uso, não faz sentido.
Uma coisa é fazer o desenho de uma janela só pra dar destaque, e outra coisa e criar uma janela nova do aplicativo.

Em ambiente GUI o pessoal abre janelinhas porque É OBRIGADO, e não pra enfeite.
Não confunda uma coisa com a outra.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 09 Mai 2022 16:06

Boa tarde.
Sobre
O Windows 10 tem a opção de executar em modo de compatibilidade com W7/XP
Não to lembrado se este teste já fiz, vou verificar.
R: Fiz, este teste e não resolveu, continua na mesma, congelando.

Me passa um link do harbour 3.4 última atualização para baixar porque a versão que tenho, tive uns problemas na época.

Sobre
Se eu entendi bem é isto abaixo.
No estilo CUI é parecido com os exemplos, uma função WVT_Paint() vai ficar repintando os desenhos.
A GTwvw só trabalha desta forma e tem que criar objetos e redesenhar sempre, aí fica uma lentidão tremenda se ficar na mesma tela por muito tempo.

No Estilo GUI é igual as LIBs GUI, vai criar o controle e ele vai ficar lá na tela até ser destruído, mesmo que limpe a tela.
Notei que a gTwvg trabalha desta forma, vc invoca a tela e destrói ela no final do uso, neste caso não tem que criar objetos para repintar, correto?

Sobre multithread
Quando instalei HBQT e juntei com GTWVW o sistema criava um novo icone do sistema na barra de tarefas ao abrir a tela de QT, isto seria uma janela multithread com propriedades totalmente diferentes das demais, correto?

Vou fazer uns testes para ver se a GTwvg trabalha junto com a GTwvw, ou seja, criar modulos em GTwvg novos, da mesma forma que estava iniciando em QT, mas que não consegui ir adiante (triste por isto).

Valeu
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 09 Mai 2022 17:22

leandrolinauer escreveu:Sobre multithread
Quando instalei HBQT e juntei com GTWVW o sistema criava um novo icone do sistema na barra de tarefas ao abrir a tela de QT, isto seria uma janela multithread com propriedades totalmente diferentes das demais, correto?

Vou fazer uns testes para ver se a GTwvg trabalha junto com a GTwvw, ou seja, criar modulos em GTwvg novos, da mesma forma que estava iniciando em QT, mas que não consegui ir adiante (triste por isto).


A GTWVG é feita encima da GTWVT, que é a LIB default do Harbour pra ambiente gráfico.
O fato de aceitar multithread é o que deixa misturar com outras, o módulo pode ficar isolado em sua thread.

Misturar LIBs é relativamente simples, mas precisa testes das necessidades de cada uma.
Geralmente a LIB precisa de uma tela main dela própria, mesmo que seja escondida.
Só tem um jeito de saber: testando

Me mostraram uma vez a WVWTools, ela usa o princípio da GTWVG de criar controles Windows.
NÃO SEI se pode ser uma opção.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 09 Mai 2022 17:33

Um exemplo prático, mas vou digitar direto no post, pode conter erros:

PROCEDURE Main

   hb_ThreadStart( { || test1() } )
   hb_ThreadStart( { || test2() } )
   hb_ThreadWaitForAll()
   RETURN

PROCEDURE HB_GTSYS
   REQUEST HB_GT_WVG
   REQUEST HB_GT_WVG_DEFAULT
   RETURN

FUNCTION Test1()
   LOCAL GetList := {}, a := Pad( "11111", 10 )

   hb_gtReload( "WVG" )
   SetMode( 33, 80 )
   CLS
   @ 1, 0 SAY "teste" GET a
   READ
   RETURN Nil

FUNCTION Test2()
   LOCAL GetList := {}, a := Pad( "22222", 10 )

   hb_gtReload( "WVG" )
   SetMode( 25, 80 )
   CLS
   @ 1, 0 SAY "teste" GET a
   READ
   RETURN Nil


Note que em multithread precisa configurar RDD default, codepage, etc. em cada thread.
Cada uma abre seus próprios DBFs, não mexendo no que está aberto em outra thread.
E por isso é interessante.
Variáveis não ficam visíveis entre threads, isso pode exigir mudanças no aplicativo.
Considere multithread somente como última opção, já que acaba sendo diferente de todo mundo, mas é uma forma de misturar LIBs, deixando cada uma em uma thread diferente (uma ou mais threads).
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 10 Mai 2022 17:03

Perfeito, valeu Quintas.
Me passa o link se possível do harbour 3.4 funcional.

Valeu
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 10 Mai 2022 18:13

Se não usa componentes opcionais, que nem eu, é só baixar os fontes e compilar.

https://github.com/vszakats/hb

Uso o mingw 7.3, pode gerar pra 32 ou 64 bits, e o download é 50MB.

https://sourceforge.net/projects/mingw-w64/files/Toolchains%20targetting%20Win32/Personal%20Builds/mingw-builds/7.3.0/

mingw.png


set HB_BUILD_CONTRIB_DYN=no
set HB_BUILD_DYN=no
set HB_BUILD_SHARED=no
set HB_BUILD_STRIP=all
set HB_COMPILER=mingw
set HB_INSTALL_PREFIX=d:\harbour
set HB_LANG=EN
mingw32-make clean install


Querendo 64 bits pronto também:

set HB_COMPILER=mingw64
mingw32-make install


Vai ter 32 e 64 bits pronto pra uso.
Deixe HB_COMPILER com o que vai usar mais, e pode trocar sempre que quiser, ou alterando HB_COMPILER, ou indicando na linha de comando -comp=mingw64
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor JoséQuintas » 10 Mai 2022 18:22

Esqueci de mencionar:

Deixe no path a pasta destino d:\harbour\bin e também a do mingw.
De preferência salve mingw na pasta d:\harbour\comp\mingw\bin.

Nota:
Troque d:\harbour pela pasta de sua preferência.
Acostumei assim, gerando a partir da pasta dos fontes para uma pasta destino indicada em HB_INSTALL_PREFIX.
Pode deixar essas variáveis definidas no Windows, pra sempre que precisar.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18157
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1215 vezes

Congelamento do programa no windows 10

Mensagempor leandrolinauer » 11 Mai 2022 17:48

Obrigado Quintas, vou testar o HABOUR 3.4.
A respeito do congelamento no WINDOWS 10, fiz mais uns testes e descobri que no REGISTRADO tbem congela, ou seja, congela em todos windows 10.

Primeiro teste vai ser ver se com o HARBOUR 3.4 e a gtwvw dele o sistema não congele.

Grato
Harbour 3.2 + GtWVW + QT + SQLite3 + DBF + SQL (Firebird)
leandrolinauer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 375
Data de registro: 16 Out 2006 10:59
Cidade/Estado: Paranaíba-MS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Anterior Próximo



Retornar para Harbour

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 13 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro