Home » Tutorials » Third-Party-Komponenten » MS Agent

MS Agent

Weitere Animationen

Die eingangs erwähnte Dokumentationssammlung von Microsoft enthält für jeden der vier Agenten ein Word-Dokument, in dem alle möglichen Aktionen aufgeführt sind (z. B. MerlinAnimationList.doc). Die Methode zur Ausführung dieser Animationen lautet Play. Als Parameter erwartet sie den String-Namen einer Animation. Über die Methode Stop kann die Animation vorzeitig abgebrochen werden.

procedure TForm1.ShowAgent;
var p1: TPoint;
begin
  with Agent.Characters.Item['Merlin'] do begin
    p1.x := Edit1.Left+width;
    p1.y := Edit1.Top;
    p1:= ClientToScreen(p1);
    MoveTo(p1.x, p1.y, 0);
    Show(0);
    Play('Announce');
  end;
end;

Die hier verwendete Aktion „Announce“ veranlasst Merlin, eine Trompete aus seinem Gewand zu ziehen und ein paar Töne zu spielen.
Genauso kann man ihn auch am Kopf kratzen, klatschen oder mit den Armen wedeln lassen.
Dies ist nur ein kleiner Teil dessen, was mit MS Agents alles möglich ist. Weitere Informationen finden sich auf anfangs erwähnten Website im Microsoft Develeoper Network.