[Delphi] PrintDialog, SynEdit

Jak wydrukować SynEdit?

Może trochę głupie pytanie, ale szukam i nie mogę znaleźć.

:pomocy:

---

procedure Tfrm_main.Print(Sender: TObject); var  s : string; begin  if PrintDialog1.Execute then  begin    SynEditPrint1.SynEdit := SynEdit1;    SynEditPrint1.Title := s;    SynEditPrint1.Print;  end; end;
I na formę wrzucasz SynEditPrint, PrintDialog i oczywiście SynEdit :)


Wpisujesz w google "SynEdit i masz multum tematow o tym zagadnieniu poszukaj dobrze, osobiscie w 10 seceund wyszukalem 2 odp na Twoje pytanie ;/
Szukałem, ale jeśli tak mówisz to pewnie niedokładnie.


procedure Tfrm_main.Print(Sender: TObject); var  s : string; begin  if PrintDialog1.Execute then  begin    SynEditPrint1.SynEdit := SynEdit1;    SynEditPrint1.Title := s;    SynEditPrint1.Print;  end; end;
I na formę wrzucasz SynEditPrint, PrintDialog i oczywiście SynEdit :)
Jeżeli tak wydrukuję to litery nakładają się na siebie.

Edit:

Już wszystko w OK.
Użytkownik NowyGracz edytował ten post 25 marzec 2006, 15:00

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl