Вопрос № 93085: Доброе время суток! Подскажите пожалуйста как решить два вопроса:
1-ый. На форме имеется адрес (например, www.rusfaq.ru)и при клике загружался сайт.
2-ой. На той же форме имеется электронный адрес (например, dom@mail.ru) и при клике открывалс...Вопрос № 93120: Здравствуйте, Эксперты!
Программирую в Делфи7. Задача состоит в подключении видео файла к проекту. Надо после нажатия кнопки прокрутить на форме видеоролик.
Пробовал использовать компонент TAnimate, но он не поддерживает сжатые файлы.
<b...
Вопрос № 93.085
Доброе время суток! Подскажите пожалуйста как решить два вопроса:
1-ый. На форме имеется адрес (например, www.rusfaq.ru)и при клике загружался сайт.
2-ой. На той же форме имеется электронный адрес (например, dom@mail.ru) и при клике открывался Outlook.
Заранее благодарен.
2) procedure TForm1.Label2Click(Sender: TObject);
begin
//отправить письмо на адрес, открывает почтовая программа, которая установлена по умолчанию
ShellExecute(Handle, nil, 'mailto:support@rusfaq.ru', nil, nil, SW_SHOW);
end;
Для полноценной работы функций нужно подключить модуль ShellApi (uses ShellApi).
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессор) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 27.06.2007, 15:02 Оценка за ответ: 5 Комментарий оценки: Спасибо огромное!!! Очень помогли.
Отвечает: Кэр Лаэда
Здравствуйте, Домикальчиков Владимир Юрьевич!
--------- =Gh0stik= (Профессор) --------- Я знаю что ничего не знаю, но я знаю больше, чем тот кто думает что знает все
Ответ отправил: Кэр Лаэда (статус: Студент)
Ответ отправлен: 27.06.2007, 15:03 Оценка за ответ: 4 Комментарий оценки: Спасибо, что уделили внимание моей проблеме.
Отвечает: Виктор Пырлик
Здравствуйте, Домикальчиков Владимир Юрьевич!
Если вы просто хотите запустить внешнее приложение для обработки соответствующего протокола – можно использовать одну процедуру:
procedure OpenDoc(str:String);
begin
ShellExecute(handle, "open", str, NULL, NULL, SW_SHOWNORMAL);
end;
и как-нибудь, например, надписи на лэйбочках или кнопках соответствующие адресам, передовать этой процедуре (назначив для всех одно событие).
Смысл в функции API – ShellExecute.
--------- Если ничего не помогло - надо читать инструкцию
Ответ отправил: Виктор Пырлик (статус: 4-ый класс)
Ответ отправлен: 27.06.2007, 17:07 Оценка за ответ: 5 Комментарий оценки: Спасибо огромное!
Вопрос № 93.120
Здравствуйте, Эксперты!
Программирую в Делфи7. Задача состоит в подключении видео файла к проекту. Надо после нажатия кнопки прокрутить на форме видеоролик.
Пробовал использовать компонент TAnimate, но он не поддерживает сжатые файлы.
Я хочу запустить wmv видео ролик. Как можно это сделать?
Если знаете готовые компоненты, то скажите где скачать.
Как потом внедрить этот файл в экзешник?
Потому что для этого мне и нужно использовать сжатый формат, т.к. не сжатый avi ролик весит 75 Мб, а сжатый wmv - 400 Кб.
Судя по всему, Вам придётся использовать TMediaPlayer в связке с каким-либо WinControl'ом (например, TPanel). Он воспроизводит все видеофайлы, для которых в системе есть кодеки. Находится TMediaPlayer на вкладке System палитры компонентов. Информации по его использованию в Internet более чем достаточно, да и ничего сложного там нет. Основы работы с ним интуитивно понятны. Более сложные моменты описаны в справочной системе Delphi и в Internet.
Что касается внедрения этого файла в выходной EXE-файл, то Вам понадобится программа, позволяющая редактировать файлы ресурсов. Я применяю ResEdit, но не менее удобным во многих случаях считаю Restorator (последний, кстати, более универсален). С помощью этой программы добавляете Ваш видеофайл в RES-файл проекта. Всё: видеофайл находится в программе. Про работу с ресурсами также много материалов в Internet. По моему мнению, для извлечения видеофайла из EXE'шника в Вашем случае самым удобным будет использование
TResourceStream. Справка по нему есть в Delphi, много информации можно найти в Internet по соответствующим запросам.
С уважением, DimonSoft.
Ответ отправил: DimonSoft (статус: 2-ой класс)
Ответ отправлен: 27.06.2007, 19:52
Отвечает: Савенко Вадим Иванович
Здравствуйте, Patriotix-N!
Для воспроизведения можете использовать ATViewer (www.torry.net)
Ответ отправил: Савенко Вадим Иванович (статус: Студент)
Ответ отправлен: 27.06.2007, 21:41
