Delphi 7 -- AJUDEM RAPIDO

[##.Emanuel. 's 0]

Eu quero fazer com que o meu programa abra 1 ficheiro que está numa subpasta, do tipo se tenho o programa em C:\blablabla\32 a pasta é C:\blablabla\32\Pasta

 

mas como o c:\balblabla muda de pc pra pc queria saber o codigo que deveria emter... eu sei que é algo do tipo C:\%%\.... mas nao sei qual é ajudem sff

 

ShellExecute(0,Nil,PChar(GetCurrentDir+'\C:\alalalala\l32\lol\1.jpg'),'', Nil, SW_SHOWNORMAL);

 

 

aquele C:\alalalalal muda de pc pra pc... como faço?

[NoSlake 56]

Se o arquivo estiver na mesma pasta, não importa onde esteja use:

 

"WinExec('.\Pasta\programaquevcquer.exe',0);"

O "." quer dizer que é a pasta onde o app que está rodando está e depois o diretório, exemplo o app que vc criou está em C:\teste\ e vc quer acessar a pasta C:\teste\lol\ vc usa o "." ficando na leitura ".\lol";

 

Use winexec que é mais leve e rápido.

Outra dica é se estiver no arquivos de programas você usa "C:\Program Files\seudiretório" assim que os profissionais fazem...

[##.Emanuel. 's 0]

Se o arquivo estiver na mesma pasta, não importa onde esteja use:

 

"WinExec('.\Pasta\programaquevcquer.exe',0);"

O "." quer dizer que é a pasta onde o app que está rodando está e depois o diretório, exemplo o app que vc criou está em C:\teste\ e vc quer acessar a pasta C:\teste\lol\ vc usa o "." ficando na leitura ".\lol";

 

Use winexec que é mais leve e rápido.

Outra dica é se estiver no arquivos de programas você usa "C:\Program Files\seudiretório" assim que os profissionais fazem...

 

Não preciso de meter + algum user?

 

Já consegui... Tipo eu tenho 1 botao "Avançar" e ele irá abrir 1 nova janela, como faço com que ele termine-se?

[☢|EXPL01T3R|☣ 50]

ele termini-se? tipo fechar a janela? se for usa close; e pronto

[AceStryker 32]

Se muda em todo pc, só terá chance de usar %% se for algo do windows como nome de usuário, se não o jeito seria procurar "pistas" do local como por exemplo busca de arquivos com FindFirst() e FindNext()