Ale SB

Blz Geraldo; Olha no samples os exemplos: TestFx3.prg TestFx8.prg No Pelles vc vai Criar um Custom Controle para a TFOLDEREX, soh isso. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

citação:Olá Gilberto, Estou a procura de uma apostila na internet mas está difícil encontrar. Será que podes enviar pra mim? desde já agradeço. Vitor Molina vitormolina@gmail.com id=quote>id=quote>Veja se isso ajuda Amigo: http://www.fivewin.com.br/exibedicas.asp?id=616 http://pt.scribd.com/doc/36418169/FiveWin-Manual-Em-Portugus @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Se acha q eu to Mandando Bala pq meu Amigo ?! Nao foi pedido soh uma vez nao... ...e acredito q mesmo agora tb nao vai resolver... @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Joao...temos q ser educados com eh conosco tb...q nao eh o caso la do Cidadao... E outra coisa...fui bem educado sim..ate mandei uma lista de um pessoal q pode ajudar ele...amigo melhor q eu nao Existe. E outra coisa de novo...soh falei oq estava engasgado na garganta de um monte de gente q recebe estas coisas. E outra coisa novamente...Vc eh Nota 10 Joao...vou respeitar sua critica ao post.... @braços Tricolores..heheh Quem Trabalha não tem tempo de ganhar Dinheiro.id=red> Editado por - Ale SB on 06/01/2012 11:49:21

Desculpa postar aqui na area de programaçao...mas... "Paciência tem Limites" Sr Alessandro Avelino ( vulgo Don Juan ). Seria muito pedir para me retirar da sua Lista de contatos...esta Insuportável seus SPAM. Muita gente ja lhe pediu isso, e vc nao para de enviar estas porcarias...por isso soh posso chegar as seguintes conclusoes: - Vc eh Bobo ou se faz de de Tantã( como minha vó dizia ). - Vc eh um Sem Noção ou eh um Milhonario q usa os SPAM como passa Tempo. - Vc eh um programador frustrado que enfurido pelo fracasso, usa de passa tempo testar os limites do pessoal aqui do Forum. De qq forma na minha Profunda bondade vou te ajudar. Aqui nesta Lista vc pode encontrar alguem q com certeza vai te ajudar: http://www.telelistas.net/1/16_CE/85000_fortaleza/205/254/99199/psicologos.htm @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red> Editado por - Ale SB on 06/01/2012 12:02:01

Desculpa postar aqui na area de programaçao...mas... "Paciência tem Limites" Sr Alessandro Avelino ( vulgo Don Juan ). Seria muito pedir para me retirar da sua Lista de contatos...esta Insuportável seus SPAM. Muita gente ja lhe pediu isso, e vc nao para de enviar estas porcarias...por isso soh posso chegar as seguintes conclusoes: - Vc eh Bobo ou se faz de de Tantã( como minha vó dizia ). - Vc eh um Sem Noção ou eh um Milhonario q usa os SPAM como passa Tempo. - Vc eh um programador frustrado que enfurido pelo fracasso, usa de passa tempo testar os limites do pessoal aqui do Forum. De qq forma na minha Profunda bondade vou te ajudar. Aqui nesta Lista vc pode encontrar alguem q com certeza vai te ajudar: http://www.telelistas.net/1/16_CE/85000_fortaleza/205/254/99199/psicologos.htm @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red> Editado por - Ale SB on 06/01/2012 12:02:01

Bom acreidto q seria mais simples fazer assim -> - Criar o Browse com um Temporario; - Qdo o Usuario seleciona o filtro do q ele precisa, vc Carrega o temporario soh com estes informaçoes. Desta Forma, vc nao precisa ficar mudando de alias no browse, a funçao se encarrega de fazer a filtragem, conforme a seleçao escolhida. tenho Browse desta forma, e sao bem rapidos e funcionais...sem falar q dá menos trabalho. Fica ai a dica. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Blz Luiz; Bom neste caso vc poderia continuar usando o xHb Rev 6406. http://forums.fivetechsupport.com/viewtopic.php?f=16&t=2486&start=45#p92385 @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

eu uso este aki...muito bom tb http://www.elcomsoft.com/aopr.html @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Blz Kapi; Isto aki tb deve ajudar: REDEFINE GET oGetF2[01] VAR oDbfClie:MotivCli MEMO ID 21 OF oFld:aDialogs[2] ; ON Change( sb_LimitText(oGetF2[01]) ) ******************************************************************************** function sb_LimitText(oGet,nSize) //////////////////////////////////////////////////////////////////////////////// // Autor..........: Peguei no Forum Brasil // // Modificaçoes...: Ale SB - Soft Camus // // Descricao......: Restringe o Tamanho de um Texto. // // Parametros ==> // // - oGet : oBjeto Get. // // - nSize : Tamanho que deve ter o Texto. // // Dependencias ==> // // Retorno ==> nil // //////////////////////////////////////////////////////////////////////////////// local nTam DEFAULT nSize := 60 nTam := Len( AllTrim( oGet:cText ) ) if nTam > nSize msginfo("A Mensagem já Alcançou o Tamanho Limite !!!", "..:: Atenção ::..") oGet:cText := Substr(oGet:cText, 1, nTam-1) endif return nil id=code>id=code>Saudaçoes Tricolores...hehehe.. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Gilberto; Eu acredito q nao tenha como deixar mais rapido..pq nao eh uma questao apenas da rotina...neste caso eh um conjunto. SO + Maquina + Internet ate para enviar email, direto pelos browse dos provedores tem hora eh uma lentidao extrema..se sabe. Ps.: Eu tenho usado desta forma mesmo para enviar anexos em PDF e acho q ta dentro dos padroes de envio(o tempo)..pelo menos ninguem reclamou...heheh. Depois vou dar mais uma olhada nas funçoes da API do WIN..pra ver se daria pra melhorar algo...se eu tiver alguma novidade...eu aviso..ok. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Morei na Vila Guarani, proximo ao Humaita... Vc ta em q bairro ? O Carlao ( Decker ) aki do Forum..ta morando ai tb... Grandes recordaçoes de Sto Andre...e o melhor de tudo q nunca fiu assaltado ai...( Um feito Historico hoje em dia )hehehe.. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Nelson, vc conhece Andradina ? Morei 16 anos lá, faz 5 meses q estou aki em Campo Grande/MS...mas, sou natural de Santo Andre...morei 20 anos ai.... @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Rone, tente desta maneira, após a sua açao: oBrw:Refresh() oBrw:SetFocus() oDlg:Update() se mesmo assim nao der certo, force o Refresh : oBrw:Refresh( .T. ) oBrw:SetFocus() oDlg:Update() @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red> Editado por - Ale SB on 16/10/2011 12:45:36

Perdi meu Pai e minha Avó este ano...sei como eh dificil a perda. Mas...força aê meu Amigo. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

citação:Ale, eu nao tinha lido seu post sobre 30% de sinal da compra achei otimo.. assim realmente gera um compromisso... depois o desconto vai até os 30% ou nao.. dependerá dos inscritos.. legal Gilmer que sabe agora vitor s.b.c. id=quote>id=quote>Hehehhe..eu imaginei..q vc nao tinha lido tudo...heehe... realmente neste caso, uma simples inscriçao poderia ja se tornar um comprometimento...concordo com vc tb... Mas dei a ideia de um deposito de garantia da compra..justamente pq o Gilmer mencionou: ..."que inscritos não quer dizer que irá pagar,..." Acho valida todo ideia postada aki...tenho certeza q o Gilmer encontrara a soluçao que mais faz parte do perfil da Empresa dele...vamos aguardar... @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

citação:Meu.. faz assim.. os inscritos deverao passar o cpf voce ja informa.. é compromisso e sera gerado um boleto. ja era.. vitor id=quote>id=quote>Boleto Gerado nao eh Boleto pago..e vc nao pode protestar ninguem se a pessoa nao recebeu a mercadoria. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

citação:Caraca.. será que o camarada.. se compromete a pagar.. e depois nao paga.. fala sério neh.. onde está a palavra.. como dizia antigamente compromisso no fio do bigode.. vitor s.b.c. id=quote>id=quote>Vitor, nao eh kestao de palavra...eh Empreendedorismo, profissionalismo. No mundo dos negocios, tudo tem q ser feito Preto no Branco. O fato da pessoa falar q vai comprar algo e depois nao comprar nao o Torna uma pessoa Desonesta..vc nao acha ?! Eu falei pra minha Esposa e para o cara da concessionária q este ano iria compra uma S-10...pois eh nao comprei ?! Me tornei desonesto ou menos homem por isso ?! Reveja seus conceitos de negocio meu amigo. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Mais uma ideia; Faça Duas promoçoes. - 1º Começe a promoçao em outubro e termine no dia do Evento. --> para esta 1º de algum brinde...Cliente adora brinde...hehehe. - 2º Mês de Dezembro ( promoçao de natal ) --> Fim de Ano o Cliente esta mais Capitalizado. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

citação:O ruim, que inscritos não quer dizer que irá pagar, ai como fica o desconto, entendeu!? e-mail: gilmer@fivewin.com.br msn: fivewinbrasil@hotmail.com id=quote>id=quote>Eu faria desta maneira: - Estipular prazo da promoção ; --> Faz com q o Cliente, programe-se para compra. - Abranger a Area de venda ; --> Não soh para os q irao ao Evento, mas, sim para todos da comunidade, vc ira vendar Mais. - Exigir 30% ( +- ) do valor da ferramenta em deposito ; --> Cria o compromisso da compra. - Ao final da Promoçao, vc terá o numero exato do interessados em compra-la ; --> Assim poderá saber ate onde poderá ir no desconto. - Crie um topico, com a Lista dos Inscritos na Promoção. --> Ficará bem Transparente. @braços Ale Quem Trabalha não tem tempo de ganhar Dinheiro.id=red>

Acabei de testar Eduardo..da maneira q vc indicou...realmente..desta forma funciona..certinho ? CadaUsua->( dbseek(PadR("A",15)) ) ==> .F. Agora tendi....valew pela Dica. @braços Ale ...Saudade louca de ouvir um som manhoso de um berrante preguiçoso nos confins do meu sertão.id=red>

citação:Somente para complementar minha mensagem anterior. Caso voce precise fazer uma pesquisa EXATA voce tem que passar no DBSEEK o mesmo tamanho em BYTES do indice. Pegando o seu exemplo e considerando que o campo NOME tem 30 bytes seria: dbSeek( PadR("A",30), .f. ) Neste caso só vai retornar .T. se existir um nome sendo: "A.............................." (CONSIDERANDO QUE NO LUGAR OS PONTOS SEJA ESPAÇO) Eduardo Motta emotta@gmail.com.br FWH 9.09 - xHARBOUR 1.2.1 id=quote>id=quote>Certo Eduardo..agora entendi...o esquema...senao eh mais facil..eu fazer a comparaçao mesmo entao..neh ?! Valew a Dica. @braços Ale ...Saudade louca de ouvir um som manhoso de um berrante preguiçoso nos confins do meu sertão. id=red>

Blz Eduardo; Entao ker dizer...q com o dbSeek eu nao vou conseguir uma Busca Exata ? Meu indice segue assim: Campo -> NOME index on CadaUsua->Nome TAG Nome TO iCadaUsu.cdx Registros : ALESSANDRO JOAO MARCELO RUBENS Entao meu dbSeek("A",.f.), vai ter o Retorno Verdadeiro...pq ele encontrou o "A" ? Terei q fazer uma Comparaçao, apos o Seek ? CAMPO == NOME Eh isso ? @braços Ale ...Saudade louca de ouvir um som manhoso de um berrante preguiçoso nos confins do meu sertão.id=red> Editado por - Ale SB on 12/07/2011 14:12:57

citação:Fala ai Ale blz, realmente a opcao .t. do dbseek não funciona corretamente, aqui uso desta forma... Set(9,"On") if vendas->(dbseek(cData),.T.) Set(9,"Off") id=code>id=code>resumindo da forma antiga(do velho clipper) Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR 1.1,PELES,XDEV,VLIB,ADS 8.1 FWH 9.12,XHARBOUR 1.2,ADS 9.0 / FWH1104 id=quote>id=quote>Luiz...mas eh ao contrario...a opçao .T., BUSCA APROXIMADA funciona..o q eu kero eh a opçao Busca Exata...dbSeek(,.f.)....e eh isso q nao funciona. @braços ale ...Saudade louca de ouvir um som manhoso de um berrante preguiçoso nos confins do meu sertão. id=red>

Reparei que a opçao SoftSeek OFF...nao ta surgindo efeito no meu dbSeek... Passei pro Giovanny ele testou no banco dele e tb..percebeu o Bug... eu fiz o seguinte Teste: Meu campo ==> "ALESSANDRO" dbSeek( "A", .f. ) ==> .T. Ta errado,,,nao tá ?!....se eu Determinei .F. a Busca Aproximada ele nao deveria retornar .T....CORRETO ?! Se vcs puderem testar no Sistema de Vcs tb...e dar um retorno..eu agradeço. Obs.: Testei Com DBFCDX, ADSCDX, harbour, xHarbour, varias versoes do FW...e deu tudo no mesmo tamanho. Meu teste: #include "fivewin.ch" REQUEST DBFCDX, OrdKeyCount, OrdKeyNo ******************************************************************************** FUNCTION MAIN() ******************************************************************************** SET CENTURY ON SET EPOCH TO 1990 SET DATE BRITISH SET CURSOR ON SET DELETED ON SET ESCAPE ON SET EXCLUSIVE ON SETCANCEL( .F. ) SET CONFIRM OFF SET EXACT ON dbusearea(.t.,"DBFCDX","CadaUsua.Dbf") dbsetindex("iCadaUsu.cdx") CadaUsua->(dbsetorder(3)) CadaUsua->(dbgotop()) ? CadaUsua->( dbseek("A") ) dbclosearea() RETURN nil id=code>id=code>@braços Ale ...Saudade louca de ouvir um som manhoso de um berrante preguiçoso nos confins do meu sertão.id=red> Editado por - Ale SB on 12/07/2011 14:19:44