ASPImage, teksten i midten, forskellige længder tekst

Hej

Jeg har lavet sådan at man kan sætte tekst på et billed.
Jeg har så lavet en menu hvor menu punkterne løber gennem en loop.

Koden:
<%
Set menu = Conn.Execute("Select * From menu where sprog = '"& session("sprog") &"' order by nr asc")
Set koorinatx = Conn.Execute("Select * From config where enhed = 'menukanpX'")
Set koorinaty = Conn.Execute("Select * From config where enhed = 'menukanpY'")

StrX = koorinatX("funktion") 'F.eks. 60
StrY = koorinatY("funktion") 'f.eks. 40

Do Until menu.EOF

  Set Image = Server.CreateObject("AspImage.Image")

  Image.AutoSize = false

  Image.LoadImage server.mappath("images/menukanp.jpg")
 
  'Image.Bold = True
  Image.FontSize = 10
  Image.FontName = "Verdana, Arial, Helvetica, sans-serif"

  StrTekst = menu("menu")
   
  intX1 = StrX
  intY1 = StrY
  intX2 = intX1 + 10
  intY2 = intY1 + 10
 
  Image.TextOut StrTekst,intX1+10, intY1-5, false
 
  Image.FileName = server.mappath("images/menukanp"& menu("id") &".jpg")
  Image.SaveImage
%>
<a href="sider.asp?id=<%=menu("id")%>" target="sider">
<img src="images/menukanp<%=menu("id")%>.jpg" border="0">
</a><br>
<%
Set Image = nothing

menu.MoveNext
Loop
%>



Der er bare det problem at teksterne ikke er lige lange, så det jeg vil vide er om man kan få teksten til at stå lige i midten.



På forhånd tak

/Sixer