P := Bitmap.Scanline[y]; x := 0; while x <= Bitmap.width*3 -1 do begin P[x] := 200; //Blue P[x+1] := 200; //Green P[x+2] := 200; //Red inc(x,3) end;
时间: 2024-11-08 18:16:46
P := Bitmap.Scanline[y]; x := 0; while x <= Bitmap.width*3 -1 do begin P[x] := 200; //Blue P[x+1] := 200; //Green P[x+2] := 200; //Red inc(x,3) end;