Existe uma função que faz exatamente o q vc quer:

function ExtractShortPathName(const FileName: string): string;


---- Original Message ----- 
From: "Moked - Tamara (Brazil)" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Tuesday, June 27, 2006 3:45 PM
Subject: [delphi-br] Path através de OpenDialog




  <http://www.moked.com.br/> Tamara Clemente - Suporte Técnico
Moked do Brasil - Consultoria de Segurança Empresarial
Divisão MokInf de Informática
PABX: (55-11) 5071-2748
[EMAIL PROTECTED]
www.moked.com.br <http://www.moked.com.br/>

Grau de Sigilo:  Confidencial  Reservado  Interno  Amplo
Nível de Prioridade:  Alto  Médio  Baixo
Destinatário/s: Lista de divulgação
-------------------------------------------------------------------------
Boa Tarde,

Pessoal, tem como fazer com q o path capturado através do opendiloag e 
acessado pelo opendialog.filename fique igual ao q se tem quando seta-se 
para True a opção ofoldstyledialog???

Exemplo:

ofoldstyledialog:= false -> C:\documents and 
settings\administrador\pasta\arquivo.txt

ofoldstyledialog:= true -> C:\docume~1\admini~1\pasta\arquiv~1.txt


Ou seja, quero q seja exibido ao usuário a forma nova do opendiloag, porém 
preciso q o caminho seja dado da forma antiga...

Obrigada,

Tamara
A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000

Serviços prestados no Brasil na área de segurança pessoal e empresarial:
Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | 
Auditoria e Sindicância | Software de Gestão | Help-desk 24hs

O emitente da mensagem é o responsável por seu conteúdo e divulgação, 
proibindo sua reprodução sem a prévia autorização do mesmo.
Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o 
comprometimento com os Custo envolvidos!



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



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



Links do Yahoo! Grupos















-- 
<<<<< 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