您所在位置：主题：用scanline取BMP上某点的颜色，代码如下，为什么可以编译，运行时却出错呢？
lkdbdlkq
[专家分：0] 发布于 2006-09-23 10:29:00
procedure TForm1.Image1Click(Sender: TObject);
var
x,y:Integer;
Pixs:array of TColor;
begin
image1.Picture.loadfromfile('d:\001.bmp');
Pixs:=image1.Picture.Bitmap.ScanLine[0];
if Pixs[0]=clwhite then showmessage('www');
end.
请路过的朋友不吝赐教啊。。
var
x,y:Integer;
Pixs:array of TColor;
begin
image1.Picture.loadfromfile('d:\001.bmp');
Pixs:=image1.Picture.Bitmap.ScanLine[0];
if Pixs[0]=clwhite then showmessage('www');
end.
请路过的朋友不吝赐教啊。。