Bis auf das andere Befüllen der Stringlist
sl.Add(IntToStr(temp) + ':' + pBinNames^[i]);
bekomme ich mit deinem Code unter D2010 folgende Liste für meinen HP Drucker:
15: Automatisch auswählen
257: Drucker autom. Auswahl
258: Man. Zufuhr (Fach 1)
259: Fach 1
260: Fach 2
261: Fach 3
1277:Nicht bestimmt
1276:Normal
1275:Vorgedruckt
1274:Briefkopf
1002:Transparentfolie
1273:Vorgelocht
1272:Etiketten
1271:Briefpapier
1270:Recyclingpapier
1269:Farbpapier
1268:Leicht (< 75 g/m2)
1267:Schwer 106-163 g/m2
1266:Karton > 163 g/m2
1265:Hochglänzend 75-105 g/m
1264:Hochglänzend, schwer
1263:ToughPaper
1262:Briefumschlag