Как в дельфи можно открывать презентацию от приложения MS PowerPoint 2003?!

[Stilet]

Argontarg

Я в личку дал ссылку. Посмотри как там написано и сравни с тем что ты написал.
Не нужно быть профессионалом чтоб найти отличия примера Alar-a и твоего.

[Argontarg]

Сообщение от Человек_Борща

Argontarg,

Плохо для вас)

Выключайте лень, и учитель искать и фильтровать информацию, важный навык и в жизни и в программировании на любом языке программирования. Иначе будите как этот товарищ, пока не пнёшь - не полетит :D

Да читаю итак по дельфи, просто вот эту функцию надо бы сёдня мне сделать. Но что то никак не сделаю, в чём я ошибся?

Сообщение от Stilet

Я в личку дал ссылку. Посмотри как там написано и сравни с тем что ты написал.
Не нужно быть профессионалом чтоб найти отличия примера Alar-a и твоего.

Я посмотрел ту ссылку, там только описано то, как открыть один файл который у нас есть и он там прописан, это получается. Но мне надо бы чтобы открывать через опен диалог любой файл презентации.

Сообщение от Stilet

Я в личку дал ссылку. Посмотри как там написано и сравни с тем что ты написал.
Не нужно быть профессионалом чтоб найти отличия примера Alar-a и твоего.

Его код использовал, почему то не пашет.

Сообщение от Stilet

Я в личку дал ссылку. Посмотри как там написано и сравни с тем что ты написал.
Не нужно быть профессионалом чтоб найти отличия примера Alar-a и твоего.

А всё у него компонент ShellListView используется, в моём дельфи его нету. Как можно такой же код через опендиалог реальзовать то?

[eval]

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

[Argontarg]

if OpenDialog1.Execute then
ShellExecute(Hinstance, 'open', PChar(OpenDialog1.FileName) , nil, nil, SW_SHOWMAXIMIZED);
вот, что сделал, толькуо не пашет . В чём ошибся?

Сообщение от eval

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

Нужно. Поэтому и учу потихоньку.

[BDA]

У меня Ваш код спокойно открыл презентацию (правда, только в режиме редактирования, а не сразу в режиме просмотра). Как именно не работает?

[Argontarg]

Сообщение от BDA

У меня Ваш код спокойно открыл презентацию (правда, только в режиме редактирования, а не сразу в режиме просмотра). Как именно не работает?

Закинул весь этот код if OpenDialog1.Execute then
ShellExecute(Hinstance, 'open', PChar(OpenDialog1.FileName) , nil, nil, SW_SHOWMAXIMIZED); в кнопку.
Компилирую, но выдаёт ошибку и показывает на начало второй строки: вот перед этим ShellExecute(Hinstance, 'open', PChar(OpenDialog1.FileName) , nil, nil, SW_SHOWMAXIMIZED);

[BDA]

А внизу, в окошке с ошибками, небось "E2003 Undeclared identifier: 'ShellExecute'"? Допишите в uses ShellApi.

[Argontarg]

Сообщение от BDA

А внизу, в окошке с ошибками, небось "E2003 Undeclared identifier: 'ShellExecute'"? Допишите в uses ShellApi.

Дописывал с самого начала.

[Argontarg]

Сообщение от BDA

А внизу, в окошке с ошибками, небось "E2003 Undeclared identifier: 'ShellExecute'"? Допишите в uses ShellApi.

А всё вышло спасибо! Извиняюсь, в прежних формах я дописывал, где код я неправильно составлял, а в этой где код уже правильно составил - дописать оказывается забыл). Спасибо ещё раз!

[Argontarg]

Всё всем кто помог большое спасибо! Код составил в итоге верно! Тему можно закрывать!