From: Robert M. <mar...@us...> - 2005-11-09 10:26:18
|
Update of /cvsroot/jvcl/dev/donations In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32241/donations Modified Files: JvAMGIFImage.pas Log Message: minor style changes Index: JvAMGIFImage.pas =================================================================== RCS file: /cvsroot/jvcl/dev/donations/JvAMGIFImage.pas,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** JvAMGIFImage.pas 30 Oct 2005 07:33:13 -0000 1.3 --- JvAMGIFImage.pas 9 Nov 2005 10:26:08 -0000 1.4 *************** *** 58,62 **** // Changed 2004.03.09 by Finn Tolderlund: // // Added a ForceFrame property to the TGIFImage class. // ! // The ForceFrame property can be used to make TGIFImage display a apecific // // sub frame from an animated gif. // // How to use: Set the Animate property to False and set the ForceFrame // --- 58,62 ---- // Changed 2004.03.09 by Finn Tolderlund: // // Added a ForceFrame property to the TGIFImage class. // ! // The ForceFrame property can be used to make TGIFImage display a specific // // sub frame from an animated gif. // // How to use: Set the Animate property to False and set the ForceFrame // *************** *** 6022,6037 **** HashKeyBits = 13; // Max number of bits per Hash Key ! HashSize = 8009; // Size of hash table ! // Must be prime ! // Must be > than HashMaxCode ! // Must be < than HashMaxKey HashKeyMax = (1 shl HashKeyBits) - 1; // Max hash key value ! // 13 bits = 8191 HashKeyMask = HashKeyMax; // $1FFF GIFCodeMask = GIFCodeMax; // $0FFF ! HashEmpty = $000FFFFF; // 20 bits type --- 6022,6037 ---- HashKeyBits = 13; // Max number of bits per Hash Key ! HashSize = 8009; // Size of hash table ! // Must be prime ! // Must be > than HashMaxCode ! // Must be < than HashMaxKey HashKeyMax = (1 shl HashKeyBits) - 1; // Max hash key value ! // 13 bits = 8191 HashKeyMask = HashKeyMax; // $1FFF GIFCodeMask = GIFCodeMax; // $0FFF ! HashEmpty = $000FFFFF; // 20 bits type *************** *** 6215,6219 **** public constructor Create(Stream: TStream); - function Read(var Buffer; Count: Longint): Longint; override; end; --- 6215,6218 ---- |