Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.06;
Скачать: CL | DM;

Вниз

TAnimate - нужна срочная помошь   Найти похожие ветки 

 
Lord BDV   (2002-04-21 13:48) [0]

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

var
Form1: TForm1;
h:THandle;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
h:=LoadLibrary("f:\setup.exe");
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Animate1.ResHandle:=h;
Animate1.ResID:=10001;
Animate1.Active:=true;
end;

Но увы, когда я нажимаю на Button1, все вроде-бы нормально, но при нажатии на Button2 моя программа обламывается и говорит "Couldn"t open AVI".
Прошу, подскажитеЮ, где моя ошибка, и как решается подобная проблема?


 
aus ©   (2002-04-21 15:02) [1]

TAnimate воспроизводит неозвученные клипы.


 
Lord BDV   (2002-04-21 22:16) [2]

Я это знаю. Мой клип не озвучен, и создан при помощи кодека Microsoft RLE, как того и требует документация.
Кстати, когда я пытаюсь зарядить этот файл в компонент TAnimate, используя свойство FileName, все работает нормально, тае что проблем, связанных с неправильным форматом видео-ролика нет.
Проблема возникает, когда я помещаю его в качестве ресурса в файл F:\setup.exe (см. текст программы сверху), а потом из другой программы пытаюсь подцепить setup.exe и ресурс, отвечающий за видеоролик.

Help, plzzzzzzzz



Страницы: 1 вся ветка

Текущий архив: 2002.05.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
4-17755
JAndrey
2002-02-28 07:13
2002.05.06
Как заблокировать ТОЛЬКО мышь?


14-17675
Mich Fryged
2002-03-28 23:29
2002.05.06
Помогите пожалуйста!


1-17593
:-)
2002-04-21 22:25
2002.05.06
Как в дельфи выполнять комманды коммандной строки?


1-17635
Timon
2002-04-23 11:27
2002.05.06
Интересный вопрос


3-17482
sergey32
2002-04-12 10:16
2002.05.06
Не могу запустить цикл по IBQuery