-
32 Lecții din Delphi
Lecția 6: Imprimarea textului și graficii
Acest articol descrie modalitățile posibile de imprimare a informațiilor dintr-un program creat în Delphi. Este luată în considerare ieșirea documentului în modul text al imprimantei, ieșirea graficii utilizând obiectul TPrinter și imprimarea conținutului formularului. Despre tipărirea rapoartelor utilizând generatorul de rapoarte ReportSmith, vedeți mai jos.
procedura TForm1.Button1Click (expeditor: TObject);
var
To_Prn. textfile;
începe
AssignPrn (To_Prn);
Rescrie (To_Prn);
Writeln (To_Prn, "Imprimanta în modul text");
CloseFile (To_Prn);
se încheie;
- Atribuiți fișierul în loc de Assign
- CloseFile în loc de Close
- TextFile în loc de Text
- Imprimați conținutul formularului pentru imprimare
Uneori, programul trebuie doar să obțină o copie de hârtie a formularului de ecran. În Delphi, aceasta se face mai mult decât doar - obiectul TForm are o metodă de imprimare. care trebuie apelat la momentul potrivit.
Proprietăți ale imprimantei: Aborted - Boolean; indică dacă utilizatorul a întrerupt lucrarea Abort a imprimantei.
Canvas - pânza, locul pentru desenarea graficelor; Lucrarea cu canvas este descrisă în lecția 5.
Fonturi - listă de fonturi disponibile.
Mâner - folosit pentru apeluri directe către API-ul Windows.
Orientare - orientarea paginii, pe verticală sau orizontală.
PageWidth. PageHeight. Numărul de pagină - respectiv lățimea, înălțimea și numărul paginii.
Imprimantele listează toate imprimantele instalate pe sistem și
PrinterIndex indică care este cea curentă. Pentru a imprima la imprimanta implicită, valoarea trebuie să fie -1.
Tipărire tip Boolean; Indică dacă începerea tipăririi (utilizând metoda BeginDoc).
Titlu - antetul pentru Print Manager și antetul înainte de a imprima pe imprimanta de rețea.
Abandonați - aborts de imprimare inițiată de BeginDocBeginDoc - numit înainte de a începe să picteze pe pânză.
EndDoc - numit atunci când tot ceea ce aveți nevoie este deja desenat pe panza, imprimanta începe să imprime exact după această metodă.
NewPage - accesați o pagină nouă. Nu sunt necesare alte metode ale obiectului în cazuri obișnuite.
Deci, ordinea tipăririi informațiilor grafice este după cum urmează.- metoda BeginDoc este executată
- Panza atrage tot ce aveți nevoie
- dacă doriți să plasați informații pe mai multe coli, apelați metoda NewPage
- trimiteți imaginea trasată la imprimantă executând metoda EndDoc
- Exemplu ex06.zip