открыть файл в просмоторщике компоса

Автор leon2012, 17.07.12, 12:53:50

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

leon2012

Здравствуйте! как реализовать?
через делфи открыть документ в просмоторщике компоса!
Спасибо!  :?:

Можете посмотреть эту тему http://forum.ascon.ru/index.php/topic,22071.0.html , а затем немного конкретизировать задачу, для чего открывать файл, в КОМПАС-3D Viewer.

leon2012

Хотелось узнать почему ошибка вылетает, что файл не найден.
begin
ShellExecute(0,'Open',pchar('c:\ASCON\KOMPAS-3D Viewer V13\Bin\kViewer.exe'),PChar('c:\002\name1.cdw'),nil,1);
end;

Николай

 В VB так открываю документ:
         Private Sub File1_Click()
ShellExecute Form1.hWnd, "open", File1.Path & "\" & File1.FileName, 0, 0, SW_SHOW
'Открываем файлы др. програмы через API 
End Sub
В Делфи, наверное, тоже есть что-либо подобное.


leon2012

как понять система какая??? открылся вьювер и внем загрузился файл компаса

Николай

 А у вас откроется файл:      C:\Чертеж.cdw        с помощью прилагаемой программы?

leon2012

Да, когда запускаю файл, он открывается в просмотрщике компаса (напрямую).
но если пытаюсь открыть файл через делфи, то пишет что файл не найден.

leon2012

все понил как сделать. я для файла компаса зарегестрировал расширения.
чтобы всегда открывал через вьювер.
кусочек кода
RootKey := HKEY_CLASSES_ROOT;
                        WriteString('.cdw','','ViewerKompas');

Я пользуюсь ShellExecuteEx(@ShellExecuteInfo).
Цитата: leon2012 от 19.07.12, 13:48:46
как понять система какая??? открылся вьювер и внем загрузился файл компаса
Windows XP или 7 ?

leon2012


В XP проблем быть не должно, судя по Вашим описаниям и решению проблемы, функция не находит путь к приложению.