Форум: "Основная";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
ВнизMicrosoftAgent Найти похожие ветки
← →
Demol (2002-02-13 17:29) [0]Подскажите пожалуйста как получить список анимаций для MicrosoftAgent.
Пробую так:
var ch : IAgentCtlCharacterEx;
AEnum : IEnumVariant;
c : IEnumVariant;
begin
Agent1.Characters.Load("Char", "merlin.acs");
Ch := Agent1.Characters.Character("Char") as AgentCtlCharacterEx;
AEnum := Ch.AnimationNames.Enum;
Delphi ругается, говорит что IEnumVariant не знаю. Что надо прописать в Uses ? Или задачу можно решить по другому ?
← →
Digitman (M) (2002-02-13 18:24) [1]var
AEnum: IAgentCtlAnimationNames
← →
Андре (2002-02-14 10:23) [2]Вот так ?
var
ch : IAgentCtlCharacterEx;
AEnum : IAgentCtlAnimationNames;
begin
Agent1.Characters.Load("Char", "merlin.acs");
Ch := Agent1.Characters.Character("Char") as IAgentCtlCharacterEx;
AEnum := Ch.AnimationNames.Enum as IAgentCtlAnimationNames;
end;
Все равно не работает. :-((.
Говорит raised exception class EInfCastError with message "Interface not supported". Может все таки как-то по другому ?
← →
Digitman (M) (2002-02-14 10:41) [3]>Андре
>Demol
Кто-нибудь из вас хоть раз заглядывал в AgentObjects_TLB.Pas ?
Там же черным по белому написано :
IAgentCtlCharacterEx = interface(IAgentCtlCharacter)
["{DE8EF600-2F82-11D1-ACAC-00C04FD97575}"]
function Get_AnimationNames: IAgentCtlAnimationNames;
property AnimationNames: IAgentCtlAnimationNames read Get_AnimationNames;
end;
А метод Enum относится уже к получаемому вами интерфейсу IAgentCtlAnimationNames !!!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c