Fórum Tamanho do Path #339616
29/03/2007
0
Ola,
Alguem ae sabe alguma função para diminuir o tamanho do Path de um arquivo carregado num EDIT :?: :?:
Ex.: C:\WINDOWS\SYSTEM32\CMD.EXE muda para C:\WINDOWS\...\CMD.EXE.
Abraços.
Alguem ae sabe alguma função para diminuir o tamanho do Path de um arquivo carregado num EDIT :?: :?:
Ex.: C:\WINDOWS\SYSTEM32\CMD.EXE muda para C:\WINDOWS\...\CMD.EXE.
Abraços.
Nango Xus
Curtir tópico
+ 0
Responder
Posts
29/03/2007
Titanius
Cara, pode ser que este código te ajude, ele retorna o path temporário do windows, em formato do DOS, exemplo:
Normal.: C:\Documents and Settings\Fellipe\Temp
DOS.: C:\DOCUME~1\Fellipe\Temp
[]s
Normal.: C:\Documents and Settings\Fellipe\Temp
DOS.: C:\DOCUME~1\Fellipe\Temp
var Buffer: array[0..144] of Char; begin GetTempPath(144, Buffer);
[]s
Responder
Gostei + 0
30/03/2007
Nango Xus
Obrigado!!! :D Vou testar seu código.
Abs.
Abs.
Responder
Gostei + 0
02/04/2007
Rodc
Vê se este lhe serve...
function NomeLongoparaCurto(NomeLongo: String) : String;
begin
// Acertar tamanho para o nome curto
SetLength(Result, MAX_PATH);
if GetShortPathName(PChar(NomeLongo), PChar(Result), Length(Result)) = 0 then
Result := ´´;
else
SetLength(Result, StrLen(PChar(Result)));
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)