Delphi og printere

I Printers unit'en

uses Printers;

function GetDefaultPrinterName : string;
begin
  if (Printer.PrinterIndex > 0)then
  begin
    GetDefaultPrinterName :=
      Printer.Printers[
        Printer.PrinterIndex ];
  end else
  begin
    GetDefaultPrinterName := '';
  end;
end;

og

Memo1.Lines.Assign(Printer.Printers);

Dooh, så ikke hele dit spørgsmål...

Hvordan du vælger hvilken printer du vil udskrive til afhænger af hvad du bruger til at lave udskrifter med?

>2Mida: Tak for svar. Det funger jo fint. Nu mangler jeg bare svar på hvordan jeg udskriver direkte til en af disse printere.

>kroning: Også tak til dig. Jeg har et gammelt program fra DOS der kan udskrive til en tekstfil. Denne fil formaterer jeg og gemmer stadigvæk i .txt da det skal passe til nye fortrykte formularer. Jeg vil derefter udskrive til en af de oprettede printere. Da der er tale om en printer med 2 bakker har jeg oprettet den samme printer 2 gange og opsat dem som bakke 1 og bakke 2 (1 txt-fil til bakke 1 og 1 til bakke 2).

jow, men fra hvilken komponent skal der udskrives fra, TMemo, QReport, TRichEdit eller ?

>kroning: Se, det har jeg ikke besluttet endnu. Alle tre er en mulighed. Da tekst skal have et fast format vil jeg nok vælge TMemo.

Har selv fundet løsning på spørgsmålet med Unit Printers samt Richedit.