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