` Comment on an Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Add a comment to an Icetips Article

Please add your comments to this article. Please note that you must provide both a name and a valid email address in order for us to publish your comment. Comments are moderated and are not visible until they have been approved. Spam is never approved!

Your Name:  
Email:  
Header text/Subject:  

Please enter your comment in the box below:

Back to article list   Search Articles     Add Comment     Printer friendly     Direct link  

Par2: How to select a printer device with ABC's EIP
2012-05-10 -- Russ Eggen
 
its actually pretty easy. Here is how its done: 1) For the column that stores the device name, Use any dialog lookup from the drop list. Font, Color, File, etc. Does not really matter which. I used File. 2) You will need to override the TakeEvent method in the parent class, but not by editing it. Two embeds in this method: A) Declare local variable (DATA embed): Str CSTRING(FILE:MaxFilePath+1),AUTO B) The code, before parent call: CASE Event OF EVENT:DroppingDown IF ~SELF.ReadOnly IF NOT SELF.Title SELF.Title = SELF.ListBoxFeq{PROPLIST:Header,SELF.FieldNo} END UPDATE(SELF.FEQ) Str = SELF.UseVar IF PrinterDialog(SELF.Title) !Key code Str = PRINTER{PROPPRINT:device} !Key code SELF.UseVar = Str !Key code DISPLAY(SELF.Feq) END RETURN EditAction:Ignore END END If any of the above looks familiar, it should be, I stole it from one of the ABEIP methods . 3) Critical last step, add at the *module* embed level the INCLUDE('PRNPROP.CLW'),ONCE code or it won't compile. That's it. Compile and test and you'll find you can select any printer device installed on the system. This is useful if you ever need to change printer devices on the fly like you might do with point of sale systems (flip between a receipt printer and normal printer for example).


Today is November 21, 2024, 7:16 am
This article has been viewed 35246 times.



Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password: