Преобразуване на дълго име на файла за краткосрочен.
Privet.Trivialny може да е тъп въпрос, който е общ, но как.
Моят Windows ponima
1 имената и на вас? # XA0;
// ------------------------------------------------ ---------------------
// възстановява дълги файлови имена на известния кратък (8.3)
// като аргумент получава пълен или непълен (включително относително)
// пътя до файла, като например "C: \ Windows \ Работната
1.LNK "или
// ".. \ .. \ ОБЩА
1.TXT ". Разбира имената на мрежите.
// Връща пълния път, като: (!) "C \ Windows \ Desktop \ и така dalee.lnk",
// "C: \ Program Files \ Common Files \ Borland Shared \ BDE \ bdereadme.txt",
// "\\ Computer \ ресурс \ Папка с дълго име \ файла с дълга name.ext"
// ------------------------------------------------ ---------------------
функция RestoreLongName (Fn: низ): низ;
# XA0; Fn: = ExpandFileName (Fn);
# XA0; Резултат: = GetNextFN;
# XA0; повторение
# XA0; # XA0; име: = GetNextFN;
# XA0; # XA0; Резултати: = Резултати + "" + LookupLongName (Резултати + "" + наименование);
# XA0; докато дължина (Fn) = 0;
приключи;
Открих по-рано този източник, но tuplyu или тя не работи.
RestoreLongName (кратко име на файла), и как да се възстанови дълго?
Искате ли да opredeleli tupish вас или не въз основа на кратък информация?
Как да прехвърля функциите на краткото име, а тя отвърна на дълго име fayla.Vot така че аз съм глупав.
О, само S: = RestoreLongName (S)
Функцията връща на пътя и кратко име на файла. Така че има надежда, че аз не tuplyu :-)
> Функцията връща на пътя и кратко име на файла. Така че има надежда, че аз не tuplyu :-)
И обратно със страшна сила. О)
zadaesh начин, че няма файл.
си позволи малко да се промени тази процедура, така че ще бъде по-ясно, сменете го LookupLongName
функция LookupLongName (конст име: низ): низ;
Var
# XA0; SR: TSearchRec;
започвам
# XA0; ако FindFirst (името на файла, faAnyFile, SR) = 0, тогава започва
# XA0; # XA0; Резултат: = sr.Name;
# XA0; # XA0; FindClose (SR);
# XA0; сложи край на друг
# XA0; # XA0; Резултат: = "Завала само съществуващите имена / пътеки."; // ExtractFileName (файла);
приключи;
Не мога да го използвам.
Имам нужда вместо ръкави
1.doc обърна RUKOVODSTVO.DOC.
> Не работи и всичко останало.
Тя не може да бъде.
отново, ако zadaesh nesuschestvuyushy път / име на този компютър след това се връща на същото, както иска. (Или в моята версия D: .. \ Питам само съществуващите имена / пътеки \ Питам само съществуващите имена / пътеки (няма път от първата директория))
Изпълнете това е, че vidish 1 / 2м Lejbele?
# XA0, а ако след това OpenDialog1.Execute започне
# XA0; # XA0 во: = OpenDialog1.FileName;
# XA0; # XA0; GetShortPathName (@st [1], @st [1], дължина (ST));
# XA0; # XA0; Label1.Caption: = ва;
# XA0; # XA0; Label2.Caption: = RestoreLongName (Label1.Caption);
# XA0; край; # XA0;
> Имам нужда вместо ръкави
1.doc обърна RUKOVODSTVO.DOC.
и файлът е на компютъра си? име RUKOVODSTVO.DOC? Това е един много важен състои както.
И това, GetFullPathName не се вписва?
Файлът съществува, но името не се превръща.
Източник с leyvlami работа, но едно и също име, въпреки че пътят преобразува.
Какво да се докаже, че файлът съществува, може просто да се чувстват.
> t100 # XA0; (07.06.04 15:21)
> Трябва ми
Просто трябва да - така пише.
Това мозъка му не е?
В допълнение, те ви дам един куп примери.
Не винаги мисля другият ще бъде за вас.
> Какво да докаже, че файлът съществува, може просто да се чувстват.
Мога да изпратя по пощата.
t100 # XA0; (07.06.04 16:12) [19]
Това не е доказателство.
За цялото време никога няма да даде имена, информация за това как да се прехвърлят и какви са конкретните стойности, текущата директория.
Има файл DO9D77
1.doc, намиращ се в папка C: \ Documents и Settings \ numas \ Desktop \ име на файла prokuror.Realnoe ДОГОВОР PODRYADA.DOC.
използване
# XA0; ако след това OpenDialog1.Execute започне
# XA0; во: = OpenDialog1.FileName;
# XA0; GetShortPathName (@st [1], @st [1], дължина (ST));
# XA0; Label1.Caption: = ва;
# XA0; Label2.Caption: = RestoreLongName (Label1.Caption);
приключи; # XA0;
получавам # XA0; Label1.Caption има стойност на C: \ ДОКУМЕНТ
1.doc и # XA0; Label2.Caption -C: \ Documents и Settings \ numas \ Desktop \ прокурор \ DO9D77
1.doc, КЪДЕТО конвертирате името на файла?
В изследовател този файл изглежда PODRYADA.DOC договор?
# XA0 во: = OpenDialog1.FileName;
# XA0; GetShortPathName (@st [1], @st [1], дължина (ST)); # XA0; Label1.Caption: = ва;
Не, тя изглежда като DO9D77
1.doc, в подсказка, когато мишката върху PODRYADA.DOC ДОГОВОР заглавния файл.
t100 # XA0; (07.06.04 16:55) [25]
Какво искаш, не е нужно дълго име като такива, а курсорът показва свойствата на документа.
Проблемът е, че не е правилно, след като инсталирате операционната система, всички имена на файлове pokaverkalis кратки, и бих искал да ги възстановите в дълго.
Може откъснете с всеки такъв файл vordovsky първо изречение от (определен брой знаци) и преименуване името с тях?
Но с това е необходимо да се започне. Имайте предвид, съвсем друго значение, отколкото subzh!
Трябва да се вземат на името на документа и да преименувате файла, което му име.
Да, но сега какво означава "да вземе името на документа?"
Дай тогава може някой линк, моля, да се работи с Word документи чрез OLE.
Някои файлове имат свойства. Това важи особено за Office документи. Ако свойствата на документи Word от причината, тогава те могат добре да се види. Същото нещо, ако се вгледате в свойствата на файла. Аз, например, в "документ" е името на полето.
И някой от тези имоти, можете да получите чрез ActiveX. Много от имотите са предварително определени, например, името - това PIDSI_TITLE;)
И всичко това минава през и stgOpenStorage yuzaniya IPropertySet
Интернет сигурност, пълна с всичко по този въпрос. Ако не - pliz допълнителни въпроси в нова тема в CORBA COM
> Някои файлове имат свойства.
> Аз, например, в "документ" е името на полето.
и те не винаги съвпадат, отвори първия достъпен док
име на файла
Разминаване на данните в cheke.doc
раздел в полето Име
Проблем. # XA0; несъответствие на данните в проверката и базата с паралелно натоварване
Приемате, че не е същото; о), файлът не е мой. Мисля, че най-напред записва в Word и след това правилното име.
Свързани статии