Code: Alles auswählen
Procedure WriteText(x.f,y.f,text.s,font.s,fontsize.i)
fonthandle.i = HPDF_GetFont(pdf,font,#Null)
HPDF_Page_SetFontAndSize (page, fonthandle, fontsize)
HPDF_Page_BeginText (page)
HPDF_Page_MoveTextPos (page, x, y)
HPDF_Page_ShowText (page, text)
HPDF_Page_EndText (page)
EndProcedure
Code: Alles auswählen
text="Müller"
ich hoffe mir kann wer helfen