Theotokos Posted May 18, 2010 Report Share Posted May 18, 2010 Porque esta ficando assim o meu menu: '>Meu menu: Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Editado por - Theotokos on 18/05/2010 22:01:55 Editado por - Theotokos on 18/05/2010 22:06:22 Editado por - Theotokos on 19/05/2010 09:57:14 Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 18, 2010 Author Report Share Posted May 18, 2010 Porque esta ficando assim o meu menu: '>Meu menu: Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Editado por - Theotokos on 18/05/2010 22:01:55 Editado por - Theotokos on 18/05/2010 22:06:22 Editado por - Theotokos on 19/05/2010 09:57:14 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted May 19, 2010 Report Share Posted May 19, 2010 Poste o codigo e uma imagem maior porfa. João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted May 19, 2010 Report Share Posted May 19, 2010 Esse Menu é nativo ou da Tsbutton ? Verifique tb se vc. tá usando o Menu.ch atualizado do seu FW. Kapi.. Abraços.. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red> Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 19, 2010 Author Report Share Posted May 19, 2010 citação:Esse Menu é nativo ou da Tsbutton ? Verifique tb se vc. tá usando o Menu.ch atualizado do seu FW. Kapi.. Abraços.. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red> id=quote>id=quote>É nativo: o Codigo: Local oMenu MENU oMenu 2007 MENUITEM "&Arquivos" MENU MENUITEM "&Clientes" Menu MENUITEM "Cadastro" MESSAGE "Fazer Cadastro de Clientes"; ACTION Cad_Clientes() MenuItem "Consulta" MESSAGE "Manutenção dos Dados do Cliente"; ACTION Con_Clientes() MenuItem "Fidelidade" MESSAGE "Cadastrar Cartão Fidelidade" ; ACTION Cad_Fidelidade() EndMenu SEPARATOR MENUITEM "&Produtos" Menu MENUITEM "&Mercadorias" ACTION Cad_Produtos() MESSAGE "EFETUAR CADASTRO DE PRODUTOS" MENUITEM "&FamÃlias" Action Cad_Familias() MESSAGE "EFETUAR O CADASTRO DE FAMÃIAS PARA PRODUTOS" EndMenu SEPARATOR ...... ...... ...... EndMenu ENDMENU RETURN oMenu Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted May 19, 2010 Report Share Posted May 19, 2010 Qual a sua Versão do FW ??? Abra sua Window.PRG e coloque aqui o METHOD DrawItem( nIdCtl, pItemStruct ) CLASS TWindow id=code>id=code>Completo Pro pessoal dar uma olhada.. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red> Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 19, 2010 Author Report Share Posted May 19, 2010 ... METHOD DrawItem( nIdCtl, pItemStruct ) CLASS TWindow local oItem local oPopup := If( ::oPopup != nil, ::oPopup, If( ::oSysMenu != nil, ::oSysMenu, nil ) ) if nIdCtl == 0 if oPopup != nil .or. ::oMenu != nil if oPopup != nil .and. oPopup:GetPopup( GetDrawMenu( pItemStruct ) ) != nil oItem = oPopup:GetMenuItem( GetDrawItem( pItemStruct ) ) if oItem == nil if ::oPopup != nil ::oPopup = nil endif endif endif if oItem == nil .and. ::oMenu != nil oItem = ::oMenu:GetMenuItem( GetDrawItem( pItemStruct ) ) endif if oItem != nil if ! oItem:oMenu:l2007 return MenuDrawItem( pItemStruct,; If( ! Empty( oItem:cPrompt ), oItem:cPrompt, "" ),; If( ::oMenu != nil, ::oMenu:hMenu, 0 ),; oItem:hBitmap, ::hWnd ) else return MenuDraw2007( pItemStruct,; If( ! Empty( oItem:cPrompt ), oItem:cPrompt, "" ),; If( ::oMenu != nil, ::oMenu:hMenu, 0 ),; oItem:hBitmap, ::hWnd ) endif else if IsMenuItem( pItemStruct ) // automatic added items MenuDraw2007( pItemStruct,; If( IsSeparator( pItemStruct ), "", MISText( pItemStruct ) ),; 0,, ::hWnd ) endif endif endif else return SendMessage( GetDlgItem( ::hWnd, nIdCtl ), FM_DRAW, nIdCtl, pItemStruct ) endif return nil Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted May 20, 2010 Report Share Posted May 20, 2010 Caraca véio.. tá tudo igual.. Vc. verificou o Menu.CH se é o da sua versão ? isso está acontecendo em todos os seus projetos ou é em um especifico ? PS:Demorei pra responder pq. esse problema já foi resolvido aqui no forum, inclusive comigo mesmo nos tempos do FW-clipper, como a busca do site tá "truncada" tentei procurar pela busca interna do forum e passei a tarde toda ontem procurando sem achar o tópico "menu" correspondente, vai ver está em daqueles "soccoro", "Me ajudem" "o que é isso" que dificulta a procura.. Mas não vou desistir. Vc. já tentou criar um c:\TESTE e compilar somente uma window vazia com menu pra ver se dá o mesmo erro ? Vc. tb. não disse a versão do seu FW. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red> Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 20, 2010 Author Report Share Posted May 20, 2010 citação:Caraca véio.. tá tudo igual.. Vc. verificou o Menu.CH se é o da sua versão ? isso está acontecendo em todos os seus projetos ou é em um especifico ? PS:Demorei pra responder pq. esse problema já foi resolvido aqui no forum, inclusive comigo mesmo nos tempos do FW-clipper, como a busca do site tá "truncada" tentei procurar pela busca interna do forum e passei a tarde toda ontem procurando sem achar o tópico "menu" correspondente, vai ver está em daqueles "soccoro", "Me ajudem" "o que é isso" que dificulta a procura.. Mas não vou desistir. Vc. já tentou criar um c:\TESTE e compilar somente uma window vazia com menu pra ver se dá o mesmo erro ? Vc. tb. não disse a versão do seu FW. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red> id=quote>id=quote>Olá! Voltei do atendimento no cliente... E verifiquei que isto acontece no meu micro apenas, que esta instalado SevenMizer. Será que é por causa disto? Vou testar isto que vc falou... já que reporto... por hora obgdo pela dedicação... Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 20, 2010 Author Report Share Posted May 20, 2010 é......... fica do mesmo jeito... mesmo fazendo apenas uma windows com menu (2007) Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
SAOliveira Posted May 20, 2010 Report Share Posted May 20, 2010 Voce diz que só acontece no micro que esta instalado o SevenMizer, o que é ? Porque nao diz qual sua versao do FW ? Activia & Johnnie Walker Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted May 21, 2010 Report Share Posted May 21, 2010 tente alterar as propriedades de video em "painel de controle" já que o problema é só onde tá instalado o SevenMizer.. ou tente desintala-lo pra ter certeza que é isso mesmo.. citação:Porque nao diz qual sua versao do FW ? id=quote>id=quote>Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionouid=red>Editado por - ico on 21/05/2010 09:19:50 Quote Link to comment Share on other sites More sharing options...
Theotokos Posted May 22, 2010 Author Report Share Posted May 22, 2010 Nada resolveu... mas o problema é porque esta instalado o SevenMizer, interessante que antes estava instalado VistaMizer e não dava problema... vou tirar o Seven e voltar para o VistaMizer... Obgdo pessoal.!!! Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
SHARK Posted May 23, 2010 Report Share Posted May 23, 2010 O mais estranho deste tópico é que quem fez a pergunta foi o mesmo que deu a resposta.... rsrsrsrsrs Se o problema ocorreu após o SevenMizer é sinal que o próprio o ocasiona. Uso Windows Seven em alguns de meus PC´s e este problema não ocorre. Note que tanto o SevenMizer quanto o VistaMizer ocasionam problemas não só em aplicações FW como em outras. O uso destes tipos de recursos de aparência para windows é questionável e problemático em amplas situações. Não recomende o uso destes recursos nos computadores de seus clientes por questões profissionais. Se deseja obter o visual do Windows 7 recomende a instalação e uso do próprio. SharkAbraços! Shark - FWH 8.09 / xharbour 1.1.0 / xMate 1.15 / Resource WorkShop http://www.superdownloads.com.br/download/41/programa-de-auto-escola-automax/ Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.