Fórum Parâmetros passados ao aplicativo #207105
17/01/2004
0
Estou desenvolvendo em editor de texto em MDI
Pergunta:
Qdo eu mando abrir um arquivo de texto no meu editor (abrir com) ele abre o meu editor mais ñ carrega o texto, gostaria de faze igual ao bloco de notas, qdo vc clica em.txt ele abre o bloco de notas e carrega o texto.
Qdo vc abre meu editor vc tem q clicar em novo para abrir o MDIChild a onde esta o RichEdit
Como posso saber q o meu programa foi chamado
Valew.
[b:8b5fd093c2]Tópico editado. Título: Como?????? tem como???? Dãh[/b:8b5fd093c2]
Wolverine
Curtir tópico
+ 0Posts
17/01/2004
Ildefonso
Existe uma propriedade, acho Application.Parameters[nn] ou algo muito parecido.
Se pedimos Paremeters[0], ela retorna o path + o nome do exe que estamos executando. Parameters[1] trará o primeiro argumento da linha de comando que iniciou o exe... Não testei, mas acho que quando você usa o comando ´Abrir com´ do Explorer, ele se encarregará de fornecer o nome do arquivo como um parâmetro.
Experimente.
Gostei + 0
17/01/2004
Beppe
Gostei + 0
17/01/2004
Wolverine
Valew
Gostei + 0
17/01/2004
Wolverine
BEPPE, MUITO OBRIGADO, eu usei assim
if ParamStr(1) > ´0´ then
begin
Application.CreateForm(TFormedit, Formedit);
Formedit.Show;
Formedit.abrirpro(ParamStr(1));
end;
coloque esso no Source do projeto e funcionou blzinha
Gostei + 0
17/01/2004
Beppe
ParamStr(1) <> ´´
Gostei + 0
17/01/2004
Wolverine
se < 0 é pq eu abrir o meu programa pelo o executável, tipo: abri o editor
é tipo Treu e False, eu acho pq deu certo.
Mais deu certo, eu consegui saber se foi passado um nome de arquivo com o ShowMessage e tb deu certo pq fez oq eu queria, passei o ParamStr(1) para o parâmetro FileName do Formedit.abrirpro, e o texto foi carregado se eu clicar em em txt e mandar abrir com o meu editor
Porém com <> ´ ´ deu erro, ficou azul em ´SelStart := 0;´ do procedure Formedit.abrirpro, mais deu certo com <>´´ sem espaço.
Mais Uma Vez,
Muito Obrigado
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)