Unit AdvImage |
**************************************************************************** TadvImage : use methode loadImage(filename : String) or property imagename := filename This is a BETA version... feel free to contribute! This software is Freeware. By Janick Fortin Send modifications,Bugs and comments fortin01@gel.ulaval.ca -Legal Notice------------------------------------------------------------------ TadvImage and TAdvOpenPictureDlg for Delphi 3 based on : GifImage mboler@flash.net Mark Boler TJpegImage Copyright (C) 1991-1996, Thomas G. Lane. All Rights Reserved except as specified below. Others Some code are Copyright of Borland Internationnal Before using the GIF and JPEG format in any commercial application be sure you know the legal issues for this format! History : 24 Dec 97 : release of 0.87B (TadvImage and TAdvOpenPictureDlg) 13 jan 98 : release of 0.93B (TadvImage) GDI bug corrected
Classes |
Functions |
GetCenterView -
GetfileSize -
GetStretchRatio - getting file size
Register -
Types |
Constants |
Variables |
Functions |
Types |
TImageType = (itBmp,itGif,itJpeg,itUnknown);
Constants |
Variables |