<!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 6.00.2600.0" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff size=2>Kath,
try the following:</FONT></SPAN></DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=713502801-26042003>
<DIV><FONT face=Arial color=#0000ff size=2>If Me.UsePhoto = True <SPAN
class=713502801-26042003>And </SPAN> <SPAN
class=713502801-26042003>Nz</SPAN>(Me.PhotoLocation<SPAN
class=713502801-26042003>,"") <></SPAN> ""
Then<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>Else<BR> BoolUsePhoto = False<BR>
Me.Photo.Height = 10<BR> Me.Photo.Width = 10<SPAN
class=713502801-26042003> '<- Don't think this is
necessary</SPAN><BR> Me.Photo.Visible =
False<BR> Me.Photo.Picture = ""<BR>End If</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff size=2></FONT><FONT face=Arial color=#0000ff
size=2></FONT><FONT face=Arial color=#0000ff size=2></FONT><FONT face=Arial
color=#0000ff size=2></FONT><FONT face=Arial color=#0000ff
size=2></FONT><BR><FONT face=Arial color=#0000ff size=2>'...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</FONT></DIV></SPAN></DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff
size=2>HTH</FONT></SPAN></DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=713502801-26042003><FONT face=Arial color=#0000ff size=2>David
McAfee</FONT></SPAN></DIV>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<DIV class=OutlookMessageHeader dir=ltr align=left><FONT face=Tahoma
size=2>-----Original Message-----<BR><B>From:</B>
accessd-bounces@databaseadvisors.com
[mailto:accessd-bounces@databaseadvisors.com]<B>On Behalf Of </B>Software
Design & Solutions Pty Ltd.<BR><B>Sent:</B> Friday, April 25, 2003 5:37
PM<BR><B>To:</B> accessd@databaseadvisors.com<BR><B>Subject:</B> Re: [AccessD]
Any brilliant ideas - pictures in 'flexible' positions/pictures in
reports<BR><BR></FONT></DIV>
<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></BLOCKQUOTE></BODY></HTML>