<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 5.50.4134.600" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial color=#0000ff size=2>...I've now worked out that to avoid
that gap I have to set my text box height to a maximum of 3.5 cms (set in the on
format event) when there is a photo - otherwise the report expands the section
needlessly. It limits me a bit but for now I will work around that.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>Kath</FONT></DIV>
<DIV>----- Original Message ----- </DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #0000ff 2px solid; MARGIN-RIGHT: 0px">
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=SDSSoftware@optusnet.com.au
href="mailto:SDSSoftware@optusnet.com.au">Software Design & Solutions Pty
Ltd.</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=accessd@databaseadvisors.com
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Saturday, April 26, 2003 10:02
AM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [AccessD] Any brilliant
ideas - pictures in 'flexible' positions/ pictures in reports</DIV>
<DIV><BR></DIV>
<DIV><FONT face=Arial color=#0000ff size=2>Hi everybody - hope you had a good
Easter.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>I am back on this picture issue
again - and like the other emails on this topic I need to be able to expand my
group header section of the report when the picture exists.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>In the 'On Format' event I am
changing the height property of the photo control. The actual size I need it
to be is 3.5 cm x 5 cm. (Code below). </FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>My problem is that the section
<EM>is</EM> expanding and shrinking but AFTER A PHOTO IS PRINTED I get an
extra 2cm gap before the next detail record.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>The section's 'Can grow' and 'Can
shrink' properties are set to yes. I have other controls in that section but
for now I have taken most of them out to try to nut this problem out -
leaving 2 text boxes to the left of the photo and *nothing* underneath it at
all.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff size=2>If Me.UsePhoto = True
Then<BR> If IsNull(Me.PhotoLocation) Or Me.PhotoLocation =
"" Then<BR> BoolUsePhoto =
False<BR> Else<BR>
BoolUsePhoto = True<BR>
'Me.Photo.Top = 0<BR> ' Me.Photo.Height =
1200<BR> Me.Photo.Height = 3.5 *
567<BR> Me.Photo.Width = 5 *
567<BR> Me.Photo.Picture =
Me.PhotoLocation<BR>
Me.Photo.Visible = True<BR> End
If<BR>Else<BR> BoolUsePhoto = False<BR>
Me.Photo.Height = 10<BR> Me.Photo.Width =
10<BR> Me.Photo.Visible = False<BR>
Me.Photo.Picture = ""<BR>End If</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2><BR>'...later</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2>If BoolUsePhoto = True
Then<BR> Me.ServiceLongDesc.Width =
12.2 *
567<BR> Me.ServiceShortDesc.Width =
12.2 * 567</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff
size=2> Me.Section(7).Height =
1985<BR> Else<BR>
Me.Section(7).Height = 600<BR>
Me.ServiceLongDesc.Width = 16.75 *
567<BR> Me.ServiceShortDesc.Width =
16.75 * 567<BR>End If<BR></DIV></FONT>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #0000ff 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=stuart@lexacorp.com.pg href="mailto:stuart@lexacorp.com.pg">Stuart
McLachlan</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=SDSSoftware@optusnet.com.au
href="mailto:SDSSoftware@optusnet.com.au">Software Design & Solutions
Pty Ltd.</A> ; <A title=accessd@databaseadvisors.com
href="mailto:accessd@databaseadvisors.com">accessd@databaseadvisors.com</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Thursday, April 03, 2003 11:02
AM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [AccessD] Any brilliant
ideas - pictures in 'flexible' positions</DIV>
<DIV><BR></DIV>On 3 Apr 2003 at 9:39, Software Design & Solutions P
wrote:<BR><BR>> Hi everybody.. I am working on a system for a group of
travel agents<BR>> and today's task is to generate their quotes /
itineraries. eg. Day 1,<BR>> Rio, description of city, etc, Day 2 Manaus,
description of tour etc. <BR>> <BR>> I have created the screen which
will alow them for each day to select<BR>> a city, one or more 'items'
(eg. tour, hotel, flight details), and<BR>> these will slot into the
report when it is printed. <BR>> <BR>> They want the ability to drop
photos in to the itineraries. When they<BR>> select a particular item
(city description) then the itinerary will<BR>> always dislpay a photo.
The users can select from a list of photo<BR>> names held outside the
database. <BR>> <BR>> But I am looking for some brilliant tips on how
to place the photos<BR>> into the report....when they nominate that a
particular item should<BR>> also include a photo, then the text should
appear next to the photo,<BR>> and when they only select text, the text
should wrap to the whole<BR>> page. <BR>> <BR>> I have a few ideas
and will start but if anyone has does anything like<BR>> this, I'd love
to hear from you. <BR>> <BR><BR>Three controls in the detail sectiop of
the report:<BR><BR>txtItemWide, txtItemNarrow - both with the item
text as the source <BR>imgPhoto <BR><BR>Private Sub Detail_Format(Cancel As
Integer, FormatCount As Integer)<BR>If Nz(ItemPhoto, "") > " "
Then<BR> imgPhoto.Picture =
PhotoFile<BR> imgPhoto.visible =
true<BR> txtNarrow.visible = true<BR>
txtWide.visible = false<BR>Else<BR> imgPhoto.visible =
false<BR> txtNarrow.visible = false<BR>
txtWide.visible = true<BR>End If<BR><BR>End Sub<BR><BR>-- <BR>Stuart
McLachlan<BR>Lexacorp Ltd<BR>Application Development, IT
Consultancy<BR><A
href="http://www.lexacorp.com.pg">http://www.lexacorp.com.pg</A><BR><BR>_______________________________________________<BR>AccessD
mailing list<BR><A
href="mailto:AccessD@databaseadvisors.com">AccessD@databaseadvisors.com</A><BR><A
href="http://databaseadvisors.com/mailman/listinfo/accessd">http://databaseadvisors.com/mailman/listinfo/accessd</A><BR>Website:
<A
href="http://www.databaseadvisors.com">http://www.databaseadvisors.com</A><BR></BLOCKQUOTE>
<P>
<HR>
<P></P>_______________________________________________<BR>AccessD mailing
list<BR>AccessD@databaseadvisors.com<BR>http://databaseadvisors.com/mailman/listinfo/accessd<BR>Website:
http://www.databaseadvisors.com<BR></BLOCKQUOTE></BODY></HTML>