Ir para conteúdo
Fórum Script Brasil

Jhonas

Monitores
  • Total de itens

    9.657
  • Registro em

Tudo que Jhonas postou

  1. veja esses links https://www.google.com.br/?gws_rd=ssl#q=instalar+quickreport+delphi+2010 abraço
  2. material para consulta http://www.delphibr.com.br/baixar.php?tipo=1&id=29 http://www.delphibr.com.br/exemplos.php https://www.google.com.br/?gws_rd=ssl#q=manipulação+de+classes+delphi+ abraço
  3. Contrata Consultor na modalidade Produto PROJETO 914 BRZ 5015 EDITAL Nº 10/2016 1. Perfil: Gerenciamento eletrônico de documentos 2. Nª de vagas: 01 3. Qualificação educacional: Profissional de nível superior na áreas de Ciências Humanas, Ciências Sociais Aplicadas ou Ciência da Computação 4. Experiência profissional: Experiência mínima de 03 anos em manuseio e organização de acervos. Necessária participação anterior em implantação de Gerenciador Eletrônico de Documentos. Desejável experiência com bancos de dados, em particular PostgreSQL, e softwares open-source/livres. ----------------------------------------------------------------------------------------------------------------------------- software para testar http://www.instasoft.com.br/download/gratis-testar/gestao-eletronica-de-documentos/ged/ http://www.baixaki.com.br/download/g-e-d-gerenciador-eletronico-de-documentos.htm OBS: o serviço em si não é complicado, mas é um serviço maçante de ter de ficar digitalizando documentos e classificando-os nas pastas no computador abraço
  4. 2ª. Destruir a instância do FiltroMatricial (comigo, o erro acontecia, pois tenho uma instância do DraftFilter em um form comum) voce poderia ter copiado o código do RLDraftFilter.pas do link e salvo na pasta Bin ou LIB do delphi dessa forma voce ia poder usar no seu projeto se conseguiu resolver .... beleza abraço
  5. Jhonas

    Nome desta fonte

    esse tipo de fonte não é padrão do windows ...então voce tera que procurar na net qual é esse tipo de letra veja nesse link http://guiaavare.com/noticia/10103/download-de-fonte-de-letras ou https://www.google.com.br/search?q=fontes+de+letras&biw=1024&bih=644&também=isch&tbo=u&source=univ&sa=X&ved=0ahUKEwiA-tW85ebNAhXEEpAKHa9nDacQsAQIMg#imgrc=0Z4LNlnADGSODM%3A abraço
  6. o componente webbrowser funciona usando o internet explorer ... veja o componente chrome para o delphi ...tem as mesmas funcionalidades e um pouco mais https://www.google.com.br/?gws_rd=ssl#q=chrome+delphi+component abraço
  7. ok... desculpe pela infeliz observação pesquise por indices compostos ...pode resolver tambem abraço
  8. veja esses links https://www.google.com.br/?gws_rd=ssl#q=configurar+cursor+no+blogger abraço
  9. veja o comando de Reset da impressora https://sourceforge.net/p/fortesreport/svn/HEAD/tree/trunk/RLDraftFilter.pas ou copie essa unit na pasta do seu delphi e use-a no seu programa https://github.com/fortesinformatica/fortesreport-ce/blob/master/Source/RLPrintDialog.pas abraço
  10. veja esse exemplo de relacionamento entre as tabelas voce pode ter um DBEdit para cada um dos campos dessas tabelas, pois o relacionamento faz com que essas tabelas pareçam ser somente uma digamos que voce quer as informações das tabelas, digitando num campo de pesquisa, por exempo ( NumeroDoPedido ) o ponteiro do registro, irá buscar as informações referentes ao NumeroDoPedido e consequentemente ira buscar as informações do CodigoDoProduto ou Vice e Versa e essas informações vão estar aparecendo nos DBEdits então o que voce tem que fazer, é criar um form ou campo de pesquisa, e usar um select para pesquisar o registro na tabela exemplos: http://www.hardware.com.br/comunidade/tabela-consulta/1017592/ http://www.webmaster.pt/mysql-select-2-tabelas-776.html https://www.google.com.br/?gws_rd=ssl#q=select+tabelas+relacionadas+mysql abraço
  11. existe relacionamento entre as suas tabelas ?
  12. exemplo: var oExportfilter : TfrxCustomExportFilter; begin oExportfilter := TfrxCustomExportFilter(frxPDFExport1); oExportFilter.ShowDialog := False; oExportFilter.FileName := 'c:\test.pdf'; frxReport1.PrepareReport(True); frxReport1.Export(oExportFilter); end; -------------------------------------------------------------- var oExportfilter : TfrxCustomExportFilter; begin oExportfilter := TfrxCustomExportFilter(frxHTMLexport1); oExportFilter.ShowDialog := False; oExportFilter.FileName := 'c:\test.html'; frxReport1.PrepareReport(True); frxReport1.Export(oExportFilter); end; ou veja esses links: http://www.gnostice.com/nl_article.asp?id=301&t=Export_FastReport_reports_to_PDF_RTF_and_image_formats_using_Delphi https://www.google.com.br/?gws_rd=ssl#q=fastreport+save+as+pdf abraço
  13. voce já fez a rotina para dar baixa no estoque ? se sim.... basta colocar no botao onde voce salva o registro, para clicar ou executar automaticamente ( a procedure ou function que faz a baixa do estoque ) exemplo : se sua rotina está em um botão , seria isso : Bitbtn1.Click; se sua rotina esta em uma procedure, seria isso : BaixaEstoque; ou BaixaEstoque(Sender) ... sem conhecer o seu código, fica meio genérico a explicaçao. abraço
  14. tem como ele salvar na pasta que eu renomear. não sei se é isso que voce quer... usa o componente SaveDialog procedure TForm1.Button1Click(Sender: TObject); begin if SaveDialog1.Execute then Memo1.Lines.SaveToFile(SaveDialog1.FileName); end; abraço
  15. .. Não soma o saldo anterior. No evento OnCalcFields não têm como buscar o saldo anterior para calcular o próximo saldo ? A dificuldade na verdade é usa o while no evento OnCalcFields ! agora que voce mencionou é que me lembrei .. o evento OnCalcFields funciona como um while e nesse caso voce pode fazer isso crie um campo calculado na tabela ( SALDO ) var Form1: TForm1; ENT : REAL = 0; SAI : REAL = 0; implementation {$R *.dfm} procedure TForm1.Query1CalcFields(DataSet: TDataSet); begin ENT := ENT + Query1ENTRADA.Value; SAI := SAI + Query1SAIDA.Value; Query1SALDO.Value := ENT - SAI; end; creio que dessa forma vai fazer como voce quer abraço
  16. o post é antigo, então é possivel que voce não tenha a resposta do arce mas voce pode olhar esse link, e ver se ajuda http://www.projetoacbr.com.br/forum/files/category/5-utilit%C3%A1rios-acbr/ ou veja esse programa de teste https://github.com/GabrielF7/ACBrTrunk2/blob/master/Exemplos/ACBrSerial/ACBrBAL/Delphi/BalancaTeste1.pas ou veja o programa Demo que vem junto com os componentes que voce esta usando abraço
  17. Qual seria a melhor forma de fazer isso ? SELECT DATA, ENTRADA, SAIDA, SUM(ENTRADA - SAIDA) AS SALDO FROM TABELA GROUP BY DATA, ENTRADA, SAIDA OBS: o problema é que isso vai ser feito em cada linha de registro da tabela e vai acrescentar um campo na tabela chamado SALDO No entanto o resultado seria: 100-----0------100 0------50------(-50) 100-----0----- 100 50------0------ 50 50------0------ 50 então não ficaria como voce quer .... De forma análoga, ao select seria o uso do evento OnCalcFields, que seria assim: exemplo: Query1SALDO.Value := Query1ENTRADA.Value - Query1SAIDA.Value =============================================================== então uma solução seria voce colocar uma rotina num botão, para fazer uma varredura ( FOR ) nos registros que voce esta visualizando no DBgrid e ir somando o campo ENTRADA e ir subtraindo da soma do campo SAIDA tipo assim: procedure TForm1.Button1Click(Sender: TObject); var i : integer; entra, sai : real; begin entra := 0; sai := 0; Query1.Active := true; for i := 1 to Query1.RecordCount do begin entra := entra + Query1ENTRADA.Value; sai := sai + Query1SAIDA.Value; Query1.Edit; Query1SALDO.Value := entra - sai; // Query1.Post; ///// usado se o campo SALDO existir na tabela Query1.Next; end; end; ==================================================== voce pode tentar modificar o seu código com base nesse raciocinio abraço
  18. Certo, mas utilizando o sum vou conseguir o valor do saldo de um dia, ok. não necessariamente....( pode ser por períodos ) o exemplo que voce viu, foi usado data como parametro para efetuar a soma de um valor voce tem valores de entrada e de saida, então creio que esses valores sejam efetuados por data, assim como, voce faz vendas, e coloca datas para identificar quando foram feitas. se não quiser usar datas, voce pode pegar todos os registros que estão na tabela e somar tambem SQL SUM() Syntax SELECT SUM(column_name) FROM table_name; exemplo: Select sum (entrada) as ValorEntra from Tabela nesse exemplo, vai ser somado todas as colunas do campo entrada da tabela e o valor será colocado em ValorEntra OBS: me informe qual componente voce esta usando ( TQuery, IBQuery, ZQuery...etc ) e a versão do seu Delphi, para que eu possa te passar um exemplo prático. abraço
  19. utilize o select sum ou veja https://br.search.yahoo.com/yhs/search?hspart=ddc&hsimp=yhs-ddc_bd&p=select+sum+delphi&type=bdc-bfr-6ZUJ7__alt__ddc_dss_bd_com abraço
  20. veja se ajuda http://stackoverflow.com/questions/14542873/using-idhttp1-get-with-delphi-and-indy-9-10-on-a-specific-web-server-returns-exc http://stackoverflow.com/questions/28462696/how-to-read-response-from-indy-idhttp-get http://docwiki.embarcadero.com/CodeExamples/Berlin/en/HTTP_Get_(Delphi) ou https://www.google.com.br/?gws_rd=ssl#q=idhttp1.get+example abraço
  21. veja esse link https://www.google.com.br/?gws_rd=ssl#q=WebBrowser.OleObject.+Document.+documentElement.+innerText abraço
  22. procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.SaveToFile('C:\Memo1.Txt'); end; abraço
  23. baixe e instale o EMS Quick Desk https://www.google.com.br/?gws_rd=ssl#q=ems+quickdesk+2.0+download com ele voce vai poder remover o registro com problema preservando os demais registros da tabela abraço
  24. No Delphi quando utilizo os campos não vem com tamanho normal no select, vem truncados. pela imagem não é possivel ver corretamente o tamanho dos campos, mas para resolver esse problema, basta aumentar o tamanho dos campos na tabela abraço
  25. os dois vão funcionar independentemente um do outro não precisa desinstalar a versão que voce está usando. abraço
×
×
  • Criar Novo...