Delphi change printing prefences - page size

I need simple Delphi code that works - found a lot of codes that doesn't, that allow me to do one of two things in WINDOWS printing prefences to specific printer : 1. Change the paper size to custom numbers I will choose. 2. If 1 it's more complicated - I have no problem to defince 3 custom sizes of paper - I need the ability to change them from this Delphi code. Here is a working code for changing the size to predefined paper size. Didn't success changing to do one of the missions I need. [login to view URL] NEED IT ASAP - TODAY.