Xref: utzoo comp.windows.ms.programmer:1993 comp.lang.pascal:6281 Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!caen!ox.com!math.fu-berlin.de!tmpmbx!zelator!rainer From: rainer@zelator.uucp (Rainer Brendel) Newsgroups: comp.windows.ms.programmer,comp.lang.pascal Subject: Re: Writing vertical text with a non-stroked font Message-ID: Date: 20 Apr 91 20:44:15 GMT References: Distribution: comp Organization: Puplic-Access-Xenix Lines: 30 In oivindt@bio.uio.no (Oivind Toien) writes: >I am trying to output vertical text to the screen initiated with the >CreateFontIndirect procedure. Setting the parameters >lfOrientation:=900; and lfEscapement:=900; makes stroked fonts (Roman, >Script and Modern) appear vertical. This does however not work with >the bit-mapped fonts, and not with the corresponding fonts on a system >where ATM was installed. A possible solution is writing a string into a bitmap, turning the bitmap by 90 degrees, and displaying it. Though this works with every bitmapped device, it looks good only on devices that have ASPECTX = ASPECTY. This method is not restricted to diplay devices. If your printer has BitBlt capability, you may apply it there as well. You may find an example of text drawn into a bitmap in chapter 9 of Charles Petzold's book. Rotating a bitmap requires a lot of bit shift- ing that should be done in assembler. When I encountered the same problem I solved it with Actor and assembler. Please feel free to email me for the assembler primitives and, if wanted, an Actor demo class. The assembler routines anyhow need some hacking. Actor has a different argument passing. rainer -- ------------------------------------------------------------------------ EMAIL: rainer@zelator.in-berlin.de Rainer Brendel ------------------------------------------------------------------------