Opa
 
algumas melhorias:
 
var
 Path: array [0..MAX_PATH-1] of char;
 Diretorio : String;
begin
 GetWindowsDirectory(Path, SizeOf(Path));
 Diretorio := Path;
 
[]'s

                
Andreano Lanusse
System Engineer - Development Tools
<http://info.borland.com.br/borcon> Tel.: +55 (11) 2165 - 8000 / Mobile: +55 
(11) 8196-5912 
<http://info.borland.com.br/borcon> [EMAIL PROTECTED] - www.borland.com.br 
<http://www.borland.com.br/> 
Blogs: http://blogs.borland.com/andreanolanusse
Artigos: http://bdn.borland.com <http://bdn.borland.com/>  

A Borland Software é líder mundial em soluções independentes de plataforma para 
a Criação Otimizada de Software (Software Delivery Optimization), auxiliando 
nossos clientes a transporem as barreiras atuais do desenvolvimento, para 
maximizar o valor do software para seu negócio. 

  <http://info.borland.com.br/delphitour2006>  
<http://info.borland.com.br/delphi>  <http://info.borland.com.br/delphitour>  
<http://info.borland.com.br/delphi> 


________________________________

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de 
Desenvolvimento (Anderson)
Enviada em: quinta-feira, 6 de julho de 2006 16:22
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Path do Windows


var
   pc : array[0..100] of char;
   diretorio : string;
begin
     GetWindowsDirectory(pc,144);
     diretorio := strpas(pc);
end;


  ----- Original Message ----- 
  From: Luis 
  To: Delphi-Br 
  Sent: Thursday, July 06, 2006 3:05 PM
  Subject: [delphi-br] Path do Windows


  Galera tem alguma função que acha o path aonde esta instalado o windows.?

  ex.: F:\windows\

  -- 
  ****************************
  Grato pelo atenção

    Luís


              
  _______________________________________________________ 
  Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
  http://br.mobile.yahoo.com/mailalertas/ 


   

  __________ Informação do NOD32 IMON 1.1646 (20060706) __________

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br



[As partes desta mensagem que não continham texto foram removidas]

 


[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