WIndows 7, por favor me ajudem.

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

Moderador: Moderadores

rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Boa tarde a todos.


Senhores estou com um problema e ja perdi os cabelos e mimado filho do dono da empresa esta me enchendo as paciências.

è o seguinte :
Utilizo HARBOUR+MINIGUI + win7 64bits ... o sistema roda belezinha todos os progs etc e tal... mas qdo eu tento gerar algum relatório da um erro :

nome do envento de problema : APPCRASH
Nome do aplicativo : F22_MENU.EXE
vNome do modulo de falhas : STACKHASCH_A611
Codigo de excessão: C0000374

nas máquinas do tipo WINXP vai q eh uma boniteza..

eu não sei mais onde procurar e nem o q fazer.



GRATO.
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: WIndows 7, por favor me ajudem.

Mensagem por sygecom »

Não uso mais Minigui a muito tempo, mas post como está gerando o relatorio, que classe está usando, se é Miniprint ou Hprinter. Com mais detalhes o pessoal que uso Minigui pode lhe ajudar melhor.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

Re: WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Sygecom boa tarde.


Olha, eu faço referência no início dos meus programas assim :
WINPRINT.CH ajuda ?????


grato.
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: WIndows 7, por favor me ajudem.

Mensagem por sygecom »

Rapaz,
Post o codigo que está dando o erro.
Diga qual versão do Harbour e qual versão da Minigui você está usando ?
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

Re: WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Mr.Sygecom bom dia.

Desculpa pela demora.

A versão é essa :

Harbour MiniGUI 1.5 Extended Edition (Build 51) - 2008.04.25


O código é esse :


Código: Selecionar todos

//end papel
   INIT PRINTSYS
   SELECT BY DIALOG PREVIEW
   IF HBPRNERROR>0
      msgstop("Erro na impressora!!!","Aviso")
      release printsys
      SetCurrentFolder(dirimp)
      RETURN
   ENDIF

   set preview scale 2.2
   SET UNITS MM
   define font "ft07"  name "Verdana" size 7
   define font "ft07B"  name "Verdana" size 7 bold
   define font "ft08" name "Verdana" size 8 
   define font "ft08B" name "Verdana" size 8 bold
   define font "ft10B" name "Verdana" size 10 bold
   define font "ft10" name "Verdana" size 10 
   define font "ft12B" name "Verdana" size 12 bold //bold=negrita
   define font "ft12" name "Verdana" size 12 //bold=negrita
   define font "ft14" name "Verdana" size 14
   define font "ft18" name "Verdana" size 18

   select font "ft12"
   set page orientation DMORIENT_PORTRAIT papersize DMPAPER_A4 font "ft12"

   start page
   CabRnec()

////////////////////////////TOP
  select font "ft08B"
  @ILIN+1,010 say "TOP" TO PRINT
  @ILIN+1,079 say "REFER." TO PRINT
  @ILIN+1,102 say "QUANTIDADE" TO PRINT
  @ILIN+1,148 say "PREÇO" TO PRINT
  @ILIN+1,166.5 say "VALOR R$" TO PRINT
  @ILIN+5,010,ILIN+5,183 LINE

   Sele &arqu111
   Set Order To 2
   GO TOP
   TOP_qtdepro:=0
   TOP_prepro :=0
   ilin=ilin+6
   select font "ft08"

   DO WHILE .not. eof()
      if subs(tmp_prod,1,1)<>"T"
         skip
         loop
      endif
      if ilin >250
         end page
         start page
         CabRnec()
         select font "ft08B"
         @ILIN+1,010 say "TOP" TO PRINT
         @ILIN+1,079 say "REFER." TO PRINT
         @ILIN+1,102 say "QUANTIDADE" TO PRINT
         @ILIN+1,147 say "PREÇO" TO PRINT
         @ILIN+1,166.5 say "VALOR R$" TO PRINT
         @ILIN+5,010,ILIN+5,183 LINE
         ilin=ilin+6
      endif
      select font "ft08"
      @ilin,010  say tmp_desc   to print
      @ilin,080  say tmp_refe   to print
      @ilin,verpos(113,tmp_qtde)           say TRANSFORM(tmp_qtde,"99,999.99") to print
      @ilin,verpos(149,tmp_prec)           say TRANSFORM(tmp_prec,"9,999.99") to print 
      @ilin,verpos(172,tmp_qtde*tmp_prec)  say TRANSFORM(tmp_prec*tmp_qtde,"99,999.99") to print
      TOP_qtdepro:=TOP_qtdepro+tmp_qtde
      TOP_prepro :=TOP_prepro+(tmp_qtde*tmp_prec)
      ilin=ilin+4.2
      skip
   enddo
   @ILIN+1,010,ILIN+1,183 LINE
   ilin=ilin+3
   select font "ft08B"
   @ilin,verpos(113,TOP_qtdepro)  say TRANSFORM(TOP_qtdepro,"99,999.99") to print
   @ilin,verpos(172,TOP_prepro)  say TRANSFORM(TOP_prepro,"99,999.99") to print
   select font "ft08"
   ilin=ilin+10



Aí quando clico no botão q vai gerar a impressão aparece uma tela do windows como a do primeiro post q coloquei ai.

O MICRO UTILIZA WINDOWS 7 ULTIMATE 64BITS.

Grato.



---
Nota da Moderação (Maligno):
A presente mensagem foi editada para a inserção das tags de indentação de código. Se ler o código alheio já é uma coisa extremamente aborrecida e difícil, sem a indentação fica muito pior. Portanto, por favor, futuramente, quando for postar código e/ou estruturas e/ou scripts, mesmo que pequeno, use essas tags de identação. Aliás, isso já incentiva um pouco mais pessoas a ler o código e, assim, crescem suas chances de ter seu problema resolvido. Ou seja, você também ganha.
rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

Re: WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Obrigado Mr.Maligno.


Senhores só reiterando, instalei o Win7 32bits e tudo deu certo. O problema é que o malvado do dono comprou o Windows 7 64bits original e não quer trocar nem a pau. O que faço ein ??
BHS
Usuário Nível 2
Usuário Nível 2
Mensagens: 79
Registrado em: 16 Out 2007 12:01
Localização: SOROCABA/SP

Re: WIndows 7, por favor me ajudem.

Mensagem por BHS »

talvez o mais certo seria compilar com 64 bits.

Só pra informar, nosso sistema esta compilado com xharbour (1.2) + wvt, e funcionou perfeitamente no win 7 64bits, não houve nenhuma ocorrência de erro, nada.
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: WIndows 7, por favor me ajudem.

Mensagem por Maligno »

Duvido que o problema esteja relacionado ao fato de ser 64 bits. Programas 32 bits "comportados" rodam normalmente. Acho que o problema deve estar relacionado a algum software de terceiros que fica residente como programa comum ou como serviço. Um software desses pode estar utilizando serviços "sensíveis" (ações de contexto, hooks, funções de kernel, etc) do Windows e, por algum motivo (talvez um bug) isso pode acabar gerando conflito com outros programas.

Meu conselho ao OP é abrir o Task Manager e ir eliminando todos os programas desnecessários e que pareçam "suspeitos". Primeiro programas, depois serviços. Mas um de cada vez, até o erro parar de ocorrer. Se parar, o último programa encerrado será o culpado. É só uma sugestão, claro.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

Re: WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Bom dia a todos.


Muito grato pela atenção de todos.



Mr. Maligno acho que esse é mesmo o caminho , pois fiz o teste com o mesmo sistema em outro computador WIN7 64BITS e tudo rodou lindo e maravilhoso.


Informação sobre o micro:
O patrão foi para os EUA e quis fazer uma graça de comprar um micro lá.. ai batata né mandou um SONY VAIO + WIN7 64BITS em inglês pra dentro da mala, mas como ele não entende nada de Inglês pediu para o vendedor passar a versão para Português e ficou uma mierda, ficou parte traduzido e parte em Português.Ainda reclamou comigo que o teclado não CEDILHA.Fala a verdade e me desculpe o desabafo , vocês encontram gente " cabaço" desse jeito ???????

Grande Maligno vc acha que essa transformação /tradução para Português pode ter afetado em alguma coisa ????

Grato a todos.
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: WIndows 7, por favor me ajudem.

Mensagem por Maligno »

Difícil dizer se o processo de localização pra língua portuguesa (talvez mal feito) trouxe de brinde algum problema que pode ter relação com os erros que você agora está tendo. Por especulação posso dizer: é possível. Mas veja: se a coisa foi mal feita, nada mais natural que formatar e refazer do jeito certo. Isso que você deve passar para o cliente. E sem garantia de resolver esse problema. Como a formatação já envolve mais trabalho e tempo, meu conselho é que tente fazer o que eu disse: elimine os programas suspeitos pelo Task Manager um a um e observe o comportamento do seu programa. Depois, se não tiver jeito, radicalize e reinstale o Windows, o que não deve ser tão difícil, haja vista que parece ser um notebook, que deve ter um DVD de recuperação.

Cliente com grana e à prova de zumbis (sem cérebro) é uma ocorrência comum, infelizmente. Mas aí que entra a habilidade de diplomata do profissional. Você tem que ir levando a coisa na maciota até resolver o problema. Não tem jeito. :)
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
rapazdarelva
Usuário Nível 1
Usuário Nível 1
Mensagens: 19
Registrado em: 11 Jun 2008 08:11
Localização: sdasda

Re: WIndows 7, por favor me ajudem.

Mensagem por rapazdarelva »

Senhores boa tarde.


Olha isso aqui é mais um desabafo do que outra coisa. Motivado pelas belas palavras do Senhor Maligno me dispus a lutar para resolver essa encrenca, embora haja visto a vontade minha era de manda-lo o proprietário mimado para a casa da senhora que tinha o parido. Segui em frente com batalha e o que fiz nestes 15 dias além de ficar quase louco foi :
Hoje pela manhã desinstalei o windows 7 originalzinho do homi.. e taquei um pirata totalmente em português.
A primeira coisa que fiz foi testar o sistema.. batata funcionou.. fiquei feliz e saltitante dei dois murros na parede e falei comigo mesmo, @%#$%@¨%$@¨$%¨# .

Ai depois de aliviado na parte da tarde retornei ao bendito micro e continuei instalando o resto das coisas , cameras, office 2007, e os umas coisas que ele queria. Por volta das 16 hrs depois de tudo lindo e maravilho eu fui testar novamente e o erro voltou. Confesso que fiquei com uma mistura de sensações, desde o arrependimento profundo de ter escolhido esta área para trabalhar , frustração por minha incopetência, fiquei tabém com ódio da Sony , e queria esfolar o Bill Gates (esse sempre quero mata-lo).
Fui por partes:
Desinstalei alguns softwares e nada.
Ai desinstalei o OFFICE.. tcharannn.... FUNCIONOUUUUU GENTEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE..... mas o cara vai ficar sem OFFICE ?

Ptz, instalei WORD, EXCEL, POWERPOINT e MICROSOFT OUTLOOK os outros ficaram de fora.
Bom a solucção foi desinstalar o OFFICE instalar novamente personalizado, não descobri o porque dos outros compenentes dava problema, mas se alguém um dia sofrer como eu, tente estes passos ai em cima.

Grato a todos, e agora poderei voltar a dormir e ter um feliz natal. Aliás, feliz natal a todos e ao Senhor Maligno que me motivou a não bater no proprietário do note.
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: WIndows 7, por favor me ajudem.

Mensagem por Maligno »

a solucção foi desinstalar o OFFICE instalar novamente personalizado
A vida do programador é uma constante alquimia. Mas há algo bom: aprende-se mais com os erros do que com os acertos. :)
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Responder