Recent

Author Topic: MacOS 10.15.5 Printer Class Crash?  (Read 2214 times)

trev

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1395
  • Former Delphi 1-7, 10.2 User
Re: MacOS 10.15.5 Printer Class Crash?
« Reply #15 on: July 03, 2020, 02:41:49 am »
I rarely use a printer anymore, maybe once in the last year. I believe I ran this test on Mojave with Lazarus trunk in December last year (judging by the dates on the files) and it worked, but again only text.

Code: Pascal  [Select][+][-]
  1. procedure TForm1.TestButtonClick(Sender: TObject);
  2. begin
  3.     Printer.Title := 'Test';
  4.     Printer.BeginDoc;
  5.     try
  6.       Printer.Canvas.Font.Name := 'Arial';
  7.       Printer.Canvas.Font.Size := 9;
  8.       Printer.Canvas.Font.Style := [];
  9.       Printer.Canvas.Pen.Color := clBlack;
  10.       Printer.Canvas.Pen.Width := 2;
  11.       Printer.Canvas.TextOut(150, 150, 'Test of printing function');
  12.     finally
  13.       Printer.EndDoc;
  14.     end;
  15. end;
  16. end.
  17.  
Lazarus 2.1 r65019 FPC 3.3.1 r49223 macOS 10.14.6 Xcode 11.3.1
Lazarus 2.1 r65019 FPC 3.3.1 r49223 macOS 11.2.3 aarch64 Xcode 12.4
Lazarus 2.1 r61574 FPC 3.3.1 r42318 FreeBSD 12.1 amd64 VMware VM
Lazarus 2.1 r61574 FPC 3.0.4 Ubuntu 20.04 Parallels VM
Lazarus 2.0.10 FPC 3.2.0 Win10 Parallels VM

Dan3468298

  • Full Member
  • ***
  • Posts: 129
Re: MacOS 10.15.5 Printer Class Crash?
« Reply #16 on: July 03, 2020, 11:28:37 pm »
Please see the bug report.   
« Last Edit: July 04, 2020, 12:15:49 am by Dan3468298 »
MacOS 10.15.5/Lazarus 2.0.10 Build 2020-07-07

rvk

  • Hero Member
  • *****
  • Posts: 4472
Re: MacOS 10.15.5 Printer Class Crash?
« Reply #17 on: July 06, 2020, 06:17:30 am »
Please see the bug report.
https://bugs.freepascal.org/view.php?id=37291

(You should close the issue there if it's resolved for you, with the close button on that page)

 

TinyPortal © 2005-2018