<!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>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></BODY></HTML>