Jump to content
Fivewin Brasil

AnaCatacombs

Membros
  • Posts

    252
  • Joined

  • Last visited

  • Days Won

    11

Everything posted by AnaCatacombs

  1. Tem como fazer com string sim: Partindo do suposto que sua string sempre terá a mesma estrutura: 4x o "|" , sendo a posição 3 e 4 com as informações que vc precisa. Essa é uma função de teste, se tiver que mostrar a posição 3 e 4 na mesma coluna, vc vai precisar concatenar as informações. Existem outras formas de resolver o problema, por exemplo, rodando um AT e buscando todas as posições do "|" e depois retornando com SUBSTR, mas dessa forma também funciona: ******************* Function teste() ******************* cString2 := "05|D|117,00|MARIA DE TESTE|" nConta := 1 cTexto3 := "" cTexto4 := "" DO WHILE !EMPTY( cString2 ) nPos := AtSkipSTrings( "|", cString2 ) nConta++ IF nPos > 0 cString2 := SubStr( cString2, nPos+1 ) IF nConta = 3 cTexto3 := LEFT(cString2,AT("|",cString2)-1) ELSEIF nConta = 4 cTexto4 := LEFT(cString2,AT("|",cString2)-1) ENDIF ELSE cString2 := "" ENDIF ENDDO MSGINFO(cTexto3) MSGINFO(cTexto4) RETURN(.T.) Com o HB_ATokens também funciona: ******************* Function teste() ******************* cTexto3 := "" cTexto4 := "" cString2 := "05|D|117,00|MARIA DE TESTE|" aTeste := Hb_ATokens(cString2,"|") IF LEN(aTeste) > 3 cTexto3 := aTeste[3] cTexto4 := aTeste[4] ENDIF MSGINFO(cTexto3) MSGINFO(cTexto4) RETURN(.T.) Tudo vai depender da forma que esses dados são inseridos no browse. Se for um browse do tipo DBF vai ser um pouco mais complexo de encaixar do que o browse do tipo Array, mas também deve funcionar.
  2. No Pelles eu utilizo o componente Custom Control. No ClassName: TXBrowse (case sensitive) Window Styles: 0x50310000 Extended window styles: 0x00000000 Pelo que eu vi, os redefines estão corretos.
  3. Aqui temos até de 1000 e não tivemos problemas. Não é muito aconselhado, mas "nois faiz gambiarra memo"
  4. Não vi a função, mas o colega tava somando tipo de dados diferentes, talvez por um parâmetro passado incorretamente... Esse tipo de coisa que todo mundo faz kkkkkkk
  5. Gennntemmm q q isso ! Take it easy aí, João ! kkkkkkkkkkkkkkkkk
  6. Acho uma boa data tb, 29/10
  7. Gente, não testo mesmo. Eu fiz esse formulário com um filho no braço e outro no colo. Se alguém quiser melhorar, esta a disposição.
  8. Bom dia pessoal. Estou usando o ListView e senti falta de um método que retornasse todos os itens selecionados. Como não encontrei nada, acabei criando aqui. Segue os métodos #DEFINE LVM_GETITEMSTATE 0x102C ******************************************** METHOD GetItemState(nItem) CLASS tListView ******************************************** nItem := IIF(nItem=NIL, ::nOption,nItem) RETURN( SendMessage( ::hWnd,LVM_GETITEMSTATE, nItem,2)) ********************************************* METHOD GetItemSelected() CLASS tListView ********************************************* aItems := {} AEVAL(::aPrompts,{|Item,Pos| IIF( ::GetItemState(Pos-1) = 2, AADD(aItems,{Pos-1,Item}),.T.)}) RETURN(aItems) []'s Ana
  9. Márcio, é verdade. O de BH foi MARA ! Inclusive, apoiaria se fosse lá novamente ! Na verdade, apoiaria em qualquer lugar kkkkk
  10. Jão meu kiriiido, só pelo tópico dá pra ver que não é um cara que acabou de comprar o fivewin, não é um "zé mané" Se alguem não entendeu, basta perguntar novamente, tenho certeza que seria muito bem respondido. Agora vir aqui e criticar quem tá querendo ajudar não POODDYYYYYY
  11. Jão, eu entendi que pra funcionar com resource é só passar o nome da imagem do resource na hora de fazer um redefine.
  12. Oloko Gilmer... sei que deve ter alguns casos que não temos conhecimento, mas não pode desistir da gente, rapaz!
  13. Ah, entendi. Parece interessante, acredito que pelo ramo ser bem diferente do qual eu trabalho, estranhei um pouco kkkkkkk
  14. Então se tem 10 produtos, o usuário tem que colocar desconto manual em cada um deles?? É isso?
  15. Ladnilson, o problema do colega é exatamente esse: Depois de inserir os produtos, é dado o desconto, e deve ser rateado entre os itens. Eu fiz da forma que citei acima e nunca tive problemas, inclusive na NF-E.
  16. Eu também uso com windows 10 sem manifest e nunca tive problemas. Não sei pq tiramos, mas lembro que deu problema...
  17. Vamos colocar esse todo poderoso pra palestrar kkkkkkkkkkkk
  18. kkkkkkkkkk pode me chamar de Dona Ana, não ligo não... afinal, já tô chegando na idade de Dona mesmo kkkkkkkkkkkkkk
  19. Alê, acho lindo trabalhar com classes, hash, bloco de codigo estendido e outras funcionalidades pouco usada no meio da programação. Acho interessante também metodologias ágeis !
  20. Dona Ana não decide nada. kkkkkkkkkkkkkkkk Acho que podemos fazer uma votação pra decidir o mês , e abrir para os temas das palestras. Viva a democracia kkkkkkkkkkk
  21. Enviado. Se alguém mais quiser, me avise.
  22. É extremamente chato, mas não é enrolado. Vou postar um exemplo aqui, mas me passa seu e-mail que eu te mando o manual da PPLA: Vc vai usar tudo como @PROW(),PCOL(), não esquecendo de mandar o set device to print antes: Para configurar a impressora: L0 =" " + CHR(2)+ "M3000" + ENTER && comprimento da etiqueta L1 = CHR(34)+" " + CHR(2)+ "c0000" + ENTER && fixa margem esquerda padrão c0000 L2 = CHR(34)+" " + CHR(2)+ "e" + ENTER && imprime multiplas copias L3 = CHR(34)+" " + CHR(2)+ "O0030" + ENTER && posicao inicial da impressao anulado pelo papel continuo L4 = CHR(34)+" " + CHR(2)+ "f140" + ENTER && avanca sobre o picotado pra cortar não pode ser menor q 220 L5 = CHR(34)+" " + CHR(1)+ "D " +CHR(2) + "L" + ENTER L6 = CHR(34)+" " + CHR(2)+ "L" + ENTER L7 = CHR(34) + "D11" + ENTER && Tamanho do Pixel L8 = CHR(34) + "H14" + ENTER && Temperatura Para Impressao L9 = CHR(34) + "PD" + ENTER && Velocidade de impressao L10= CHR(34) + "SD" + ENTER @ prow(),pcol() say L0 + L1 + L2 + L3 + L4 + L5 + L6 + L7 + L8 + L9 + L10 Para imprimir um barras: @ Prow(),Pcol() say Chr(34) + "4F4207000100395" + vBarr[x] + enter ** 0395 ==> coluna ** 0100=======> linha ** 70===========> altura do codigo de barras ** 2==============> largura fina ** 4===============> lagura da barra larga ** F================> Tipo do codigo de barras ** 4=================> posicao vertical .. orientacao Para imprimir um texto: @ Prow(),pcol() say Chr(34) + "102200502100153" + cTexto + enter * Segue praticamente a mesma estrutura do comentário da impressão do barras Lembrando que é tudo em pixel ! []'s Ana
  23. Vc pode usar fastreport, ou montar na raça mesmo ! kkkkk É PPLA ou PPLB? Tenho alguns modelos que posso te passar sem problemas.
  24. Agora tô vendo render... nem que for um torresmo no bar da esquina vai ter kkkkkkkkkkkkkkk Eu sou muito a favor da parte da confraternização, mas acredito que temos muitos amigos com um conhecimento imensurável a ser repassado pra comunidade !
  25. Acho que São Paulo é muito bom, de fácil acesso a todos. Eu vi esse hotel chiquetoso aí, tem até serviço de creche kkkkkkkkkk O bom é que cada um iria se virar com a hospedagem... Tem lugar nesse hotel pra fazer palestra ou algo parecido?
×
×
  • Create New...