Ir al contenido principal

Entradas

Destacados

DELPHI : GIF ANIMADO EN UNA VENTANA

Desde Delphi 2007 hasta los modernos Delphi (El último es Delphi 10.2 Tokio, recien publicado), se pueden utilizar gifs animados en los Form , cambiando la propiedad de TGifImage  Animate a True, en el ejemplo muestro como se hace.
Se pueden controlar también otros parámetros como : "AnimateLoop, AnimateSpeed"...etc.
Captura de pantalla:

También utilizo en el programa música XM, usando la libreria uFmod y para que haga algo
un botón que al pulsarlo chequea si estás o no
conectado a la red.
Las fuentes completas, programa compilado y
recursos estan en :
http://www.mediafire.com/file/a8f69tm1h21mbkm/gifAni.rar

[code]
unit Unit1;
interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  System.Classes,Vcl.Graphics,Vcl.Controls, Vcl.Forms, Vcl.Dialogs,
  Vcl.Imaging.GIFImg, Vcl.ExtCtrls,Winapi.WinInet, Vcl.StdCtrls, uFMod;

type
  TForm1 = class(TForm)
     Image1: TImage;
    Button1: TButton;
    Image2: TImage;
    Image3: TImage;
    Image4: TImage;

Entradas más recientes

COMIENZO