Jump to content
Fivewin Brasil

AnaCatacombs

Membros
  • Posts

    252
  • Joined

  • Last visited

  • Days Won

    11

AnaCatacombs last won the day on July 14 2016

AnaCatacombs had the most liked content!

About AnaCatacombs

  • Birthday 11/08/1985

Contact Methods

  • MSN
    ana@grandinformatica.com.br
  • Website URL
    http://www.grandsinformatica.com.br

Profile Information

  • Gender
    Female
  • Location
    Cianorte-Paraná

Recent Profile Visitors

994 profile views

AnaCatacombs's Achievements

Newbie

Newbie (1/14)

35

Reputation

  1. Quero compilar uma versão de sistema com gtwvw + fivewin pra ir migrando aos poucos e vi que voce ja fez itos!

     

    Tem como você mandar um exemplo para mim

     

    jairfab@gmail.com o meu e-mail caso seja possível você me ajudar com um exemplo.

  2. 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.
  3. 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.
  4. Bom dia Ana. Vi seu comentário sobre a etiqueta na argox e tenho algumas dúvidas:

    1ª Esse exemplo é para uma argox instalada na porta serial ou usb?

    2ª Como está direcionando a impressora, através da tdosprn?

    3ª você precisou instalar uma impressora somente texto no windows ?

     

    Obrigado por enquanto

    vlw

     

  5. Aqui temos até de 1000 e não tivemos problemas. Não é muito aconselhado, mas "nois faiz gambiarra memo"
  6. 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
  7. Gennntemmm q q isso ! Take it easy aí, João ! kkkkkkkkkkkkkkkkk
  8. Acho uma boa data tb, 29/10
  9. 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.
  10. 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
  11. Márcio, é verdade. O de BH foi MARA ! Inclusive, apoiaria se fosse lá novamente ! Na verdade, apoiaria em qualquer lugar kkkkk
  12. 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
  13. Jão, eu entendi que pra funcionar com resource é só passar o nome da imagem do resource na hora de fazer um redefine.
  14. Oloko Gilmer... sei que deve ter alguns casos que não temos conhecimento, mas não pode desistir da gente, rapaz!
  15. Ah, entendi. Parece interessante, acredito que pelo ramo ser bem diferente do qual eu trabalho, estranhei um pouco kkkkkkk
×
×
  • Create New...