Any way around this custom bitmap conundrum?
Hi all,
I was hoping to alternate colours on a shape graph created at
run-time. If I try ...
ppShape1.brush.bitmap := bsBricks;
if odd(seqNum)
then ppShape1.brush.color := clBlack
else ppShape1.brush.color := clNavy;
I get solid black and blue alternating bars. Close but no cigar.
If I try ...
if odd(seqNum)
then ppShape1.brush.color := clBlack
else ppShape1.brush.color := clNavy;
ppShape1.brush.bitmap := bsBricks;
I get the bricks pattern, but all the sections are black, the
default colour.
What I want is ppShape1 to be black brick, followed by
ppShape2 as navy cross-hatch, followed by ppShape3 as
black diagonal, etc...
Is it possible to colour a custom bitmap programatically?
And while I've got the bandwidth, is it possible to get a ppImage
that will tile a bitmap? That would SOLVE SO MANY PROBLEMS
including patterns that appear okay on the screen, if a tad small, but
are really nothing but a grey screen when printing to a 600 dpi
printer.
Thanks, GM
==========================================
When replying via email please move all
numbers from right of at symbol to left of
at symbol to get email address.
I was hoping to alternate colours on a shape graph created at
run-time. If I try ...
ppShape1.brush.bitmap := bsBricks;
if odd(seqNum)
then ppShape1.brush.color := clBlack
else ppShape1.brush.color := clNavy;
I get solid black and blue alternating bars. Close but no cigar.
If I try ...
if odd(seqNum)
then ppShape1.brush.color := clBlack
else ppShape1.brush.color := clNavy;
ppShape1.brush.bitmap := bsBricks;
I get the bricks pattern, but all the sections are black, the
default colour.
What I want is ppShape1 to be black brick, followed by
ppShape2 as navy cross-hatch, followed by ppShape3 as
black diagonal, etc...
Is it possible to colour a custom bitmap programatically?
And while I've got the bandwidth, is it possible to get a ppImage
that will tile a bitmap? That would SOLVE SO MANY PROBLEMS
including patterns that appear okay on the screen, if a tad small, but
are really nothing but a grey screen when printing to a 600 dpi
printer.
Thanks, GM
==========================================
When replying via email please move all
numbers from right of at symbol to left of
at symbol to get email address.
This discussion has been closed.
Comments
Try accomplishing this with a TShape first just using Delphi and get that
working. Then you can port the code over to work with a ppShape in
ReportBuilder.
There is nothing built into ReportBuilder to give you a tile bitmap. You
might look for a third-party utility that will do this for you. Then you
can load the tiled image into a report once it has been processed.
--
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com
For any lurkers out there -- Do any of you know of a third-party product
that will do this?
Your suggestion of using an image, saving the result, and then loading the
complete bitmap into a ppImage is something to consider. The first try
at this was with an image to take into account existing bitmap
patterns. But the stretching left the results unpleasant. BUT, if I
can create a complete to size tiled bitmap, save THAT to the disk and
then read it into the ppImage, it might be workable.
Thanks. I'll keep you apprised.
GM
On Thu, 3 Jul 2003 13:08:00 -0600, "Nico Cizik \(Digital Metaphors\)"