Problem mit Drucker im Netzwerk

[Hansa]

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.

[SirThornberry]

was willst du erreichen? Wenn man das ziel weiß kann man dir eventuell einen besseren (allgemein funktionierenden) weg zeigen.

[Hansa]

Zitat von Hansa:

...Weiß vielleicht jemand, ob jetzt der im PrintDialog ausgewählte Name relevant ist oder der Freigabename ?

Es geht darum, mit einem Drucker etwas zu drucken. 8) Der aber nicht druckt. Und zwar taucht der Effekt nur in meinem Programm auf. Es geht um Netzwerk (siehe auch Titel).

[SirThornberry]

wenn der drucker im Printdialog auftaucht kannst du ihn doch aber ganz normal wie jeden lokalen drucker auch ansprechen oder versteh ich da was falsch? Also einfach mit "Printer.BeginDoc -> Printer.Canvas.Textout......"