Скачать: CL | DM;

ParamStr()   Найти похожие ветки 

← →
misha_gr   (2007-11-09 14:08) [0]

Проблема такая: есть приложение, которое регистрирует в реестре "под себя" некое расширение файлов. Например ".abcde". Соответственно, сделав даблклик на файле с таким расширением, пользователь может загрузить программу со сразу же загруженным файлом. Но у пользователя возникают проблемы. Вместо имени файла в ParamStr(1)
"C:\Renoir_Partie-071017-sk.abcde" приходит примерно такая строка: "C:\RENOIR~1.abc";

Ситуация усложняется тем что: 1) я таких ситуаций у себя не наблюдаю. 2) Заказчик компилирует у себя исходный код, по своему - моих экзешников не признает.

В чём засада?

   // Загрузка файла примерно так:
   if (ParamCount > 0) then
     if (ExtractFileExt(ParamStr(1)) = csExt) then begin
       LoadWorkFromFile(ParamStr(1));
     end;

// Регистрация в реест идет примерно так:
procedure UpdateRegistryRec;
var Reg : TRegistry;
begin
 Reg := TRegistry.Create;
 try
   Reg.RootKey := HKEY_LOCAL_MACHINE;
   if Reg.OpenKey("\Software\Classes\.abcde\", True)
     then Reg.WriteString("","abcde_auto_file");
   if Reg.OpenKey("\Software\Classes\abcde_auto_file", true)
     then Reg.WriteString("", "Abcde save file");
   if Reg.OpenKey("\Software\Classes\akira3_auto_file\shell\open\command", true)
     then Reg.WriteString("", Application.ExeName + " "%1"");

 finally
   Reg.CloseKey;
   Reg.Free;
 end;
end;

---

← →
clickmaker ©   (2007-11-09 14:18) [1]

> Вместо имени файла в ParamStr(1)
> "C:\Renoir_Partie-071017-sk.abcde" приходит примерно такая
> строка: "C:\RENOIR~1.abc";

откуда он запускает этот файл?

---

← →
Reindeer Moss Eater ©   (2007-11-09 14:18) [2]

"C:\Renoir_Partie-071017-sk.abcde" приходит примерно такая строка: "C:\RENOIR~1.abc";

Все в норме. Не надо бояться.

---

← →
Reindeer Moss Eater ©   (2007-11-09 14:19) [3]

откуда он запускает этот файл?

наверное с ярлыка, у которого рабочий каталог прописан как 8.3

---

← →
clickmaker ©   (2007-11-09 15:56) [4]

> [3] Reindeer Moss Eater ©   (09.11.07 14:19)

а может, из NC или DN под ДОСом? )

---

← →
misha_gr   (2007-11-13 12:08) [5]

Извиняюсь за длительное отсутсвие.

> откуда он запускает этот файл?
уточню.

> наверное с ярлыка, у которого рабочий каталог прописан как 8.3
мысль понял, уточню.

Спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c