nao e muito elegante mas,
Eu ja testei, e o codigo abaixo funciona.

for ch:='D' to 'Z' do
  if fileexists(ch+':\simrat\setup.exe') then 
    begin
      WinExec(ch+':\simrat\setup.exe',SW_SHOWNORMAL);
      exit;   
    end; 



--- Em delphi-br@yahoogrupos.com.br, Arthur Souza 
<[EMAIL PROTECTED]> escreveu
>
> Olá pessoal..,
> 
> Estou com uma dúvida referente ao caminho, pois tenho o seguinte 
código no
> meu button:
> WinExec('P:\simrat\setup.exe',SW_SHOWNORMAL);
> pois o  seguinte caminho P:\simrat\setup.exe é minha patição local 
onde
> chama este meu arquivo setup.exe
> Logo estaria gravando em um CD e a unidade já não seria mais P: e 
sim E:
> como poderia atribuir um código onde estivesse identificando minha 
unidade
> de origem - "raiz"- para não ter que ficar trocando meu caminho...
> 
> obrigado,
> 
> Arthur
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a