, hoe zal de volledige naam weg.Een korte naam wordt omgezet in een lange naam, de naam en de naam van een korte naam, de naam is gesneden, toen viel in een andere vorm of commando systeem, met inbegrip van de naam, het gebruik van een korte naam formaat (8.3).,, de belangrijkste oorzaak is van een korte naam, met inbegrip van het formaat niet. De ruimte van het Handvest van de grondrechten.Dit werk is goed omdat het Handvest van de grondrechten, de ruimte, als een dossier scheidingstekens.,,, de volgende drie grote taken zal je helpen, tussen de korte en lange naam veranderen.Ik bij de functie van gehakt vlees van documenten, met inbegrip van de weg te tonen, de volledige naam. ===================================================} {,,,,,, shortfilename (totaal: de naam van een string: {});,,, ======================= ============================ var, het verbod [...] - 0: 255 karakter;,,,,, als er geen (naam), en het begin van de resultaten:, = ";,,,,,,, of, als de toegang tot bepaalde documenten van de kortste weg namen (pchar (naam), water, een groot (verbod) - 1) = 0, en dan begon, resultaten: = naam;,,,,,,, en de andere, strpas: = (verbod);,,,, aan het einde van het einde,;;;,,,, ==============================================} {longfilename (hierna:,, de functie van touw, touw, (:); ==============================================}, var, SR:tsearchrec;,,,,,,,, de resultaten: = "; als (pos ('\\ \\", hierna producentenorganisaties) + ("* * * * * * *, hierna") +, pos ("?"() < > 0) of van het niet - bestaan van (naam), en te negeren, de clown, {naam karakter en de ongeldige naam},,,,,, en aan het einde van uitgang;; FindFirst (hierna, faanyfile, SR) = 0, begint te doen,,, (tweede als de resultaten van het voorvoegsel},, "" de naam: = + + resultaten;,, SysUtils. Findclose (SR); (SysUtils, niet winprocs programma.} {catalogus, (snijden voor ")}, hierna: = extractfiledir (naam); en, als de lengte (hierna) = 2 <,,,,, uit naam van die chauffeur; {} met:",,,,,, aan het einde van de resultaten; aan het einde van: =; de naam van die chauffeur in naam van de resultaten) +;,,,,,, aan het einde van =========================================================; {}, de functie van gehakt vlees (pathtomince: touw; de ruimte: de gehele):... =========================================================} {;,,,, ///////C: procedures - - \\ \\ ddrop Delphi pas ", en targetdemo. /" C: procedures -, en de belangrijkste. Pas ", var, SL:tstringlist;,,,,, een reeks door:;:.;,,,,,,, en zei: = pathtomince; IPO:= producentenorganisaties (", Shelp); en,If iPos = 0 Then,, Begin,, Result := PathToMince;,, End,, Else,, Begin,, sl := TStringList.Create;,, //Decode string,, While iPos <> 0 Do,, Begin,, sl.Add(Copy(sHelp, 1, (iPos - 1)));,, sHelp := Copy(sHelp, (iPos + 1), Length(sHelp));,, iPos := Pos('\\', sHelp);,, End;,, If sHelp <> '' Then,, Begin,, sl.Add(sHelp);,, End;,, //Encode string,, sFile := sl[sl.Count - 1];,, sl.Delete(sl.Count - 1);,, Result := '';,, While (Length(Result + sFile) < InSpace) And (sl.Count <> 0) Do,, Begin,, Result := Result + sl[0] + '\\';,, sl.Delete(0);,, End;,, If sl.Count = 0 Then,, Begin,, Result := Result + sFile;,,Tot slot, andere, met de resultaten van de,,, "..." + = + door;,,,, aan het einde van de vrijheid, SL,,,,,,,,,, aan het einde van het,,;; de sluiting: functie als shortfilename, longfilename, gehakt vlees, Dat is geweldig, milieu, hulp in rad.,