Скачать: CL | DM;

Access violation   Найти похожие ветки 

← →
VasRog   (2004-11-27 02:34) [0]

На этапе прогона программы выдает access violation.  Вот небольшой кусок:

type
pRGBTripleArray = ^TRGBTripleArray;
TRGBTripleArray = Array [0..pixelcountmax-1] of  TRGBTriple;
pixelightness = array of array of real;

var
i:integer;
j:integer;
Row24:pRGBTripleArray;
Bitmap24:Tiebitmap;
lightness:pixelightness;
R,G,B: integer;

...................................

if (imageenview1.IEBitmap.PixelFormat = ie24RGB ) then
 begin
 Bitmap24:=Tiebitmap.Create;
 bitmap24.PixelFormat:=ie24rgb;
 bitmap24.Width:=imageenview1.Width;
 bitmap24.height:= imageenview1.height;
 setlength(lightness,bitmap24.Width,bitmap24.Height);

 for j:=0 to (bitmap24.Height-1) do
 begin
 Row24:=bitmap24.ScanLine[j];
 for i:=0 to (bitmap24.Width-1) do
 begin

 R:=  Row24[i].rgbtRed;
 G:=  Row24[i].rgbtGreen;
 B:=  row24[i].rgbtBlue;

 lightness[j,i]:= (R+G+B)/3;
 end;  //  for i

Цепляется имеено к выделенной строчке.  Подскажите, пожалуйста, что не так?

---

← →
XProger ©   (2004-11-28 04:30) [1]

setlength(lightness,bitmap24.Width,bitmap24.Height);
....
for j:=0 to (bitmap24.Height-1) do
...
for i:=0 to (bitmap24.Width-1) do
...
lightness[j,i]:= (R+G+B)/3;

У тебя j бежит по ширине, а i по высоте? ;)))

---

← →
VasRog   (2004-11-29 22:59) [2]

Большое спасибо.  :)))
Я идиот. :))))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c