<div>
&lt;hangs heads in shame&gt; Ok, should've realised that there is nothing wrong with it, will award points anyway, its only fair!
</div>


<hangs heads in shame> Ok, should've realised that there is nothing wrong with it, will award points anyway, its only fair!

<div>
<div class="content wysiwyg-content">
I want to be able to fiddle with the printers properties, when using the PrintDialog this is accessible from the button marked properties next to the selected printer. I have an Epson printer, and when using the following code I am presented with a form entitled &quot;Epson C42 Properties&quot; but the only tab available is &quot;Version&quot;!<br />
<br />
procedure TfrmTimeTable.PrintSetting<wbr />s1Click(Se<wbr />nder: TObject);<br />
var<br />
&nbsp; APrinter, ADriver, APort: array[0..100] of Char;<br />
&nbsp; PrinterHandle, DevMode: THandle;<br />
begin<br />
&nbsp; Printer.GetPrinter(APrinte<wbr />r, ADriver, APort, DevMode);<br />
&nbsp; OpenPrinter(APrinter, PrinterHandle, nil);<br />
&nbsp; PrinterProperties(self.Han<wbr />dle, PrinterHandle);<br />
&nbsp; ClosePrinter(PrinterHandle<wbr />);<br />
end;<br />
<br />
Therefore is there a better way to get this dialog open, which works!?<br />
Also, I have just noticed that on Windows XP there is a new style PrintDialog which is more &quot;graphical&quot; than the older one, anyone know how to make that appear if the OS is XP instead of just the TPrintDialog? If so, can it still be used in the same way? (I'm using delphi 6, unsure if this will have a bearing)
</div>
</div>


I want to be able to fiddle with the printers properties, when using the PrintDialog this is accessible from the button marked properties next to the selected printer. I have an Epson printer, and when using the following code I am presented with a form entitled "Epson C42 Properties" but the only tab available is "Version"!

procedure TfrmTimeTable.PrintSettings1Click(Sender: TObject);
var
  APrinter, ADriver, APort: array[0..100] of Char;
  PrinterHandle, DevMode: THandle;
begin
  Printer.GetPrinter(APrinter, ADriver, APort, DevMode);
  OpenPrinter(APrinter, PrinterHandle, nil);
  PrinterProperties(self.Handle, PrinterHandle);
  ClosePrinter(PrinterHandle);
end;

Therefore is there a better way to get this dialog open, which works!?
Also, I have just noticed that on Windows XP there is a new style PrintDialog which is more "graphical" than the older one, anyone know how to make that appear if the OS is XP instead of just the TPrintDialog? If so, can it still be used in the same way? (I'm using delphi 6, unsure if this will have a bearing)

Getting the Printer Properties dialog.

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.