Como abrir o programa já com o arquivo carregado - Delphi

26/07/2018

0

Galera, estou com o Problema em uma Aplicação no Delphi... Fiz um Programar que Ler Arquivos XML''s, e está Funcionando normalmente, Porem queria fazer que quando clicasse no arquivo XML fora do Programa, ele já abri-se o programa com a Tabela Carregada.. Mais queria que não especificasse o nome do arquivo, pois são vários arquivos diferentes, e queria que carrega-se qualquer tabela que clicar.
Lucas Araujo

Lucas Araujo

Responder

Post mais votado

27/07/2018

Lucas Araujo, muito obrigado, graças a sua dúvida aprendi algo simples e que com certeza irei usar, pois também tenho aplicação que ler arquivos XML:

Fiz algo simples e melhor:

Acessa o canal e confere.
https://www.youtube.com/watch?v=DeuAHG-uSRE&feature=youtu.be

Raimundo Pereira

Raimundo Pereira
Responder

Mais Posts

27/07/2018

Raimundo Pereira

Bom dia!
Veja se ajuda:
http://www.planetadelphi.com.br/dica/541/programando-meu-aplicativo-para-abrir-arquivos-a-partir-do-windows-exp
Responder

27/07/2018

Lucas Araujo

Muito Bom o video, mais não deu muito certo não.. o Delphi não Reconheceu o Load "function TForm1.Load(Arquivo: String): Boolean;" e nem Load(ParamStr(1));, como fez para reconhecer ?


Responder

27/07/2018

Lucas Araujo

Lucas Araujo, muito obrigado, graças a sua dúvida aprendi algo simples e que com certeza irei usar, pois também tenho aplicação que ler arquivos XML:

Fiz algo simples e melhor:

Acessa o canal e confere.
https://www.youtube.com/watch?v=DeuAHG-uSRE&feature=youtu.be


Resolveu esse Procedimento, faltou apenas eu Declarar... Muito Obrigado !!
Responder

27/07/2018

Raimundo Pereira

Sem mistério!
Não é obrigado a usar a função:
var Documento:string;
begin
Documento:=(ParamStr(1)); //Pego o param - Ele usa a classe system.

IF (Documento<>'') THEN // Verifica se existe conteúdo no param
begin
if FileExists(Documento) then //Verifica o caminho do arquivo é valido
// Estou usando o Acbr
NFe.NotasFiscais.Clear;
NFe.NotasFiscais.LoadFromFile(Documento);
NFe.NotasFiscais.Imprimir;

End;
Funcionou perfeitamente.
Responder

27/07/2018

Lucas Araujo

Funcionou sim, Muito Obrigado pela Ajuda...
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar