Ladinilson

Algo em relação ao FastReport? Vi este discussão no forum Fivetech sobre... https://forums.fivetechsupport.com/viewtopic.php?f=6&t=43098&hilit=fastreport&sid=b5d11137a1e632043d75b2de142d152f Abraços

Realmente pode ser essa solução e vou testar pois tenho uma dificuldade em dimensionar na tela 2 ou TV.

Bom dia senhores, Necessitava também dessa forma de apresentar duas telas para meu programa de bingo onde a parte da marcação das bolas ficava com o operador e as informações do andamento do bingo para um monitor ou diretamente para uma TV. Na rotina que é chamada tem uma linha que chama outra rotina ou seja, a primeira chamada seria para o monitor 1 (notebook) e a segunda chamada para o monitor 2 (TV)... FUNCTION TELANOT() ... TELATV() ... RETURN NIL STATUC FUNCTION TELATV() ... RETURN NIL s Tela 1 (notbook) Tela 2 (TV) Para a segunda tela (TV) uso a funcão de deslocamento como: vLinSegT := 0 vColSegT := 2015 oWnd:MOVE(vLinSegT,vColSegT) Sem o uso da função MOVE() ou colocando zero na variável vColSegT, as telas ficam sobrepostas. A solução é bem simples mas tem efeito imediato nas duas telas por se tratar de rotinas intrelaçadas e lembrando o Windows deve estar configurado para 2 telas. Espero que ajude ou pelo menos sirva de base! Abraços

Boa tarde, Fiz um que uso como automação comercial normal para todos e não sei se serve se caso ainda não encontrou! Abraços

Desculpe a brincadeira mas olhando esses código me lembrei da minha vida antes de conhecer o FastReport, acertar e ajeitar isso era terrível, um castigo que nenhum programador merece kkkk

Me parece que é esse... Report generator and reporting tools for Delphi, .NET - Fast Reports (fast-report.com)

O site é beeeeem amador e parece site de golpe! Mesmo assim obrigado amigo mas não tive nenhuma confiança nele e vou continuar procurando.

Boa tarde amigos, Alguém sabe qual site ou representante no Brasil para a compra dessa ferramenta para relatórios? Obrigado

Tenho esse conhecimentro amigo, é que em determinado momento quase TODOS aqui já tiveram algum problema com fonts e é comum na linguagem. Estou tentando outras alternativas para contornar esse problema. Obrigado

Sim estão instaladas tanto que nos "Says" estão corretos apenas no BTNBMP mesmo.

Bom dia caros, Alguém já teve este problema com BTNBMP que ja tentei de tudo e não pega o FONT nem com reza do Kapiaba para ver o Corinthians dele vencer!. DEFINE FONT oFontBOLI NAME "ARIAL ROUNDED MT BOLD" SIZE 0,-52 OU oFontBOLI := TFont():New( "ARIAL ROUNDED MT BOLD", 0, -52,, ) REDEFINE BTNBMP ButQST[nContST] ID nIDST OF oWnd FONT oFontBOLI FILE (fbitm)+"\BOLAQD.PNG" PROMPT ALLTRIM(STR(nContST,2)) ADJUST CENTER ButQST[nContST]:lTransparent := .t. ButQST[nContST]:lBoxSelect := .f. ButQST[nContST]:lMOver := .f. ButQST[nContST]:lRound := .f. ButQST[nContST]:lBtnDown := .f. ButQST[nContST]:lBorder := .f. ButQST[nContST]:lPressed := .F. // --- OPÇÕES FEITAS E NENHUMA DERAM CERTO ButQST[nContST]:SETFONT(oFontBOLI) ButQST[nContST]:oFont := oFontBOLI SET FONT OF ButQST[aNumeroST] TO oFontBOLI ButQST[nContST]:REFRESH() AEval( ButQST, { |oBtn| oBtn:oFontBold := oFontBOLI, oBtn:Refresh() } ) AEval( ButQST, { |oBtn| oBtn:oFontBold := nil, oBtn:SetFont( oFontBOLI ), oBtn:Refresh() } ) AEval( ButQST, { |oBtn| oBtn:SetFont( oFontBOLI), oBtn:Refresh() } ) //---------- ButQST[nContST]:SETCOLOR( NRGB(180,180,180) ) ButQST[nContST]:REFRESH() Vi em outros tópicos que esse problema de Font se estende a muitos comandos.

Eu criei dois programas, um que cria o ZIP com o executável, DLL, DBFs, etc a escolher o que seria apenas atualizado desses tipos de arquivos e um outro programa para o cliente para fazer esta atualização com o ZIP mas antes de faz todo um backup e atualiza os o executável, DLLs e DBf com campos novos das tabelas. Para SQL, esta atualização do banco de dados não fiz e funciona apenas executáveis e DLLs mas para as versões DBFs, funciona que é uma beleza a muito tempo. Este ano é série B no Corinthians do Kapiaba kkkkk

Seria bom saber as versões do FWH e xHarbour/Harbour, algumas versões anteriores tem este grave problema;

Entendi Mota pois seria no caso ter uma que podesse acessar de um link por whatsapp como por exemplo.... https://aplicação.com.br/ E quando entrar no navegador ja com a tela aberta com os botões tipo... Seria bom demais! Abraços

Boa noite amigos, alguma coisa sobre acesso do programa via WEB clicando em um link para abrir no navegador? Li sobre o TSPLUS e parecia algo bem interessante pois trabalho com programa para bingos e os clientes me cobram de vendas de cartelas pelo celular que no momento o que me falta é tempo para estudar uma nova linguagem ou quem tivesse algo parecido, me contate. Site do meu programa de bingo. http://www.lsbingo.com.br Obrigado

Nosso amigo sempre mandando as últimas novidades parabéns! Mas te juro meu amigo, se algo que poderia vir em direção aos sistemas em web ou mobile na mesma pegada dos comandos que estamos acostumasdos a usar, seria uma alegria igual ao meu Mengo quando da uma goleada no teu Corinthians kkkkkk

Por exemplo fontes de código de barras, uso vários para muitas aplicações e no Fast não achei esta opção ou algo em manuais.

Como importamos fontes?

FastReport mesmo com algumas limitações.

Quando ele disse "RESOLVIDO" já ia copiar e colar no meu sistema também, ai fiquei olhando e pensei..."que porra é essa já?" kkkkkkkkkkkkkkkkkkkk

Não seria por falta do drive onde ele está ou estou ficando doido aqui?! drive:=CURDRIVE() File(drive+":"+"\Pvenda\Remessa\Protocolos\Chave") Abs

Na minha opinião esta é uma profissão que já deveria ser HÁ MUITO TEMPO home office, muitos daqui (acredito eu) trabalham na madrugada como até hoje eu faço por ter o melhor tempo e até condições para melhor concentração nas linhas de código e sinceramente, hoje em dia perder tempo em trânsito e ainda muitos estresse até no ambiente de trabalho, ao meu ver desnecessário e até para os CEO da vida as despesas trabalhistas e funcionais são bem mais reduzidas mas isso É MINHA OPINIÃO. Mas claro, quando trabalhei em uma empresa como gerente geral do ti e desenvolvimento, era muito legal se reunir com o pessoal e namorar aquela colega rsrs Abraços e bom final de semana a todos.

Como discutido ai em cima, se em home office poderia até me candidatar.

Como sou das antigas que se tem o ditado "esta funcionando então não muda"... INI oIni FILE (fdefa+"\PARAM.INI") GET vNomeBingo SECTION "GERAL" ENTRY "Nome" OF oIni GET vDriveRaiDarive SECTION "GERAL" ENTRY "DriveRD" OF oIni ENDINI Abraços

Tens algumas telas para ver como fica?