| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

ClsID программы

YDS ©   (2006-03-09 10:19:00) 

Нужно вернуть ClsID проги вида {XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX} по
ее наименованию.
Делаю так

Uses Windows, OLE2

var
ss : TCLSID;
sss : POleStr;

begin
ss := ProgIDToClassID('Excel.Application');
StringFromCLSID(ss, sss);
..

И получаю ошибку: Incompatible types: 'Ole2.TGUID' and 'System.TGUID'. Как
же нужно??

---

YDS   (2006-03-09 10:38:00) [1]

Sorry, понял:
ClassIDToProgID(StringToGUID('{XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX}'))

---

Сергей М.   (2006-03-09 10:37:00) [2]

ShowMessage(ClassIDToProgId(StringToGuid('{XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX}')));

---

YDS   (2006-03-09 10:35:00) [3]

Thxs!!!!

Прошу прощение за настырливость, а как наоборот, т.е. из ClsID вида {XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX} получить соответствующее ему ProgID (название программы)?

---

Сергей М.   (2006-03-09 10:22:00) [4]

uses ComObj

ShowMessage(GUIDToString(ProgIDToClassID('Excel.Application')));

---

Наверх