GtWVW + Harbour 3.0

[leandrolinauer]

Estou compilando o sistema em harbour 3.0 com gtwvw, me deparei que as grid somem, não aparece linha e colunas, alguem sabe porque?


-:]

[Pablo César]

Talvez GtWVW aceite um comando que coloque o grid e remova. Nunca usei GtWVW mas em HMG para remover e colocá-las tem este exemplo:

Código: Selecionar todos

..//..
MenuItem "Toggle Grid Lines" action setgridlines('oGrid','oWindow',!isgridlines('oGrid','oWindow'))
..//..

function isgridlines(control,form)
local i:=getcontrolindex(control,form)

return _HMG_aControlMiscData1 [i][7]

#define LVM_FIRST               0x1000      // ListView messages
#define LVM_SETEXTENDEDLISTVIEWSTYLE (LVM_FIRST + 54)   // optional wParam == mask
#define LVS_EX_FULLROWSELECT    0x00000020  // applies to report mode only

function setgridlines(control,form,nogrid)
local i:=getcontrolindex(control,form)
local ControlHandle:=getcontrolhandle(control,form)

SendMessage( ControlHandle, LVM_SETEXTENDEDLISTVIEWSTYLE, 0, iif( nogrid, 0, 1 )+ LVS_EX_FULLROWSELECT )
_HMG_aControlMiscData1 [i][7] := nogrid

return nil

Veja se adaptando, ao menos utilizando a função SendMessage que é em C possa ser adapatado, veja se resolve. Anexei o executável e fontes para sua apreciação.

[leandrolinauer]

Grato pablo, vou testar.
Estive fazendo testes e notei que sem a GTWVW, usando harbour puro, e usando os browse, BROWSE(), TBROWSE(), DBEDIT, TBROWSEDB, TBROWSENEW, todos ocorrem a mesma falha.

Seguintes falhas detectadas:
1-Coluna e linhas não aparecem, aparecem fora da grid se posicionar outra janela em cima (sujeira na tela);
2-Lado esquerdo e direito do browse, sobram sujeira dos dados uma coluna isto quando movendo dentro dos dados para direta e esquerda.
3-Notei que esta atualizando apenas aonde tem os dados e não nas cordenadas inteiras do browse,
exemplo: ----------------------------------
Nonono ononon nono nnnooo
xharbour |atualiza daqui até aqui |<-
harbour |atualiza daqui até aqui |<-
mas mostra |daqui até |
ficando ? ? estas duas colunas sujas.

Pelo que entendi, é um problema com o harbour 3, no harbour 2 tbem ocorre isto.
O que poderia ser?

Grato por enquanto

[carlos_dornelas]

Leandro, como você fez para utilizar a GTWVW com o harbour 3.? Ainda utilizo ela com o xharbour .99.70, mas estou precisando fazer um up-grade para aproveitar os benefícios do harbour.

Quanto ao teu problema não sei como resolver, pois sempre utilizei o Dbedit() mesmo.

Antonio Carlos

[sygecom]

Olá Carlos,
Olhando na pasta \harbour\examples\gtwvw do SVN do Harbour tem algo para GTWVW, mas não está na CONTRIB por que a mesma não é 100% compatível com Harbour ou algo assim, então seria bom, você pegar esses dontes, gerar a LIB e fazer inúmeros testes no seu sistema e caso apresente algum problema post no fórum dos desenvolvedores do Harbour que talvez alguns deles podem corrigir o problema.
Nota: Acho que eles não migraram essa LIB 100% para Harbour por que não tem usuários interessados em testar e reportar os problemas.

[leandrolinauer]

Boa noite.
Desculpe a demora, só agora entrei novamente no forum, estive meio ausente.
Carlos, quanto a usar a GTWVW com Harbour3, não é dificil na verdade fica tudo igual.
Envei em qual parte vc tem dúvidas que esclareco na medida do possivel.
Creio que vc deva estar com o mesmo problema que eu, falta de tempo de migrar para outra lib grafica, pena que tem alguns bugs a GTwvw no harbour, mas quebra bem o galho.

Grato a todos.
:)Pos

[carlos_dornelas]

Leandro, realmente estava propenso a iniciar testes com a GTWVG, mas a falta do tempo para os testes é o maior empecilho. Como já tenho tudo funcionando com GTWVW (e acostumado com ela), seria muito bom continuar e contar com os novos aprimoramentos do harbour 3. Como você fez para utilizar a WVW? Poderia postar um passo a passo? Você utiliza o hbmk2? Se sim, poderia postar seu .hbp? Grato mais uma vez pela atenção.

Antonio Carlos

[leandrolinauer]

Boa tarde Carlos.
Segue abaixo:
hbp
///////////////////////////////////
ARQUIVO -> seuprograma.hbp
@hbmk.hbm

-gtwvW

-oSEUPROGRAMA

-prgflag=/l
-compr=min

PRGINICIAL.PRG
PRG1.PRG
PRG2.PRG
....
PRG1000.PRG
SEUPROGRAMA.RC
////////////////////////////
o arquivo HBMK.HBM modificado da forma que vc precisar para compilar seus fontes, colocado na mesma pastas dos prgs.

ARQUIVO -> HBMK.HBM
#
# $Id: hbmk.hbm 15253 2010-08-01 12:32:44Z vszakats $
#
# NOTE: Disabled until test code is cleaned/fixed.

gtwvw.hbc

-w1 -inc -lgtwin -lhbcomm -lhbwin -lhbct -lhbtip -lsqlite3 -lhbsqlit3 -lbemafi32 -LF:\HB31\LIB
///note esta linha acima, eu uso perfeitamente hoje, utilizando sqlite .
///////////////////////////////////////////////////////

o arquivo gtwvw.hbc este apenas copiei ele e coloquei dentro da minha pasta junto com os fontes o conteudo é o mesmo da pasta examples
#
# $Id: gtwvw.hbc 16868 2011-06-07 22:29:10Z vszakats $
#

{!allwin|!x86}skip=yes

incpaths=.
libpaths=lib/${hb_plat}/${hb_comp}

gt=${hb_name}
gui=yes


libs=${_HB_DYNPREF}${hb_name}${_HB_DYNSUFF}

///////////////////////////////////////////////////

e compilar a biblioteca na pasta examples que da tudo ok.
sera criada a lib libgtwvw.a, só colocar ela no PATH da lib e blz.
só usar.

Se tiver alguma dúvida além, só me chamar.
Atenciosamente
leandro

[clipsis]

Olá, leandrolinauer. Boa noite!

Acompanhando este post, verifiquei no seu aquivo .HBM a linha abaixo:

-w1 -inc -lgtwin -lhbcomm -lhbwin -lhbct -lhbtip -lsqlite3 -lhbsqlit3 -lbemafi32 -LF:\HB31\LIB

Meu interesse é sobre -lbemafi32 .

É alguma biblioteca para comunicação com ECF Bematech ?
Onde posso encontrá-la ?
Tem alguma documentação sobre ela ?
Como você a usa em seu sistema?

Desculpe-me por tantas perguntas. É que estou com problemas em 2 dois cliente que usam ECF Bematech e estou procurando alternativas. Hoje uso o ACBRMonitor.

Agradeço a atenção.

Abraços

[leandrolinauer]

Bom dia clipsis.

-w1 -inc -lgtwin -lhbcomm -lhbwin -lhbct -lhbtip -lsqlite3 -lhbsqlit3 -lbemafi32 -LF:\HB31\LIB

Quanto a BEMAFI32 eu usei apenas para extrair alguns arquivos da BEMATECH, mas não estou usando mais no momento.
Vc encontra ela no site da BEMATECH é só baixar e linkar ela no sistema.

segue o link abaixo para baixar ela.
http://www.bematech.com.br/suporte/dwn_fisc_windows.asp

Um abraço.

[eduardomc00]

Galera, Boa tarde!

alguem teve algum problema parecido ou igual a isso?!

Ou nem perceberam?

http://pctoledo.com.br/forum/viewtopic. ... 394#p95394