From: Peter T. <pe...@us...> - 2003-11-23 23:05:57
|
Update of /cvsroot/jvcl/dev/JVCL3/run In directory sc8-pr-cvs1:/tmp/cvs-serv16389/JVCL3/run Modified Files: JvTypes.pas Log Message: . Added missing D5 color defines Index: JvTypes.pas =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/run/JvTypes.pas,v retrieving revision 1.27 retrieving revision 1.28 diff -C2 -d -r1.27 -r1.28 *** JvTypes.pas 23 Nov 2003 22:22:13 -0000 1.27 --- JvTypes.pas 23 Nov 2003 23:05:54 -0000 1.28 *************** *** 79,87 **** EOSError = class(EWin32Error); IInterface = IUnknown; - {$ENDIF} {$M+} IInvokable = interface(IInterface) end; {$M-} TJvRegKey = (hkClassesRoot, hkCurrentUser, hkLocalMachine, hkUsers, hkPerformanceData, --- 79,87 ---- EOSError = class(EWin32Error); IInterface = IUnknown; {$M+} IInvokable = interface(IInterface) end; {$M-} + {$ENDIF} TJvRegKey = (hkClassesRoot, hkCurrentUser, hkLocalMachine, hkUsers, hkPerformanceData, *************** *** 131,134 **** --- 131,135 ---- rgbRed: Byte; end; + TRGBTriple = packed record rgbtBlue: Byte; *************** *** 136,141 **** rgbtRed: Byte; end; - // TRGBArray = array[0..MaxPixelCount - 1] of TRGBQuad; {$ENDIF VisualCLX} PRGBArray = ^TRGBArray; // JvThumbImage, JvImageSplit, JvRegion --- 137,142 ---- rgbtRed: Byte; end; {$ENDIF VisualCLX} + // TRGBArray = array[0..MaxPixelCount - 1] of TRGBQuad; PRGBArray = ^TRGBArray; // JvThumbImage, JvImageSplit, JvRegion *************** *** 251,255 **** SysIconIndex: Integer; end; ! {$ENDIF VCL} TJvAnimation = (anLeftRight, anRightLeft, anRightAndLeft, anLeftVumeter, anRightVumeter); TJvAnimations = set of TJvAnimation; --- 252,256 ---- SysIconIndex: Integer; end; ! {$ENDIF VCL} TJvAnimation = (anLeftRight, anRightLeft, anRightAndLeft, anLeftVumeter, anRightVumeter); TJvAnimations = set of TJvAnimation; |