Помощь в создании подкастов

Интернет-телевидение, интернет-радио, подкасты, IPTV
Post Reply
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Помощь в создании подкастов

Post by linkey »

Подскажите, как в скрипте запустить файл с диска?
samsung UE32D5000
slawa321
Posts: 224
Joined: Wed Sep 14, 2011 12:06 pm

Re: Помощь в создании подкастов

Post by slawa321 »

какой файл ,если текстовый -там есть функция ,а вот ехе -думаю это уже можно вируса делать.

ExecuteOpenDialog(const aTitle, aFilter, aInitialDir, aDefaultExt: string; var aFileName: string): Boolean
Поиграйся с этим -сильно похоже ,я не пробовал .Хотя нет -это только диалог.
Моя мультимедия :Телевизор Samsung LE46D550K1, Телефон HTC HD2
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Re: Помощь в создании подкастов

Post by linkey »

slawa321 wrote:какой файл ,если текстовый -там есть функция ,а вот ехе -думаю это уже можно вируса делать.

ExecuteOpenDialog(const aTitle, aFilter, aInitialDir, aDefaultExt: string; var aFileName: string): Boolean
Поиграйся с этим -сильно похоже ,я не пробовал .
это ExecuteOpenDialog просто открывает диалоговое окно выбора файла, а потом записывет имя файла в переменную. Мне бы хотелось именно запустить bat или exe файл. Похоже такого нету((
Или еще можно было бы скачать страницу с поддержкой cookie, но такого тоже не нашел. (имя пользователя и пароль в настройках не канают)
samsung UE32D5000
slawa321
Posts: 224
Joined: Wed Sep 14, 2011 12:06 pm

Re: Помощь в создании подкастов

Post by slawa321 »

Остается один вариант -через Ole ,тут он работает :
Вот пример с Вордом :

var
wd:variant;

begin
// Открыть word:
wd:=CreateOleObject('Word.Application');
// открыть документ -предворительно создай не пустой документ
wd.documents.open('c:\1.doc');
// сохранить:
wd.activedocument.saveas('c:\2.doc');
// выход из word:
wd.application.quit(true,0);
end.

Надо только чтоб твое приложение поддерживало Ole.Пример работает -проверь ,если ворд запускается ,то и другое нужно подумать как запустится .Хотя ворд поддерживает бейсиковые скрипты ,я думаю там такого можно наворотить раз он запустился и документ со скриптами открыл.
Моя мультимедия :Телевизор Samsung LE46D550K1, Телефон HTC HD2
slawa321
Posts: 224
Joined: Wed Sep 14, 2011 12:06 pm

Re: Помощь в создании подкастов

Post by slawa321 »

раз ты хотел открыть какую то страничку ,вот пример для открытия страницы яндекса :

var
IE:variant;

begin

IE:= CreateOleObject('InternetExplorer.Application');
IE.Visible := True;
IE.Navigate('http://ya.ru');

end.
Видимость можно не делать ,это пример. Попробуй.
Интернет забит примера с ole на делфи. вот только копнул за пять минут.
Моя мультимедия :Телевизор Samsung LE46D550K1, Телефон HTC HD2
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Re: Помощь в создании подкастов

Post by linkey »

спасибо помогло
samsung UE32D5000
slawa321
Posts: 224
Joined: Wed Sep 14, 2011 12:06 pm

Re: Помощь в создании подкастов

Post by slawa321 »

linkey wrote:спасибо помогло
Так это ,чем дело то кончилось ,интересно ,где подкаст ,или так что то для себя писал?
Моя мультимедия :Телевизор Samsung LE46D550K1, Телефон HTC HD2
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Re: Помощь в создании подкастов

Post by linkey »

slawa321 wrote:
linkey wrote:спасибо помогло
Так это ,чем дело то кончилось ,интересно ,где подкаст ,или так что то для себя писал?
http://www.homemediaserver.ru/forum/vie ... 933#p13933
правда не долелал еще(телепрограмму хотел еще добавить и упростить как то перечесление), просто не давно тока опять открыли все каналы.
samsung UE32D5000
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Re: Помощь в создании подкастов

Post by linkey »

Кто нибудь пробовал пользоваться "скрипт формирует несколько ссылок". Объясните плиз на простом примере как это сделать. Подкаст ютуб просмотрел, скачал даже пару подкастов с буржуйского wms, но так что то и не понял.
samsung UE32D5000
linkey
Posts: 110
Joined: Mon Oct 10, 2011 5:45 pm

Re: Помощь в создании подкастов

Post by linkey »

И еще вопрос можно ли изменить заголовок медиаресурса, в скрипте получения ссылки.
samsung UE32D5000
Post Reply