ZXing.Delphi
ZXing.Delphi copied to clipboard
Error in function TRGBLuminanceSource.CreateLuminanceSource
current:
function TRGBLuminanceSource.CreateLuminanceSource(
const newLuminances: TArray<Byte>;
const width, height: Integer): TLuminanceSource;
begin
Result := TRGBLuminanceSource.Create(width, height);
luminances := newLuminances;
end;
should be:
function TRGBLuminanceSource.CreateLuminanceSource(
const newLuminances: TArray<Byte>;
const width, height: Integer): TLuminanceSource;
begin
Result := TRGBLuminanceSource.Create(newLuminances, width, height, TBitmapFormat.Gray8);
end;