|
TextRotate
(XAPI2000)
Deklaration
VB 6.0
Sub TextRotate (ByVal hDC As Long, ByVal X As Long, ByVal Y
As Long, ByVal Angle As Long, ByVal S As String)
Deklaration VB.NET
Sub TextRotate (ByVal hDC As Integer, ByVal X As Integer, ByVal
Y As Integer, ByVal Angle As Integer, ByVal S As String)
Beskrivning
Skriver ut en textsträng i valfri vinkel i ett formulär. Funktionen
använder sig av aktuellt teckensnitt i formuläret. En textsträng
kan endast roteras om ett TrueType-teckensnitt är valt (t ex Arial,
Times New Roman mm). Noggrannheten på vinkeln är en tiondels grad.
Funktionen använder följande inparametrar:
. |
| hDC |
Formulärets
hDC-egenskap. |
| X,Y |
Koordinater
i pixels. |
| Angle |
Vinkel
i tiondels grader (0-3600). Rotationen sker moturs. |
| S |
Sträng
som ska skrivas ut. |
Se även
TextVertical |
Exempel (VB 6.0)
Nedanstående exempel skriver ut texten
"SamLogic" i 45 graders vinkel. Se bilden nedan.
TextRotate hDC, 100, 100, 450,
"SamLogic"
|
