[[maeyanes]]

Empezado por kakarotv5

De nada, gracias a ti por leerme.

Bueno es muy sencillo, una vez que hayais hecho lo anterior, teneis que asociar Guerrero a un componente de tipo TGLNavigator luego sacar un objeto de tipo TComboBox, lo poneis no visible y en el evento OnCreate del formulario ponemos el siguiente código:

[snip]

Saludos.

Por que no usas un TStringList?

Puedes hacer algo como:

Código Delphi [-]

type
  TForm1 = class(TForm)
    // Declaraciones de compoentes, eventos, etc...
  private
    GuerreroAnimations: TStringList;
    // Demás declaraciones
  end;

// Evento OnCreate
GuerreroAnimations := TStringList.Create; // GuerreroAnimation lo declaras como privado
Guerrero.Animations.SetToStrings(GuerreroAnimations);
SetAnimation(0) // Hacemos que el personaje tenga su animación por defecto

SetAnimation sería algo como:

Código Delphi [-]
procedure TForm1.SetAnimation(Index: Integer);
begin
  Guerrero.SwitchToAnimation(GuerreroAnimations[Index]);
  Guerrero.AnimationMode := aamLoop
end;

En el evento OnDestroy de la forma haces:

Código Delphi [-]
GuerreroAnimations.Free

De esta forma no tienes que usar un TComboBox...



Saludos...