GLScene - GLActor

[turboPASCAL]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  GLActor1.LoadFromFile('\Media\ActorSoUndSo.md2');
  GLActor1.Scale.SetVector(0.25,0.25,0.25); // wenn nötig
  GLActor1.AnimationMode := aamLoop;
  GLActor1.SwitchToAnimation(2,true); // bzw. .SwitchToAnimation('run', True);
end;

Sollte es eigentlich tun, vorausgesetzt das die Animationsdatei in Ordnung ist