Verwijderd
Dat gaat op de volgende manier :
En alles werkt dan ook gelijk zoals, aantal keer afdrukken printer keuze etc .....
Succes
code:
1
2
3
4
5
6
7
| procedure TForm1.Button1Click(Sender: TObject);
begin
if PrintDialog1.Execute then
begin
RichEdit1.Print('Document');
end;
end; |
En alles werkt dan ook gelijk zoals, aantal keer afdrukken printer keuze etc .....
Succes