Pular para o conteúdo principal

Postagens

Mostrando postagens de julho, 2014

Postagem em destaque

🚀 Oferecendo Serviços Remotos de Desenvolvedor AdvPL e Mais 🖥️

🚀 Oferecendo Serviços Remotos de Desenvolvedor AdvPL e Mais 🖥️ Olá pessoal, Espero que este post encontre todos vocês bem! É com grande entusiasmo que compartilho que estou expandindo meus serviços como Desenvolvedor AdvPL para novos desafios e colaborações. Com mais de duas décadas de experiência sólida, minha jornada profissional tem sido enriquecedora, com a oportunidade de participar de projetos empolgantes ao longo dos anos. Agora, estou ansioso para trazer minha experiência e habilidades para novas equipes e projetos, trabalhando de forma remota. Minha expertise abrange não apenas AdvPL, mas também outras tecnologias-chave, incluindo JS, SQL, Infraestrutura e Otimização de Processos. Acredito que essa combinação de conhecimentos me permite oferecer soluções abrangentes e eficazes para uma variedade de necessidades de desenvolvimento. Acredito que a tecnologia tem o poder de transformar negócios e impulsionar o sucesso, e estou comprometido em ajudar meus clientes a alcançar seu

BlackTDN :: Harbour CodeBlock

Observe o fragmento de código abaixo e deleite-se com uma das maravilhas da evolução da sintaxe xBase no Harbour: O CodeBlock é, de fato, um CodeBlock. 1: METHOD start( xAction, ... ) CLASS THREAD 2:   3: IF ::active 4: RETURN .F. 5:   6: ELSE 7: ::pThreadID := hb_threadStart( HB_THREAD_INHERIT_PUBLIC, ; 8: {| ... | 9: LOCAL nTime 10:   11: ThreadObject( Self ) 12:   13: ::active := .T. 14: ::startCount++ 15:   16: IF HB_ISNUMERIC( ::startTime ) 17: nTime := ::startTime - Seconds() 18: IF nTime < 0 19: nTime += 86400 20: ENDIF 21: hb_idleSleep( nTime ) 22: ::startTime := NIL 23: ENDIF 24:   25: ::atStart( ... ) 26: IF HB_ISBLOCK( ::_atStart )