Hvis du laver det i Delphi gøres det således:
Drev := ExtractFileDriveName('F:\test\jpg\test\foto.jpg');
Dir := ExtractFilePath('F:\test\jpg\test\foto.jpg');
Fil := Copy(ExtractFileName('F:\test\jpg\test\foto.jpg'), 1, Pos('.',
ExtractFileName('F:\test\jpg\test\foto.jpg')) - 1);
FilType := ExtractFileExt('F:\test\jpg\test\foto.jpg');
Husk at inkludere SysUtils i projektet.
Hvis du vil lave det i Pascal, kræver det lidt mere arbejde.
Hilsen
Peter Vrist
"Hans Nikolajsen" <hn2@stofanet.dk> skrev i en meddelelse
news:3dd2ad18$0$11422$ba624c82@nntp02.dk.telia.net...
> Ja dav!
>
> tekst := 'F:\test\jpg\test\foto.jpg'
>
> Den skal dele op i: drev, dir, fil og type.
>
> det skal ende med strings:
>
> Drev = F:
> dir = \test\jpg\test\
> fil= Foto
> type= jpg
>
> Hvordan gør jeg det ???
>
> --
> M.v.h.
> Hans Nikolajsen
> E-mail: hn2test@stofanet.dk
> Homepage:
http://home1.stofanet.dk/jadav/
> Fjern test fra min E-mail for at skrive til mig!
>
>