Ver Mensaje Individual
  #9  
Antiguo 18-11-2005
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Reputación: 22
JXJ Va por buen camino
con el ander melander.

Menu component -> install Component.
en la pestaña elijes Unit file name usas el boton
browse
elijes el archivo GIFImage.pas

y le das click a el boton ok
compilas e instalas
si no compila y te sale el mensaje de que no se
encuentra el archivo GifImage.dcu
agrega el directorio o carpeta donde tienes
el GifImage con tools -> Enviroment Options
Pestaña Library das click al primer boton que esta a
la dereccha de Library path
selecionas el directorio donde esta GifImage.


otra forma de usar gifs con este archivo
solo coloca el archivo GifImage en la carpeta
donde estan los codigos fuente del proyectoque
va a usar imagenes gif.

y agrega el nombre del archivo pas
a las uses.


algo asi.

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses GifImage;

{$R *.dfm}

end.

de esta forma puedes cargar imagenes gif.
pero no se van a mostrar, las extensiones gif
en las propiedades Picture
cuando uses un TImage

solo las que por defecto soporta delphi

para que puedas usar un Timage. y gif
como si fueran
formatos con soporte nativo con delphi

solo instalalo como te dije más arriba

esta componente,. no se muesta en la paleta
componentes.
pruebas los demos que trae.
para que verifiques que si esta bien instalado.
Responder Con Cita