Simplicty and flexibility!


HowTo::

How to get and set the default printer automatically


Parameters


Returns/Result


Examples


Reference

How to get and set the default printer automatically

With DataEase you can get the default printer name and also set a default printer automatically as following:

Step 1:
Create following CDFs:

1- Function Name: GetDefaultPrinterA
CDF Library Name: Winspool.drv
Return Type: Long
Parameters:
1.Name: prtNameBuffer Type: Long
2.Name: prtNameSizeBuffer Type: Long

2- Function Name: SetDefaultPrinterA
CDF Library Name: Winspool.drv
Return Type: Long
Parameters
1.Name: prtName Type: String

3- Function Name: RecordSave
CDF Library Name: dfwacts.dll
Return Type: Int

After creating those CDFs, please close the application and reopen it again (to register the CDFs).

Step 2:
Create a new form with one field.
Form name: GetDefaultPrinter.
Field name: ‘DefaultPrinterName’ data-type: Text 255, Prevent Entry

Create a button with caption “Click Here to Get the Default Printer Name”.
Right-click the button and select OML from the pop-up menu and type the
following:

define “BufName” text 49 .
define “BufLen” text 4 .
define “prtName” number .
define “prtLen” number .
define “retval” number .

BufName := “1234567890123456789012345678901234567890123456789″ .
Buflen := “1″ . — Ascii 49

prtName := addressof(BufName) .
prtLen := addressof(BufLen) .

retval := GetDefaultPrinterA( prtName, prtLen ) .
DefaultPrinterName.Value := BufName .
retval := RecordSave () .

Now save the form and return to the User View (or press F4). In the user view click the button to get your default printer name and place it into the field.

Step 3:
Create a new form with one field:
Form name: SetDefaultPrinter
Field name: “PrinterName” , data-type: text and length 255

Create a button with caption “Type the Printer Name You want to set. Click this button to set the Default Printer”. Right-click the button and select OML from the pop-up menu and type the following:

define “retval” number .

retval := RecordSave () .

retval := SetDefaultPrinterA (PrinterName.Value) .

Now save the form and return to the User View (or press F4). In the user view enter the printer name exactly as it appears under control panel >> Printers and Faxes.

 

See Also


On the forum about How to get and set the default printer automatically

[@EOF@]...

Product: . Written by alembagheri tahmas 07/12/13 at 13:37:32

Hi there,I am trying to use an external MySQL DB in dataease. I have successfully create the ODBC link and added the DB to dataease. I can also access the DB from dataease. Now, just for testing purposes, I am trying to create a simple report b...

Product: DataEase for Windows 7.x. Written by George Washington 11/04/14 at 08:26:17

no se pude exportar ahora archivos a pdf, ni a excel o otros cosa mala. en verdad creo que hace faltaen las versiones anteriores me funcionaba mas o menos bien. le hace falta a los aplicativos que se desarrollan en Dataeasegr...

Product: DataEase 8 Reporter. Written by eduardo paez 02/05/14 at 14:40:11

Thanks. Anyway I'm trying to use this fuction but it seems to me that it doesn't work on 8.2. I tried also in a DQL.There's something wrong?<img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAA9IAAAJ3CAYAAAB4NWk3AAAAAXNSR0IArs4...

Product: . Written by Marco Marchesi 15/02/16 at 14:50:46

[@EOF@]...

Product: Dataease [{8}]FIVE. Written by Chamil Rajindra 21/02/19 at 10:17:46

Thanks for the very good explanation!AS...

Product: . Written by afonso santos 28/10/19 at 00:50:14

I am pleased to see that the migration from Dos 4.53 is then sa 5.5 works. A really useful thing would be a compiler of SQL languages. Will you get there?Original Text:Mi compiaccio a vedere che la migrazione da Dos 4.53 รจ poi sa 5.5 funzio...

Product: . Written by Grossi Gioacchino 18/11/19 at 14:33:44

On the blog about How to get and set the default printer automatically


dg3_HelpView