Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

установка программы

lelik © (2004-06-09 00:31:00)
как проверить установлен Word или нет

Sun bittern (2004-06-09 10:20:00) [1]
А уменя офис не в папке Programm Files :^)

KilkennyCat (2004-06-09 09:23:00) [2]

> Prog's Killer (09.06.04 09:02) [13]

у меня два винта по 120 гиг... 8 логических дисков, а папок на них хрен знает сколько... все перебирать?

evvcom (2004-06-09 09:07:00) [3]
Еще автору на заметку

> if Fileexist('c:\...\word.exe') = true then

Fileexist уже возвращает булев результат и сравнивать его с булевой константой просто ... глаз режет.

Prog's Killer (2004-06-09 09:03:00) [4]
Раскритиковали :)

Prog's Killer (2004-06-09 09:02:00) [5]
Ну, дак можно можно просто перебирать имена дисков, пока не получится положительный результат.

evvcom (2004-06-09 09:00:00) [6]
А я еще люблю создавать текстовые файлы и переименовывать их в word.exe

Gero (2004-06-09 08:58:00) [7]

> Prog's Killer (09.06.04 08:52)

Всмысле, что у меня word находится на диске d.
А на c его и в помине не было.

Prog's Killer (2004-06-09 08:52:00) [8]
Смысле, хороший или плохой :) ?

Gero (2004-06-09 08:49:00) [9]

> [8] Prog's Killer (09.06.04 08:43)

Какой полезный совет.

Prog's Killer (2004-06-09 08:43:00) [10]
if Fileexist('c:\...\word.exe') = true then
begin
...
end;

KilkennyCat (2004-06-09 02:35:00) [11]

> GanibalLector © (09.06.04 01:55) [6]

Ты чего?! про Ворд же спрашивали!

GanibalLector (2004-06-09 01:55:00) [12]
CLSIDFromProgID('Excel.Application', ClassID);

YuRock (2004-06-09 01:14:00) [13]
> Palladin © (09.06.04 01:06) [4]

:))))

Palladin (2004-06-09 01:06:00) [14]

> lelik (09.06.04 00:39) [2]

Вызови CreateOleObject('lsdfhlsakjdhfls.sdlkfjhaslkjdf');
и узнаешь как...

KilkennyCat (2004-06-09 00:45:00) [15]
Или проверкой существования ветки в реестре. Если, конечно, "умный" юзер не удалил офис в корзину :)

RootKey := HKEY_LOCAL_MACHINE;
Registry.KeyExists('SOFTWARE\Microsoft\Office\8.0\Word')
Registry.KeyExists('SOFTWARE\Microsoft\Office\9.0\Word')
Registry.KeyExists('SOFTWARE\Microsoft\Office\10.0\Word')

lelik (2004-06-09 00:39:00) [16]
как мне по этой процедуре узнать

Игорь Шевченко (2004-06-09 00:33:00) [17]
CreateOleObject('Word.Application') ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »