<div dir="ltr">It's not strange, if your printer is configured forgray scale printing...<br><div>Leaving out configure, you get the default configuration.</div><div><br></div><div>Regards</div><div>Gianluigi<br></div></div><div class="gmail_extra"><br><div class="gmail_quote">2018-07-14 23:34 GMT+02:00 Rolf-Werner Eilert <span dir="ltr"><<a href="mailto:rwe-sse@osnanet.de" target="_blank">rwe-sse@osnanet.de</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
  
    
  
  <div text="#000000" bgcolor="#FFFFFF">
    <p>I found something: When I leave out .Configure like you did, and
      define everything including the PDF file, then it prints colors.</p>
    <p>Strange though...</p>
    <p>Rolf</p>
    <p><br>
    </p>
    <br>
    <div class="m_-5785608352513121419moz-cite-prefix">Am 14.07.2018 um 23:01 schrieb
      Gianluigi:<br>
    </div>
    <blockquote type="cite">
      <div dir="ltr">
        <div>This code work to me.</div>
        <div><br>
        </div>
        <div>Public Sub Button1_Click()<br>
          <br>
            With Printer1<br>
              'If you insert configure you can see the printer
          configuration :-)<br>
              '.Configure<br>
              .Orientation = 0<br>
              .Paper = 2<br>
              .Resolution = Desktop.Resolution</div>
        <div>    ' Output in tmp folder</div>
        <div>     .OutputFile = "/tmp/print_test.pdf"<br>
              .Print<br>
            End With<br>
          <br>
          End<br>
          <br>
          Public Sub Printer1_Draw()<br>
            <br>
            Paint.FillRect(20, 30, 700, 1000, Color.Red)<br>
            <br>
          End</div>
        <div><br>
        </div>
        <div>Regards</div>
        <div>Gianluigi<br>
        </div>
      </div>
      <div class="gmail_extra"><br>
        <div class="gmail_quote">2018-07-14 21:53 GMT+02:00 Rolf-Werner
          Eilert <span dir="ltr"><<a href="mailto:rwe-sse@osnanet.de" target="_blank">rwe-sse@osnanet.de</a>></span>:<br>
          <blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Currently
            I try to make up a simple printing into PDF for a program.
            It would be fine if I could print colored squares, but from
            a first trial I only got grays:<br>
            <br>
            Paint.FillRect(randLinks, randOben, 1000, 1000, Color.Red)<br>
            <br>
            Any hint what might go wrong? This is on my laptop, and the
            only printer driver installed is for a grayscale laser
            printer, but printing into a file (PDF) shouldn't be
            affected by this, should it?<br>
            <br>
            Thanks for your ideas!<br>
            <br>
            Rolf<br>
            <br>
            <br>
            <br>
            ----[ Gambas mailing-list is hosted by <a href="https://www.hostsharing.net" rel="noreferrer" target="_blank">https://www.hostsharing.net</a>
            ]----<br>
          </blockquote>
        </div>
        <br>
      </div>
      <br>
      <fieldset class="m_-5785608352513121419mimeAttachmentHeader"></fieldset>
      <br>
      <pre>----[ Gambas mailing-list is hosted by <a class="m_-5785608352513121419moz-txt-link-freetext" href="https://www.hostsharing.net" target="_blank">https://www.hostsharing.net</a> ]----
</pre>
    </blockquote>
    <br>
  </div>

<br><br>
----[ Gambas mailing-list is hosted by <a href="https://www.hostsharing.net" rel="noreferrer" target="_blank">https://www.hostsharing.net</a> ]----<br>
<br></blockquote></div><br></div>