Hier auch nochmal 2 Links zu ähnlichen Themen:
http://www.delphipraxis.net/53976-in...tml#post365632
http://www.delphipraxis.net/129499-schrift-pixelig.html
Wie schin jemand sagte, über SetMapMode kannst du die Auflösung des (Printer)Canvas verändern.
Wenn es überall etwa gleich aussehn soll, dann darfst du kein Hardwareabhäniges Format nutzen, sondern nutzt einfach ein festes Format, wobei man sich hier einige Auflösungen in Inch/Zoll oder Millimetern auswählen kann (siehe erster Link).
Wenn du noch mehr skalieren willst, dann wäre halt der Weg über SetWorldTransform (siehe NamenLozer) oder du könntest du die TBarCode-Ausgabe erstmal auf ein TBitMap zeichnen und kopierst dann dieses Bild skaliert auf den Printer-Canvas.