Форум: "Основная";
Текущий архив: 2002.06.06;
Скачать: [xml.tar.bz2];

Вниз

Получение пути к программе, связанной с расширением   Найти похожие ветки 

← →
yozhik   (2002-05-28 14:07) [0]

Уважаемые мастера, подскажите плз как получить полный путь к программе,связанной с конкретным расширением, без использования реестра?

---

← →
Song   (2002-05-28 14:11) [1]

FindExecutable()

---

← →
yozhik   (2002-05-28 14:14) [2]

sCmd := D:\test.xls;
sDir := ""C:\Program Files\Microsoft Office\Office\"";
GetMem(Buf,255);
if FindExecutable(PChar(sCmd),PChar(sDir),Buf)<=32 then RaiseLastWin32Error;
sCmd := "xls -> "+Buf;

Может я что-то не так пишу но выдает следуюющее "xls -> C:\Program", в чем ошибка??

---

← →
Song   (2002-05-28 14:26) [3]

а тип Buf какой?
SDir не нужен, я думаю

---

← →
yozhik   (2002-05-28 14:27) [4]

Buf: PChar

---

← →
MBo   (2002-05-28 14:33) [5]

у меня работает
sCmd := "D:\test.xls";
GetMem(Buf,255);
if FindExecutable(PChar(sCmd),nil,Buf)<=32 then RaiseLastWin32Error;
label1.caption:= "xls -> "+Buf;

---

← →
yozhik   (2002-05-28 14:38) [6]

ну тогда я не знаю, но уменя все тоже "C:\Program"

---

← →
MBo   (2002-05-28 14:42) [7]

код точно также, как у меня, написан, или с кавычками все та же проблема?

---

← →
yozhik   (2002-05-28 14:43) [8]

причем если ставлю файл с другим расширением, например rtf, все работает, а с xls - не хочет.

---

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

Форум: "Основная";
Текущий архив: 2002.06.06;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.005 c