Drucken im Netzwerk mit TidLpr: "Socket already in use"

[Assertor]

Hallo skyobserver,

Zitat von Assertor:

probier mal bitte folgendes, um die Beschränkung der RFC 1179 zu umgehen

Mir ist noch was eingefallen, da die 10048 nicht im Bind sondern im Connect geraist wird.

Überlass mal Windows die lokale Port Zuweisung, dann solltest Du nicht so schnell als Limit kommen:

Delphi-Quellcode:

IdLPR1.Host := 'brn_906b9b';
IdLPR1.Queue := 'BINARY_P1';

IdLPR1.BoundPortMin := 0;
IdLPR1.BoundPortMax := 0;
IdLPR1.BoundPort := 0;

IdLPR1.Connect;
try
  IdLPR1.PrintFile('meinfile.prn');
finally
  IdLPR1.Disconnect;
end;

Gerade testest, geht auch schnell hintereinander. Ohne die langsamen Exceptions.

Hinweis: Das klappt nur, wenn der LPR keine bestimmte Client-Port-Range voraussetzt, wobei dies seit vielen Jahr überlicherweise kein Problem mehr ist.

Gruß Assertor