marcelo

Ola Na Procedure AltRds(oCpo)onde voce colocou gRefresh(oDlg),coloque também oCpo:Refresh(); Yrece

Ola Possivel incompatibilidade de versão da lib Yrece

Ola Kapiaba, sua tGet está bichada ou bixada.Baixei em Dicas e funcionou perfeitamente.Tente não compilar a Tget junto com o seu aplicativo. Yrece

Ola Verifique no topico de ajuda do fivewin em funcões por prnGetDrive(),prgGetName(), prn_etc. veja se te ajuda Yrece

Ola Com o xharbour comercial foi simples, acredito que com o xmate tambem seja.Esperimente colocar os prgs sem as libs fiveh.verifique o exemplo help brasil em http://culikr.sites.uol.com.br/howto.htm Yrece

Ola Voce já deve ter consultado este link mas ..... http://www.pctoledo.com.br/forum/viewtopic.php?t=2481&view=next&sid=c0698586c78d7bc19cad79315127478c Yrece

Ola Paiva Desculpe discordar de voce.Graças a Tecnologia, hoje conseguimos salvar muitas vidas e isso não tem preço.A ganância existe e sempre existirá,Judas vendeu Cristo por trinta moedas.Programar para empresas que não investem em equipamentos, essas, vão morrer na Praia e a culpa sempre será do programador. Yrece

Pessoal Também não consegui executar o xdev, deu o mesmo erro que o Anderson.Ol descreveu Tenho windows XP professional Se alguem descobrir algo por favor no avise Obrigado

OLá pessoal, Também tive a infelicidade de ter um imprevisto com o meu carro e não consegui chegar até o encontro, mas , vou fazer o possível para acompanhar e utilizar todas as novidades apresentadas , quero também aproveitar e parabenizar a todos os palestrantes e organizadores do evento, o que é mais gratificante após um trabalho destes é ler as mensagens do nosso fórum com 100 % de aprovação !!! Parabéns !!! Marcelo Rafael / Yrece Sampaio Tabeliao de Protesto de Letras e Titulos de Osasco Osasco - SP email: opw@terra.com.br

Ola Nãi sei se é isso que voce quer, mas de uma olhada em xhb\samples\test_ole.prg. Yrece

Ola Este Forum é fora de série, todos procuram ajudar uns aos outros.O que falta são cursos sobre temas específicos como fazem em http://www.ciber-tec.com/.Já que não existem os cursos, com o devido respeito, o mínimo que podem fazer os representantes é apresentar soluçÕes para as dúvidas daqueles que adquiriram o produto. Yrece

Ola Uso o Pelles ha muito tempo e estou satisfeito.Voces que acham que ele não funciona 100% deixariam de usar o Fivewim também ? .Nem o Windows do Bill Gates funciona 100%. Yrece

Ola http://www.smorgasbordet.com/pellesc/ Yrece

Ola Tente o seguinte @ 1,1 say oSayCaixa var wSayCaixa of odlg update id=red> color CLR_BLACK,CLR_HBLUE valid mudacor(odlg) Function mudacor(odlg1) if Teste = "S" oSayCaixa:SetColor(CLR_BLACK,CLR_BLUE) Teste:= "N" else oSayCaixa:SetColor(CLR_BLACK,CLR_HRED) Teste := "S" endif odlg1:update()id=red> Return(.t.) Yrece

Ola Verifique em fwh/samples/tstbtnbm.prg Yrece

Ola Geraldo, verifique direito o toolbar4, ele faz botões na dialog e fica igual os do menu Yrece

Ola Como voce usa o fwh 2.6, verifique no \samples\ toolbar,toolbar1,toolbar2,toolbar3 e toolbar4,button igual o xp Yrece

Redefine ListBox olbx Fields arq->nome,arq->endereco,arq->telefone; id 110; headers "nome","endereco","telefone"; FieldSizes 200,100,70 olbx:bkeydown:={|nkey,nflags| teclas(nkey,olbx)} etc., etc., Function Teclas(nkey,OLBX) IF nKey==46 && Tecla Delete wnome=arq->nome if !msgyesno('Confirma Exclusao do &wnome ?') RETURN(.F.) endif IF RLOCK() DELETE DBCOMMIT() UNLOCK ENDIF ENDIF OLBX:REFRESH() RETURN(.T.)

Ola Arr1={} Do while !eof() aadd(arry,{nome,endereco,telefone}) skip Enddo Redefine ListBox olbx Fields arr1[olbx],arr1{olbx:nat,2],arr1[nat,3); id 110; headers "nome","endereco","telefone"; FieldSizes 200,100,70 olbx:SetArray(arr1) ***** necessário etc, etc, *** Yrece

Ola Redefine BtnBmp oBmp Id ?? Resource "saida" prompt "Sair" Top,Left Right,Center Botton + opções ver Fivewin.ch Yrece

Ola Voce tem o fwh ? tente compilar com o seu programa com a classe tmetafil.Eu uso xharbour comercial+xbuild e mesmo com a fivehmx.lib dava esse problema Yrece

Ola Na função Main eu defino o seguinte: Wlarq:="\\Servidor\tabeliao\Dados wlarqn:="\\Servidor\tabeliao\cdx Criei uma função de abertura de Arquivos Function abre(Arquivo,modo) DO CASE case arquivo=='TEMP' WARQT='TEMP'+ALLTRIM(STR(TERMINAL)) SELE 1 USE &WLARQ.&WLART ALIAS TEMP EXCLUSIVE IF MODO'='Z' ZAP ENDIF WARQT1='TEMP'+ALLTRIM(STR(WTERMINAL)) FERASE('&WLARQN.&WARQT1..CDX') INDEX ON STR(DLIVRO,4)+STR(DFOLHA,3)+DCARTORIO TAG 1 TO &WLARQN.&WARQT1 SET INDEX TO &WLARQN.&WARQT1 endcase Return(nil) Yrece

Ola MENUITEM " &Configurar" RESOURCE "ICON_FERRAMENTA"; message "Configurar Impressora" ACTION IMPPAD() menuItem " &Visualizar Impressao" RESOURCE "ICON_LUPA"; message "Visualizar Impressao" WHEN 1 = 2 MenuItem " &Imprimir" RESOURCE "ICON_REPORT" Yrece

Ola Eu uso o xbuild para compilar se quiser mandar parte de seu codigo, poderei tentar te ajudar Yrece fwh - xharbour comercial - xbuild - Pelles trench@protestodeosasco.com.br apos 18:00hs. yrece@protestodeosasco.com.br apos 10:0hs

Ola Marcelo verifique em fwh\samples\testpage.rc, quando for win xp trata o pages de um jeito se não trata de outro jeito, creio que vai resolver seu problema Yrece