Jump to content
Fórum Script Brasil

Luciano Umbelino

Membros
  • Content Count

    19
  • Joined

  • Last visited

Community Reputation

0 Neutro

About Luciano Umbelino

  1. Douglas a thread é muito grande vou ver se consigo postar apenas as partes principais, ok?! unit UthdRecebeArquivos; interface uses Windows, Classes, DateUtils, SysUtils, Forms,FMTBcd, DBXpress, DB, SqlExpr,IdMessage, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, SyncObjs,IdExplicitTLSClientServerBase, IdMessageClient, IdText, IdAttachmentFile, IdSSLOpenSSL, IdIOHandler, ComCtrls, ExtCtrls, IdIOHandlerSocket, IdIOHandlerStack, IdSSL, IdPOP3, IdAntiFreezeBase, IdAntiFreeze, IdFTP, IdFTPCommon, ShellAPI; type RecebeArquivos = class(TThread) private { Private de
  2. Douglas a thread é muito grande vou ver se consigo postar apenas as partes principais, ok?! unit UthdRecebeArquivos; interface uses Windows, Classes, DateUtils, SysUtils, Forms,FMTBcd, DBXpress, DB, SqlExpr,IdMessage, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, SyncObjs,IdExplicitTLSClientServerBase, IdMessageClient, IdText, IdAttachmentFile, IdSSLOpenSSL, IdIOHandler, ComCtrls, ExtCtrls, IdIOHandlerSocket, IdIOHandlerStack, IdSSL, IdPOP3, IdAntiFreezeBase, IdAntiFreeze, IdFTP, IdFTPCommon, ShellAPI; type RecebeArquivos = class(TThread) private { Private de
  3. Douglas a thread é muito grande vou ver se consigo postar apenas as partes principais, ok?! unit UthdRecebeArquivos; interface uses Windows, Classes, DateUtils, SysUtils, Forms,FMTBcd, DBXpress, DB, SqlExpr,IdMessage, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, SyncObjs,IdExplicitTLSClientServerBase, IdMessageClient, IdText, IdAttachmentFile, IdSSLOpenSSL, IdIOHandler, ComCtrls, ExtCtrls, IdIOHandlerSocket, IdIOHandlerStack, IdSSL, IdPOP3, IdAntiFreezeBase, IdAntiFreeze, IdFTP, IdFTPCommon, ShellAPI; type RecebeArquivos = class(TThread) private { Private de
  4. Vou experimentar isso. Não funcionou, coloquei o Terminate no evento Destroy da Thread, mas continuou dando o mesmo erro. destructor RecebeArquivos.Destroy; begin inherited; FConnRcp.Free; FQueryRcp.Free; FQueryRcp1.Free; FQueryRcp2.Free; idp3POP.Free; IdSSLPop.Free; MsgPop.Free; FIdAntiFreeze.Free; FTP.Free; Terminate; end; Caso alguém tenha mais alguma dica, ainda estou precisando resolver este problema. Grato,
  5. Olá Sr(a)s, bom dia, Numa aplicação que estou desenvolvendo está acontecendo um erro, que apesar de estar pesquisando muito, ainda não consegui resolver, vou tentar resumir: Na minha aplicação tem um form com uma lista de arquivos que foram recebidos via FTP, sendo que a recepção desses arquivos é feita por uma thread independente. Esta thread identifica que existem arquivos a serem baixados e se encarrega de efetuar o download do arquivo. No momento que está sendo efetuado o downlado a thread incrementa um gauge no form, que contem a lista dos arquivos que foram recebidos, indicando o percen
  6. Vou dar uma olhada. Grato, Olá Jhonas, bom dia, Dei uma olhada no exemplo que você me mandou, mas infelizmente ainda não é a solução que preciso, pois o o FTP(OnWorkBegin, OnWork e OnWorkEnd) e o Gauge estão no mesmo form e por se tratar de um único form o usuário não o fecha, no meu caso é um fom de consulta, o FTP e os eventos OnWorkBegin, OnWork e OnWorkEnd ficam numa thread, justamente para que a aplicação fique liberada para outras ações. Pois bem, quando quando o FTP inicia começo a incrementar o gauge, a tela onde o gauge está até fica liberada, mas se eu a fechar, congela toda a a
  7. Vou dar uma olhada. Grato, Olá Jhonas, bom dia, Dei uma olhada no exemplo que você me mandou, mas infelizmente ainda não é a solução que preciso, pois o o FTP(OnWorkBegin, OnWork e OnWorkEnd) e o Gauge estão no mesmo form e por se tratar de um único form o usuário não o fecha, no meu caso é um fom de consulta, o FTP e os eventos OnWorkBegin, OnWork e OnWorkEnd ficam numa thread, justamente para que a aplicação fique liberada para outras ações. Pois bem, quando quando o FTP inicia começo a incrementar o gauge, a tela onde o gauge está até fica liberada, mas se eu a fechar, congela toda a a
  8. Sim... se o teste funcionar, voce pode implementar o resultado na thread. fechar ou minimizar ... se fechar o processamento é interrompido ... se minimizar não abraço Olá Jhonas, Então amigo, acho que a grande questão mesmo é a atualização do gauge, já que o FTP com a thread funciona corretamente sem o gauge, quando colodo o gauge para funcionar é que trava a aplicação, não a tela que tem o gauge a aplicação quando fecho essa tela. Por ser uma tela de consulta não posso impedir que o usuário a feche, pois pode até acontecer que ele não a abra. O download dos arquivos acontecem de forma tr
  9. Pelo que entendi, você está dizendo para colocar o FTP direto no form, não deixar dentro da thread que hj é responsável por isso e usar o componente visual do indy 10? Basicamente o que minha thread faz é isso, mas vou experimentar. Agora tenho uma pergunta o form onde listo os arquivos que já foram baixados, não os que ainda restam a baixar pois o usuário não tem nenhuma ação em relação a isso, pois os arquivos são baixados automáticamente sem intervenção do usuário. Esta tela serve apenas como consulta, para que ele veja quais arquivos já estão no disco e saber que existe algum download em
  10. Amigo grato pela sua atenção. Fiz os seguintes testes: retirei o synchronize deixando apenas o refresh do gauge frmLstLogRecepArq .Gauge1.Refresh; Inibi também o refresh //frmLstLogRecepArq .Gauge1.Refresh; mesmo assim a aplicação continua congelando. Alguma dica em relação ao que possa estar acontecendo? Grato, E ae galera, alguém tem alguma dica, ainda não consegui resolver esse problema. Help!!!!
  11. Amigo grato pela sua atenção. Fiz os seguintes testes: retirei o synchronize deixando apenas o refresh do gauge frmLstLogRecepArq .Gauge1.Refresh; Inibi também o refresh //frmLstLogRecepArq .Gauge1.Refresh; mesmo assim a aplicação continua congelando. Alguma dica em relação ao que possa estar acontecendo? Grato,
  12. Olá amigos, bom dia, espero e desejo que todos tenham tido um ótimo natal junto com seus familiares. Bem pouco tempo atrás postei um tópico com o título Colocar o "Gauge na Linha Selecionada de um DBGrid", com o auxílio dos senhores consegui resolver a contento. Segui o mesmo raciocínio para fazer o get FTP com gauge para acompanhar o percentual de downloado do arquivo, sendo que a diferença é que o gauge coloquei fora do dbgrid. O download é feito por uma thread, uso o componente indy 10, a atualização do gauge no evento FTPOnWork. Acontece que quando mando atualizar(incrementar) o Gauge a
  13. Amigo, verifique se o usuário que está logado tem direito de escrita na pasta onde os arquivos serão baixados.
×
×
  • Create New...