> > I have this program that print current form to printer.  However, it
works
> > all but on computers.  Where or what should I look at to solve this
> problem.

> So what code are you using?
> Are you using StretchDIBits instead of StretchDraw?

> --
> efg

> Earl F. Glynn     E-Mail:  EarlGl...@att.net
> Overland Park, KS  USA

> efg's Computer Lab:  http://www.efg2.com/Lab

> procedure TForm.Button1Click(Sender: Object);
> begin
>     Print;
> end;

> Dear Programmers.

> I have this program that print current form to printer.  However, it works
> all but on computers.  Where or what should I look at to solve this problem.

> Program is written in Delphi 4 Enterprise Version.  Compiled on NT
> workstation, running on Windows98.

> Earl Park
> earlp...@home.com

> Earl:

> "Earl Park" <earlp...@home.com> wrote in message
> news:84u5e4$hvu23@bornews.borland.com...
> > I am using Print method of TForm.

> > procedure TForm.Button1Click(Sender: Object);
> > begin
> >     Print;
> > end;

> I checked the source code on TCustomForm.Print (in D3-D5) and
> it appears to do use StretchDIBits, which is the correct way to
> print a bitmap.  But your example does fail on my LaserJet 5, just
> like you describe.  I'm not sure why.

> Joe Hecht's "A Better Way to Print a From" works fine on the same printer:
> http://www.borland.com/devsupport/delphi/ti/TI1412D.html

> --
> efg

> Earl F. Glynn     E-Mail:  EarlGl...@att.net
> Overland Park, KS  USA

> efg's Computer Lab:  http://www.efg2.com/Lab

>http://home1.gte.net/joehecht/index.htm

>Joe