Man darf übrigens
lokale Variablen verwenden, um den Sourcecode klarer darzustellen:
Delphi-Quellcode:
var
artbez : string;
begin
artbez := copy(ZQuery.FieldByName('artbezeichnung').AsString, 1, 12);
Printer.Canvas.TextOut(frandlinks ,frandoben + cmtopixel(4,fdpih) , artbez);
Man muss nicht alles in eine Zeile pressen.