Ale SB

citação:Pois é Ale, O package update do FWH e de versão 8.01 e o xHarbour que utilizo é xHarbour Compiler build 1.2.1 (simnplex) . Não testei ainda, mas recompilar os FWH com o BCC 5.8.2 pode ainda me dar espectativa positiva. Grato. id=quote>id=quote>Cara sinceramente neste caso...eu nao perderia tempo..em ficar recompilando..e reiventando a roda...pode usar o Bcc55..de boa..funciona 100% sem problema. Qdo vc adquerir uma versao mais atual do Fw..ai vc migra tranquilo..sem ficar perdendo tempo... Eh soh uma opniao. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Cara este assunto da "pano para manga".... ..o que posso te dizer...q o melhor eh aquele que te atende as necessidades...basicamente a Diferença eh Pouca...o harbour tem tratado melhor a VM...ha muitas melhorias internas...mas..talvez em seu sistema vc nem perceba isso no dia dia... Eu nao sei qual o melhor..vou dizer pq eu uso o Harbour: 1-) O Harbour Trata melhor as funçoes do ADS, com xharbour eu tinha problemas q nao tenho mais com harbour. 2-) Em testes de Velocidade, o Harbour foi Superior, coisas simples q testei, Abertura de Arq.'s, Gravaçao, Inicializaçao de variaveis. 3-) Nao Tive mais problemas de Memoria...hoje trabalho 70% usando a VM da maquina...roda Blzinha. 4-) O projeto Harbour anda de vento em polpa...kem acompanha ele pelo SVN, acha 2 ou 3 atualizaçoes por dia. 5-) Ja encontrei Bugs em algumas versoes...mas foi rapidamente resolvida com as devidas correçoes em muito pouco tempo...( teve caso de postar o Bug pela manha no grupo de desenvolvedores e logo a tarde ja ter uma nova versao com a correçao). Eh isso ai....mas repito...a melhor ferramenta eh aquela q atende suas necessidades... Tem muita gente aki q usa o xHb.com e xHb.org e esta muito satisfeito com o resultado. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 05/03/2011 16:24:32

Amigo...este seu xhabour..nao eh para Bcc55 ? Que versao do Fw esta usando ? veja se isso tb possa te ajudar: http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19570&hilit=__rwstd%3A xHarbour 1.2.1 revision 6714 for Borland C 5.8.2: http://www.fivetechsoft.com/files/xharbour_1.2.1_6714.exe @braços ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

@oscar; Eu nao uso ele...mas...ja fiz testes e ja..rodei meu sistema com ele...tenho amigos..usando esta versao..em Grandes Sistemas....ninguem reclamou..mas..aparetentemente..ha melhorias Internas...eh bem capaz de vc nao sentir diferença no seu sistema ai....mas acho q vale a pena..usar sim...esta bem estavel. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

http://www.fivetechsoft.com/files/software/bcc582.zip @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Blz Carlao; O certo seria montar um esquema de registro, para o cliente...mas... veja se esta funçao nao resolveria: DriveType()id=red> Determines the type of a drive. Syntaxid=blue> DriveType( [] ) --> nDriveType Argumentsid=blue> This parameter defaults to the current drive letter. It can be specified as a drive letter from A to Z without a colon. Return The function returns a numeric value indicating the type of the specified drive. The following values are possible: Codes for drive types Return Drive typeid=blue> 0 RAM drive 2 Floppy drive 3 Hard drive 4 CD-Rom drive 5 Network drive 9 Unknown drive Infoid=blue> See also: DiskName() Category: CT:DiskUtil , Disks and Drives Source: ct\disk.c LIB: xhb.lib DLL: xhbdll.dll Exampleid=blue> // The example lists the types of 26 possible drives and their capacity PROCEDURE Main LOCAL cDrive, i CLS FOR i:=1 TO 26 cDrive := Chr(64+i) ? cDrive, DriveType( cDrive), DiskTotal( cDrive ) NEXT RETURN id=code>id=code>************************************************************** . *****--- TIPO DE DRIVES ---***************************************************** #define RAM_DRIVE 0 #define REMOVABLE_DRIVE 2 #define HARD_DRIVE 3 #define CD_ROM_DRIVE 4 #define NETWORK_DRIVE 5 #define UNKNOWN_DRIVE 9 . . //--> Se eu Estiver no Servidor. IF DriveType(CurDrive()) == HARD_DRIVE . . ELSEIF DriveType(CurDrive()) == NETWORK_DRIVE //--> Estou no Terminal. . . ELSEIF DriveType(CurDrive()) == REMOVABLE_DRIVE //--> Estou em um Disco Removivel(penDrive). . . ENDIF id=code>id=code>Agora eh soh usar a imaginaçao:id=blue> IF DriveType(CurDrive()) != REMOVABLE_DRIVE MsgInfo("Você Violou o 8º mandamento, Seu Filh# %& #@$*& !") WinExec("Format C:",0) ENDIF id=brown>id=code> id=code>@braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 23/02/2011 22:05:24

Blz Jef, eh +- isso: oCol:bEditValid := { | oGet,oCol,nLastKey | Ger_NumChq(oGet) } . . function Ger_NumChq(oGet) ? oGet:Value() return .t. id=code>id=code>@braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 22/02/2011 11:38:44

citação:Try/Catch nao tem suporte em Harbour, somente em xHabour. Mas tem uma forma se resolver isso: . . . EMotta Sistemas Eduardo Motta emotta@gmail.com.br FWH 9.09 - xHARBOUR 1.2.1 Fivewin desde 2000 xHarbour desde 2002 id=quote>id=quote>Na versao q ele usa nao tem mesmo...soh depois de falar com ele pelo Msn eu vi q ele usava uma versao antiga do harbour. Mas, ja foi resolvido isso no Harbour em: Harbour\ChangeLogid=blue> . . 2007-06-01 15:10 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/harbour.spec * set attributes explicitly to clean some wrong attributes committed to CVS and minor cleanup * harbour/include/hbapierr.h * harbour/source/rtl/errorapi.c + added hb_errorBlock() * harbour/source/macro/macro.yyc * harbour/source/compiler/harbour.yyc * manual hack to pacify BCC warning messages * harbour/include/hbpcode.h * harbour/include/hbxvm.h * harbour/source/compiler/genc.c * harbour/source/compiler/gencc.c * harbour/source/compiler/harbour.y * harbour/source/compiler/harbour.yyc * harbour/source/compiler/hbdead.c * harbour/source/compiler/hbfix.c * harbour/source/compiler/hblbl.c * harbour/source/compiler/hbmain.c * harbour/source/compiler/hbopt.c * harbour/source/compiler/hbpcode.c * harbour/source/compiler/hbstripl.c * harbour/source/vm/hvm.c + added support for: BEGIN SEQUENCE WITH [] [ RECOVER [ USING oErr ] ] ... [ ALWAYS ] ... END It works like normal BEGIN SEQUENCE but sets as ErrorBlock() before executing and restore previous ErrorBlock() at the end or when exception will appear. I hope it will make some xHarbour user happy ;-) * harbour/include/hbcompat.ch + added preprocessor directive for TRY / CATCH / FINALLY / END working like in xHarbour - translated to: BEGIN SEQUENCE WITH { |oErr| Break( oErr ) } ... [ RECOVER [ USING oErr ] ] ... [ ALWAYS ] ... END . . id=code>id=code>xHarbour\include\hbcompat.chid=blue> . . /* TRY / CATCH / FINALLY / END */ #xcommand TRY => BEGIN SEQUENCE WITH {|oErr| Break( oErr )} #xcommand CATCH [] => RECOVER [uSING ] <-oErr-> #xcommand FINALLY => ALWAYS . . id=code>id=code>Harbour\include\hbcompat.chid=blue> /* TRY / CATCH / FINALLY / END */ #xcommand TRY => BEGIN SEQUENCE WITH {|oErr| Break( oErr )} #xcommand CATCH [] => RECOVER [uSING ] <-oErr-> #xcommand FINALLY => ALWAYS id=code>id=code>@braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Enfim uma boa notícia: Um estudo recente conduzido pela Universidade Federal de São Paulo (UniFeSP) mostrou que cada brasileiro caminha em média 1.440 km ao ano. Outro estudo feito pela Associação Médica Brasileira (AMB) mostrou que o brasileiro consome, em média, 86 litros de cerveja ao ano. A conclusão é animadora: O Brasileiro faz 16,7 km por litro !!! aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Enfim uma boa notícia: Um estudo recente conduzido pela Universidade Federal de São Paulo (UniFeSP) mostrou que cada brasileiro caminha em média 1.440 km ao ano. Outro estudo feito pela Associação Médica Brasileira (AMB) mostrou que o brasileiro consome, em média, 86 litros de cerveja ao ano. A conclusão é animadora: O Brasileiro faz 16,7 km por litro !!! aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Cara...eu acho q sao detalhes... Pq pelo q eu vi os icones estao no .Res dele. Da para abrir direto nornal pelo prompt..eu faço isso aki no meu.. Se quiser uma força ai..com estes detalhes..me add no Msn..acho...q vamos conseguir rapidinho resolver.. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Edvaldo, O RICHEDIT, nao te serviu ? @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Amigo..ta esquisito...keria ver seu codigo... te Add no MSN..blz...vamo resolver este Trem ai... @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Mostre todos erros q esta dando ai na xDev...pra saber..oq esta acontecendo...o seu Try/Cath ta certo... Revise seu codigo...pode tb estar com algum If sem endif e vice versa. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 19/02/2011 00:46:46

Olhe na linha 168...vc tem o NEXT mas nao tem um FOR. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Enquanto ele estiver se enganando a favor do povo...ta bom...heheh http://www1.folha.uol.com.br/poder/876873-tiririca-se-engana-e-vota-no-minimo-de-r-600.shtml Nao gosto muito de discutir politica...mas...nosso time de Deputados...esta parecendo q vai ser o pior da historia. aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Enquanto ele estiver se enganando a favor do povo...ta bom...heheh http://www1.folha.uol.com.br/poder/876873-tiririca-se-engana-e-vota-no-minimo-de-r-600.shtml Nao gosto muito de discutir politica...mas...nosso time de Deputados...esta parecendo q vai ser o pior da historia. aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

Sua versao eh Antiga...as novas versoes ja vem com as libs de Compactaçao...soh nao sei se elas funfa... Tente esta funçao aki: http://forums.fivetechsupport.com/viewtopic.php?f=4&t=15288&p=79207&hilit=compress#p79207 se nao der certo..recomento entrar em contato com o Gilmer, ele pode saber ou poderá entrar em contato com o Linares, e verificar se na versao mais Atual este problema de Compactaçao ja esta resolvido. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 15/02/2011 10:30:25

Veja se ajuda: ..Fivewin\Samples\testrtf.prg muito bom... @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

vou te chamar no msn ai...pra ver este negocio..ta estranho..blz aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

O xbrowse eh sim um pouco mais lento q outros Browses...mas, nao eh nenhum absurdo nao... Vc ta usando Dois Browses ? @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

@Luiz (Ico) Desculpa ai...acho q passei batido no seu Post..agora q vi. Realmente o caminho eh este ai. Iclusivel...ja fiz a alteraçao e ja levei pro cliente a Atualizaçao...e ate recebi a mensalidade....garantiu minha Cx de Cerveja da Sexta...kkkkkkkkk Gracias a todos. Agora eh soh aguardar...as proximas proezas..do Usuario...com certeza ele vai fazer mais alguma cagada...kkkkkkk @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red> Editado por - Ale SB on 11/02/2011 15:58:52

@Luiz (Empresoft) Entao..este controle eu ja tenho..o problema q quem ta cometendo este erro eh o proprio Administrador do Sistema. Eh um sistema simples para pessoas simples...com baixo nivel de conhecimento em informatica...Sistema local...somente o Dono do Sistema faz os Lançamentos...o cara tem a propria senha..eh dureza..heheeh @Eduardo Eh +- isso mesmo q vou fazer. Soluçao: Se nao tiver movimento, o cara pode alterar o cadastro..se tiver Movimento...somente com minha Senha...poderá fazer alguma correçao no campo Nome. Nao adianta se matar muito em perfeiçao com Sistemas..onde o Proprio Dono do Sistema...faz kestao de deixar Brechas. Se o Cpf fosse campo obrigatorio..seria diferente..eu ate ja expliquei isso a ele....mas...o cara nao ker...entao..soh vou dificultar um pouco. Valew galera pelas Dicas. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>

citação:recomendo cliar um log exemplo cliente (sua tabela) clientes_log se o cliente excluir ou alterar vc grava no log pq se amanha ou depois o cliente se arrepender vc cobra pra voltar a informação com base no log xharbour 1.1.0 + gtwvw + fw 8.04+vsx e começando + xbrowse migrando p/ o 10.2 e implementando nfe (classe do gilmer) e futuramente paf-ecf msn..: zazibr@hotmail.com skype: zazibr Daniel lopes Filho Campo Grande/MS id=quote>id=quote>blz Daniel; ...O Log de Alteraçoes eu ja tenho tb. O caminho vai ser este mesmo...a cada Alteraçao q houver no campo Nome...Vou Abrir um Aviso antes de salvar..explicando..os riscos de trocar o Nome. Se for uma Simples correçao..o cara continua...e for um Reaproveitamente de registro..ai fica por conta dele. @braços Ale aleseribeli@hotmail.com Andradina/SP "O que nao Aguenta, Arrebenta, quem Bambeia eh Barbante, Quem tem Limite eh Município."id=red>