Einzelnen Beitrag anzeigen

Carsten2

Registriert seit: 14. Jun 2010
22 Beiträge
 
Delphi 4 Standard
 
#115

AW: [Bibliothek] Barcode für Delphi (Zint)

  Alt 12. Nov 2013, 16:39
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;

Geändert von Carsten2 (12. Nov 2013 um 17:11 Uhr)
  Mit Zitat antworten Zitat