[Bibliothek] Barcode für Delphi (Zint)

[Carsten2]

Fehler in unit zint_upcean

in function eanx
local_source kann länger als 20 sein:
So tritt der Zeigerfehler jedenfalls nicht mehr auf!?
tritt auf mit BARCODE_EANX_CC Primary "012345678905+123", also falscher Add-on Länge...

Code:

  //SetLength(local_source, 20);//Alt
  SetLength(local_source, 41);//Neu

  //for reader := 0 to ustrlen(local_source) do //Alt
  //  if (source[reader] = Ord('+')) then with_addon := TRUE;//Alt
  for reader := 0 to ustrlen(local_source) - 1 do //Neu
    if (local_source[reader] = Ord('+')) then with_addon := TRUE;//Neu

in upcean.c ebenfalls bis <=!?

in procedure upce
noch einen:

Code:

  //for i := 0 to ustrlen(source) do //Alt
  for i := 0 to ustrlen(source)-1 do //Neu
    case Chr(parity[i]) of
      'A': lookup(NEON, EANsetA, source[i], dest);
      'B': lookup(NEON, EANsetB, source[i], dest);
    end;

in upcean.c ebenfalls bis <=!?

[chaosben]

Sehr gut! Danke!

[Carsten2]

Fehler in allen Composite Symbols
in Mode CC B bzw CC C:
Der PDF417-Part ist nicht identisch mit dem der Zint.dll
im Mode CC A ist alles OK!

2.
mehrere Zeigerfehler bei zsRSS_EXPSTACK
Data: "[28]1" oder "[28]123456"

meine Korrekturen, die Absturz verhindern, aber ein bisschen willkürlich sind:
unit zint_rss;
function rss_binary_string:

Code:

  SetLength(general_field, strlen(source) + 10);//geändert + 10
  SetLength(general_field_type, strlen(source) + 10);//geändert + 10
  SetLength(padstring, 40 + 10);//geändert + 10

function rssexpanded:

Code:

  SetLength(reduced, src_len + 20);//geändert + 20
  SetLength(binary_string, 7 * src_len + 7 * 20);//geändert + 7 * 20

3. Fehler korrigiert:
function rss_binary_string:

Code:

    4: begin concat(binary_string, '0101'); read_posn := strlen(source); end;
    //5: begin concat(binary_string, '0110XX'); read_posn := 20; end;//Alt
    5: begin concat(binary_string, '01100XX'); read_posn := 20; end;//Neu
    6: begin concat(binary_string, '01101XX'); read_posn := 23; end;

[Carsten2]

Björk: It's so quiet...

Habe bisher den Fehler in den Composites nicht gefunden!

Oder ist da gar keiner mehr?

[chaosben]

Theoretisch sollte es keine Fehler mehr geben.

[Carsten2]

Leider gibt es bei mir eine Differenz zwischen Theorie und Praxis

Alle Composites mit Modus CC-B unterscheiden sich weiterhin von denen mit der Zint.dll.

... und ich weiss nicht warum

[chaosben]

Da hat einer aber mal wieder Recht gehabt!
Diese Differenzen sollten jetzt nicht mehr auftreten.