---
title: "Text i diagram"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/170085-text-i-diagram"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "asp"
published: "2008-03-20T10:14:51.000Z"
updated: "2008-03-24T20:31:00.000Z"
replies: 1
views: 327
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/170085-text-i-diagram"
---

# Text i diagram

## #1 — asp, 2008-03-20T10:14Z

Hej,

Detta är mer en teorifråga än en fråga om ren kod.

Jag har gjort en funktion som skapar ett cirkeldiagram med hjälp av AspJpeg 2.0. Koden ser du här:

```
<%
Response.Expires = 0
Set Jpeg = Server.CreateObject("Persits.Jpeg")
Jpeg.Open Server.MapPath("empty.jpg")

Jpeg.Quality = 100
Jpeg.Canvas.Pen.Color = &H000000

color = Split("FF0000 009900 CC9900 0099CC FFCC00"," ")

str = Request.QueryString("s")
arr = Split(str,":")
total = 0
temp = 0

For i = 0 To UBound(arr)
	total = total + arr(i)
Next

For i = 0 To UBound(arr)
	If arr(i) <> "0" Then
		ny = Round((arr(i) / total) * 360)
		farg = "&H" & color(i)
		Jpeg.Canvas.Brush.Color = farg
		Jpeg.Canvas.DrawPie 100, 100, 100, temp, ny	+ temp
		temp = temp + ny
	End if
Next

Jpeg.SendBinary
%>
```

Nu vill jag placera text i diagramet, så man ser hur många procent varje del har. Jag har varit inne på att räkna lite cosinus/sinus på vinklarna för att ta reda på x,y-position.

Har ni några tips?

Se själv diagrammet här: <http://www.tipnet.se/circle.asp?s=1:3:5>

Hälsningar
Marcus

Permalänk: https://www.webforum.nu/p/170085

## #2 — Eclipse, 2008-03-24T20:31Z

Stilig cirkel!

Testa att lägga in denna koden i slutet, precis före Jpeg.SendBinary

' ## DRAW TEXT
Jpeg.Canvas.Font.Color = &HFF0000 ' Red
Jpeg.Canvas.Font.Family = "Courier New"
Jpeg.Canvas.Font.Bold = True
Jpeg.Canvas.Font.Quality = 4 ' Antialiased
Jpeg.Canvas.Font.BkMode = "Opaque" ' to make antialiasing work
Jpeg.Canvas.Print 10, 10, "Copyright (c) XYZ, Inc."

Förlåt! Jag svara på fel fråga, ser jag nu. Låter svaret vara kvar om det kanske hjälper i alla fall...

Permalänk: https://www.webforum.nu/p/2093433

---

Tråden på webben: https://www.webforum.nu/amne/asp/170085-text-i-diagram