ricardomouramarques Posted June 9, 2008 Report Share Posted June 9, 2008 Aà colegas, Observei que sempre há alguém procurando um FOLDER com opções de abas acima, a esquerda, abaixo e a direita, então comecei desenvolver e já está bem funcional. No link abaixo, na opção downloads, é só baixar o ZIP. INCLUIDO: Arquivo Fonte da classe - rfolder.prg Arquivo de cabeçalho - rfolder.ch Arquivo fonte do exemplo - teste.prg Exemplo compilado - teste.exe é só pegar, testar, melhorar e, neste ultimo caso, redisponibilizar. pegue aqui: www.vrmm.com.br Editado por - ricardomouramarques on 27/06/2008 22:01:49 Editado por - ricardomouramarques on 28/06/2008 22:10:55 Editado por - ricardomouramarques on 28/06/2008 22:12:13 Editado por - ricardomouramarques on 05/07/2008 01:03:28 Editado por - ricardomouramarques on 05/07/2008 12:26:02 Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 9, 2008 Author Report Share Posted June 9, 2008 Aà colegas, Observei que sempre há alguém procurando um FOLDER com opções de abas acima, a esquerda, abaixo e a direita, então comecei desenvolver e já está bem funcional. No link abaixo, na opção downloads, é só baixar o ZIP. INCLUIDO: Arquivo Fonte da classe - rfolder.prg Arquivo de cabeçalho - rfolder.ch Arquivo fonte do exemplo - teste.prg Exemplo compilado - teste.exe é só pegar, testar, melhorar e, neste ultimo caso, redisponibilizar. pegue aqui: www.vrmm.com.br Editado por - ricardomouramarques on 27/06/2008 22:01:49 Editado por - ricardomouramarques on 28/06/2008 22:10:55 Editado por - ricardomouramarques on 28/06/2008 22:12:13 Editado por - ricardomouramarques on 05/07/2008 01:03:28 Editado por - ricardomouramarques on 05/07/2008 12:26:02 Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 11, 2008 Author Report Share Posted June 11, 2008 Melhorando... Quote Link to comment Share on other sites More sharing options...
mkyx Posted June 11, 2008 Report Share Posted June 11, 2008 Caro colega, é possÃvel descolorir ou tornar transparente a parte da alba do folder que não tem opções? POmpeo Guaratinguetá SP (12) 9777-9386 Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 12, 2008 Author Report Share Posted June 12, 2008 vou incluir essa opção Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 12, 2008 Author Report Share Posted June 12, 2008 citação: Caro colega, é possÃvel descolorir ou tornar transparente a parte da alba do folder que não tem opções?POmpeo Guaratinguetá SP (12) 9777-9386 id=quote>id=quote>blz.. Opção incluida, como pode ser visto na imagem acima. Quote Link to comment Share on other sites More sharing options...
Vitor Reis Posted June 12, 2008 Report Share Posted June 12, 2008 uma vez um poeta disse... EU SOU O CARA ( musica do cazuza ) ele estava se referindo a voce ricardo... entao eu vou repetir " VOCE É O CARA " show de bola vitor s.b.c. Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 12, 2008 Author Report Share Posted June 12, 2008 citação: uma vez um poeta disse... EU SOU O CARA ( musica do cazuza ) ele estava se referindo a voce ricardo... entao eu vou repetir " VOCE É O CARA " show de bola vitor s.b.c. id=quote>id=quote>kkkkk Assim eu vou explodir... valeu! valeu! Brigadu!!! Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 13, 2008 Author Report Share Posted June 13, 2008 Nova melhorias: Agora, quando quiser, pode colocar transparencia total, inclusive em torno das abas. Outra opção é a de colorir cada aba e sua janela com uma cor diferente. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 14, 2008 Report Share Posted June 14, 2008 Putz!! O negócio tá ficando bão memo sô Parabéns Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 14, 2008 Author Report Share Posted June 14, 2008 citação:Putz!! O negócio tá ficando bão memo sô Parabéns id=quote>id=quote>Luiz, Valeu!!! valeu!!! Galera Novidades, como pode ser visto acima, foi incluido a opção de imagens nas abas e, o mais legal, com transparência. Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 14, 2008 Author Report Share Posted June 14, 2008 Method :ADD(...) corrigido Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted June 15, 2008 Report Share Posted June 15, 2008 Ricardo meus parabens, ficou muito bom mesmo este seu trabalho... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR, 1.1,PELES,XDEV,VLIB,ADS LOCAL 7.1 Quote Link to comment Share on other sites More sharing options...
mkyx Posted June 15, 2008 Report Share Posted June 15, 2008 O trabalho está de parabéns, muito bom mesmo. Continue sempre assim, e vc será um grande homem quando crescer. Só falta uma coisa, quando insere-se muitas abas no folder, seria necessário haver duas setas para ler todas as abas, senão não seria possÃvel ler as abas que ficam fora do folder. Pompeo Guaratinguetá - SP www.adentech.com.br www.rmahost.com Quote Link to comment Share on other sites More sharing options...
Naruto uZumaki Posted June 16, 2008 Report Share Posted June 16, 2008 OLha , definitivamente parabéns ! ____________________________ Eder Xavier Msn:eder_xavier_2@hotmail.com Xharbour /fivewin 8.01 workshop /VSX Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 16, 2008 Report Share Posted June 16, 2008 Tava Bão d+ .. he! he! he! que erro é este ?? Error description: Error BASE/1004 Class: 'NIL' has no exported method: CFACENAMEid=code>id=code>Obrigado.. Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 16, 2008 Author Report Share Posted June 16, 2008 citação:Tava Bão d+ .. he! he! he!que erro é este ?? Error description: Error BASE/1004 Class: 'NIL' has no exported method: CFACENAME Obrigado.. Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev id=quote>id=quote>Luiz, Fiz algumas alterações na classe. Baixe novamente e veja se está tudo ok. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 17, 2008 Report Share Posted June 17, 2008 Acabei de baixar novamente.. O que está errado neste código ??? #include "FiveWin.ch" #include "rFolder.ch" Function Cadastro() Define dialog odlg Title "..::Cadastro" @ 370,20 RFolder oFld of oDlg Prompts "Aba 1", "Aba 2", "Aba 3"; Size 300, 300 Pixel POSICAO 3; Color CLR_WHITE, nRGB( 0, 150, 220 ); EXACT FILE "bitmap_1", "Bitmap_2", "Bitmap_3" Activate Dialog odlg Centered Return Nil id=code>id=code>Está retornando aquele famoso erro; id=code>id=code>Só que em momento algun to chamando recursos a não ser os bitmaps Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 17, 2008 Report Share Posted June 17, 2008 Alguém arrisca um palpite... ? Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 17, 2008 Author Report Share Posted June 17, 2008 citação: Acabei de baixar novamente..O que está errado neste código ??? #include "FiveWin.ch"#include "rFolder.ch"Function Cadastro() Define dialog odlg Title "..::Cadastro" @ 370,20 RFolder oFld of oDlg Prompts "Aba 1", "Aba 2", "Aba 3"; Size 300, 300 Pixel POSICAO 3; Color CLR_WHITE, nRGB( 0, 150, 220 ); EXACT FILE "bitmap_1", "Bitmap_2", "Bitmap_3" Activate Dialog odlg CenteredReturn Nil Está retornando aquele famoso erro; Error description: Error FiveWin/3 Cannot create Dialog Box: Só que em momento algun to chamando recursos a não ser os bitmaps Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev id=quote>id=quote>Faça assim: #include "FiveWin.ch" #include "rFolder.ch" Function Cadastro() Private oFld Define dialog odlg Title "..::Cadastro" Activate Dialog odlg Centered ON INIT Inicio() Return Nil //------------------------------ Function Inicio() @ 370,20 RFolder oFld of oDlg Prompts "Aba 1", "Aba 2", "Aba 3"; Size 300, 300 Pixel POSICAO 3; Color CLR_WHITE, nRGB( 0, 150, 220 ); EXACT FILE "bitmap_1", "Bitmap_2", "Bitmap_3" Return NIL id=code>id=code> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 17, 2008 Report Share Posted June 17, 2008 Agora deu esse erro.. Error description: Error BASE/1004 Message not found: TIMAGE:PROGRESS id=code>id=code>Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 17, 2008 Author Report Share Posted June 17, 2008 citação: Agora deu esse erro..Error description: Error BASE/1004 Message not found: TIMAGE:PROGRESS id=quote>id=quote>Luiz, é a sua versão do FW, a classe dessa versão não tem o method PROGRESS() Abra a classe RFOLDER que baixou e localize as linhas "oImg:PROGRESS" e comente essas. Substitua por: oImg:lPROGRESS := .f. Caso também apresente erro então comente essas linhas também. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 17, 2008 Report Share Posted June 17, 2008 citação: citação: Agora deu esse erro..Error description: Error BASE/1004 Message not found: TIMAGE:PROGRESS id=quote>id=quote>Luiz, é a sua versão do FW, a classe dessa versão não tem o method PROGRESS() Abra a classe RFOLDER que baixou e localize as linhas "oImg:PROGRESS" e comente essas. Substitua por: oImg:lPROGRESS := .f. Caso também apresente erro então comente essas linhas também. id=quote>id=quote>Rapaz.. voltei aqui só pra te perguntar isso.. vou fazer o teste e já reporto... Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted June 17, 2008 Report Share Posted June 17, 2008 Não adiantaou nada.. tá com o mesmo erro.. se eu retirar os bitmaps funciona.. mas dai já fica chato né ?? Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev ico.corumba@gmail.com MSN: ico67@msn.com A Informática Nasceu para resolver problemas que antes não existiamid=blue> Quote Link to comment Share on other sites More sharing options...
ricardomouramarques Posted June 17, 2008 Author Report Share Posted June 17, 2008 citação:Não adiantaou nada.. tá com o mesmo erro..se eu retirar os bitmaps funciona.. mas dai já fica chato né ?? Luiz Arruda - Corumbá/MS FWH 2.4 - WS - xHB 09950 - xDev id=quote>id=quote>Luiz, vc tem msn? Se tiver me add aÃ: ricardomouramarques@hotmail.com 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.