Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#1

Problem mit Drucker im Netzwerk

  Alt 9. Apr 2005, 02:37
Hi,

ich komme mit einem Drucker nicht weiter.

Delphi-Quellcode:
   if dlgDrucker.Execute then begin
    DruckerName := Printer.Printers [Printer.PrinterIndex];
showmessage ('*'+Druckername+'*');
    CloseFile (d);
    AssignFile (d,'Brother');
    rewrite (d);
for i := 1 to 100 do
  writeln (d,'kjlkjljljljl');

Wie man vielleicht sieht, kommt der Druckername aus einem Printdialog. In der ShowMessage wird er auch angezeigt (also z.B. \\Server\Epson), aber gedruckt wird nichts. Im AssignFile steht noch ein fester Wert. In diesem Falle der Freigabename. Bei dem Brother Drucker geht es so auch nicht (also die Verwendung des Freigabenamens im assign), bei einem Epson schon.

Weiß vielleicht jemand, ob jetzt der im PrintDialog ausgewählte Name relevant ist oder der Freigabename ? Ich habe den Eindruck, daß es mit dem Freigabenamen funktioniert, aber das würde bei einem Einzelplatz ja keinen Sinn machen. Das ist alles sehr seltsam, ich weiß. Deshalb frage ich ja.
Gruß
Hansa
  Mit Zitat antworten Zitat