GARANTIR DESCONTO

Fórum Abrir arquivo com o meu sistema! como sei que arquivo abrir? #272763

17/03/2005

0

Olá pessoal!

Usei o código abaixo (associei) para arquivos *.img abrirem com o meu sistema, porém, não sei que arquivo devo abrir quando inicio o sistema. No windows 98 eu conseguia, já no XP não consigo! os arquivos até chamam o meu programa, direitinho! mas não sei onde capturar o endereço do arquivo desejado!
Se alguém puder me ajudar, sou muito grato desde já.
[]´s tiagoiriz@webrs.com.br

Registro := TRegistry.Create;
Registro.RootKey := HKEY_CLASSES_ROOT;
Registro.OpenKey(´\Megasys´, True);
Registro.WriteString(´´, Imagem compacta);
Registro.CloseKey;
Registro.OpenKey(´Megasys\DefaultIcon´, True);
Registro.WriteString(´´, ´C:\Arquivos de Programas\Megasys\Imgs.ico,0´);
Registro.CloseKey;
Registro.OpenKey(´Megasys\shell\open\command´, True);
Registro.WriteString(´´, ´C:\Arquivos de Programas\Megasys\Sistema.exe´ + ´ ´¬1´´);
Registro.CloseKey;
Registro.RootKey := HKEY_CLASSES_ROOT;
Registro.OpenKey(´\.img´, True);
Registro.WriteString(´´, ´Megasys´);
Registro.CloseKey;
Registro.CloseKey;
Registro.Free;


Tiago Rizzon

Tiago Rizzon

Responder

Posts

17/03/2005

Weber

No formshow do seu aplicativo coloque:

if (ParamCount > 0) and FileExists(ParamStr(1)) then
  Abrir(ParamStr(1));


Onde o ´abrir´ pode ser a função que você usa para carregar a imagem.
o ´ParamStr(1)´ contem o caminho e o nome do arquivo.


Responder

Gostei + 0

17/03/2005

Tiago Rizzon

Obrigado pela dica! Funciono blz!


Responder

Gostei + 0

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

Aceitar