What version of lazarus you are using ?
I downloaded the snapshot, the first error was fixed but still
I am stuck on the second error
This is the full source of the code, is there any experts could suggest me a
modification ?
procedure GammaCorrectRGBArray(base : Pointer; pixelCount : Integer;
gamma : Single);
type
PByte = ^Byte;
var
vGammaLUT : array [0..255] of Byte;
invGamma : Single;
i : Integer;
begin
if pixelCount<1 then Exit;
Assert(gamma>0);
// build LUT
if gamma<0.1 then
invGamma:=10
else invGamma:=1/gamma;
for i:=0 to 255 do
vGammaLUT[i]:=Round(255*Power(i*(1/255), InvGamma));
// perform correction
for i:=Integer(base) to Integer(base)+pixelCount*3-1 do
PByte(i)^:=vGammaLUT[PByte(i)^]; //-------------------> Error
here
end;
----- Original Message -----
From: "Adilson Oliveira" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Tuesday, August 23, 2005 10:55 AM
Subject: Re: [lazarus] Game Development with Lazarus
> Yoppy Sundawa wrote:
> > Naah ... the .lpk file's not working.
> > 2 Problems I found :
> > 1. a unit not found GLScanLinedGraphics, and I cannot find it anywhere
else.
> > 2. Illegal assignment to for-loop variable, syntax :
> > for i:=Integer(base) to Integer(base)+pixelCount*3-1 do
> > PByte(i)^:=vBrightnessLUT[PByte(i)^];
> >
> > I wonder if the person who converted the package to lazarus is here too
..
>
> I downloaded the last package I sound on sourceforge and not the CVS and
> it worked.
>
> []s
>
> Adilson.
>
> _________________________________________________________________
> To unsubscribe: mail [EMAIL PROTECTED] with
> "unsubscribe" as the Subject
> archives at http://www.lazarus.freepascal.org/mailarchives
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
