Hallo zusammen,
ich habe folgendes Problem:
Ich Verwende in zwei Projekten die ZintBarcode - Komponente. In einem der Projekte lässt sich ein Barcode ohne Fehler erstellen, im anderen Fall kommt es zu einer
Exception ("Systemressourcen erschöpft"). Bei der Fehlersuche habe ich den Code auf ein minimum reduziert und die entsprechende
dll sowie die nötigen Units direkt aus dem funktionierenden Projektverzeichnis kopiert. Die "Hauptform" enthält nichts weiter als den angefügten Code. Die
Exception tritt beim Aufruf von MyBarcode.GetBarcode() auf.
Delphi-Quellcode:
procedure THauptForm.FormCreate(Sender: TObject);
var
MyBitmap :TBitMap;
MyBarcode :TZintBarcode;
begin
//BarCode zeichnen ***********************************************************
MyBarcode := TZintBarcode.Create;
MyBarcode.Clear;
MyBarcode.Data := '00340311640213278478';
MyBarcode.BarcodeType := tBARCODE_CODE128;
MyBarcode.Option3 := 100;
MyBarcode.Scale := 1;
MyBarcode.GetBarcode(MyBitmap);
// MyCanvas.Draw(0,0,MyBitmap);
//****************************************************************************
end;
Die Frage ist nun: Wie kann das sein?
Für Tipps wäre ich sehr Dankbar!
Danke im Voraus
canoniac