drukowanie listboxa

0

Witam, mam problem z wydrukowaniem listboxa :(. Probowalem juz wrzucic jego zawartosc do RichEdit i wydrukowac (dokladnie jest to opisane w faq:
http://4programmers.net/faq.php?id=509), ale wyskakuje jakis blad, konkretnie:

"Project Login.exe raised exception class EAccessViolation with message 'Access violation at address 0000436ADC in module 'login.exe'. Read of address 000226'.Process stopped. "

wie ktos moze o co chodzi? jak mozna uporac sie z tym problem?

0

Rozwiązanie z FAQ działa. Podejrzewam, że namieszałeś przy tworzeniu obiektu RichEdit.

//dopisane
A z tą pustą kartką to rzeczywiście masz rację, myślałem, że mi się po prostu tusz w drukarce skończył :D .

0

Dokladnie mam tak jak w faq :/ :

procedure TForm1.DrukClick(Sender: TObject);
var
  R: TRichEdit;
begin
  R:= TRichEdit.Create(nil); //wywołaj kreator komponentu
  R.Parent := self; //rodzicem będzie formatka
  R.WordWrap := false; //nie zawijaj wierszy
  R.Visible := false; //niewidoczny
  R.Lines := WyjWpisu.Items; //pobierz tekst z listBoxa do RichEdita
  R.Print(R.Text); //wydrukuj
  R.Free; //zwolnij uchwyt Richa
end;

Jesli klikne na button Druk to teraz nie ma zadnej reakcji :| jedynie moge dodac ze gdy listbox jest pusty i klikne na Druk to drukarka staje sie aktywna, nastepnie pobiera jak i zarowno wydaje pusta kartke, o co tu chodzi ?

1 użytkowników online, w tym zalogowanych: 0, gości: 1